Here's Dropout to type in:
Use 1 to move left and 4 to move right.
Happy typing!
Edit: I've added a slightly improved edition of the game for the unexpanded ZX81 which doesn't "flicker" the catcher when you play.
Dropout 1K BASIC listing
Re: Dropout 1K BASIC listing
Xur Text file:
Code: Select all
1 LET P=NOT PI
2 LET E=VAL "11"
3 LET T=P
4 FOR Z=SGN PI TO CODE "¿"
5 PRINT AT CODE "£",USR VAL "2602";T
6 LET R=INT (RND*CODE ")")
7 FOR Y=NOT PI TO CODE "¿"
8 PRINT AT Y,R;"O"
9 LET N=P+(INKEY$="4")-(INKEY$="1")
10 IF NOT N OR N>CODE "?" THEN LET N=P
11 PRINT AT E,P;" ";AT E,N;"ª¬";AT Y,R;" "
12 LET P=N
13 NEXT Y
14 LET T=T+(P=R OR P+VAL"1"=R)
15 NEXT Z
16 PRINT AT CODE "£",NOT P;"YOU SCORED ";T;"/10"
17 GOTO CODE ")"+(INKEY$<>"")
18 RUN
20 REM DROPOUT BY ALASTAIR GOURLAY c 1982 INTERFRCE PUBLISHING REFACTORED BY donkeysoft
Xavier ...on the Facebook groupe : "Zx81 France"(fr)
Re: Dropout 1K BASIC listing
Thanks for the text listing XavSnap
Out of interest, how do I use "Xur" text files?
Regards,
Shaun
Out of interest, how do I use "Xur" text files?
Regards,
Shaun
Re: Dropout 1K BASIC listing
I don't know !
No, seriously it's self-promotion for the emulator "Vb81 XuR"... and his text file loader. (some free advertising …)
"ZxToken" can be used too…
Xavier ...on the Facebook groupe : "Zx81 France"(fr)