Generating User Defined Functions
385
1170
Tbl_range=1/2^128
1180
WHILE Test_range>Tbl_range
1190
Tbl_range=Tbl_range*2
1200
END WHILE
1210
Table_range=Tbl_range
1220
Xofst=157 ! exponent bias for DSP calculations
1230 !
1240 ! Now divide the full range of the table into 128 segments (129 points)
1250 ! from -Rnge to +Rnge using the Custom() function function. We
1260 ! then generate the M, B and Ex values for the table to be downloaded.
1270 !
1280 ! Note that we actually calculate 129 points but generate 128 sets of
1290 ! M, B and Ex values.
1300 !
1310 !
1320
FOR Ii=0 TO 64 STEP 1
1330 Input(Ii)=((Tbl_range/64.0)*Ii)
1340 Result(Ii)=FNMy_function(Input(Ii))
1350 IF Ii=0 THEN GOTO Loopend1! This is the first point
1360
!
1370
! for second and subsequent points
1380 Jj=64+Ii-1 ! generate numbers for prev segment
1390 T=ABS(Result(Ii-1)) ! using abs value of prev seg base
1400 !
1410 ! compute the exponent of the offset (B is 31 bits)
1420 IF T<>0. THEN ! don’t take log of zero
1430
Exponent=31.0-(LGT(T)/LGT(2.0)) ! take log base 2
1440 ELSE
1450
Exponent=100.0
1460 END IF
1470 !
1480 ! compute slope in bits (each table entry represents 512 bits)
1490 Slope=(Result(Ii)-Result(Ii-1))/512.0
1500 !
1510 ! don’t take the log of a negative slope
1520 Absslope=ABS(Slope)
1530 !
1540 ! compute the exponent of the slope (M is 16 bits)
1550 IF Absslope<>0. THEN
1560
Exponent2=15.0-(LGT(Absslope)/LGT(2.0))
1570 ELSE
1580
Exponent2=100.0
1590 END IF
1600
! Choose the smallest exponent -- maximize resolution
1610 IF Exponent2<Exponent THEN Exponent=Exponent2
1620 Xfactor=INT(Exponent) !convert to integer
1630 IF T<>0. THEN
1640
Ltemp=PROUND(LGT(T)/LGT(2.0),0)
1650
IF (Ltemp)>30 THEN Xfactor=30-Ltemp
1660 END IF
1670 Mfactor=PROUND(2^Xfactor*Slope,0)
1680 IF Mfactor=32768.0 THEN
1690
! There is an endpoint problem. Re-compute if on endpoint
1700
Xfactor=Xfactor-1
1710
Mfactor=PROUND(2^Xfactor*Slope,0)
1720 END IF
1730 IF (Mfactor<=32767.0 AND Mfactor>=-32768.0) THEN
1740
! only save if M is in limits
Содержание VXI 75000 C Series
Страница 2: ......
Страница 16: ...16 ...
Страница 18: ......
Страница 30: ...30 Getting Started Chapter 1 Notes ...
Страница 32: ...32 Field Wiring Chapter 2 Figure 2 1 Channel Numbers at SCP Positions ...
Страница 44: ...44 Field Wiring Chapter 2 Figure 2 11 HP E1415 Terminal Module ...
Страница 54: ...54 Field Wiring Chapter 2 Notes ...
Страница 61: ...Programming the HP E1415 for PID Control 61 Chapter 3 Programming Overview Diagram ...
Страница 124: ...124 Creating and Running Custom Algorithms Chapter 4 Figure 4 2 Algorithm Operating Sequence Diagram ...
Страница 136: ...136 Creating and Running Custom Algorithms Chapter 4 Notes ...
Страница 152: ...152 Algorithm Language Reference Chapter 5 Notes ...
Страница 304: ...304 HP E1415 Command Reference Chapter 6 Command Quick Reference Notes ...
Страница 308: ...308 Specifications Appendix A Thermocouple Type E 200 800C SCPs HP E1501 02 03 ...
Страница 309: ...Specifications 309 Appendix A Thermocouple Type E 200 800C SCPs HP E1508 09 ...
Страница 310: ...310 Specifications Appendix A Thermocouple Type E 0 800C SCPs HP E1501 02 03 ...
Страница 311: ...Specifications 311 Appendix A Thermocouple Type E 0 800C SCPs HP E1509 09 ...
Страница 312: ...312 Specifications Appendix A Thermocouple Type E Extended SCPs HP E1501 02 03 ...
Страница 313: ...Specifications 313 Appendix A Thermocouple Type E Extended SCPs HP E1508 09 ...
Страница 314: ...314 Specifications Appendix A Thermocouple Type J SCPs HP E1501 02 03 ...
Страница 315: ...Specifications 315 Appendix A Thermocouple Type J SCPs HP E1508 09 ...
Страница 316: ...316 Specifications Appendix A Thermocouple Type K SCPs HP E1501 02 03 ...
Страница 317: ...Specifications 317 Appendix A Thermocouple Type R SCPs HP E1501 02 03 ...
Страница 318: ...318 Specifications Appendix A Thermocouple Type R SCPs HP E1508 09 ...
Страница 319: ...Specifications 319 Appendix A Thermocouple Type S SCPs HP E1501 02 03 ...
Страница 320: ...320 Specifications Appendix A Thermocouple Type S SCPs HP E1508 09 ...
Страница 321: ...Specifications 321 Appendix A Thermocouple Type T SCPs HP E1501 02 03 ...
Страница 322: ...322 Specifications Appendix A Thermocouple Type T SCPs HP E1508 09 ...
Страница 323: ...Specifications 323 Appendix A 5K Thermistor Reference SCPs HP E1501 02 03 ...
Страница 324: ...324 Specifications Appendix A 5K Thermistor Reference SCPs HP E1508 09 ...
Страница 325: ...Specifications 325 Appendix A RTD Reference SCPs HP E1501 02 03 ...
Страница 326: ...326 Specifications Appendix A RTD SCPs HP E1501 02 03 ...
Страница 327: ...Specifications 327 Appendix A RTD SCPs HP E1508 09 ...
Страница 328: ...328 Specifications Appendix A 2250 Thermistor SCPs HP E1501 02 03 ...
Страница 329: ...Specifications 329 Appendix A 2250 Thermistor SCPs HP E1508 09 ...
Страница 330: ...330 Specifications Appendix A 5K Thermistor SCPs HP E1501 02 03 ...
Страница 331: ...Specifications 331 Appendix A 5K Thermistor SCPs HP E1508 09 ...
Страница 332: ...332 Specifications Appendix A 10K Thermistor SCPs HP E1501 02 03 ...
Страница 333: ...Specifications 333 Appendix A 10K Thermistor SCPs HP E1508 09 ...
Страница 334: ...334 Specifications Appendix A Notes ...
Страница 346: ...346 Glossary Appendix C Notes ...
Страница 388: ...388 Generating User Defined Functions Appendix F Notes ...
Страница 438: ...438 Index Writing the algorithm 129 values to CVT elements 120 values to the FIFO 121 Z ZERO CALibration ZERO 194 ...