"E5100a-01.bas"의 두 판 사이의 차이
(새 문서: E5100A <pre> 200 MASS STORAGE IS ":,4" !내부 FDD 사용 220 ! MASS STORAGE IS ":,0" !내부 메모리 사용 240 ! COPY "1.txt:,0" to "1.txt:,4" !내부 메모리에...) |
(차이 없음)
|
2020년 2월 12일 (수) 10:44 판
200 MASS STORAGE IS ":,4" !내부 FDD 사용 220 ! MASS STORAGE IS ":,0" !내부 메모리 사용 240 ! COPY "1.txt:,0" to "1.txt:,4" !내부 메모리에 저장되는 1.txt 파일을 FDD로 복사 260 PURGE "1.txt" 280 CREATE "1.txt",1 300 ASSIGN @File TO "1.txt";FORMAT ON 320 ASSIGN @E5100 TO 800 !자체 콘트롤러이므로 반드시 800번 부여 340 ASSIGN @Oven TO 701 !연결된 외부 계측기 주소는 700번대 부여 360 OUTPUT @E5100;"ANAMODE ZTRAN" 380 OUTPUT @E5100;"MEAS AR" 400 OUTPUT @E5100;"FMT MAGZP" 420 OUTPUT @E5100;"SCAY 10" 440 EXECUTE "ANAOCH1" 460 EXECUTE "ANAODATA" 480 EXECUTE "ANARFULL" 500 Count=0 520 Temp_p=0 540 T0=TIMEDATE 560 OUTPUT @File;"No., Time[s], Temp['C], Rr[ohm], Fr[Hz], Ra[ohm], Fa[Hz]" 580 LOOP 600 OUTPUT @Oven;"TEMP?" 620 ENTER @Oven;Temp,Tmp,Tmp,Tmp 640 IF Temp<>Temp_p THEN 660 T=TIMEDATE-T0 680 Count=Count+1 700 EXECUTE "SING" 720 EXECUTE "OUTPCERR?" 740 Rr=READIO(8,0) 760 Fr=READIO(8,1) 780 Ra=READIO(8,2) 800 Fa=READIO(8,3) 820 PRINT Temp,Rr,Fr 840 OUTPUT @File;Count,T,Temp,Rr,Fr,Ra,Fa 860 Temp_p=Temp 880 END IF 900 END LOOP 920 END