3eH?6-D:\68<BB|@~|B>~|@NB@2=03500 k 2000  play=121004 i>5i=5g i:350^ 4i>5i=5g 9i:600X 6i=0502:.1}L,-10 :i::6 72,12 ;"COMBAT";3,13 ;"ZONE": '::" PLAYER 2 HAS DEFEATED PLAYER 1" P::" PLAYER 1 HAS ";p1;" MEN LEFT":::" PLAYER 2 HAS ";p2;" MEN LEFT" "::" WELL DONE PLAYER 2 !" $::" PRESS P TO BATTLE AGAIN !" i=010 :.1}L,i ="p"Ŧ="P" i:3060 6i=0502:.1}L,-10 :i::6 72,12 ;"COMBAT";3,13 ;"ZONE": '::" PLAYER 1 HAS DEFEATED PLAYER 2" P::" PLAYER 1 HAS ";p1;" MEN LEFT":::" PLAYER 2 HAS ";p2;" MEN LEFT" "::" WELL DONE PLAYER 1 !" $::" PRESS P TO BATTLE AGAIN !" i=010 :.1}L,i ="p"Ŧ="P" i:3560 '821,0;" ": '  ' "COMBAT"5 ' 5 <naAula  D"" }L}L̉SMBAT (X' )W P PMM32Ф$$366-Fv>>BB<DHpHDB@~BfZBBBBbRJFB|~<>B<.BBf@@BBBBB@BD@B@$B@BBffBbD@ffBB@@@BBB DB@BBbBBfBB@@BBb@.BBBB@BZ||BBBBB@B(|B<$~|@BZZBRB<Z>ZBB|<><~BB BB|@BR>@BZBB<<BBR<-~B~|N~B@@B|BB|@~@|$B@@BBB~JB>BBBB@BBB B|@@BJ@BB|~|BJ-BZBDBBB@@BDZB@@B@DB$B@BFDBB>BB$@B>BBBB DD@BBF>BBB@BBB@BFB-B$BBB~<>B<B<~BB~<~B<~@@>~>B|B<<~~>@>BBBB<~/@B~<<@<@~Bq# # <@T<<##\\\"_\ _\ieX![!PP!!$SW K SR P p.davies $7:1:1::d$="" f2,7;"   " b7,10 ;"   " -$:" A WARGAME FOR TWO PLAYERS": .>"THE COMMANDS - 'M' = MOVE 'S' = SHOOT" /=" DIRECTION = COMPASS POINTS N,S,E,W,NE,SE,SW,NW" 0<"WHEN SHOOTING : 50% CHANCE OF A KILL IF IN RANGE" 2 :" PRESS P TO PLAY" <@i=200-1:.1}L,i:="p"Ŧ="P"90Z F i:60< P Z7:1:1: di=16:a$ nd=07 x a:a$+d,a d:i R"t",60<,126~,126~,255,255,126~,24,24 U"l",126~,255,255,255,255,255,255,126~ U"b",255,231,255,231,255,231,255,255 "p",28,28,136,126~,29,29,20,546,"o",28,28,8,126~,157,29,20,546 I"u",0,0,24,60<,60<,24,0,0 q::5;" ":i=219:5;i,0;"";i,31;"":i -5;" " >0,13 ;6;"COMBAT";1,14;"ZONE"  r7:0,0;"PLAYER 1";0,24;"PLAYER 2";1,1;"MEN";1,25;"MEN" Ri=140(:(*17)+3,(*30)+1;4;"":i k6,14;5;1;"";:i=712 :i,14;5;1;"":i i=10 16:i,20;5;1;"":i:16,13 ;5;1;"":12 ,9 ;5;1;"" &play=1:p1=5:p2=5 "n(5):m(5):m(1)=4:n(1)=28:m(2)=7:n(2)=28:m(3)=10 :n(3)=28:m(4)=14:n(4)=28:m(5)=17:n(5)=28 '8i=15:m(i),n(i);7;1;"":i ,v(5):b(5):v(1)=4:b(1)=3:v(2)=7:b(2)=3:v(3)=10 :b(3)=3:v(4)=14:b(4)=3:v(5)=17:b(5)=3 18i=15:v(i),b(i);6;1;"":i 6<7:0:1,5;p1;1,29;p2 T.i=-20202:.05|L,i:i ^cplay=1:0,0;7;1;"PLAYER 1";0,24;0;"PLAYER 2" ag=12 c& i=1 5:b(i)=0i ei=62000 h\v(i),b(i);6;1;1;"":21,6;7;"COMMAND ( S M ) ?" ma$=:a$="m"400 ra$="s"500 | 365m !9990':.05|L,-10 #d$="":7:"DIRECTION ? ";d$ =d$="n"v(i)=v(i)-1:(v(i),b(i))15490 Vd$="n"v(i),b(i);6;1;"";v(i)+1,b(i);7;0;" ":i =d$="s"v(i)=v(i)+1:(v(i),b(i))15490 Vd$="s"v(i),b(i);6;1;"";v(i)-1,b(i);7;0;" ":i =d$="e"b(i)=b(i)+1:(v(i),b(i))15490 Vd$="e"v(i),b(i);6;1;"";v(i),b(i)-1;7;0;" ":i =d$="w"b(i)=b(i)-1:(v(i),b(i))15490 Vd$="w"v(i),b(i);6;1;"";v(i),b(i)+1;7;0;" ":i Qd$="ne"b(i)=b(i)+1:v(i)=v(i)-1:(v(i),b(i))15490 _d$="ne"v(i),b(i);6;1;"";v(i)+1,b(i)-1;7;0;" ":i Qd$="se"b(i)=b(i)+1:v(i)=v(i)+1:(v(i),b(i))15490 _d$="se"v(i),b(i);6;1;"";v(i)-1,b(i)-1;7;0;" ":i Qd$="sw"b(i)=b(i)-1:v(i)=v(i)+1:(v(i),b(i))15490 _d$="sw"v(i),b(i);6;1;"";v(i)-1,b(i)+1;7;0;" ":i Qd$="nw"b(i)=b(i)-1:v(i)=v(i)-1:(v(i),b(i))15490 _d$="nw"v(i),b(i);6;1;"";v(i)+1,b(i)+1;7;0;" ":i I d$"e"d$"s"d$"n"d$"w"d$"ne"d$"nw"d$"se"d$"sw"360h g:600X &d$="e"b(i)=b(i)-1:360h &d$="w"b(i)=b(i)+1:360h &d$="n"v(i)=v(i)+1:360h &d$="s"v(i)=v(i)-1:360h :d$="ne"b(i)=b(i)-1:v(i)=v(i)+1:360h :d$="se"b(i)=b(i)-1:v(i)=v(i)-1:360h :d$="nw"b(i)=b(i)+1:v(i)=v(i)+1:360h :d$="sw"b(i)=b(i)+1:v(i)=v(i)-1:360h 502:580D F9990':.05|L,-10 :;6;"DIRECTION OF FIRE ? ";s$ ud=0:ad=0 s$="n"ud=-1: s$="s"ud=+1: s$="e"ad=+1: s$="w"ad=-1: %s$="nw"ad=-1:ud=-1: %s$="se"ad=+1:ud=+1:  %s$="sw"ad=-1:ud=+1:  %s$="ne"ad=+1:ud=-1: I d$"e"d$"s"d$"n"d$"w"d$"ne"d$"nw"d$"se"d$"sw"360h 0 502 Dsw=0:u=v(i):a=b(i) E$l=120:u=u+ud:a=a+ad F sw=(u,a) G_sw=77Msw=78Nsw=13 sw=12 v(i),b(i);6;1;"":2000 Jsw=79O1100L N7u,a;3;1;"":.1}L,u-a:u,a;" ":l S.v(i),b(i);6;1;"":2000 Xcplay=2:0,0;7;"PLAYER 1";0,24;1;7;"PLAYER 2" \g=12 ]%i=1 5:n(i)=0i _i=62000 b\m(i),n(i);7;1;1;"":21,6;7;"COMMAND ( S M ) ?" ga$=:a$="m"650 la$="s"750 q 615g !9990':.05|L,-10 7:"DIRECTION ? ";d$ =d$="n"m(i)=m(i)-1:(m(i),n(i))15840H Vd$="n"m(i),n(i);7;1;"";m(i)+1,n(i);7;0;" ":i =d$="s"m(i)=m(i)+1:(m(i),n(i))15840H Vd$="s"m(i),n(i);7;1;"";m(i)-1,n(i);7;0;" ":i =d$="e"n(i)=n(i)+1:(m(i),n(i))15840H Vd$="e"m(i),n(i);7;1;"";m(i),n(i)-1;7;0;" ":i =d$="w"n(i)=n(i)-1:(m(i),n(i))15840H Vd$="w"m(i),n(i);7;1;"";m(i),n(i)+1;7;0;" ":i Qd$="ne"n(i)=n(i)+1:m(i)=m(i)-1:(m(i),n(i))15840H _d$="ne"m(i),n(i);7;1;"";m(i)+1,n(i)-1;7;0;" ":i Qd$="se"n(i)=n(i)+1:m(i)=m(i)+1:(m(i),n(i))15840H _d$="se"m(i),n(i);7;1;"";m(i)-1,n(i)-1;7;0;" ":i Qd$="sw"n(i)=n(i)-1:m(i)=m(i)+1:(m(i),n(i))15840H _d$="sw"m(i),n(i);7;1;"";m(i)-1,n(i)+1;7;0;" ":i Qd$="nw"n(i)=n(i)-1:m(i)=m(i)-1:(m(i),n(i))15840H _d$="nw"m(i),n(i);7;1;"";m(i)+1,n(i)+1;7;0;" ":i I d$"e"d$"s"d$"n"d$"w"d$"ne"d$"nw"d$"se"d$"sw"610b g:350^  502 sw=0:u=m(i):a=n(i) $l=120:u=u+ud:a=a+ad  sw=(u,a) <sw=77Msw=79Osw=13 sw=12 767 sw=78N1000 7u,a;3;1;"":.1}L,u-a:u,a;" ":l .m(i),n(i);7;1;"":2000 G H&d$="n"m(i)=m(i)+1:610b I&d$="s"m(i)=m(i)-1:610b J&d$="e"n(i)=n(i)-1:610b K&d$="w"n(i)=n(i)+1:610b L:d$="nw"n(i)=n(i)+1:m(i)=m(i)+1:610b M:d$="sw"n(i)=n(i)+1:m(i)=m(i)-1:610b N:d$="se"n(i)=n(i)-1:m(i)=m(i)-1:610b O:d$="ne"n(i)=n(i)-1:m(i)=m(i)+1:610b [(*100d)>502m(i),n(i);7;1;"":.5,-30:2000 "m(i),n(i);7;1;"" .s=15:u=v(s)a=b(s)1030 s pp1=p1-1:b(s)=0:u,a;" ":1,5;7;p1:.5,30:p1=03000  2000 J L[(*100d)>502v(i),b(i);6;1;"":.5,-30:2000 V"v(i),b(i);6;1;"" [.s=15:u=m(s)a=n(s)1130j `s jqp2=p2-1:n(s)=0:u,a;" ":1,29;7;p2:.5,30:p