hhj 1000:2000 B(8,8)  N=6 ( H=0 2 T=16 <I=1 N FX=R(8):Y=R(8) PB(X,Y)0 70F ZB(X,Y)=-1:I dQ$="SILO RAID" nG=1 N*2 x 2000 Q$ "YOUR MAP";(T);"SONAR" F=R(7) Y=1 8 Z=0:400:(T); &Z=1:Y+F>8 F=F-8 400: Y "X-POSITION":X "Y-POSITION":Y 8X<1 Y<1 X>8 Y>8 210 B(X,Y)=9 210 ,B(X,Y)=0 B(X,Y)=9 :Q$="MISS" 9B(X,Y)=-1 B(X,Y)=1:H=H+1:Q$="HIT" *H=N "ALL SILOS DESTROYED!":4000 G "Q$ , "YOU RAN OUT OF DEPTH CHARGES" 6"YOU HIT ";H;" SILOS" @ 4000 X=1 8 V=B(X,Y+F*Z) -V=0 (V=-1 Z=0) P$="." -V=1 (V=-1 Z=1) P$="S" V=9 P$="*" *Z=1 ƨR(10 )>4 P$="." P$; X  R(X)=(*X+1)  : I$=