"d BUGFEAST Copyright (c) 1983 by Paul Somerson,()"cls:list"( ):,()"run"( ):,"": ,"":() :():()n :():()~ :():() :():( ):( ):AZ.A$"* * * * * *":K$"Hit any key to continue":,:P:,,::: ,,:"Are you using a color monitor?B0I$:I$""0]::I$"Y"I$"y"NDC1:C2:C3:C4:C5:C6:C7:C20:vNC1:C2:C3:C4:C5:C6:C7:C20MvC6,,::C1,,:,:( ,);:C6,C4,:,!:(/,);:C6,,:,:( );:C5,C2,:TRUNK$(,):TT:TT,E:TRUNK$: ,I:(,):UU :UU,N:(,):: ,?:(,):VV :VV,>:(,)::C2,,: ,F:(, )fFF:UNFROG$():FROG$"FROG":C2,,:X$( )zLC:LC,LC:"F":LC,LC:"R":LC,LC:"O":LC,LC:"G":LC,L|:LC,LC:X$:LC,LC:X$:LC,LC:X$LC,LC:X$::V::DLY::%,:,::,A:(, ):C6,,: ,:"Would you like instructions?":C2,,#Y$:Y$""=Y$()DIF:rZY$"Y"Y$"y" :,:"It ain't easy bein' green. A frog just wants":,:"his place in the moonlight, some flies, a nice":,:"cool dip in the oasis every now and then... ,:"I tell you, it's tough out here in the desert. ": ,:"They got snakes that wanna eat you. They got": ,:"spiders the size of teacups that wanna bite you.,:"They even got kids that wanna catch you and":,:"put you in a tiny cage and watch you croak.,:"Anyway, they say life is a game, so we'll see":,:"how well you'd do as a frog all alone out here.":,:A$:,:C20,,:K$:C2,,:,):A$INK$:INK$""$ SS  : SS,: (0, ):: ,:"Ok, some rules first.8,:"Since you've probably never":,:"been a real frog before, I'll be a sport and give":,:"you":,:C5,C7,:"THREE":,:C2,,:"chances to survive. And the best wayL ,:"to do this is to eat as many fat, juicy, delicious": ,:"flies as possible. Of course, if you want to live": ,:"to be a ripe old frog, you have to watch out forV ,:"the three scourges of the desert:":,:"1. Any time, whether you're on land or water,`, :"you gotta watch out for falling cages on":, :"strings with little kids at the other end.":,:A$:,:C20,,:K$:,*:C2,,:A$tINK$:INK$""t~ER:ER,:(4, ):n,:"2. If you chase a fly onto the land (near the":, :"cactus) you gotta watch out for sinister":, :"spiders--one bite and goodbye frog. You can , :"squish them by hopping on their furry":, :"little bodies, but you have to be careful!!": , :"(Every time you squish one you get 5 points). ,:"3. If you dive under the water (left corner)": , :"look out for poisonous water-snakes! The":, :"only thing to do when you spot one is head":, :"for the surface p.d.q.~,:"So how is a frog supposed to hop around to catch":,:"yummy flies and evade all of those nasty enemies?":,:A$:,:C20,,:"Hit any key to find out,*:C2,,:A$INK$:INK$""ER:ER,:(4, )::,:"See those grey keys at the lower left corner of":,:"your keyboard?,:C5,C7,:"F10":, :C3,,:"hops you one hop to the right.": ,:C5,C7,:"F9": , :C3,,:"hops you one hop to the left..  ,:C5,C7,:"F7": , :C3,,:"lets you dive when you're ON the water":, :"and surface when you're UNDER the water. ,:C5,C7,:"F8":C3,,:, :"shoots out your frog tongue, while":,:C5,C7,:"F6":, :C3,,:"shoots out a L-O-N-G tongue. C2,,:,:A$:,:C20,,:K$:,):C2,,:A$! INK$:INK$"" 6!ER:ER,:(3, ):!,:"Got it? You get":,:C3,,:"5":,:C2,,:"points for stomping spiders,":,:C3,,:"25":,:C2,,:"for catching flies on your tongue."(,:"Each time you use your":,:C3,,:"short [F8]":,':C2,,:"tongue you use":,:"up":,:C7,,:"ONE":, :C2,,:"lick--each time you use your0#2,):C3,,:"long [F6]": ,:C2,,:"tongue you use": ,:C7,,:"FIVE": ,:C2,,:"licks.": ,:"Each time you catch a fly you get a couple of": ,#<"extra licks added to your total.":,:C6,,:"One more thing: Every now and then when you're":,:C5,C7,:"UNDER WATER":,:C6,,:", a strange":,:C4,,$F"red-eyed":,&:C6,,:"creature peeks":,$P"out from a hole in the cactus. When you see":,:"those two horrible blood-crazed eyes, try like":,:"crazy to slurp down flies, since each one is":,:"momentarily worth a staggering":,$R%ZC3,,:"250":,(:C6,,:"points!":,:C2,,:A$:,:C20,,:K$:,):C2,,:A$j%dINK$:INK$""d%nER:ER,:(0, ):9&x,:"Hit `":, :C5,C7,:"A":, :C2,,:"' if you want to go through all those":,:"instructions all over again--or hit any other key":,:"to continue...Q&INK$:INK$""|&INK$"A"INK$"a"INKTRINKTR :&INKTR :&INKTR,:(-, ):,:"And you own an IBM PC? ":8 :'INKTR,:(-, ):,:"Ok, here we go again: ":89'ER:ER,:(1, ):',:"Ok, hotshot, select a level of difficulty:": ,:C5,C7,:"1": , :C3,,:"A tadpole"(, ): ,:C5,C7,:"2": , :C3,,:"Still wet behind the gillsh(,:C5,C7,:"3":, :C3,,:"Young and hot to hop":,:C5,C7,:"4":, :C3,,:"The main course at Maxim's(,:C5,C7,:"5":, :C3,,:"The meanest son-of-a-toad in the pond(FKY$:FKY$""(DIF(FKY$):DIFDIF :9),:C20,,:"I said from ONE to FIVE--now pick one!":)C20,,:DIF,:():C6,,:,:DIF",,,6,@,J)""Ok, we'll go easy on you this time, kid":r),"Good choice, junior, you'll pick it up fast":r"*6"Do you always pick the one in the middle?":r[*@"Here goes one green sucker down the tubes...":r*J"Ok, greenmeat, you're on--let's see your stuff.'+rZ$():LICKS2:FROGS:BUGS:FRGLFT:SQUISH:SCORE:A:BDIF:AA:BBDIF:FFA:SB:,:(P,):,:(P,):,:,,:(P,)+,:C4,,:"F9":,:C3,,:" moves left;":,:C4,,:"F10":,:C3,,:" moves right;":,!:C4,,:"F7":,#:C3,,:" dives/surfaces;+,,4:C4,,:"F8":,6:C3,,:" = tongue;":,A:C4,,:"F6":,C:C3,,:" = supertongue,,:,C7,:"LICKS LEFT":,:"FROGS LEFT":, :"BUGS CAUGHT":,0:"SPIDERS SQUISHED":,E:"SCORE,, :C5,C7,:LICKS:,:FROGS:,+:BUGS:,@:SQUISH:,J:SCOREB-SNAKE$( )(,)():SPID1$()()():SPID2$()()()-TOP$()()()()():BOT$()(,)():MDL$()(,)():CORD$(, )()(, )f.XEYES$( )(,):BODY$()(,)():C2,,:FROG$()(,)()()(,)( )(,)( ):UNFROG$(, )()(,)(, ).,L:EYES$:,L:BODY$:,L:EYES$:,L:BODY$:,L:EYES$:,L:BODY$;:UNF$(, ):STRT$"(Hit any key to begin)/ST:,ST:(STRT$,ST,):./INK$:INK$""/ER:ER,:(/, ):ER,:(/, ):: ,:(, ):,L:UNF$:,L:UNF$:T: ::,=:( )/ b:FF ͍ / AA,BB:C3,,:( ):A,B:C3,,:Z$::AAA:BBB$0HF():R():R (8 SNAKE2$SNAKE$:f :W:b8 (,W)OLDFFFF::C4,,:,W:(W, );:,OLDFF:UNFROG$;:,OLDFF:C1,,:(,);::> 9 ,:C4,,:(SNAKE$,W);:(#%,L{:DLY(::::W :b:SNAKE2$( )SNAKE2$w9 (,W)OLDFFFF::C4,,:,W:(, );:,OLDFF:UNFROG$;:,OLDFF:C1,,:(,);::> 9 ,:C4,,:SNAKE2$;:(#%,L{:DLY(::::b:,:(, );:,=:( ):9> (:f b:C3,,:A,B:( ):AA,BB:( ):,=:()::9: FROGSV: C4,,:S! :SB: b:,S:SPID2$:DLY2::,S:(, ):(,S) ,S:SPID1$:OLDFFFF:,OLDFF:" ":,OLDFF:" "::.; ,S:SPID1$:SS:(,!),!:(, );:&;.b\;8(,S)͂SW A:,SW:UNFROG$::;BC4,,:,S:(, ):SS:SB~;V,S:SPID1$:DLY2::,S:SPID2$:8;~,B:(, );::C4,,:;LICKSLICKSA<, :C5,C7,:LICKS:C7,,:LICKSFROGS:A,B:( ):G<<BUGSBUGS:,+:C5,C7,:BUGS:BONUS :<SCORESCORE::BONUS:(<SCORESCORE:<(LICKSLICKS:::3=dSQUISHSQUISH:,@:C5,C7,:SQUISH:SCORESCORE::C4,,:,S:(, ):SB:O=,J:C5,C7,:SCORE:f=FROGSFROGS:f ="o2e8e8a2e8a8o3c+2":,:C5,C7,:FROGS:C2,,:FROGS :h=FF=͂GS:GS,FF:(, ):>GG8:,GG:UNFROG$::FF , :,!:(#, ):6J>, FF C1,,: ,FF: ( , );j>1 C1,,: ,FF: (,);>6NSP$: NSP$"" NSP$"": 6 : b'?@ C3,,: ,:"....that's all folks. Hit ": ,: C20,,:"Q": C3,,: ,:" to quit, or any other key to start this game again.;?JU$:U$""JU?TU$"Q"U$"q",:?^C1,,:,:"(Last time around you selected level":,):C6,,:DIF:C1,,:,+:")":C2,,:?hDEAD:FFA:@,L:UNF$:,L:UNF$:FROGS,L:UNF$:,L:UNF$;9@T: ::,=:( ):F@AB2@HORND ():VERND():VERSVERNDVERSVERNDVERSVERSVERND :@HORSHORNDHORSHORNDLHORSHORSHORND :,AVERS,HORS:"BUG";:%VERSAB,:%HORSAB,:VERS,HORS:(, );:::VAbKF :(KF):SEG:,()::AKF :(KF):SEG:,()::