SPI-DROID ç:ç:"49999":#1 ;"3";ٰ"2";"CRACKED BY BLOOD, 03/07/99":"23739","o":"SPI.SCR":"30000":"SPI.CDE":"50339":"SPI.BAS"
SPI.SCR 0u!>u4 [0un܊+~, +(+nOg#OR ð!~
e
,A,G
, ,?, , 2,4, ,S , , , , ,yS ,
, ,# ,y,P
,", ,BQ;, ,, ,2\v{=\!:\~2\(M(I(E6} (+('(!'"B\>2D\3n3p3:\(*E\"B\:G\2D\}*=\6#62 \ 3! (! +>GA3- %//3>
7'3&o1z( n |g>7Olyx0-) <># 3z<(;:H \838 >!? O$3!+| 3
0>Ƹ0$ R30x0H3yO& 0u y O~ # .
>|gz |>= > Щ (y/O7*e\*c\
R(3͢-"e\373= À/>y $$ $~44~$ ~P~~ fd&f 8(*d* 00@# 0 0 f<3|D~3B@`3BB3~@~``n3@~%N3B@fn3BB~
3W3F~ DD~73@``| ~JJj_3BB 3FB 3B~`G3BN~ xH~b73@~~ ~
'3Bbb~ b&$< Jjj~ B~~bb BB~ ~ 0~ @ pp3T >2 p ~
>>3@@|Dd| 3 2> >"&>32> > 8
G3> >"223 HXP|dd ( ~Jjjb3"223&""> 3 >"2> <$ 00 > >> 8
"2>3 BRVV~ $$44 22">> > > 0 333`3 >*V~(&(T K3
(3>#? 3P83bP3|3c(3d3##>~+~##FB 3_x #V#^#F;83!(3)3z3>(3>>> x >{ > @ ? 3=l> 31 =16 p0 p=0 :.01z#
=,45 -
2000
=o$8000 @
. =a$l=1 :a,b;3 ;"":32
p=0 31
22 +p
U r=(a,b-1 ):a,b-1 ;4 ;1 ;"";go;"":b=b-1 :31
r=(a+1 ,b-1 ):a,b;1 ;go;"";a+1 ,b-1 ;4 ;1 ;"":b=b-1 :a=a+1 :31
r=(a-1 ,b+1 ):a,b;1 ;go;"";a-1 ,b+1 ;4 ;1 ;"":b=b+1 :a=a-1 :31
C r=(a,b+1 ):a,b;1 ;go;"";4 ;"":b=b+1
r=6 f(s)>0 a,b;go;"";a,b;4 ;1 ;"":r=go:f=a-1 0 -1 :f,b;8 ;1 ;8 ;"":.004yn,50 2 -(f*2 ):f,b;8 ;1 ;8 ;"":f:sco=sco+50 2 :f(s)=f(s)-1
r=132 r=go:a,b;0 ;4 ;"";a,b;4 ;1 ;"":f=a0 -1 :f,b;1 ;8 ;"":.004yn,50 2 -(f*2 ):f,b;1 ;8 ;"":f:l=l+1 :f(s)=0
!
rgor4 c1=0 p=0 :t=0 30 :a,b;4 ;"":.01z#
=,34 " :a,b;4 ;"":.01z#
=,45 - :t:a,b;" ":u=1 2 :t=a0 -1 :t,b;1 ;"":t:u:a=a1:b=b1:l=l-c2:4000 :1000 :10
"% 0 ,0 ;1 ;"SC ";sco
#c a=0 a=20 :a1=20 :b1=b+1 :s=s-10
:b=b+1 :1000 :10
$Z a=21 a=1 :a1=1 :b=b-1 :b1=b:s=s+10
:1000 :10
%L b=31 b=1 :b1=1 :a1=a:s=s-1 :1000 :10
&M b=0 b=30 :b1=30 :a1=a:s=s+1 :1000 :10
' kemp=1 50 2
( x$=:x$=0 99 c
+ x$=u$p=7 :99 c
, x$=d$p=6 :99 c
- x$=l$p=5 :99 c
. x$=r$p=8 :99 c
2( 31 =2 p=5 :99 c
3( 31 =1 p=8 :99 c
4( 31 =8 p=7 :99 c
5( 31 =4 p=6 :99 c
c
11
go=4 :ng=3 :ty=4 :u=15 :Y=10
:W=7 :t=0 :7 ::g=0 14 :*255 ,*175 :g:8
s=21 v=53040 0
s=22 v=52846 n
3 s=32 v=50339 :go=7 :ng=1
3 s=31 go=7 :ng=1 :v=50436
3 s=41 ) go=2 :ng=3 :v=50502 F
s=42 * v=50576
3 s=43 + go=2 :ng=1 :v=50865
s=44 , v=50991 /
' s=51 3 go=7 :v=50748 <
3 s=52 4 go=5 :ng=7 :v=50669
s=61 = v=50804 t
s=62 > v=50844
s=12 v=52983
s=71 G v=51101
s=81 Q v=51262 >
' s=82 R ng=1 :v=51395
s=83 S v=51404
s=84 T v=51525 E
3 s=85 U go=3 :ng=4 :v=51602
s=86 V v=51689
3 s=91 [ go=7 :ng=5 :v=52686
s=92 \ v=52606 ~
s=93 ] v=52434
' s=94 ^ go=6 :v=52112
3 s=95 _ go=2 :ng=6 :v=52079 o
s=96 ` v=51821 m
s=101 e v=53137
s=102 f v=52794 :
s=103 g v=52341 u
( s=104 h go=1 :v=52176
3 s=45 - go=6 :ng=5 :v=51075
3 s=72 H go=2 :ng=1 :v=53188
3 s=73 I go=6 :ng=5 :v=53287 '
2 s=74 J s=75 K ng=5 :v=53388
' s=64 @ ng=5 :v=53457
3 s=63 ? ng=5 :go=6 :v=53531
s=53 5 v=53692
s=54 6 v=53789
3 s=76 L go=7 :ng=5 :v=53843 S
3 s=66 B go=7 :ng=5 :v=53870 n
s=65 A v=53889
' s=55 7 go=2 :v=54107 [
' s=56 8 go=2 :v=54271
' s=46 . go=2 :v=54289
Lp 65224 ,go:65322 * ,go:65241 ,ng:65274 ,ng:65306 ,ng:65331 3 ,ng:65340 < ,ng
R 65366 V ,v-256 *(v/256 ):65367 W ,(v/256 ):65153
X s=74 J f(74 J )<0 rnd>.518 ,4 ;1 ;4 ;""
: s=55 7 u=17 :y=4 :u,y;1 ;ng;""
4 s=65 A u=13
:u,y;1 ;3 ;""
H s=64 @ u=10
:y=27 :17 ,20 ;go;"";ng;""
9 s=72 H u=u-2 :y=y+2 :u,y;5 ;""
[ s=102 f t=13
21 :t,2 ;7 ;"":t:11 ,2 ;go;""
( s=71 G 3 ;1 ;u,y;""
{ s=82 R f(82 R )>0 t=4 (3 +f(82 R )):19 ,t;6 ;"":t:3 ;1 ;u,y;""
B s=96 ` f(96 ` )=-1 12 ,3 ;1 ;""
s=104 h 6 ,15 ;3 ;"":f(104 h )>0 t=3 (2 +f(104 h )):17 ,t;6 ;"":t
B s=41 ) f(41 ) )=1 14 ,10
;6 ;""
A s=12 f(12 )=1 18 ,23 ;6 ;""
A s=44 , f(44 , )=-1 17 ,5 ;1 ;""
A s=71 G f(71 G )=-1 5 ,12 ;1 ;""
B s=84 T f(84 T )=-1 17 ,15 ;1 ;""
^ s=85 U f(85 U )>0 t=4 (3 +f(85 U )):10
,t;6 ;"":t
s s=103 g f(103 g )>0 u=11 :t=5 (4 +f(103 g )):u,t;6 ;"":u=u-1 :t
2000 +(s*5 )
9 t=t+1 :t=1 14 ,7 ;3 ;" ";12 ,8 ;3 ;" ";11 ,10
;" ";13
,7 ;3 ;" "
: t=9 14 ,7 ;3 ;"";12 ,8 ;4 ;"";11 ,10
;3 ;"____";13
,7 ;4 ;""
; t=17 t=0
11 b=11 f(21 )=1 sco=sco+100 d :f(21 )=0
=
>
k/ u,Y;4 ;1 ;"";u+1 ,Y;""
l W=7 u,Y;7 ;0 ;"";u+1 ,y;0 ;7 ;"":u=u-1 :y=y+1 :u,y;4 ;1 ;"";u+1 ,y;""
m W=6 u,Y;7 ;0 ;"";u+1 ,y;0 ;7 ;"":u=u+1 :y=y-1 :u,y;4 ;1 ;"";u+1 ,y;""
n. u=12 -((s=51 3 )*3 )w=6
o$ u=16 -(s=51 3 )w=7
p
s42 * 2060
v u-11 ,y;2 ;"":u=u+1 :u-11 ,y;2 ;"";u-12 ,y;" ";3 ;7 ,10
;""
e u=18 u-12 ,y;2 ;"":.004yn,30 :u-12 ,y;4 ;"":u=15
R t=2 16 ,16 ;5 ;"";19 ,16 ;4 ;""
R t=8 19 ,16 ;5 ;"";16 ,16 ;4 ;""
$ t=t+1 :t=14 t=2
7 ;u-13
,y+11 ;"":y+12 =b>rndt=1 5 :u-13
+t,y+12 ;3 ;1 ;"":.003xD,t*10
:t:
w=7 u-13
,y+11 ;0 ;" ":u=u+1 :y=y-1 :7 ;u-13
,y+11 ;"":u=26 w=6
w=6 u-13
,y+11 ;0 ;" ":u=u-1 :y=y+1 :7 ;u-13
,y+11 ;"":u=15 w=7
fl=0 :(*4 )=2 fl=1 :t=1 5 :u-13
+t,y+12 ;3 ;1 ;"":.003xD,t*10
:t:y+12 =ba,b;3 ;"":31
fl=1 t=1 5 :u-13
+t,y+12 ;3 ;1 ;"":t:u-13
+5 ,y+12 ;6 ;""
6s=46 . a=13
b=23 a,b;1 ;" ":t=13
0 -1 :12 ,24 ;3 ;"___";0 ,0 ;1 ;7 ;"SC ";sco;t,24 ;6 ;0 ;"":b=30 40 ( :.004yn,b:b:sco=sco+75 K :t,24 ;3 ;1 ;"":t:3000
Dm=1 a=19 b=6 a=11 :b=14 :a1=11 :b1=14 :s=71 G :18 ,8 ;" ":t=18 0 -1 :t,6 ;3 ;"__";t+1 ,5 ;4 ;"";3 ;"";t+2 ,5 ;3 ;"";t+3 ,5 ;7 ;" ":t:p=0 :1000 :10
2155 k
t=1 10
,28 ;5 ;"";11 ,28 ;7 ;"";5 ;"";9 ,30 ;7 ;"_";16 ,22 ;5 ;"";17 ,22 ;7 ;"";15 ,24 ;7 ;"":a=11 b=29 1 ;a,b;""
t=5 15 ,24 ;7 ;"";9 ,30 ;" ";10
,28 ;7 ;"";11 ,27 ;7 ;"";5 ;"";16 ,22 ;7 ;"";17 ,22 ;7 ;" ":a=11 b=29 1 ;a,b;""
$ t=t+1 :t=10
t=0
@ fle=1 :s=71 G :2355 3 :fle=0 :s=55 7 :
t=t+1
= t=3 11 +(m*5 ),10
;7 ;""
= t=4 11 +(m*5 ),10
;4 ;""
t=12 t=0
: t=t+1 :t=1 m=0 16 ,1 ;""
- t=0 m=0 16 ,1 ;""
b=15 m=0 15 ,15 ;3 ;"_":f=3 14 :15 ,f;3 ;"_";16 ,f;4 ;"";17 ,f;3 ;"":f
m=0 b=1 a,b;4 ;"";a,b;1 ;"":e=-40 ( 50 2 4 :.004yn,e-4 :.004yn,e+10
:e:sco=sco+500 :m=1 :p=0
t=2 t=-1
2365 = :
& s=71 G :2355 3 :s=65 A :
3) t=(*2 ):t1 fle=0
4w au(u+1 ,y-1 )=go1 ;go;u,y;"";1 ;ng;u+1 ,y-1 ;"":u=u+1 :y=y-1
6Z b>y(u,y+1 )=go1 ;go;u,y;"";1 ;ng;u,y+1 ;"":y=y+1
7Z b1 )/4 )+((a>uƫ(u+1 ,y)>1 )/4 ):y=y-((b1 )/4 )+((b>yƫ(u,y+1 )>1 )/4 ):u,y;5 ;"":
= u,y;2 ;"":arndu,y;go;"";2 ;u-1 ,y+1 ;"":u=u-1 :y=y+1
>o a>uƥ>rndƫ(u+1 ,y-1 )=gou,y;go;"";2 ;u+1 ,y-1 ;"":u=u+1 :y=y-1
?E b>yƥ>rndƫ(u,y+1 )=gou,y;go;"";2 ;"":y=y+1
@M brndƫ(u,y-1 )=gou,y-1 ;2 ;"";go;"":y=y-1
A
B
G
L
e. t=10
12 ,9 ;3 ;""
f. t=13
9 ,6 ;4 ;""
g. t=15 12 ,9 ;4 ;""
h t=20 t=0
i- t=8 7 ,8 ;4 ;""
j s81 Q 2600 (
k: t=t+1 :t=3 7 ,8 ;3 ;""
l- t=7 9 ,6 ;3 ;""
m
o
t0 u,y;3 ;"":t=(*2 ):t=1
u8 uau,y;4 ;"":u=u-1 :u,y;3 ;""
w8 y>bu,y;4 ;"":y=y-1 :u,y;3 ;""
x8 yrndu=16 19 :3 ;1 ;u,y+1 ;"":u:u=16 19 :u,y+1 ;" ":u:19 ,y+1 ;4 ;"";18 ,y+1 ;1 ;"_":y+1 =ba,b;3 ;"":r=3 :33 !
4
n :t=0 100 d :*21 ,*17 ;(*6 )+1 ;"CONGRATULATIONS":.01z#
=,t/2 :t
L :t=0 21 :t,8 ;"CONGRATULATIONS":.01z#
=,t*2 :t
1 :t=0 255 6 :t,0 :0 ,175 :t:t=0 175 6 :0 ,t:255 ,0 :t
| t=0 255 6 :t,0 :0 ,175 :t:t=0 175 6 :0 ,t:255 ,0 :t
0
S t=21 0 -1 :t,8 ;" ":.01z#
=,t*2 :t
:t=0 31 :"";:t:g=1 20 :g,0 ;"";g,31 ;"":g:21 ,0 ;:t=0 31 :"";:t
B t=0 :a=1 :b=1 :u=0 :r=1 :I=1
Ø a,b;I;"";10
,7 ;6 ;"YOU HAVE COMPLETED";12 ,11 ;"SPI DROID":I=I+1 :u=1 r=1 a=a-1 :b=b+1
/ u=0 r=0 a=a+1 :b=b-1
/ u=1 r=0 a=a-1 :b=b-1
/ u=0 r=1 a=a+1 :b=b+1
I=7 I=1
a=20 u=1
a=1 u=0
b=1 r=1
b=30 r=0
> t=t+1 :t=553 ) g=0 100 d :g:9000 (#
3011
y :t=0 31 :9 ,t;"_";10
,t;"";11 ,t;"":t:5 ,12 ;"CAREFUL!"
/ 10
,12 ;:t=1 l:"";:t
t=0 120 x :t
Q l=0 :T=0 200 :10
,11 ;"GAME OVER":T:9000 (#
d 23658 j\ ,8 :kemp=0 :5 :0 :0 :0 :0 :0 :0 :
# 1 ,11 ;"SPI DROID"
5 ,6 ;"1 KEYBOARD";7 ,6 ;"2 KEMPSTON JOYSTICK";9 ,6 ;"3 CURSOR JOYSTICK";11 ,6 ;"4 SINCLAIR JOYSTICK";13
,6 ;"5 HIGH SCORES"
] 19 ,8 ;"(C)1989 VINSOFT";21 ,2 ;"PROGRAMMED BY NEIL POINTON"
15 ,6 ;"6 SKILL-"
> ="6"J=J+1 :.004yn,1 :J>3 J=1
9 J=1 RND=.75@ :15 ,15 ;"EASY"
8 J=2 RND=.5:15 ,15 ;"MED."
9 J=3 RND=.25~:15 ,15 ;"HARD"
! ="1"6000 p :6010 z :
5 ="2".02{#
=,20 :6120 :6010 z :
5 ="3".02{#
=,20 :6200 8 :6010 z :
5 ="4".02{#
=,20 :6300 :6010 z :
' ="5".02{#
=,20 :9500 %
P 5006
pZ :.02{#
=,20 :t=0 50 2 :t:10
,2 ;"PRESS KEY FOR UP-"
q 6100
r' u$=x$:10
,19 ;3 ;U$
tg t=0 50 2 :t:10
,16 ;"DOWN- ":6100 :d$=x$:10
,21 ;3 ;D$
ug t=0 50 2 :t:10
,16 ;"LEFT- ":6100 :l$=x$:10
,21 ;3 ;L$
vh t=0 50 2 :t:10
,16 ;"RIGHT- ":6100 :r$=x$:10
,22 ;3 ;R$
wh t=0 50 2 :t:10
,16 ;"STOP- ":6100 :s$=x$:10
,21 ;3 ;S$
x
z| :t=0 45 - :t:10
,2 ;"PRESS KEY FOR PAUSE-":6100 :o$=x$:10
,22 ;3 ;O$
|h t=0 50 2 :t:10
,16 ;"ABORT- ":6100 :a$=x$:10
,22 ;3 ;A$
x$=:x$=""6100
.01z#
=,10
:
kemp=1 :
8* u$="7":d$="6":l$="5":r$="8":s$="0":
* u$="9":d$="8":l$="6":r$="7":s$="0":
Y fle=0 :sco=0
b f(105 i )
gf(74 J )=-1 :f(72 H )=10
:f(103 g )=5 :f(104 h )=15 :f(96 ` )=-1 :f(85 U )=4 :f(84 T )=-1 :f(82 R )=8 :f(71 G )=-1 :f(21 )=1 :f(44 , )=-1 :f(41 ) )=1 :f(12 )=1
?
@ .01z#
=,10
A ""8001 A
B =""8002 B
C .01z#
=,12 :
#( score
#2 sco>h(10
)9100 #
# 7 :LEN=10
:N$="":21 ,0 ;1 ;" "
# 0 :0 :K$=
#Y =13
ƱN$=0 .1}L,20 :21 ,0 ;" ":9110 #
#O =13
ƱN$>0 .1}L,12 :21 ,0 ;" ":
#r =12 .01z#
=,20 :N$=N$(̱N$-(N$"")):21 ,0 ;N$;1 ;" ";0 ;" ":9103 #
#S ñN$>LEN-1 .03{u\,15 :N$=N$+K$:21 ,0 ;N$;1 ;" "
# 9103 #
#g n$="LOVE"c2=0 ::t=0 21 :t,9 ;"INFINITE LIVES":.004yn,t*2 :t
#^ n$="LOVE"T=21 0 -1 :T,9 ;" ":.004yn,T*2 :T
#g n$="PEACE"c1=1 ::t=0 21 :t,9 ;"INVINCIBILITY":.004yn,t*2 :t
#^ n$="PEACE"t=21 0 -1 :t,9 ;" ":.004yn,t*2 :t
# (n$)=0 n$="ANON"
#* t=1 10
:sco>h(t)9150 #
# t
#_ t1=t:t=10
t1-1 :h(t+1 )=h(t):h$(t+1 )=h$(t):t:h(t1)=sco:h$(t1)=n$
% :5 :76 L ,165 :96 ` ,0 :78 N ,167 :92 \ ,0 :0 ,10
;"HIGH SCORES":t=1 10
:.004yn,t*5 ::;7 ;" ";h$(t);" ";h(t):t
%& =""9510 &%
%'c t=20 1 -1 :.004yn,t*3 :T,0 ;" ":t
%0 2
&( T=23552 \ =21039 /R +56675 c
&| "23739","244":0 :0 :0 :0 ::56000 :23606 6\ ,224 :23607 7\ ,220 :1
'A :10
,8 ;"ERROR IN PROGRAM":N=0 60 < :N:
' "SPIFINI4":""