Page 1 of 1
Dropout 1K BASIC listing
Posted: Mon Jan 13, 2020 1:39 pm
by Shaun_B
Here's Dropout to type in:
- Dropout 1K
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.
Re: Dropout 1K BASIC listing
Posted: Mon Jan 13, 2020 5:02 pm
by XavSnap
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
Re: Dropout 1K BASIC listing
Posted: Mon Jan 13, 2020 5:36 pm
by Shaun_B
Thanks for the text listing XavSnap
Out of interest, how do I use "Xur" text files?
Regards,
Shaun
Re: Dropout 1K BASIC listing
Posted: Tue Jan 14, 2020 2:54 am
by XavSnap
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…