天理大学学報, Tập 43天理大学, 1991 |
Từ bên trong sách
Kết quả 1-3 trong 4
Trang 78
... COLOR 4 : PRINT USING " @ ( 1 + 2 ) ; FZ2 ( 1 + 3 ) ; FZZ $ ( 1 + 4 ) : COLOR 7 280 2 = 2 + 1 290 NEXT ! 300 LOCATE 25.4 : COLOR 6 : INPUT ** , FS : COLOR 7 310 IF FS = " BACK " THEN CHAIN " TMENU " 320 CONSOLE 5.20.0.1:CLS 1 : CONSOLE ...
... COLOR 4 : PRINT USING " @ ( 1 + 2 ) ; FZ2 ( 1 + 3 ) ; FZZ $ ( 1 + 4 ) : COLOR 7 280 2 = 2 + 1 290 NEXT ! 300 LOCATE 25.4 : COLOR 6 : INPUT ** , FS : COLOR 7 310 IF FS = " BACK " THEN CHAIN " TMENU " 320 CONSOLE 5.20.0.1:CLS 1 : CONSOLE ...
Trang 79
... COLOR 6 : PRINT SF11 $ 1052 LOCATE 26,4 : COLOR 6 : INPUT.SF18 : CCLOR 7 1060 IF SF1 $ = " BACK THEN CLS 1 : GOTO 720 1070 IF SF1S THEN SF1S - SF118 1080 SF1 - VAL ( SF18 ) 1090 IF START1 $ = " 3 " THEN CLS 1 : GOTO 2200 1100 SFT1S ...
... COLOR 6 : PRINT SF11 $ 1052 LOCATE 26,4 : COLOR 6 : INPUT.SF18 : CCLOR 7 1060 IF SF1 $ = " BACK THEN CLS 1 : GOTO 720 1070 IF SF1S THEN SF1S - SF118 1080 SF1 - VAL ( SF18 ) 1090 IF START1 $ = " 3 " THEN CLS 1 : GOTO 2200 1100 SFT1S ...
Trang 83
... COLOR 6 : PRINT NP1 $ LOCATE 1 + 1 4 + 11,9 + J : COLOR 6 : INPUT .P1 $ : COLOR 7 IF LEFTS ( P1 $ .4 ) BACK THEN COLORS ( 0.6 ) - ( 40.8 ) .0 : GOTO 5300 IF P1S THEN P18 - NP1 $ 5518 PS LEFTS ( P ! 3,4 ) : NP ( 1 ) = UAL ( P $ ) 5520 IF ...
... COLOR 6 : PRINT NP1 $ LOCATE 1 + 1 4 + 11,9 + J : COLOR 6 : INPUT .P1 $ : COLOR 7 IF LEFTS ( P1 $ .4 ) BACK THEN COLORS ( 0.6 ) - ( 40.8 ) .0 : GOTO 5300 IF P1S THEN P18 - NP1 $ 5518 PS LEFTS ( P ! 3,4 ) : NP ( 1 ) = UAL ( P $ ) 5520 IF ...