mirror of
https://github.com/antoinevignau/source.git
synced 2024-12-26 22:31:05 +00:00
v1
il restait un peu d'anglais
This commit is contained in:
parent
45af64bb7a
commit
60a4c89ef8
@ -44,7 +44,7 @@
|
||||
400 GOSUB 80: IF IN$ = "?" THEN POP : GOSUB 2000: GOTO 1000
|
||||
402 IF ASC (IN$) = 27 THEN GOSUB 420
|
||||
404 RETURN
|
||||
420 HOME : PRINT "VEUX-TU T'ARRETER ? (O OR N) ";
|
||||
420 HOME : PRINT "VEUX-TU T'ARRETER ? (O OU N) ";
|
||||
422 GET IN$: IF IN$ < > "O" AND IN$ < > "N" THEN 422
|
||||
424 IF IN$ = "O" THEN 1500
|
||||
426 HOME : RETURN
|
||||
@ -87,7 +87,7 @@
|
||||
1136 IF G3$ = "B" THEN G3$ = "BLEU":HUE = 6: GOSUB 120
|
||||
1137 HOME : VTAB 21: PRINT G1$", ";G2$", ";G3$
|
||||
1138 T = 10:P = 152: GOSUB 300
|
||||
1140 HOME : PRINT "BIBBIT OR GRIBBIT? (B OR G) ";
|
||||
1140 HOME : PRINT "BIBBIT OU GRIBBIT? (B OU G) ";
|
||||
1142 GOSUB 400:G4$ = IN$: IF G4$ = ARROW$ THEN 1100
|
||||
1143 IF G4$ < > "B" AND G4$ < > "G" THEN 1140
|
||||
1144 IF G4$ = "B" THEN G4$ = "BIBBIT": GOSUB 140
|
||||
|
Binary file not shown.
Loading…
Reference in New Issue
Block a user