ZXSPIDER llnspider pet thingy ----------------- 2003 XFA WORLD SOFT 7:a="a""a"+7 user:a,user a:A- O60<,126~,219,255,189,165,165,36$ d7:7:0:: eD0,0;"ZX SPIDER";0,0;1;"_________" f"SPIDER COLOUR (0-7) ";col g"SPIDER NAME ";n$ h!"BORDER COLOUR (0-7) ";bor:bor i""PAPER COLOUR (0-7) ";pap:pap: j"INK COLOUR (0-7) ";ik:ik ksp1=10 :sp2=15 lN0,0;bor;" ";0,0;n$ msp1,sp2;" " nPmov=(*2.99)-1:sp1=sp1+mov:sp1<1sp1>21sp1=sp1-mov oPmov=(*2.99)-1:sp2=sp2+mov:sp2<0sp2>31sp2=sp2-mov psp1,sp2;col;"" qfeed=(*100d) rQfeed<10,0;ik;bor;n$;" is hungry. Press ""H""":200 s 109m  a=0200 ="h"Ŧ="H"210 ".01z# =,(*100d)-502 a t0,0;bor;" ";0,0;ik;n$;" died of starvation.":220 0,0;bor;" ";0,0;ik;n$;" was fed.":a=0200:a:0,0;bor;" ";0,0;ik;n$:115s s=.6 s,0:s*2/3,0:s/3,0:s,0:s*2/3,3:s/3,2:s*2/3,2:s/3,0:s*2/3,0:s/3,-1:s,0  '"ZXSPIDER"1