164
13−3. Sample program
13−3−1.
Sample program for RS−232C Stream mode.
1000 '
1010 ’---------------------------------------------
1020 'CSD−814B Sample program for RS−232C Interface.
1030 'Minebea Co., Ltd. Measuring Components Div.
1040 ’---------------------------------------------
1050 '
1060 'This sample is to be used for Stream mode.
1070 CLS
1080 '----------<Port declaration>--------------
1090 OPEN “COM:071NN” AS #1
1100 '
1110 '----------<Receiving>--------------
1120 LINE INPUT #1, B$
1130 '
1140 E$ = MID$(B$, 1, 1)
1150 IF E$ >< “S” THEN 1120
1160 W$ = MID$(B$, 5, 8)
1170 PRINT “RECEIVING = “ ; W$
1180 GOTO 1120
1190 '
1200 END
To Next Page
Loading...
Need help?
General
