squash - TRS-80 Color Computer Archive
squash - TRS-80 Color Computer Archive
squash - TRS-80 Color Computer Archive
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
BLITZ 17<br />
239 REM RECORD BATTU?<br />
240 IF H>R THEN R=H<br />
250 PRINT @ 3,"SCORE :";H,<br />
260 FF:INT "RECORD :"; R;<br />
270 FOR 1=1 TO 100<br />
2<strong>80</strong> NEXT l<br />
Z90 R$=INKEY$<br />
,/11 11<br />
300 F'RINT@ 73,"UNE AUTRE . ,<br />
310 R$=INI"N" THEN 40<br />
340 CLS<br />
350 END<br />
354 REM<br />
355 REM BOMBE LACHEE<br />
356 REM<br />
359 REM SOL ATTEINT?<br />
360 IF B>=510 THEN B=O<br />
365 REM AFFICHAGE BOMBE<br />
370 PRINT@ B1,CHR$(128);<br />
3<strong>80</strong> IF BO THEN PRINT@ B,B$;:B1<br />
=B:B=B+32<br />
390 F:ETURN<br />
394 REM<br />
395 REM DELAI POUR RALENTIR<br />
396<br />
397<br />
REM<br />
REM<br />
L'AVION SI AUCUNE<br />
N'EST LACHEE<br />
BOMBE<br />
398 REN<br />
400 FOR 1=1 TO 20<br />
410 NEXT 1<br />
420 RETURN