169
1660 EE = EE + 1 : BEEP
1670 '
1680 PRINT “Errpr Count = “; EE
1690 PRINT
1700 '------------------< Command transfer, again. >-----------
1710 GOTO 1340
1720 '
1730 ’
1740 '=============================================
1750 'Reading RS data
1760 '=============================================
1770 COM STOP
1780 TT$ = time$
1790 '
1800 IF TT$ = TIME$ THEN 1790
1810 '
1820 LINE INPUT #1, B$
1830 CLOSE #1 : OPEN “COM: 071NN” AS #1
1840 SW = 99: ’Flag for end of receiving
1850 RETURN
1860 '
1870 '=============================================
1880 'Time−out of RS data
1890 'In case of no response within the specified time.
1900 '=============================================
1910 COM STOP
1920 CLOSE #1 : OPEN “COM:071NN” AS #1
1930 EC = 99 : SW = 99
1940 PRINT “Time out error occured.
1950 PRINT “Specified ID for CSD−814B has not prepared.”
1960 RETURN
1970 '
1980 '
1990 ’
2000 END
To Next Page
Loading...
Need help?
General
