832 IF Y% = 18 THEN LET B$ =
“ A “
833 IF Y% = 19 THEN LET B$ =
“ B “
834 IF Y% = 20 THEN LET B$ =
“ C “
835 IF Y% = 21 THEN LET B$ =
“ D “
836 IF Y% = 22 THEN LET B$ =
“ E “
837 IF Y% = 23 THEN LET B$ =
“ F “
838 IF Y% = 24 THEN LET B$ =
“ G “
839 IF Y% = 25 THEN LET B$ =
“ H “
840 IF Y% = 26 THEN LET B$ =
“ I “
841 IF Y% = 27 THEN LET B$ =
“ J “
842 IF Y% = 28 THEN LET B$ =
“ K “
843 IF Y% = 29 THEN LET B$ =
“ L “
844 IF Y% = 30 THEN LET B$ =
“ M “
845 IF Y% = 31 THEN LET B$ =
“ N “
846 IF Y% = 32 THEN LET B$ =
“ O “
900 GOTO 905
905 OPEN “COM1:9600,N,8,1,RS,CS,DS,CD,BIN” AS #1
910 PRINT #1, A$ ; B$ ;
920 CLOSE #1
930 CLS
931 INPUT “DO YOU WISH TO EXIT THE DA-3212 PROGRAM [YES / NO]” ; A$
932 IF A$ = ”Y” THEN 960
933 IF A$ = ”y” THEN 960
934 IF A$ = ”N” THEN 10
935 IF A$ = ”n” THEN 10
960 CLS
962 END
A$ is the machine number on line 910
B$ is the input number on line 910
P.O. Box 749 Peekskill, NY 10566 Tel: (845) 737-7009 Fax: (845) 737-0426 Web: www.compuvideosystems.com
Содержание DA-3212
Страница 20: ......