https://www.togotech.co.kr/index.php?action=history&feed=atom&title=Prober06-ibw.txt
Prober06-ibw.txt - 편집 역사
2026-04-27T03:12:16Z
이 문서의 편집 역사
MediaWiki 1.31.1
https://www.togotech.co.kr/index.php?title=Prober06-ibw.txt&diff=37851&oldid=prev
Togotech: 새 문서: 프루버 <pre> 10 ! ASSIGN @Probe TO 402 20 INTEGER X,Y,Count,Type,Inst 30 DIM Tmp$[2],Cmd$[15] 40 Type=1 !1은 정사각형 0,0에서 Y축 순서대로 50...
2020-11-22T07:10:20Z
<p>새 문서: <a href="/index.php/%ED%94%84%EB%A3%A8%EB%B2%84" title="프루버" data-bs-title="프루버">프루버</a> <pre> 10 ! ASSIGN @Probe TO 402 20 INTEGER X,Y,Count,Type,Inst 30 DIM Tmp$[2],Cmd$[15] 40 Type=1 !1은 정사각형 0,0에서 Y축 순서대로 50...</p>
<p><b>새 문서</b></p><div>[[프루버]]<br />
<pre><br />
10 ! ASSIGN @Probe TO 402<br />
20 INTEGER X,Y,Count,Type,Inst<br />
30 DIM Tmp$[2],Cmd$[15]<br />
40 Type=1 !1은 정사각형 0,0에서 Y축 순서대로<br />
50 Inst=2 !1=3478DMM 2=3457DMM 3=2420SM<br />
60 GOSUB Filesave<br />
70 GOSUB Inst_setup<br />
90 GOSUB Save_head<br />
160 Count=0<br />
170 T0=TIMEDATE<br />
180 SELECT Type<br />
190 CASE 1<br />
200 FOR X=0 TO 27 !X 개수-1<br />
210 FOR Y=0 TO 18 !Y 개수-1<br />
220 Cmd$="MOX"&VAL$(X)&"Y-"&VAL$(Y)<br />
230 ! GOSUB Move<br />
240 Count=Count+1<br />
250 T=TIMEDATE-T0<br />
260 GOSUB Read<br />
270 GOSUB Save<br />
280 NEXT Y<br />
290 NEXT X<br />
300 CASE 2<br />
310 END SELECT <br />
320 STOP<br />
330 Filesave: !<br />
340 DIM Outfilename$[20],Dhms$[8]<br />
350 Time$=TIME$(TIMEDATE)<br />
360 Date$=DATE$(TIMEDATE)<br />
370 Dhms$=Date$[1;2]&Time$[1;2]&Time$[4;2]&Time$[7;2]<br />
380 Outfilename$=Dhms$&".txt"<br />
390 CREATE Outfilename$,1<br />
400 ASSIGN @Outfile TO Outfilename$;FORMAT ON<br />
410 RETURN<br />
420 Inst_setup: !!! 계측기 셋업<br />
430 SELECT Inst<br />
440 CASE 1<br />
450 ASSIGN @Dmm TO 427 !hp 3478 dmm<br />
460 CASE 2<br />
470 ASSIGN @Dmm TO 402 !hp 3457 dmm<br />
471 OUTPUT @Dmm;"NPLC 1"<br />
480 CASE 3<br />
490 ASSIGN @Sm TO 424 !Keithley 2420 SourceMeter<br />
500 OUTPUT @Sm;"ROUT:TERM FRON" !front terminal<br />
510 OUTPUT @Sm;"SYST:RSEN ON" !4-wire<br />
520 OUTPUT @Sm;"SOUR:FUNC CURR" !i-source<br />
530 OUTPUT @Sm;"SOUR:CURR:MODE FIX"<br />
540 OUTPUT @Sm;"SOUR:CURR:RANG:AUTO ON"<br />
550 OUTPUT @Sm;"SOUR:CURR:LEV 0.10" !10mA<br />
560 OUTPUT @Sm;"SENS:FUNC ""VOLT""" !v-measure<br />
570 OUTPUT @Sm;"SENS:VOLT:PROT 10" !compliance V=10V<br />
580 OUTPUT @Sm;"VOLT:RANG 10"<br />
590 OUTPUT @Sm;"FORM:ELEM VOLT,CURR"!출력 데이터는 전압,전류만<br />
600 OUTPUT @Sm;"SOUR:CLE:AUTO ON" !측정할 때만 출력 ON/OFF 자동으로<br />
610 END SELECT <br />
611 RETURN<br />
620 Move: !<br />
630 OUTPUT @Probe;Cmd$<br />
640 ENTER @Probe;Tmp$<br />
650 RETURN<br />
660 Read: !<br />
670 SELECT Inst<br />
680 CASE 1<br />
690 GOSUB Read_3478<br />
700 CASE 2<br />
710 GOSUB Read_3457<br />
720 CASE 3<br />
730 GOSUB Read_2420<br />
740 END SELECT <br />
750 RETURN<br />
760 Save: !<br />
770 SELECT Inst<br />
780 CASE 1,2<br />
790 GOSUB Save_dmm<br />
800 CASE 3<br />
810 GOSUB Save_2420<br />
820 END SELECT <br />
830 RETURN<br />
840 Read_3478: !<br />
850 WAIT 1<br />
860 ENTER @Dmm;R<br />
870 RETURN<br />
880 Read_3457: !<br />
890 OUTPUT @Dmm;"TRIG SGL"<br />
900 ENTER @Dmm;R<br />
910 RETURN<br />
920 Save_head: !<br />
930 SELECT Inst<br />
940 CASE 1,2 !dmm<br />
950 OUTPUT @Outfile;"No.,Time[s],X,Y,R[ohm]"<br />
960 CASE 3 !source meter<br />
970 OUTPUT @Outfile;"No.,Time[s],X,Y,Volt[V],Curr[A]"<br />
980 END SELECT <br />
990 RETURN<br />
1000 Save_dmm: !<br />
1010 PRINT Count,INT(T);"sec","X=";X,"Y=";Y,"R=";R<br />
1020 OUTPUT @Outfile;Count,T,X,Y,R<br />
1030 RETURN<br />
1040 Read_2420: !<br />
1050 OUTPUT @Sm;"READ?"<br />
1060 ENTER @Sm;Volt,Curr<br />
1070 RETURN<br />
1080 Save_2420: !<br />
1090 PRINT Count,INT(T);"sec","X=";X,"Y=";Y,"V=";Volt,"i=";Curr<br />
1100 OUTPUT @Outfile;Count,T,X,Y,Volt,Curr<br />
1110 RETURN<br />
1120 END<br />
</pre></div>
Togotech