BASIC  1:1:0: #23658j\,8 ($0,0:0,175 2'255,0:0,-175 <%-255,0:2,2 F&0,171:251,0 P(0,-171:-251,0 Z-2:1,1:0,173 d'253,0:0,-173 n-253,0 xP(30,20) 4 =1,8;"***";7;" ANAKONDA ";4;"***" 2 &0,152:255,0 6 #4,9 ;"C.SERVIS GAMES" 6,14;"1995" 7:2 K=11 #8,K-1;" " N=9 16 *N,K-1;" ";0;" " N ,17,11 ;0;" " 9 ,K;"7.......UP" 11 ,K;"6.....DOWN" "13 ,K;"5.....LEFT" ,15,K;"8....RIGHT" 61:4 @/20,3;"PRESS ANY KEY TO CONTINUE" J 0 T--NACHALO IGRY-- Y SC=0 ^ :7 c S=0 hN=120 r!N,0;" ":N,31;" " |N 50,0;" " 621,0;" " N=120 H=(*30+1) V=(*20+1) V,H;2;"#" N N=120 H=(*30+1) V=(*20+1) V,H;6;"@" N X(25):Y(25) 6N=14:X(N)=10 :Y(N)=10 +N:N LY(1),X(1);" ":V=-1:H=0:DL=4:DL1=4 !------------ $S=202000 &="5"H=-1:V=0 0="8"H=1:V=0 :="7"V=-1:H=0 D="6"V=1:H=0 F*Y(DL1)=0X(DL1)=0586J IY(DL1),X(DL1);" " JDL30Y(1)>201000 *(Y(1),X(1))="#"1000 (Y(1),X(1))="@".0008vQX,568:.005y# =,40(:S=S+1:DL1=DL1+1:SC=SC+10 :#0;0,10 ;"SCORE ";SC ------------------ Y(1),X(1);"*"  545!  A$=" G A M E O V E R " [N=119:10 ,6+N;A$(N):.03{u\,30-(N*3+10 ):N =""1010  10 -------------------  N=114 S,T S/1.5@,T N  10 I.4L,20,.2~L,17,.2~L,20,.4L,19 7.2~L,16,.2~L,19,.4L,18  7.2~L,15,.2~L,18,.4L,17 S.45ffff,14.3d,.45ffff,15.3t,.45ffff,16.3fff,.55 ,12 k  shvlA G A M E O V E R