根据HP6626A 操作手册,电源校准需要用电源的软件校准程序外接DMM配合进行,手册提供了BASIC语言的电源校准源程序,和校准办法,准备将BASIC语言的电源校准源程序 移植为
vB,在
上位机VB移植过程遇到源程序不太理解的地方特请教:
1.原BASIC的HP6626A 校准软件,有段语句多处出现有些不明白,包括电压/电流校准,UN
tiL BIT(SPOLL(@Ps),4) ! Finished when Bit 4 goes true语句, 解释语句英译汉是:当位4变为真时完成, 网上搜了猜是读取DMM取四位读数,可是看电源显示电压四位对上了,电流显示五位,电流校准也有这条语句。不知道怎么理解。
1670 OUTPUT @Ps; VLO";Chan ! Set to low output voltage
1680 WAIT 1 ! Wait for supply to stabilize
1690 Vlo=FNDcv ! Read low voltage
1700 !
1710 OUTPUT @Ps; “VHI” ;Chan ! Set to high output voltage
1720 WAIT 1 ! Wait for supply to stabilize
1730 Vhi=FNDcv ! Read high voltage
1740 !
1750 OUTPUT @Ps; “VDATA” ;Chan, Vlo, Vhi ! Send output voltage data
1760 !
1770 Clear_screen 清屏子程序
1780 PRINT "Calibrating the";V_range,'volt range readback"
1790 !
1800 OUTPUT @Ps; VRLO";Chan ! Set low readback voltage
1810 REPEAT ! Wait for supply to finish
1820 UNTIL BIT(SPOLL(@Ps),4) ! Finished when Bit 4 goes true
1830 Vrlo=FNDcv ! Read low output voltage
2.还有一段语句和清屏语句类似但是还是不太一样
清屏子程序:
920 SUB Clear_screen ! Subprogram to clear display
930 OUTPUT 2;CHR$(255)&CHR$(75); ! Clear screen
940 SUBEND
错误检查语句
80 SUB Err _ trap
90 OFF KEY
100 COM /Ps/ @Ps
110 OUTPUT @Ps;"ERR?"
120 ENTER @Ps:Err
130 OUTPUT 2 USING "#,K";CHR$(255)&CHR$(75)
140 IF Err THEN
150 PRINT "POWER SUPPLY PROGRAMMING ERROR:’’
160 END IF
170 SELECT Err
130语句和清屏语句类似又不一样。
HP6626A 校准BASIC软件移植为VB目前错误检查子程序130 OUTPUT 2 USING "#,K";CHR$(255)&CHR$(75) 和 1820 UNTIL BIT(SPOLL(@Ps),4) ! Finished when Bit 4 goes true的 BASIC语言语句有些不明白,其它还都算过了。