²³Ë&<P2¤C¸SCORE¨C1°HSCORE¨LG¤C1¶ÔC±C°PMMOV¤P0¤P1¤A¤C²BUG¨CµMOVÅØÎÉPMBASÅC³C´PMÂPMÄALÔLAÄPOÓC1´LÇC1¸PRÉSCORÅDOÔQWEÒTIÍMEÎSCRÅSTÍC¶ÖÙÓC·C1±GØGÙÃÄC1³MAØÁÐAÍÒC¹C1¹C1µC1²×C2°C1·ÑXFR¤ÚSTARÔ€@@€ € € € € @ !"#$%&'()*+,-./0123456789:;<=>?€@AB * MUNCH'IN CLIMB'IN›* by Mark Comeau›* ANALOG Computing #17›(8 A@#€;,‚9ƒ,„9ƒ,…;†,+‡-ˆƒ46‚8‡,-‰8 ‡2-$Š;A,‹;,Œ;,;Ž,9,-6‘-C:Š,</ #A@’-ˆA"“+6Š7’,.>:“,/ ’F ”-ˆ"“6‹7”,.>:“, ”P ”-ˆ"“6Œ7”,.>:“, ”Z ”-ˆ"“6€7”,.>:“, ”d ”-ˆ†"“6…7”,.>:“, ”n@6•-P:+F:AE,%–,'—,$—)BBy•76˜-•$AV@6™-C:‹,xNAY@F!B2w–*6š-C:Œ,36›-C:€,96œ-›EAN6ž-C:…,‚N+ŸAVF:A,%ˆ0AY@F<@w‰NA@SŒ 6 - %ˆ– "A6 -A—  6¡-¡%¢£"ˆ6¡-¡%¤6£-‰ª1 ¥"‰6¥-—6¦-ˆ6§-‰'6 -A–1 Ap´ @h,—¨/–%¥¨¾ AÈOO¦A AA€APA AAAAÒ6©-‰6ˆ‡-‰–.2‡AU&‡@©2 ‡6 ©Ü36’-A6ª-@–%@2+6¢-‰36¤-¤&§æ 6«-R:‰,ð]-6’-’%+«"¬*’ A,$&+«"­*’!@H,$?6®-+’&@H,'K6¯-+ª&†,'S1®¯°]1®¯%ˆ±ú «"¬6œ-™ «"­6œ-š9°"@™36ª-ª%+«"²*ª @–,$&+«"*ª!†,$96œ-›±"@2)±" 6ª-ª%"° A,I2‰A2‰‰‰‰#,®¯+6¢-¢%ˆ1¢"³96¦-¦%ˆ?6£-ˆI A066´-?:‘<‰<˜<œ<’<ª<,@@ 6¤-¤&Ž-‰‰(¨¤ (A.¤"‰66¥-¥&ˆ@ A@J A0T/6µ-F:A`,'6´-?:‘<‰<˜<š<’<ª<,/¶-ˆƒ^W ‡-‰–B2V‡+6·-P:H:‰,$@0,7A·EA`µ%‡O2‰·S ‡W ¶h#B2V‰2‰‰‰‰# A0r 6¢-‰¡!‚8ƒ, A€| T:‰,"‰6¡-‰ A0†0B2V–06´-?:‘<‰<˜<ž<AP<@P<†,# 2‰‰‰‰+Ÿ#AY@Fš! ‡-‰–2‡AU&‡! ‡¤#(¨ ÍÕÎÃȧÉΠÃÌÉͧÉÎ#-‰–®(¨m c¸(¨u lÂ(¨n iÌ(¨c mÖ(¨h bà!(¨!(¨ BY ÍÁÒË ÃÏÍÅÁÕê= -–­(¨ ÐÒÅÓÓ ÔÒÉÇÇÅÒ$-+(¨¡16¡-‰=AôbAP:H:‰,$AU,7A P:H:‰,$AU,@T:‰,"‰LA‰XB2V‰b A0þ A6¤-A6³-@i7 @f,ˆ¸/¹¸,Ž¬%/ƒ¬+/ºŽ1,‰­7/¹­ ,‰—/Ÿˆ&1  ,ˆ/¹,Ž¨/ƒ¨%/Ž+,‰ƒ1/Ÿƒ0 ,‰–/Ÿ‰: @™,¹‰/¹ƒD$N!6¤-A6œ-š!6³-@yX @™,¸‰/¸ƒb1 @f,‰­/¹­,ˆ%/‰Ž+,ƒ¨1/¹­l- ,ˆ—/—,¨/‰­!,ƒˆ'/¹ˆ-/ƒ—v+  ,‰ƒ/ƒ,ƒƒ/¹ƒ%,‰+/‰ˆ€- ,ƒ/¹ƒ,ˆ–/–!,'/‰ƒ-,ŽŠ! ,ƒ‰/‰,¹–/¹!/†ƒ”' ,ƒ–/ºˆ,‰/‰ƒ!,ˆ¨'/ˆ¸ž$¨6¤-AP6³-@²% @™,‰ˆ/‰ƒ,¹‰%/¹ƒ¼7 @f,‰­/¹­,ˆŽ%/Ÿƒ+,ˆ—1/ƒ7,ˆ¨Æ3 /ƒƒ,Ÿˆ/¨ˆ,Ÿ–!/–',Ÿ-/ƒ3,Ÿ¬Ð1 /»¬  ,ˆˆ/Ÿ¸,ˆ–%/¸+,ˆ1/ƒ¸Ú3 ,Ÿ‰/¨‰,ŸŽ/Ž!,Ÿ—'/ƒ—-,Ÿ¨3/»¨ä$î!6¤-A6³-A5!6œ-šø @™,¸‰/¸ƒ1 @f,‰­/¹­,ˆ%/‰+,ƒˆ1/¹ +  ,‰ƒ/ƒ,ƒƒ/¹ƒ%,‰+/‰—> ,ƒ‰/¹—6¼-Ž ‡-‰6ˆ.6¼-¼%?P4,‡¼:/‡ƒ> ‡ / 6¼-Ž‡-ƒ¹6¼-¼%?P%,‡¼+/‡ƒ/ ‡*$46¤-AP6³-@€>% @™,‰ˆ/‰ƒ,¹‰%/¹ƒH1 @f,‰­/¹­,ˆŽ%/Ÿ+,ˆ—1/Ÿ¬R' ,–Ž/Ÿˆ,–/º!,ˆ¨'/¨­\1  ,ˆƒ/Ÿƒ,ˆˆ/Ÿ—%,ˆ–+/Ÿ¨1,­‰f' /Ÿ‰,ƒˆ,–¬/º¬!,ˆ'/¨ƒp$z 6œ-š6§-§%½„ ‡-‰–2‡‰‰‰ ‡Ž; @™,¨/¨,ƒ¨%/ƒ¨/@f5,;/ƒ˜D ,¬/ƒ¬’!A ,’-’A 6ˆ6 A: ’D A @¢’-’A  A ’¬8ª!@d ª-ª@d6ˆ* A. ª8 A `¶ª-ª@d A ªÀ+‡-‰AUA‡'2‰‡+ ‡Ê"‡-AU‰6ˆ2‰‡" ‡Ô@ ·-ˆ½2‰ƒ²2‰‰‰‰*©-ˆ6ˆ<2‰@(&©Ž©@ ©Þ · 6¦-ˆ' A0è6´-?:‘<‰<˜<œ<’<ª<,$ò6¤-A P6³-@’ü7 @f,‰ˆ/ƒ­,‰–%/­+,‰1/¨­7,‰¬- /—­,‰¸/Ž­,‰­!/¹­',Ÿˆ-/1  ,‰‰/ƒƒ,‰Ž/ƒ%,‰—+/¨ƒ1,‰¨3 /—ƒ,‰/Žƒ,‰ƒ!,—'/ƒ-,Ÿ‰3/—$' ,²¨/²ƒ,»¨/»ƒ!,º—'/ºƒ.' ,†–/†ƒ,¾–/¾ƒ!,Ÿ–'/Ÿƒ8% @™,‰‰/‰ƒ,¹‰%/¹ƒB$L6¤-A6³-AV; @™,‰ˆ/‰ƒ,¹‰%/¹ƒ/@f5,‰­;/¹­`3 ,ˆŽ/–,ˆ—/¬!,ˆ¨'/¨¬-,ˆ3/¸j3 ,Ÿˆ/ƒˆ,ŸŽ/ƒ–!,Ÿ—'/­-,Ÿ¨3/»¬t ,Ÿ/²¸~+  ,ˆƒ/Ÿƒ,ˆˆ/Ž%,ˆ–+/¬—ˆ3 ,ˆ/¨¨,ˆ¬/!,Ÿ‰'/¸‰-/¸ƒ3,Ž’3 /ƒŽ,Ÿ–/­—,Ÿ!/»¨',Ÿ¬-/²3,ƒœ- /ƒƒ,/ƒ,­¨!/­ƒ',¬¨-/¬ƒ¦$°! 6œ-š6¤-A!6³-@yº1 @™,‰‰/‰­,¹‰%/¹¸+,¸1/¸Ä% @f,‰­/¹­,ˆŽ%/ŸÎ! ,Ÿˆ/ˆ,–,—ƒ!,º¬Ø1 ,Ÿ¸/ˆ¸,ƒ/ƒ %,ˆƒ+/¹ƒ1,ˆˆâ3 /Ÿ—,Ÿ‰/‰,–¬!,—¸',º¨-,¸—3/—¸ì3 ,—/–¸,–ˆ/–!,'/­-,ˆŽ3/ˆö$A‰B2V‰+Ÿ Y 0Ž‰‰6¿-†6‡-@e)ARˆD(¨ MUNCH'IN CLIMB'IN Y(¨ top ten.AY@F¼-ˆƒ.¡!‚8¼,A  ¼( ‡-ˆƒ6„8‡,-‚8‡, ‡2& ‡-¼¸6‚8‡%ˆ,-„8‡, ‡&6‚8¼,-¡<; ‡-ˆƒ-‰‡%ˆ(¨‚8‡,! ‡)-¼%ˆ;(¨ YOUR SCOREF0‡-AU‰6—©-‰–(2©‡%©, ©0 ‡P ©-‰–2©‰‰‰ ©ZT:‰,"‰Ad Apn T:‰,"‰$x% ‡-‰–!2‡AP&+‡$–,¬% ‡‚4 -(¨¡‡-ˆA" ‡.B2H‰4-Œ,(¨ -–¨)(¨ ,$–* INITIALIZATION› 5 +@-@@5(@STAND BYª9 #A 9"‰ˆŽ–—¨¬¸ƒ­»²º†¾Ÿ¹½´<À;@8,#A0(’-ˆ@8,"Á86À7’,.>:Á,< ’¾YAF:A,&+Ÿ96Â-+F:A,%ˆ,$AVMAVÂ'AVYARˆÈ6Á-?:C:À,,#A Ò-"’’"6ˆ#A *AY@4-$Ü ª-‰¬"Á’%ª%ÂÁ ªæ Að##264,0,12,18,57,124,124,124,56›ú 272,255,24,36,66,255,0,0,0›!!288,28,38,58,2,62,28,34,238›##296,0,12,18,57,124,124,124,56›%%304,14,17,60,126,126,126,126,60›"##312,126,66,36,66,66,66,66,126›,$$320,16,16,56,56,124,124,124,56›6 328,0,0,90,60,90,126,36,24›@''336,129,189,126,219,255,189,66,60›J""344,32,50,24,12,22,19,56,124›T%%352,129,90,60,126,126,60,90,129›^&&280,66,255,66,66,66,255,66,66,-1›hff216,104,104,104,133,213,104,24,105,2,133,206,104,133,205,104,133,204,104,133,203,104,104,133,208›rff104,104,133,209,104,104,24,101,209,133,207,166,213,240,16,165,205,24,105,128,133,205,165,206,105›|aa0,133,206,202,208,240,160,0,162,0,196,209,144,19,196,207,176,15,132,212,138,168,177,203,164›†``212,145,205,232,169,0,240,4,169,0,145,205,200,192,128,208,224,166,213,165,208,157,0,208,96› 56,100,92,64,124,56,68,119›š28,38,58,2,62,28,34,238›¤24,60,60,60,24,36,102,0›®5528,28,38,38,58,58,2,2,62,62,28,28,34,34,238,238›¸::0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20›ÂLL104,169,0,133,203,133,205,169,224,133,206,165,106,24,105,1,133,204,160›ÌNN0,177,205,145,203,200,208,249,230,204,230,206,165,206,201,228,208,237,96›€D2:MUNCHIN.BAS