ZXTape! 0Created with Ramsoft MakeTZXLASER  N  Laser attack  7000X  8000@ ( 7500L 2t>10009000(# < 1000 F 3000 Ph=19000(# Z 4000 d 40( a$=  a$="" a$="7"2000  k=k+1 k>8k=1  xL=x*8+4  yL=175-y*8-4  2500 xL,yL  dx=0 v(k)=1dx=255-xL  v(k)=-1dx=-xL * dy=0 4w(k)=1dy=-yL H w(k)=-1dy=175-yL Rv(k)*w(k)=02200 \%dx255mx+dx<02330 dy=10 -*20 +my+dy>175my+dy<02330 mx,my dx,dy .01z# =,-10 i $ h=0 dy=a-y dx=b-x w(k)*dxv(k)*dy !v(k)*dxv(k)Žw(k)*dyw(k) h=1  nb1=0y,x;" " x=x+v(k) y=y+w(k) x<0x=31 x>31x=0 y<0y=21 y>21y=0 =(y,x)7.1}L,-10 :nb1=1:1030 6;y,x;m$(k)  nb1=0  '>1.05fff-df/20z=z+1 z>8z=1 nb2=0a,b;" "  a=a+v(z)  b=b+w(z) b<0b=31 b>31b=0 a<0a=21 a>21a=0 J(a,b)7.1}L,-10 :nb2=1:z=z+1:4010 a,b;w$(r+1) r=r  nb2=0  X 0 b 0 l 7 v !2,5;"Laser Attack" u5,0;"Du bist der Captain eines Raumschiffes mit Laserkanone undverfolgst ein feindliches Schiff" 3''"Es bleiben dir 100 sec. um es abzuschiessen" E"Waehle den Schwierigkeitsgrad von 1 (leicht) bis 10 (schwer?";df $df<1df>10 7100   LJt=(23672x\+256*23673y\+65536*23674z\)/5 V"0,0;t/10 ;" " ` >1+df/502 %*21,*31;6;"*"  @w(8):v(8) J*s$(8,8):r$(8,8) T0,1,1,1,1,0,1,-1,0,-1,-1,-1,-1,0,-1,1 ^i=18 h w(i),v(i) ri | k=1  x=20  y=10 v=v(k) w=w(k) s$(1)="00011000" s$(2)="00111100" s$(3)="01111110" s$(4)="11111111" s$(5)="00111100" s$(6)="00111100" s$(7)="00111100" s$(8)="00111100" r$(1)="11111000" r$(2)="11110000" r$(3)="11111000" r$(4)="11111100" &r$(5)="10111110" 0r$(6)="00011111" :r$(7)="00001110" ?r$(8)="00000100" Di=18 N!a=0:b=0:c=0 S!d=0:e=0:f=0 Xj=18 ba=a*2+(s$(i,j)) l(b=b*2+(s$(9 -j,9 -i)) vc=c*2+(s$(j,i)) d=d*2+(r$(i,j)) e=e*2+(r$(9 -j,i)) (f=f*2+(r$(9 -i,9 -j)) 7900 j "a"+i-1,a "b"+8-i,a "c"+8-i,b "d"+i-1,c "e"+i-1,d "f"+8-i,d !"g"+i-1,e ! "h"+i-1,f !*i !4m$="" !> a=10 !H b=10 !Rz=(*8)+1 !"i"+0,00100000 !"i"+1,01000010B !"i"+2,00100101% !"i"+3,00011000 !"i"+4,00011000 !"i"+5,10100100 !"i"+6,01000010B !"i"+7,00000100 ! !"j"+0,00001110 !"j"+1,10001000 !"j"+2,10001000 ""j"+3,11111000 ""j"+4,00011111 ""j"+5,00001001 "$"j"+6,00001001 "."j"+7,001110008 "8 w$="" "B r=0 "L 7 "Vnb1=0 "` nb2=0 "j23674z\,0 "t23673y\,0 "~23672x\,0 " h=0 " #(h19500% #2"21,0;"GEScHAFFT!!!" #< 9600% %(21,0;"DEINE ZEIT IST UM!" %"Noch eimal? (j/n)";a$ %a$(1)="j" %7:7:0: ++E0001100000111100011111101111111100111100001111000011110000111100E1111100011110000111110001111110010111110000111110000111000000100 D kxyvwa bcde f X MzWrbbhtzٙAn