384
Generating User Defined Functions
580
OUTPUT @E1415;"alg:def ’alg1’,’static float y,radians=0;y=sin(radians);’"
590
OUTPUT @E1415;"form ascii;:trig:timer .001;:init"
600
RAD ! use radians
610
GOSUB Err_check
620
FOR Radians=-PI/2 TO PI/2 STEP PI/10
630
OUTPUT @E1415;"alg:scal ’alg1’,’radians’,";Radians;";upd"
640
OUTPUT @E1415;"alg:scal? ’alg1’,’y’"
650
ENTER @E1415;Y
660
PRINT USING This;"’RMB’ sin(radians): ";SIN(Radians);" ’E1415A’ sin(Radians): ";Y
670 This:IMAGE K,SD.DDDD,K,SD.DDDD
680
NEXT Radians
690
STOP
700 End_: !
710
PRINT "HPIB TIMEOUT"
720
STOP
730 Err_check:REPEAT ! Check for any errors
740
OUTPUT @E1415;"SYST:ERR?"
750
ENTER @E1415;Error,String$
760
IF Error THEN
770
OUTPUT @Err;"Error returned: "&VAL$(Error)&". "&String$
780
END IF
790
UNTIL Error=0
800
RETURN
810
END
820 ! ############################################################## 830 !
840 ! Subprogram Build_eu_table
850 ! TASK: Generates tables of mx+b values for downloading to E1415 DSP
860 !
870 ! Generate the three coefficients for the EU algorithm:
880 ! a. The "exponent" value
890 ! b. The "slope" or "M" value
900 ! c. The "intercept" or "B" value.
910 !
920 ! INPUT PARAMETERS:
930 ! REAL Min_input - lowest expected value
940 ! REAL Max_input - largest expected value
950 ! zero generates piecewise table
960 ! OUTPUT PARAMETERS
970 ! REAL Table_range - returned table range
980 ! REAL Table_offset - how much to adjust X for shifted function
990 ! INTEGER Coef_array - returned coeficient array:
1000 ! (512 values)
1010 !
1020 Build_eu_table:SUB Build_table(REAL Min_input,Max_input,Table_range,Table_offset,INTEGER
Coef_array(*))
1030
INTEGER M(128),Ex(128),Bhigh(128),Blow(128),Xofst,Shift,Ii,Jj
1040
INTEGER Xfactor,Ltemp
1050
REAL Input(129),Result(129),Test_range,T,Exponent,Exponent2
1060
REAL Slope,Absslope,Mfactor,B,Bl
1070
!
1080
! Calculate the mid point of the range.
1090
!
1100
Center=Mi(Max_input-Min_input)/2
1110
Table_offset=Center
1120
Temp_range=Max_input-Center
1130
Test_range=ABS(Temp_range)
1140
!
1150
! Now calculate the closest binary representation of the test_range
1160
!
Summary of Contents for VXI 75000 C Series
Page 2: ......
Page 16: ...16 ...
Page 18: ......
Page 30: ...30 Getting Started Chapter 1 Notes ...
Page 32: ...32 Field Wiring Chapter 2 Figure 2 1 Channel Numbers at SCP Positions ...
Page 44: ...44 Field Wiring Chapter 2 Figure 2 11 HP E1415 Terminal Module ...
Page 54: ...54 Field Wiring Chapter 2 Notes ...
Page 61: ...Programming the HP E1415 for PID Control 61 Chapter 3 Programming Overview Diagram ...
Page 136: ...136 Creating and Running Custom Algorithms Chapter 4 Notes ...
Page 152: ...152 Algorithm Language Reference Chapter 5 Notes ...
Page 304: ...304 HP E1415 Command Reference Chapter 6 Command Quick Reference Notes ...
Page 308: ...308 Specifications Appendix A Thermocouple Type E 200 800C SCPs HP E1501 02 03 ...
Page 309: ...Specifications 309 Appendix A Thermocouple Type E 200 800C SCPs HP E1508 09 ...
Page 310: ...310 Specifications Appendix A Thermocouple Type E 0 800C SCPs HP E1501 02 03 ...
Page 311: ...Specifications 311 Appendix A Thermocouple Type E 0 800C SCPs HP E1509 09 ...
Page 312: ...312 Specifications Appendix A Thermocouple Type E Extended SCPs HP E1501 02 03 ...
Page 313: ...Specifications 313 Appendix A Thermocouple Type E Extended SCPs HP E1508 09 ...
Page 314: ...314 Specifications Appendix A Thermocouple Type J SCPs HP E1501 02 03 ...
Page 315: ...Specifications 315 Appendix A Thermocouple Type J SCPs HP E1508 09 ...
Page 316: ...316 Specifications Appendix A Thermocouple Type K SCPs HP E1501 02 03 ...
Page 317: ...Specifications 317 Appendix A Thermocouple Type R SCPs HP E1501 02 03 ...
Page 318: ...318 Specifications Appendix A Thermocouple Type R SCPs HP E1508 09 ...
Page 319: ...Specifications 319 Appendix A Thermocouple Type S SCPs HP E1501 02 03 ...
Page 320: ...320 Specifications Appendix A Thermocouple Type S SCPs HP E1508 09 ...
Page 321: ...Specifications 321 Appendix A Thermocouple Type T SCPs HP E1501 02 03 ...
Page 322: ...322 Specifications Appendix A Thermocouple Type T SCPs HP E1508 09 ...
Page 323: ...Specifications 323 Appendix A 5K Thermistor Reference SCPs HP E1501 02 03 ...
Page 324: ...324 Specifications Appendix A 5K Thermistor Reference SCPs HP E1508 09 ...
Page 325: ...Specifications 325 Appendix A RTD Reference SCPs HP E1501 02 03 ...
Page 326: ...326 Specifications Appendix A RTD SCPs HP E1501 02 03 ...
Page 327: ...Specifications 327 Appendix A RTD SCPs HP E1508 09 ...
Page 328: ...328 Specifications Appendix A 2250 Thermistor SCPs HP E1501 02 03 ...
Page 329: ...Specifications 329 Appendix A 2250 Thermistor SCPs HP E1508 09 ...
Page 330: ...330 Specifications Appendix A 5K Thermistor SCPs HP E1501 02 03 ...
Page 331: ...Specifications 331 Appendix A 5K Thermistor SCPs HP E1508 09 ...
Page 332: ...332 Specifications Appendix A 10K Thermistor SCPs HP E1501 02 03 ...
Page 333: ...Specifications 333 Appendix A 10K Thermistor SCPs HP E1508 09 ...
Page 334: ...334 Specifications Appendix A Notes ...
Page 346: ...346 Glossary Appendix C Notes ...
Page 388: ...388 Generating User Defined Functions Appendix F Notes ...