þþ-dX;SAVE#D:SNOWA.PT1nX;-------------------xX; part 1 of the game‚X;ŒX; by: Barry Kolbe–X; X;-------------------ªEI´X;¾X;page zero variablesÈX;Ò ƒDRY‚܃PXPƒ;;2byteræƒPYP…;; "ð ƒADD‡ú ƒHMVˆ †CURCHR‰ „VERTŠ „EADD‹" …EHOLDŒ, ƒEYX6 ƒEYYŽ@ ƒICYJ ƒICXT …VTIME‘^ „VFLG’h ƒXSP“r ƒYSP”| „RAND•† „ICNT– „DATA—š †UNIQUE˜¤…FTIME™;;7 bytes®†CARTIM ;;6 bytes¸…RMTIM¦;;6 bytesÂ…ROADC¬;;2 bytesÌ…ROADG®;; "Ö ƒCNT°à ƒSHD±ê †MAPFLG²ô„FUEL³;;3 bytesþ …LIVES¶ „DIRF· †DIRECT¸ †CARCNT¹& …ICEONº0 ‚Y1»: ‚Y2¼D †ICEDIR½N †IDECNT¾X …LEVEL¿b „FULKÀl „ICTLÁv „ICTH€ˆICESPEEDÊ …THOUSÄ” …SPSNDÅž …IFLAGƨ „IISYDz „IIY3ȼ…COUNTÉ;;these areÆ ‚ILËЂTLË;;allÚ ‚JLÍä ƒBFLÍî„INDRË;;2 bytesø „IND2Í „FOFSÏ  ‚YHÐ ƒXD1Ñ  ‚XHÒ* †ICECNTÓ4„SCRSÔ;;6 bytes>„FULXÚ;;6 bytesH„FULYà;;6 bytesR„CARXæ;;4 bytes\„CARYê;;4 bytesf†OFFSCNî;;2 bytesp‡SLENGTHðz ƒEDMñ;;2„ ƒSXPóŽ ƒSYPô˜X;¢X;OS equates¬X;¶ „CIOVVäÀ …ICCOMBÊ …ICBALDÔ …ICBAHEÞ …ICBLLHè …ICBLHIò „AUX1Jü „AUX2K†SETVBV\ä†XITVBVbä†RANDOM Ò$ †RTCLOK.†CONSOLÐ8 ƒEOL›B „SEOL»L „PCHR6VX;`†COLOR0Äj†COLOR1Åt†COLOR2Æ~†COLOR3Lj†COLOR4È’†SDLSTL0œ ‚CHü¦X;° …STICKxº …STRIG„ĆHPOSP0ÐΆHPOSM0Ð؆HSCROLÔâ†VSCROLÔì†HITCLRÐö „P0PL Ð „P1PL Ð X;X;memory usageX;(†SCNMEM2 ƒPMB€< ƒSETŒF …MYPMB„P…MSMEMƒPMBZ…P0MEM…MYPMBd…P1MEM…MYPMBn…P2MEM…MYPMBx…P3MEM…MYPMB‚ …CHSETŒŒ …GOVER›–†TXTWIN‹ „SCLN†TXTWINª†CHRLN1†TXTWIN(´ƒSC2†SCNMEM€¾ƒSC3ƒSC2€ÈƒSC4ƒSC3€ÒƒSC5ƒSC4€ÜƒSC6ƒSC5€æƒSC7ƒSC6€ðƒSC8ƒSC7€úƒSC9ƒSC8€„SC10ƒSC9€„SC11„SC10€ …BCKUPÀ" „SET2},‡SCRLMEM|6X;credits @ $7b00@X;JX;display list interruptTX;^ƒPMBhƒDLI5r ƒDICQ>|P Ô†PÐ7š9¤X;®X;character set¸X;ÂŒÌ>ŠD:SNOW.PT5ÖX;à †TXTWINê A FUEL 150 PLOWS Aô A3 SCORE Aþ A‹000000 AX; …GOVER A ÓÎÏ×ÆÌÁËÅÓ A& A×ÉÎ press A0 A‹START A:X;DX;display lists ;intro firstNX;then game boardXX;bl…IDLST p=p=p=pv p=p=p=B€ ‡SNOWMEMŠ =p=p=p=” =p=p=p=pž W¨ƒLMS ‡SCRLMEM² p=p=p=p=F¼ ˆTOPSCOREÆ AÐ …IDLSTÚX;ä€îƒDL1 p=p=pø B ‡SNOWMEM   u ƒSL1 †SCNMEM* u4 ƒSC2> uH ƒSC3R u\ ƒSC4f up ƒSC5z u„ ƒSC6Ž u˜ ƒSC7¢ u¬ ƒSC8¶ uÀ ƒSC9Ê uÔ „SC10Þ Õè „SC11ò Fü…TMESS †TXTWIN =A  ƒDL1 X;$ X;start of program. X;8 @B X;L X;save the display listV X;for next levels` X;j …BEGIN%>2t ƒMDLQƒDL18~ P…BCKUP8ˆ 1’ IƒMDLœ Q>5…CHSET;;new chrset¦ Pô°  †SETPMG;;player initº X;Ä $>5…VBLNK;;set vbiÎ %>4…VBLNKØ Q>â †SETVBVì Q>ö P…IFLAG;;intro flag X; X;begin new level X; †NEWBEGQ>( P„DIRF2 P†MAPFLG< †GETDIRF !„NEWBP …NDIRC †CLOSE6Z X;d „NEWB „INITn †REPLAYx Q>‚ P…LIVESŒ Q>– P…ICEON  †SHOLIVª …NLEVL †STARTI´ †FIGLEV¾ †RESFULÈ †DSPFULÒ †REPLAYÜ …CLRPMæ Q„DIRFð H„DROKú „MAP2Q†MAPFLG;;intern map H„DROK Q> P†MAPFLG" …UNCOM, !ƒSKP6 „DROK †GETFIL@ †LOADMPJ ƒSKP †FNDFULT †FNDCRS^ †CNTRDSh †COPYDLr †SETSCN| Q> † P†DIRECT †DEFPLRš Q>¤ P„VFLG® X;¸ X;main loop X;Ì „MAINQ†CONSOLÖ R>à HƒMN2ê !…STKEYô ƒMN2Q…STICKþ P†DIRECT †DEFPLR P†HITCLR †MOVPLR& †REMOVE0 Q„: H„NTRGD †JMPEDGN „NTRG †ICESNDX Q„P0PLb R> l E„OUCHv Q„P1PL€ R> Š E„OUCH” Q…ROADGž R…ROADC¨ H‚KL² Q…ROADG¼ R…ROADCÆ H‚KLÐ †WAITSMÚ !…NLEVLä ‚KLQ„FUELî L„FUELø L„FUEL H‚KK „OUCHP†HITCLR †REMP23 „SPIN* †GRESET4 P†HITCLR> …DELAYH !‚KKR „OOPS!†GAMOVR\ ‚KKQ…LIVESf F„OOPSp Q‚CHz R>ÿ„ F†NOPAUSŽ …PAUSE˜ †NOPAUS!„MAIN¢ X;¬ X;óåô ðíç¶ X;À †SETPMGQ>>Ê P/Ô Q>;;5th enableÞ Poè Q>ò PÐü Q>5ƒPMBPÔQ>(;;yellowPÀ$Q>;;black.PÁ8Q>¦BPÂLPÃVQ>€`PƒPXPjQ>ptPƒPYP~Q>ˆP Ð’P Ðœ:¦X;°X;ãìåáò ðí áòåáºX;Ä …CLRPM%>ÿÎQ>؃CPMP…P0MEM8â P…P1MEM8ì P…P2MEM8ö P…P3MEM8 P…MSMEM8 1)>ÿHƒCPM(:2X;<X;äåæéîå ðìòóFX;P†DEFPLR$>Z Q†DIRECTdƒDF1R†DIRTAB9n F„DFOKx0‚IƒDF1Œ:–„DFOKQ„PD0L9 P‚JLª Q„PD0H9´ P‚JL¾ Q„PD1L9ÈP‚ILÒ Q„PD1H9Ü P‚ILæAð5úQƒPYPP‚Y1, OƒYTB9" PƒPYP,P‚Y26?@Q>JP…P1MEM8T%>^ ƒDFPQ@‚JL7h$‚Y1r P…P0MEM9| Q@‚IL7†$‚Y2 P…P1MEM9š3¤#‚Y1®#‚Y2¸)>ÂHƒDFPÌ$‚Y2Ö P…P1MEM9à$ƒPXPê &†HPOSP0ô7þ>QƒPXP, OƒXTB9& PƒPXP0P†HPOSP0::DX;N†DIRTAB  === XƒXTB ÿ===bƒYTB ==ÿ=lX;v X;ðìáùåò äåæéîéôéïîó ¦ ôáâìåó€X;Š$„PD0L 4„P0D1=4„P0D2=4„P0D3=4„P0D4”$„PD0H 5„P0D1=5„P0D2=5„P0D3=5„P0D4ž$„PD1L 4„P1D1=4„P1D2=4„P1D3=4„P1D4¨$„PD1H 5„P1D1=5„P1D2=5„P1D3=5„P1D4²„P0D1 ===ÿ¼ ÿ=v=v=vÆ v=v=v=ÿÐ ÿ===Ú„P0D2 ===ÿä ÿ=n=n=nî n=n=n=ÿø ÿ===„P0D3 =f=f=~  ~=~=~=~ ~=f=f=f  ~=~=f=*„P0D4 =f=~=~4 f=f=f=~> ~=~=~=~H ~=f=f=RX;\„P1D1 =ª=ª=€f €=„=„=„p „=„=„=€z €=ª=ª=„„P1D2 =ý=ý=Ž =a=a=a˜ a=a=a=¢ =ý=ý=¬„P1D3 =ÿ=ÿ=¶ ™=™==À ™=™==Ê ™=™==Ô„P1D4 ===™Þ ==™=™è ==™=™ò =ÿ=ÿ=üX; X;äåìáùX; ƒLDL%>$HƒDLN. …DELAY%>8 ƒDLN „WAITB1LHƒDLNV:`X;jX;éîéôéáìéúåtX;~X;set up 128 tableˆ „INIT%>’ Q>4†SCNMEMœ P…M128L¦ Q>5†SCNMEM° P…M128HºƒTLPQ…M128L8Ä,ÎO>€ØP…M128L8â Q…M128H8ìO>öP…M128H83 )>!HƒTLPX;($>;;score & fuel2Q>;;IC $10<ƒSCFP„SCRS9F0PIƒSCFZ P…THOUSd †RESFULnQ>;;set livesx P…LIVES‚Q>ŒP†TXTWIN–Q>`  P†ICECNTªQ>ÿ´ P…LEVEL¾:ÈX;Ò†CLRTAB Ø=D= =F=ÜX;æ†STSCRLQ>5ƒSL1ð P‚JLú Q>4ƒSL1P‚JL:X;"X;çåô óãî ðïó,X;6 „WHER%ƒDRY@…WHEREQ…M128L8JP‚JLT Q…M128H8^ P‚JLh:rX;|X;óèáäï÷ óãòïìó†X;ƒSMX ;;pos on scrnš ƒSMY ¤X;® X;íïöå¸X;†SCROLLQ†DIRECTÌX;ÖƒMMRR>;;rt?àHƒMMLê …LOOKRôDƒRA1þ: ƒRA1QƒSXPR>SD‚HO&:0 ‚HOQ>: P„VERTD †PLWSNDN ‚KBQ>XPƒADDb …CORSHl#ƒSMXv#ƒSXP€$>Š‚KA&†HSCROL” „WAITž †TRACKR¨0²I‚KA¼ "„VERTÆ Q„VERTÐI‚KBÚ†FULOUT …SFUELä „OFF2î †CKFTIMø:X;  ƒMMLR> HƒMUP  …LOOKL*DƒLA14:> ƒLA1QƒSXPHH‚HQR:\ ‚HQQ>f P„VERTp †PLWSNDz ‚KD$>„‚KC&†HSCROLŽ „WAIT˜ †TRACKL¢2¬(>¶H‚KCÀQ>ÿÊPƒADDÔ$>Þ &†HSCROLè …CORSHò"ƒSXPü"ƒSMX "„VERT Q„VERTI‚KD$ !†FULOUT.X;8X;ãïáòóå è óãòïìBX;L …CORSH%>V ƒCSAQƒSL18`,jOƒADDt PƒSL18~3ˆ3’3œ)>!¦HƒCSA°:ºX;ÄX;õðÎX;Ø ƒMUPR>âHƒMDNì …LOOKUöDƒUA1:  ƒUA1QƒSYPFƒNOM †PLWSND(Q>ÿ2PƒADD< …CORSVF"ƒSYPP"ƒSMYZ$>d‚U1&†VSCROLn „WAITx †TRACKU‚0ŒI‚U1–Q>  P†VSCROLª !†FULOUT´:¾X;È X;äï÷îÒX;Ü ƒMDNR> æHƒNOMð …LOOKDúDƒDA1: ƒDA1QƒSYPR> "D‚D1,:6‚D1 †PLWSND@$>J‚D2&†VSCROLT „WAIT^ †TRACKUh2r(>|H‚D2†$> &†VSCROLšQ>¤PƒADD® …CORSV¸#ƒSYPÂ#ƒSMYÌ !†FULOUTÖƒNOM:àX;êX;ãïáòóå öòô óãòìôX;þ…CORSVQƒADDGƒCSV%> ƒCVLQƒSL18&,0O>€: PƒSL18D3N QƒSL18XO>b PƒSL18l3v3€)>!ŠHƒCVL”:žX;¨ ƒCSV%>² ƒCVPQƒSL18¼;ÆS>€Ð PƒSL18Ú3ä QƒSL18îS>ø PƒSL183 3)>! HƒCVP*:4X;>X;÷áéô á êéææùHX;R „WAITQ>\Pf ƒWW2QpFƒWW2z:„X;ŽX;æéîå óãòì ðìò˜X;¢†MOVPLRQ†DIRECT¬R>¶HƒMLLÀQƒPXPÊR>|ÔDƒGORÞQƒSXPèR>SòEƒGORü !„MOUT ƒGORQƒPXPR>È E…MVRET$ …LOOKR. D„GOR18 :;;nopeB„GOR1 †PLWSNDL%>V ƒRL1#ƒPXP`$ƒPXPj &†HPOSP0t #ƒPXP~ $ƒPXPˆ&†HPOSP0’ „WAITœ †TRACKR¦1°IƒRL1º#ƒSMXÄ#ƒSMXÎ !†FULOUTØ„MOUT †SCROLLâ …MVRET:ìX;ö ƒMLLR> HƒMDD  …LOOKL D„GOL2:( „GOL2QƒPXP2R>„;;124+8< E„GOL1FQƒSXPP H„MOUTZ ƒGOLQƒPXPdR>0n F…MVRETx D…MVRET‚„GOL1 †PLWSNDŒ%>– ƒLL1"ƒPXP $ƒPXPª &†HPOSP0´ "ƒPXP¾ $ƒPXPÈ&†HPOSP0Ò „WAITÜ †TRACKLæ1ðIƒLL1ú"ƒSMX"ƒSMX !†FULOUTX;" ƒMDDR> ,HƒMUU6 …LOOKD@DƒGD3J:T ƒGD3QƒPYP^R>`hDƒGDNrQƒSYP|R> †EƒGDN !„MOUTš ƒGDNQƒPYP¤R>À® E…MVRET¸Q> P„VERTÌ †PLWSNDÖ ƒGD2QƒPYPàP‚Y1ê QƒPYPôP‚Y2þ? Q> P…P1MEM8;;eras top $>& ƒGD1%‚Y10 Q…P0MEM8: P…P0MEM8D %‚Y2N Q…P1MEM8X R>b HƒFOAl Q>™v HƒFOB€ ƒFOAR>™Š HƒFOB” Q>ž ƒFOBP…P1MEM8¨ "‚Y1² "‚Y2¼ 0Æ IƒGD1Ð #ƒPYPÚ #ƒPYPä „WAITî "„VERTø Q„VERT!IƒGD2 !#ƒSMY! !†FULOUT !X;*!X;4! ƒMUUR>>!FƒMU3H!ƒGU4!…MVRETR!ƒMU3 …LOOKU\!DƒMU4f!:p! ƒMU4QƒPYPz!R>p„!EƒGUUŽ!QƒSYP˜!FƒGUU¢! !„MOUT¬! ƒGUUQƒPYP¶!R>0À!HƒGU5Ê! !„MOUTÔ!ƒGU5 †PLWSNDÞ!Q>è! P„VERTò! ƒGU2%ƒPYPü!$>"ƒGU1Q…P0MEM8"P…P0MEM8" Q…P1MEM8$"R>."HƒFOC8"Q>™B"HƒFODL" ƒFOCR>™V"HƒFOD`"Q>j"ƒFODP…P1MEM8t"3~"0ˆ"IƒGU1’" „WAITœ""ƒPYP¦" "„VERT°" Q„VERTº"IƒGU2Ä""ƒSMYÎ" !†FULOUTØ"X;â"X;ìïãáôå :result in ãõòãèòì"X;ö"…LOOKR%ƒSMY# …WHERE #%ƒSMX#3#3(#…LKRETQ@‚JL72# P†CURCHR<# †CKCHARF#:P#X;Z#…LOOKL%ƒSMYd# …WHEREn#%ƒSMXx#1‚#1Œ# !…LKRET–#X; #…LOOKD%ƒSMYª#3´# …WHERE¾#%ƒSMXÈ# !…LKRETÒ#X;Ü#…LOOKU%ƒSMYæ#1ð# …WHEREú#%ƒSMX$ !…LKRET$X;$X;erase chr beneath dozer"$X;repalce with next char.,$X;which is a road w/o snow6$X;@$†REMOVE%ƒSMYJ$ …WHERET$%ƒSMX^$ Q@‚JL7h$$>r$ƒRB1R…ROADS9|$FƒSF5†$0$IƒRB1š$!ƒSF6¤$ƒSF5R>;;cng car to road®$FƒSF8¸$R>Â$HƒSF7Ì$ƒSF85;;save carÖ$Q>aà$ P@‚JL7ê$3ô$ P@‚JL7þ$ †BONSCR% „HORN%7%R>&%FƒSFA0%HƒSF6:%ƒSF7>D%2N%AX% P@‚JL7b%3l% Q@‚JL7v%>€%2Š%A”% P@‚JL7ž%R> ;; fuel?¨%FƒSF6²%ƒSFA#…ROADG¼%HƒSH1Æ% #…ROADGÐ%X;Ú%ƒSH1 †DOSCOR;;show scoreä%X;î%ƒSF6Q†CURCHRø%R>;;fuel?& H„CAR? &X;&#†CURCHR;;empty fuel &%ƒSMY*& …WHERE4&$„FOFS;;get pos.>&ƒFFAQ‚JLH& R„FULY9R&FƒFFB\&ƒFFC0f&IƒFFAp&:;;shouldnt happenz&ƒFFBQƒSMX;;put it on„& ,;;screenŽ&O‚JL˜& R„FULX9¢&HƒFFC¬&Q>d;;got it¶&P…FTIME9;;set timerÀ& †FILSND;;soundÊ& †RESFUL;;show itÔ& †DSPFULÞ&ƒSF2:è&X;ò&X;hit a carü&X;'„CAR?%ƒSMY;;find out' …WHERE;;which one' $†CARCNT$'FƒSF2.'ƒCB1Q‚JL8' R„CARY9B'FƒCB2L'ƒCB30V'IƒCB1`' :;;nopej' ƒCB2Q‚JLt',~'OƒSMXˆ' R„CARX9’'HƒCB3œ'Q>2;;set timer¦' P†CARTIM9°':º'X;Ä'X;road,fuel,car chrsÎ'X; 8 = fuel $1b= carØ'X;â'…ROADS `=b=d=fì' h=j=l=nö' p=r=t=v( x=== ( a=c=e=g=i( k=m=o=q( s=u=w=y((X;2(X;check if about to move<(X;onto a valid char.F(X;P(†CKCHAR$>Z(ƒCK1R…ROADS9d( F„CROKn(0x(IƒCK1‚( ;;;no moveŒ(:–(„CROK,;;move ok (:ª(X;´(X;decrease fuel¾(X;È(…SFUEL"„FUELÒ( Q„FUELÜ( L„FUELæ( L„FUELð(FƒSF3ú( Q„FUEL)IƒSF3)Q> ) P„FUEL") "„FUEL,) Q„FUEL6)IƒSF3@)Q> J) P„FUELT) "„FUEL^)ƒSF3 †DSPFULh) „FRET:r)X;|)X;show fuel left†)X;)†DSPFUL$>š) ‚DSQ„FUEL9¤)L>®)P†TXTWIN9¸)0Â)I‚DSÌ):Ö)X;à)X;wait someê)X;ô)†WAITSMQ>þ)$>;;15 secs* P„VFLG* ƒWSM ƒLDL*0&*IƒWSM0*::*X;D*X;pt2 is rest of gameN*X;pt3 is the screen makerX*X;pt4 is the introductionb*X;l*>ŠD:SNOW.PT2v*>ŠD:SNOW.PT4€*>ŠD:SNOW.PT3Š*X;”*X;variablesž*X;¨* …RANDS²* „DBUF¼* †EDGFLG Æ* …M128L$Ð* …M128H$Ú*àä* …BEGINî*