9
 Ї Eric the Caterpillar goes Munching! (C) C.R.ShelleyR Ї by Chris Shelley,27 Old Forge Road,Layer-de-la-Haye,Colchester,Essex.CO2 0JT! Ї Z88 Users' Club number 0636( Ї2 *NAME Eric!< P%=00F я1,138,61,65,158,191,191,173,140,140,140,1580P я1,138,61,67,158,191,191,191,191,191,191,1580Z я1,138,61,68,158,187,191,187,188,191,191,1580d я1,138,61,69,158,183,191,183,143,191,191,1580n я1,138,61,70,128,140,158,158,158,158,140,128	x я1,67В N%=50:H%=100:S%=00а CX=8:X1=0:X2=1:X3=2:X4=3:X5=4:X6=5:X7=6:X8=70к CY=0:Y1=0:Y2=0:Y3=0:Y4=0:Y5=0:Y6=0:Y7=0:Y8=0	┤ DIR=2╛ E$=╜(1)╚ ▐ S$(86,7)P╥ XZ$=╜(1)+╜(130)+╜(63)+╜(67):CAT$=XZ$+XZ$+XZ$+XZ$+XZ$+XZ$+╜(1)+╜(130)+"?"+"D"▄ ч P%=0 М ф НdvD:P%=1ц F$=E$+"F"+E$+"B"Ё CT=0
· ф НTdDё КCX,CY);:я1,130,63,68
ф НdnBЄCMV"ч I$<>"0" М DIR=╗(I$),ЄMVE<6ё КCX,CY);:ч DIR=1 Д DIR=3 М я1,130,63,69 Л я1,130,63,68@ё КX1,Y1);:я1,130,63,67Jё КX2,Y2);:я1,130,63,67Tё КX3,Y3);:я1,130,63,67^ё КX4,Y4);:я1,130,63,67hё КX5,Y5);:я1,130,63,67rё КX6,Y6);:я1,130,63,67|ё КX7,Y7);:я1,130,63,67Жё КX8,Y8);:я1,130,63,67%Рч S$(CX+1,CY+1)="T" М RS=8:х НT~C[Ъч S$(CX+1,CY+1)="W" М S$(CX+1,CY+1)=" ":S%=S%+5:CT=CT+1:ч CT+и(N%/10)>N% М RS=11:х НT~CБдч CX=X1 А CY=Y1 Д CX=X2 А CY=Y2 Д CX=X3 А CY=Y3 Д CX=X4 А CY=Y4 Д CX=X5 А CY=Y5 Д CX=X6 А CY=Y6 Д CX=X7 А CY=Y7 М RS=5:х НT~C!оч CX=X8 А CY=Y8 М RS=5:х НT~C╕ё К86,2)F$;S%;F$
┬х НTNA╠BO=CT+│(20)╓S%=S%+BOрN%=N%+103ъ█:ё К39,0)E$;"B";BO:ё К31,6)BO;E$"B":у A=1 ╕ 806Їё КA,3)" ";E$"R";E$;"BBONUS ";BO;" ";E$;"B";E$;"R"■у B=1 ╕ 40:ээI$="P":DIR=2╪:х Нt`@	&▌ЄCMV"0ч DIR=1 А I$="2" М RS=5:х НT~C":ч DIR=2 А I$="1" М RS=5:х НT~C"Dч DIR=3 А I$="4" М RS=5:х НT~C"Nч DIR=4 А I$="3" М RS=5:х НT~CXс	b▌ЄMVElё КX1,Y1);" "3vX1=X2:X2=X3:X3=X4:X4=X5:X5=X6:X6=X7:X7=X8:X8=CX3АY1=Y2:Y2=Y3:Y3=Y4:Y4=Y5:Y5=Y6:Y6=Y7:Y7=Y8:Y8=CYКч DIR=1 М CX=CX-1Фч CX=-1 М RS=1:х НT~CЮч DIR=2 М CX=CX+1ич CX=80 М RS=2:х НT~C▓ч DIR=3 М CY=CY-1╝ч CY=-1 М RS=3:х НT~C╞ч DIR=4 М CY=CY+1╨ч CY=7 М RS=4:х НT~C┌сюI$=┐(10)<°ч I$="" Д I$<>"Q" А I$<>"A" А I$<>"O" А I$<>"P" М I$="0"ч I$="Q" М I$="3"ч I$="A" М I$="4"ч I$="O" М I$="1" ч I$="P" М I$="2"*ч I$="0" М I$=├(DIR):DR=DIR4°	>Ї ENDHч RS=11 М х НdLARя7\█fё К85,1);E$;"B";"SCORE"pё К86,2);S%zё К84,4);"HI-SCORE"Дё К86,5);H%	Оя1,66Шё К70,6)CAT$)вё К30,0)F$;"** ** GAME OVER ** **";F$/мё К2,2)"The game is over because you hit ";╢ч RS=5 М ё "yourself."1└ч RS=1 Д RS=2 Д RS=3 Д RS=4 М ё "a boundary."╩ч RS=8 М ё "a mushroom."G╘ч S%>H% М ё К30,3)E$;"R";F$;"YOU BEAT THE HI-SCORE";F$;E$;"R":H%=S%▐ё К2,4) "You scored ";S%0шё К2,5)F$;"PRESS ANY KEY FOR ANOTHER GO.";F$ЄS%=0:N%=50№у A=1 ╕ 2000:эX$=╛H%=H%:╪:х Нt`@$█.у A=1 ╕ N%8X=│(80)-1BV=│(80)-1LY=│(7)-1VW=│(7)-10`ч S$(X+1,Y+1)="W" Д S$(V+1,W+1)="W" М х НTxDjё КX,Y);:я1,130,63,65tё КV,W);:я1,130,63,70~S$(X+1,Y+1)="T"ИS$(V+1,W+1)="W"ТэЬё К85,1);F$"SCORE"жё К86,2);S%░ё К84,4);"HI-SCORE"║ё К86,5);H%─я1,70,1,66╬ё К0,0);"          "╪у A=0 ╕ 9:S$(A+1,1)=" ":э Aт°Ў█i ё К2,2);"You are Eric the Caterpillar ";E$"F";CAT$;E$;"F, and must walk around the garden eating the"v
ё К1,3);"seeds, ";E$"F";:я1,130,63,70:ё E$"F, but must avoid the deadly toadstools,";E$;"F";:я1,130,63,65:ё E$"F."`ё К2,4);"Once you have eaten most of the seeds you will get a bonus and be able to progress"]ё К1,5);"to the next garden, where there will be more seeds but more toadstools as well!"^(ё К2,6);"At all times you must beware not to run into the edge of the garden or yourself."D2ё К25,1);E$"B"E$"RERIC THE CATERPILLAR GOES MUNCHING!"E$"R"E$"B"$<ё К32,7);"PRESS ANY KEY TO PLAY"(Fё К89,2);"Q";К88,3);"O+P";К89,4);"A"Pё К87,1);"Keys:"ZX$=╛d° 