ўїїџџџџџџџџџџџћWORDRACE0 а DSK (џџџќџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћBITEBOP €€PaїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћBANKCODE €ГPW@їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћASSM2 B їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћCOMUTL €"*P"{їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћBANKROM € P\@їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћBANK0TEST €тPUїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћASSM1  "№їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћGETKEY € lP -‘їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћEDIT1 qїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћDUCKO 9PЉЧ€їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћDATA €(лP(pїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћINITS €0ЧP07ёїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћFIREBOP €дP!їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћDUCKROM €ЧPїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћDUCK €тPХїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћINTERRUPT €ШPgсїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћROMHDR €NPїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћMOVEBOP €2{P2—їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћVMLOGO €~PNBїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћSPRITE €ЇP BїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћMOVESNAP €?њP?ЩсїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћMAZES €!vP!vїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћSUBS €/‚P/тїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћџџ ЊU  (ž€€PP ‹€€ ц!Є"N"` Ѕ ­9мЌюRLXS : 99/4 ASSEMBLER їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћASSEMBLER EXECUTING (C) COPYRIGHT 1981 BY TEXAS INSTRUMENTS, INC. VERSION 1.2 PAGE END SYMBOL TABLE OVERFLOїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћTBTEXT TITL UNL X‚XIT XOP,XOR( THE FOLLOWING SYMBOLS ARE UNDEFINED: !†!‹!w!|  1 MЅ* :5ЌЌr5ъ(Ђ(Цџ@ŒAО*ІџЖ3hдШ ƒі(Ти ˜(Фи ˜(Х (Ф ЊЦ јр(^р7ђр­р ШтШЊŒїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ DCA,DCS,BDDBDECDECTBDEF DEND DIV<DORG DR BDSEG DXOP END EQU EVEN IDLE@IDT INC‚INCTТINVBJEQJGTJHJHEJLJLEJLTJMPJNCJNEJNOJOCJOPLD‚LDCR0LDDТLDS‚LILIIM,ŽLIMILIST LMF,LOїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћCATION - ***** UNDEFINED SYMBOL - ***** COM TABLE OVERFLOW - ***** PEND ASSUMED - ***** DEND ASSUMED - ***** CEND ASSUMED - ***** END ASSUMED - ***** COPY ERROR - ERRORS їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћW CANT GET COMMON -ASSIGN ERROR -ILLEGAL PATHNAME -I/O ERROR- "№## #"#)#?#F#`#g##ˆ#Ѓ#Њ#Р#Ч#с#ш$$ $%$,$H$O$e$l$‚$‰$Ÿ$І$Л$Т$ж***** SYNїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ Џ ЏИШ Џ˜5РУ=R0ФТЅ*ЭХЭФз'џќШ(† 6Р 5Ж џрТ 5ІиˆРж 5ъ 5ЌСХ‚…‚‚ /‚ $R1‚в ШЅ  Ѕ\"U"WмБд‘[р(xр$юр(fрЄ$р­!Eо (jˆ!˜ћШ Ѕ:*`(^Ш (T:,Ш (V:4Ш (X:,Ш (Z:4р(dр(bрЄ8р­ :"р9œр9žи ц цр<ФрїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћAD LR ‚LREXрLWPIшMDMOVРMOVBаMPY8MR NEGNEGR NOPORIdPAGE PEND PSEG REF RORG RSET`RT[RTWP€S`SBpSBOSBZSDТSETOSLA SOCрSOCB№SR ТSRA SRC SREF SRL STCR4STDТSTR ТSTSTХSTWPЅSWPBТSZC@SZCBPїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ A ABАABSBADBAI$ANDIDAORG AR BBBBES BL‚BLWPBSS BYTE C€CBCDE CDI CED CEND CER CI„CID‚CIR ‚CKOFРCKON CLRТCOC COPY CRE CRI CSEG CZC$DATAїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћTAX ERROR - ***** INVALID REF - ***** OUT OF RANGE - ***** MULTIPLE SYMBOLS - ***** INVALID MNEMONIC - ***** BAD FWD REFERENCE - ***** INVALID TERM - ***** INVALID REGISTER - ***** SYMBOL TRUNїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћЅŒр5р5р5 С`5ˆЏ˜е%љр Ж` Ш ­Ў&р9Вр Цр(x ЄЄ  АрЅ` ШС`9ВСр<Ќuр(jр9ВШ ЪШ ІЅŠ ЌД  &‚*р(xм‚ P‚$ ‚@` ШG ЄDD Ѕ  6 Р`5Њ ` Ш- ЄP0 њ €РУР 0 5ир 5Ј` Ш ЄTР 5Ж џаїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ ˆ` Шv ШрЏ”и ;ў!@ 4КС ЅŒ!A(€ /В !@м`(hТ (€мHШмH!Eџјмh!˜ˆќЬС 5 5 .”С 5 Œ 5  .”Т`5 ˆ Џ˜ŒС9 .”јШ:* ­ЎЖ`)а`(^ † Ш:* ;фР`:*Ц†ѕ†СЫм`(v(€ /Вм`(€м`(мy§( /Вм`(м`(‘Wˆ :*Ѕ& ;фїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ ˆ`-ŽС ‹‚"ї‚"ТнТіьСи Šш ЈBх ˆ`*4 4К (d 3іРр=<С =С`9В` Ш 4  Ђў1 4КУ  &‚  3ішС 5ч :" Ђў :N :" 3ф` Ш С`9ВШ <Ќ5ІТЦ Ђў  :" Ђў :N :" 3фgШ Ъ (f =>р(fС`="WР =` Ша ?М@џ Ѕ6їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћБСШ 5 5 5єа‚жB‚'Дх` Ш, Ѕ $Р`:*!l ;фР`:*UмF`(^ЦмFмF0мFмFмFмFбWмwћ FШ:* ` Ш ЄDџў`1ШХРУЗСE` Ш ЄxС`9В` Ш 4  4К ЂўС ЅŒуƒџџХы` Шш Єtх…у` Шр ЄpнТK 3іС`="†Ё =Y Цїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ 9и 9и`*4Х Ѕ  6 ` ШР 5Њ€  ЄH Р 5Ж СE Т 5ІРж 4р` Шњ ЄDї 4КРУС ЅŒ :" ƒџџС 5 С ЅŒСCE 5Т`5ЂEС  &‚   3іР =<˜ (}(С =` ШС`9В 4  Ђў`*t`-Ž` Шя ЄDьС‚-‚'ю Ѕ Ѕ їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ!@  &‚ 1 Ѕ O 6LС 5Њ†GР`:*м`(rF С 5ІХбV…џ8М`(q5А /В!AТ 5АмHШмH!EШ:* ;ф 6n ЄЄ`(` 8І­Ў`Ш Є$Ѕ  Ѕ\$рШ 9šЌюШ 9š/  ЊЦ­а ­­Ј ЄDм`(^ Ш/ЦШ/Ф Ѕ6!Ы[ 3іС`9В`-ŽТ <ЌШ5Іг` ШСШїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ(x"ZШ (j"Z Ђў„ < 4к 4RШ Ъ => Ѕ6="Z ЂўФС`=" 4zШ =<:F :J 4ч Ѕ  6` Ш ЄP 4ђ` Ш ЄTїТ 5І f ё` Шю ЄDы` Ш ЄD`*t Ѕ і 6 ` Шˆ 5Њ Т  ЄPюУ 5Ж,џш ŒТ 5Іж ‚,нр ^ ЃРр(xСХ  vзШ ˆ ˆ ЈFрїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћРУ Т 5Іо (РжСХ„Т 5ІШ<Ќ 9В‚ ` ШЂ ЄDŸ  &‚ š Ѕ -Ш Ѕ†<ЄС`Ѕ. <О‚  ` Ш ЄDШ '><Ір<Јˆ <Ј(n 4R  †`*4 6 ˆ 5Њ(l 4R Ѓђ` Шт ЄTпр(xа`<І qРa+КQ,f,‚,Д,Ъ--L-œ-ъ/в0j0а0м0ц11^1м0r2L,<3ˆ2‚3z2R3€2t31 +єШ ˆїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћР Ѕ†Ра 4*`(\ (b ЅŠ  &‚'ъ ЅŠчРA 4*‚ ` Ш ЄDр(b`*4р Ўљ 4КС 5џўС`9В` Ш 4  ЂўЊ 4КС ЅŒяЅ 4Кр5‚ 6‚'є Ѕ Ѕ*Ю`(jЮ`(jЦ`(j)џќ Ѕ Р Ѕ†и (}(}"ЮBє‚'‚ г` Ш Єl Ѕ*Ш 5 52ОС 5Рр5їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ=# Ф-ХбXХ%џ и Ќэ"^!и Ќь"^и Ќы"^С`="Р 4z# <Ў€ 0 5и  5Ј €Ц =<иˆжСХ = Ѕ6="Z 4R`*t!˜Р То (jќ‚'`-Ž Ѕ Ѕ Р Ѕ†нРРанРѓ‚'` Ш ЄLрЅврЅ!ЯСC ЏРХС` Ў ˆ 9ž(pˆ 9œ9Єїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ =>р Ц[‚  ‚, ` Ш ЄDС` АА[`2D Ѕ6(x"ZШ (j"ZУ  Ђў„Ш Ъ <`(b\„DџўШ Ъ` Ш С`9ВШ <Ќ5ІСХ„р<[Р =<"џ и Ќэ"^и Ќы"^и Ќь"^[Ср<ЌШ5ІUр<Гнр(СХ„[`(dРУƒ 5 C 3Т`5ЂCЦD :"р(d[ƒџџ ЅŒє 5ёїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9—˜ Ќы"^Е :D˜ Ќэ"^Е :E„"Z`(^ ;Vн7н7н7н7˜ Ќэ"^Ш;@ Ѕ6:F`(^СФ ;V$€ ТаwA!џљ!џа B  ѓнТн[9Ш Ѕ&Ќю`(^н  !@СТаМТ B њШ;Ќ Ѕ6:$$е $ю`(^Ш $юЅ  Ѕ\!Œ ­Ў:!@Э 9˜„!ћ!@[:";ш` Ш ;€€!AїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћŠ" ћ 5Юз"9p˜9q ТаАТ"џз 9з 9€Ь 6 вГп Œ љЬШ 9P 5є Ѕ65А,$ ˆ7ђЏЧ 5Ц ­­а 9œ€D'D D'D XUUUEESS"+Z ZZ ZZyyysjvv  $о ц<Ќю!˜­Ѕ\Ѕ !ц9М PASS 1 ERRORS 9а 9š9р9š9ь9š9ђ 9œ` Ш` ШХ 9Ю­аїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ п 5Є ќ,џњ 6 вГп Œ јЃ С„ўФ`(^п 5Ўп 5ЏШ 7L Ѕ65Ў, 5єCРˆЄ‘ˆ5ЬШ :* ;ф€„џ 3› X˜ 4• V’`5Ъ  5Ъ (* 9дШ Ќю ­­а 6 "_ 9дШ ЌюТژ5ЄоГо 5Єƒіо 5Цо 5Чж 5Ѕ 9дШ Ќю ­­аВїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ 5ю$DATA $BLANKЅ*Џ˜556Р…РˆЏ˜С2УŒrƒƒњЮ€ТТЅ*€€}ч€}С Џ˜& Ср8aр7ђ‡ ђЬБЬБЬБШЏ˜Фм` Ш Єl€ `[Р2B[5І5м 5т€РPA[5І5ю 5є€С‹ 6їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ"\"Z00:J9˜"W"X;є<`(d?С :"а@   ХФХФдХˆ€С“ХФХwЗХФЦа@ ы шСр:*`(^Цв3H(љ(а FЁˆѕеЦGнѓегШ€A&Њ<ž<ТХР ?ТŒ3„  РССDDџ№EЮ€УР‚C@їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћХƒ‚Ц‚!к­а` ШХ 9К­аХ‡­аРE€9А9!wFB!|7 :":о:":R :X€Ш :H` Шњ`(dїр<Р4РD ;€еУ (~ Е 9•ŒЕ :BŒЕ :C„"U`(^ ;Vн7н7н7н7Ш (~(~Ш:Ф Ѕ6(~`(^СФ ;V$Тр:H[ :X :юШ :H‚DФе˜ 9˜"^Е їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ7ю8Р‚РЬ#џє. СBР РE  $  С€  РРТP)џњСр(†Žw ћШ5ІЮ€С$ DнСF%џєз#џє` ШР `Р@€CШQџє јР Џ–`ФР" Ш5І€5І8ЊФ 7ђ^Р 8 џєРР 8` џєРЧ 5Ц ­­а 9œ 9м`9œ "NШ ЌюУ Ьо 5ЄїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћCСSVСЫ 5тРР`СCџўW5І6Р Џ– 8 5ЮЮ€` Ш(X Ф 6С (†мє§ 5єCШЄˆЏ˜Т 9А Ўр(x`/І€5І6rР Џ–Т 7ђz !@р5Ъ 5ЮТ 5І ФбФи"9‚6џ„џ 5 W 6ŠWŒ!hŒ!l  5єп `(^ п 5Ап 5БШ :* ;ф !@юШ 6є Ѕ65А,їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ:Jш Ѕ6(€"U[ dЃ р ^, 5ъР 5А `сРФ ‚ `+` Ё`ЂVТKХЬ  &‚@)р ЪС„ Ё„Ё ="Ьр=  &‚ ƒТ‚(Х‚)` Ш ЄD ЅŠYХY‚*Y  &‚+…YY Ѕ  6Р`5ЊA  5ъР`5АР`Ѕ†У` Шїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ Ё* ЅсХ lсЬDТ Ц Ѓ:Ш $    " Ё* EсХсЬXС =< †ўж`Ќэж`Ќьж`ЌыЦдF[ Ё' `ЂdР ="` Ш ЄDР = ?МpсР ` Ш ЄDгС„ Ё„bсЬƒТ№р ЪФр=„Ё ="    " Ё*NсЬK ЁƒТ lсЬBр d€ (fр(fР =@` (€ ?МpсР/`їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћJџ У (~о`=/*РA**`ЪжJЁР Ѕ†ЮУЯЯh?2&Ё‡р=< Р` Ш ЄL`>fa‡р=<`Рјђ`>T ?˜8РРУ` Ш ЄLРФУЯшЯх ?˜СУРк<Рѓ` ШС†сСЧпƒџџO€џџO[` ШР@Р€€@ ЄL[1111)11#;;;;11)11#їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћСР‚    €($ьл€==Bр=Я…УФЦр=<ŽЧ  :‚ w‚_tаb$а и!?в={џУŽj ЅŠС†f†cСEaр=€СEоСEOкСEU Т…ЮгХ Ѕ Ѕ   :‚'EрЅР Ѕ†РаР`?$ ЅŠСEЫХ Ѕ > 6Т 5Њи*їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ Є`Ь[ Ѕ6ЌюЏ–ЅŠ :­Є8 9м dш**ЄЄœЄЄšЄЄ˜ЄЄ–ЄЄ”ЄЄ’ЄЄЄЄŽЄЄŒЄЄŠЄЄˆЄЄ†ЄЄ„ЄЄ‚ЄЄ€€€€€€€€€€€€€€€€Ро@-ЄЄЈ Є8Ра#ж`Є6Р ŠРРШ#"ВЄаШ ЖЅ  Ѕ\ 9œХ#"АР˜0ЄB§ШЄю ЊЦ­а‰к їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ Ш3 ЄD0` Ш- Є\*Ч сХ%У =LсЬсЬƒТуУ ="пУ =мŒй` „Œй LсЬ‚ ‚ Ъ  Ђў Ѕ6 l"Z Ќrр(€ :JЂц ЂоЂШ   "и$ЄЂџ••—•œ”•‘œіœїœј№ёђС‹ Ђў Ќrр(€У‚Vи"^и:GШЂю Ѕ6Ђю"ZС‹ Ђў їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ ЅŠ *ЁЁћ|: џ џџџ  VРа’ ‚‚ РŠ[  >‘СB‚‚‘‚‚ќР…‘ЫB€ :ЃР=>,џ d Šр ^р „Ф Ср<ІР <Ј РЂ ЈRЂd ЮЁNЁ\Ё’ЁКЁРЁиЁœЂ(+ЌЁT ЦЂЂ  „`Ђ( ЁƒТRЦ Ѓ:Т` $С†     "  ! #їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ?м>џ` Ш ` Ц ` Ш` Ц ЄXТр5І Ъв›Ъˆ =<Тр=<Ш =<‡ 5ъР 5Аn` Ш  Єh` Ш ЄDУЦ—Ю`=ZZ` Ші ЄHѓУŽј  &‚ ‚,‚(э` ШC`(fч` ЦфУЯт 5ъРр5АСŠС&џє†F Т`5І Ъв™ЪШ =<Ш :F`(dУ ЪУ (~Т`5ЌЦ` ЪТ`5ІТ™їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћЄ8€‚Т‚,‚ їР€ !Mџќ!@0н7н7Ш ЅЅ:С>ССDСўСƒ E… ЁBЁIнХ DСD†ѕ€ЅЅ`СўФ=&Є0 „Ё нФFї …ЁIеХ€ЄLІКІјЅ€ЅЄТEЅ*—!џћ{ Ш!Ї$ЅР`ЅО‚$ —`Ї$ѓѓг#џќ  ‚мТ—їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ`ЌќЌќШЉ ЊЮ ЉŒ€ Љ ЉђрЉ€ Љ.ЮУ`Љ.рЉ.  ШЊvШЉxР €ШЊ: ШƒVР` ŠШЉ„ ЊЮ  ЊЮ Š Њ0€РM!бР@џР€(`Љ[`Љ.Щиƒ"ШЉь Ѕ6ЉьЉц ЊЦЉкШ ЉЮ ЊЦ ЊЦЉю`­Њ**DSR ERROR:ASCI   Шїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ—€EТ\Рр(~CџШ=< =$р=$Рр(€€ЅТІ4ІрЇІfммм  J J JJЪ ’"z$z&zЈЇVSрЇМрƒрР`ƒVШЇj ЊЂбСЈЇrSрЇирƒрР`ƒVШЇ† ЊОбС ‡ƒJ†Ц ШЇЂ ЊОм€˜Ј7ѓС†>†;рƒа ƒVЈƒVШƒTС ,рƒаŒ (Ш ƒа@˜Ј6№"Р ƒвР’їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћPСШС€ ЌРУ€L СЌњЎШ-Ў" ЊЦ€С Юб Ћ§Х ЌРУ€С Юб ЋќХ!@PТ ЌРУ€O `­–С Юб ЋќХ!@PТРFд` т! œРГ РСмr§Сє $юШ $юЅ  Ѕ\!ŒУ ЌРУв€Ы€У иЎфР ЎциЎха Ўф Р ЎциЎфР м Ўхд Ўф\@№ @€   0їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћџ ЌRЌрЌюУХРDAџ ЈJ" ЈR˜Ћ§ б Ћў ЈN ЊЮЋњС Ћњ ЈN "<" ЎК ЎрЌR€Ќю­F$ ЂЌv` ШС† 9œ 9œЧСЧЦ  Ѕ\"PШ"`Ш"PШ"RЧ­жи"^€ ЂЌИЧРЬ€" ќ­$Š"š„@€"`њ€”д€ЬФ€'"+їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћЊ,ШЊvР `Ј@ШЊ*ШЊt€ШЊ:ШЊb ШƒV ЊЮ ЇnК ЊОФбФ$ Њ|а@ бЈ` ˆ @ ЊТ ­УСиЌє ЊЪ[рт€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€Њ~ЊмЊ~ЊшЊ~ЊєЊ~Ћ~Њ~ЋšЊ~ЋЖ Р> Ћтз`ˆ€Р> ЋоиŒ€и ЊйЊлїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћшШƒвТТRТСFХ”…ђХƒJ‚”Гьћ™чрЈ€рЈѓрЇи€Њ. Њ4ф" (Љ0 (Љ ЈV HЈЦ hЈжУрЈ@` ˆ Ј@ ЉŒрЈ@РУр ˆяР` ˆШЈ ЊОиЈЉаD  ЊЪ€"`˜ "`Ј> "`"aмr˜Ј>ќв€ ЊЮ€!@P ЉŒ€Ш ЌюЈј` ЎШ ЌќЈњ Њв€ P ЊЮ€їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ їєТIЩ` Ш Єd )Ш 5ЖЅ*Ш(†Ю€VРТ#џа—!џњРA10€"џа  ƒ # Тя` ШьъУ—!џћи!Ї3Іyџ—!џћси!Ї.І‹џ‚F "џљ"џа C` Ш Тш` Ш ЄDУ€аЕ ‚‚  ‚ ю‚_аb$а [С[—€šРТ—€š ƒрТ€У їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћPС Ьб ЋсШ ЌўЌю­ Т>XТЫ С Ьб Ћ§Ш ­­б Ћњр­ ЌС Ьб Ћћ Ќ˜Ќ€Ы ­ "` <Ю  фIќ "`* !тЮЙЦ™` Ш` ˆ Є|€S и"I "<Р ЎК Ўрƒр рƒрЫи ƒ|Тр(Ти (Фœи (Хœ[С ЎС аб ЋќХС€ЧШ‡ˆˆP˜6ЋљјˆPїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћР~Р ЋоТаБ‚ т ‚ч‚ ђиŒ‡‡§ёыФХТ $ Р ЋтЊž Ћ Р ЋоЊž ЋЌ% ш€€ р Ћо ЋЬРJПР>Р~РОА Ћт Ћ€м`ˆќ[Р>Р~РОЂ Ћо ЋЌ€и1Œќ[Р>Р~РО Ћо‚Bџў ЋЬ€иŒСиŒСBј[`@РиŒРиŒ[LXTMCSR, їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ[ !ў`ЏˆЌєЏШ 5ШЏžр Ўр(\р(^р(` в˜ ф Ћ№œ—ќ‡ѓ[и!ЏvЏGџ  ЎР ЊО Р№р Ўэ (\ъ (^ч (`фуУс  "$Р ЎК Ў ­­ЈЏќЏЈЏ’ЏЖ€Џ’ЏМџРa‰ Х=H9HТ( XРЩ# Р‰ †Ш8BШЄС СH Eє§їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ&************************************** BANKAD DATA 0 DATA 0 DATA 0 DATA 0 DATA 0 DATA 0&**************************************&* PRIOR TO CALLING THIS ROUTINE, YOU *&* MUST LOAD R0 WITH THE NUMBER OF THE*џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ COPY "DSK1.MOVEBOP" COPY "DSK1.FIREBOP" COPY "DSK1.BITEBOP" COPY "DSK1.MOVESNAP" COPY "DSK1.SUBS" COPY "DSK1.INTERRUPT" COPY "DSK1.COMUTL" LIST FINISH EQU $ END џ.GETKEY"џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћџџџа 4*`(\ (b ЅŠ  &‚'ъ ЅŠчРA 4*‚ ` Ш ЄDр(b`*4р Ўљ 4КС 5џўС`9В` Ш 4  ЂўЊ 4КС ЅŒяЅ 4Кр5‚ 6‚'є Ѕ Ѕ*Ю`(jЮ`(jЦ`(j)џќ Ѕ Р Ѕ†и (}(}"ЮBє‚'‚ г` Ш Єl Ѕ*Ш 5 52ОС 5Рр5їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ&* ROUTINE YOU WISH TO CALL. *&**************************************;BANKSW MOV R11,@BANKRA SAVE RETURN ADDRESS OF CALLING RTN- B @$->2000+4 JUMP TO OTHER "BANK" MOV R0,R1 COPY$ SLA R1,1 MAKE A WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* FILE IS >> BANKCODE << EVEN*===&*=== NOTE: THIS ROUTINE SIMULATES BANK*=== SWAPPING USING CPU MEMORY*===&**************************************&* THIS IS THE ROUTINE THAT WILL *&* SWAP BANKS FOR THE CARTRIDGE. *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* FILE IS >> BANK0TEST << UNL AORG >C000 COPY "DSK1.ROMHDR" COPY "DSK1.BANKCODE" COPY "DSK1.DATA" COPY "DSK1.SPRITE" COPY "DSK1.MAZES" COPY "DSK1.INITS" COPY "DSK1.GETKEY"џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџџџџџџџџџџџџ§џџџџџџџџџ§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ EVENџ**************************&* BANK SWITCH RETURN ROUTINE. *&**************************************%BANKRT MOV R11,@>6000 SWITCH BANKS/ MOV @BANKRA,R11 RESTORE RETURN ADDRESS) RT RETURN TO CALLERџEџ0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ;BANKSW MOV R11,@BANKRA SAVE RETURN ADDRESS OF CALLING RTN+ MOV R11,@>6000 JUMP TO OTHER BANK MOV R0,R1 COPY$ SLA R1,1 MAKE A WORD) MOV @BANKAD(R1),R0 WHERE TO GO! B *R0 GO THEREџ0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* FILE IS >> BANKROM << EVEN&**************************************&* THIS IS THE ROUTINE THAT WILL *&* SWAP BANKS FOR THE CARTRIDGE. *&************************************** BANKAD DATA 0 DATA 0 DATA 0 DATA 0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ) MOV @BANKAD(R1),R0 WHERE TO GO! B *R0 GO THERE&**************************************&* BANK SWITCH RETURN ROUTINE. *&* IN BANK ZERO, THE FIRST STATEMENT *&* SHOULD NEVER GET EXECUTED!! *џ MAKE A WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* FILE IS BITEBOPBOPSL DATA >2020,>2020 DATA >6820,>2020 DATA >6868,>2020 DATA >6868,>6820'***************************************'* ROUTINE TO DETERMINE COINC BETWEEN *'* BOPPIE AND SNAPPERS. BASED UPON *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ&**************************************&* BANK SWITCH RETURN ROUTINE. *&**************************************%BANKRT MOV R11,@>6000 SWITCH BANKS/ MOV @BANKRA,R11 RESTORE RETURN ADDRESS) RT RETURN TO CALLERџEџ0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ DATA 0 DATA 0&**************************************&* PRIOR TO CALLING THIS ROUTINE, YOU *&* MUST LOAD R0 WITH THE NUMBER OF THE*&* ROUTINE YOU WISH TO CALL. *&**************************************џ DATA 0 DATA 0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ&**************************************%BANKRT B @$->2000+4 SWITCH BANKS/ MOV @BANKRA,R11 RESTORE RETURN ADDRESS) RT RETURN TO CALLER EVENџ STATEMENT *&* SHOULD NEVER GET EXECUTED!! *џ MAKE A WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ'* @SNPNUM. RETURN LINK IS R14. *'***************************************$BITE MOV R11,R14 SAVE RETURN' MOVB @ACTFLG,R0 IS HE FALLING?1 JEQ CNBITE NO, SO THEY CAN BITE HIMџ SNAPPERS. BASED UPON *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ'OUCH BL @SNDSUB NO MUSIC, NOW DATA MSCOFF*& BL @SNDSUB RISING SOUND DATA RISE* BL @RDVCL READ HIS POSITION DATA BOPSAL,2,SAVEYX" LI R5,1*256 DECREMENTџ***********џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* AI R4,SNPSAL NOW POINTS TO SAL# BL @CO34 TEST COINC% DATA 8,4 Y TOL, X TOL MOV R9,R9 HIT& JNE OUCH YES, SO DO IT% INC R13 NEXT SNAPPERџ UPON *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ? JNE OUCHRT YES, SO NO NEED TO REPLACE LADDER CHAR4 C @FACPOS,@SPNPOS WAS SPINNER WHERE FACE WAS?6 JEQ OUCHRT YES, SO DON'T COVER UP LETTER MOV @SPNPOS,VDPADDџDIDNTF MOVB @STARF,R0 WAS HE CARRYING STAR?џRENT LEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ SRL WLOC,8 ADJUST, SLA WLOC,2 MULT BY 4 TO OFFSET' AI WLOC,BOPSL GOT THE OFFSET) LI WCOUNT,4 4 CHARS TO WRITE' LI VDPADD,21*32+26 SPOT TO WRITE+ BL @WRITE SHOW BOPPIES LEFT!*џRENT LEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ/ LI R7,>EE00 WAIT TILL HE GETS HERE!RISEL S R5,@SAVEYX POSITION$ BL @WRTCL MOVE HIM UP DATA 2,SAVEYX$ LI R6,>400 DELAY COUNT RISED DEC R6 JNE RISED- CB @SAVEYX,R7 IS HE AT DEST POINT?џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ' CI R13,5 DONE WITH ALL?* JL BITELP NO, SO KEEP GOINGBITERT B *R14 RETURN'***************************************'* BOPPIE WAS BITTEN!! DO THE ROUTINE *'***************************************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ4 JMP BITERT YES, SO THEY CAN'T BITE HIM-CNBITE CLR R13 COUNTER FOR SNAPPERS+BITELP LI R3,BOPSAL FIRST ONE TO CHECK& MOV R13,R4 WHICH SNAPPER" SLA R4,2 MULT BY 4џ BASED UPON *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ+ MOVB @FACEF,R0 ANY FACES CARRIED?, JEQ DIDNTF NO, SO NOT CARRYING) MOV @FACPOS,VDPADD SPOT TO REWRITE+ BL @WRTCL YES, SO PUT IT BACK DATA 1,FACCHR*.DIDNTF MOVB @STARF,R0 WAS HE CARRYING STAR?џRENT LEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ! JNE RISEL NOT YET! BL @SNDSUB DATA MSCOFF*2 MOVB @NUMBOP,R0 WAS THIS HIS LAST BOPPIE?- JEQ OVER YES, SO GAME IS OVER*( SB @H01,@NUMBOP ONE LESS BOPPIE) MOVB @NUMBOP,WLOC GET CURRENT LEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ? BL @WRTCL REPLACE SPINNER WITH LADDER, IF NEEDED DATA 1,H00*OUCHRT BL @DELAY DATA 4/ B @GOTBIT AND REENTER LOGIC LOOP'***************************************'* GAME OVER. WAIT FOR KEY. *џ?џRENT LEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ/ JNE NONEWS NO, SO KEEP DISPLAYING$ LI R14,>400 RESET DELAY MOV R14,@BOPPIX*' MOV @BOPINF,R13 SCORE SHOWING?4 JEQ MVINHI YES, SO MOVE IN HIGH DIGITS** HIGH IS SHOWING, SO MOVE IN SCORE DIGITSџ @KEYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ( JNE TESTHI NOT DONE WITH 6$ JMP RBTEST NO HI SCORE*/NEWHI BL @TRANSF TRANSFER SCORE TO HIGH DATA SCSTRT,HISTRT,3*1RBTEST BL @TRANSF TEMPORARY AREA FOR SCORE DATA SCSTRT,TEMPSC,3 CLR @KEYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ DATA 20,RDBKM& BL @WRTVCL SHOW FINAL WORD DATA 21*32+15,8,GUESSW BL @HCHAR BYTE 12,7,32,20 BL @HCHAR BYTE 10,7,32,20 BL @HCHAR BYTE 14,7,32,20*' LI R0,SCSTRT START OF SCOREџFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ'***************************************,OVER LI VDPADD,SNPSAL DELETE ALL SNAPPERS LI R3,5 5 TO DO#ALGONE BL @WRTCL OFF SCREEN DATA 1,HC0. C *R0+,*R0+ POINT TO NEXT SNAPPER DEC R3 DONE?џLEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћMVINSC BL @TRANSF DATA TEMPSC,SCSTRT,3$ BL @WRTVCL SCORE MOTTO DATA 21*32+1,11,SCOREM9 CLR @BOPINF SET FLAG TO SAY SCORE IS SHOWING JMP NONEWS** SCORE IS SHOWING, SO MOVE IN HIGH DIGITSMVINHI BL @TRANSFџYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ7 CLR @BOPINF 0=SHOWING SCORE 1=SHOWING HIGH+ LI R14,>400 SHOW DELAY COUNTER MOV R14,@BOPPIX(REDBAK CLR @SCNTIM NO SCREEN BLANK& BL @MOVSNP MOVE SNAPPERS' DEC @BOPPIX SHOW DELAY UP?џCLR @KEYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ& LI R1,HISTRT START OF HIGH, LI R2,6 6 DIGITS TO COMPARE1TESTHI CB *R0+,*R1+ SCORE GREATER THAN HIGH? JH NEWHI YES!- JL RBTEST NO, SO NO HIGH SCORE' DEC R2 TRY NEXT DIGITџEџFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ! JNE ALGONE NOT YET!* CLR @SNAPIN CLR @SNAPIN+2 MOVB @H00,@SNAPIN+4*( BL @WRTVCL DISPLAY GAME OVER DATA 11*32+7,20,OVERM AI VDPADD,>40' BL @WRTCL AND REDO OR BACKџ DONE?џLEFTџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ* FILE IS COMUTL'***************************************'* GENERATES A 16 BIT RANDOM NUMBER AND*'* PLACES IT IN R10. RETURN IS IN R11. *'***************************************RANDNO LI R9,28645( MPY @SEED,R9 SEED EQU >83C0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ2 MOVB @H01,@INTFLG DON'T ALLOW INTERRUPTS ON) B @BACK BACK ENTRY POINT'***************************************'* TRANSFER BYTES FROM/TO TWO AT A TIME*'***************************************TRANSF MOV *R11+,R0 SOURCEџNT*џYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ JMP REDBAK*#GOREDO BL @SNDSUB SOUND OFF DATA MSCOFF6 BL @DELAY 1/2 SECOND FOR INTS TO FINISH DATA 1' BL @WRTVCL DELETE SPRITES DATA SAL,1,HD0) B @REDO REDO ENTRY POINT*џYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ DATA HISTRT,SCSTRT,3# BL @WRTVCL HIGH MOTTO DATA 21*32+1,11,HIGHM8 SETO @BOPINF SET FLAG TO SAY HIGH IS SHOWING*NONEWS BL @SCANKY SCAN CB @KEY,@HFF KEY? JEQ REDBAK NOT YET*џSFџYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ AI R10,31417& MOV R10,@SEED MAKE NEW SEED) B *R11 RETURN TO CALLER'***************************************'* SOUND SUBROUTINE. DATA PASSED. *'***************************************џSEED EQU >83C0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ MOV *R11+,R1 DEST MOV *R11+,R2 COUNTTRANLP MOV *R0+,*R1+ DEC R2 JNE TRANLP B *R11џ****'* TRANSFER BYTES FROM/TO TWO AT A TIME*'***************************************TRANSF MOV *R11+,R0 SOURCEџNT*џYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ#GOBACK BL @SNDSUB SOUND OFF DATA MSCOFF+ BL @DELAY LET THE MUSIC STOP DATA 1& BL @WRTVCL SPRITES GONE! DATA SAL,1,HD0% LIMI 0 DISABLE INTSџ B @REDO REDO ENTRY POINT*џYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ# MOVB @KEY,R3 COPY VALUE SRL R3,8 CI R3,6 REDO? JEQ GOREDO CI R3,>38 8 JEQ GOREDO CI R3,15 BACK? JEQ GOBACK CI R3,>39 9 JEQ GOBACKџ YET*џSFџYBRDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ2SNDSUB MOVB @SNDFLG,@SNDFLG ARE WE ALLOWED SOUNDS?) JNE SNDGOA YES, SO GO AHEAD/ INCT R11 NO, SO INCREMENT SOUND! JMP SOUNDR AND EXIT SNDGOA LIMI 0) MOV *R11+,@SNDPNT WHICH SOUND LISTџ>83C0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* 'CALL HCHAR'. THE PARAMETERS ARE *'* PASSED FOLLOWING THE BL @HCHAR STMT *'* IN DATA STMTS OR REGISTERS MAY BE *'* PRELOADED AND BL TO ONE OF THE ENTRY*'* POINTS WITHIN THE SUBROUTINE. I.E.: *'* BL @HCHAR *џ*џ ENABLE INTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%SCANKY LIMI 0 DISABLE INTS( LWPI GPLWS GPLWS EQU >83E0' BL @SCAN SCAN EQU >000E LWPI MYWS# MOVB @INTFLG,@INTFLG IN INT?- JNE SKYRTN YES, SO DON'T ENABLE$ LIMI 2 ENABLE INTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ JLE HLCONT NO*& LI R6,>0300 LENGTH OF SIT5 S R6,R5 POINT NOW TO FIRST ROW AGAIN*2HLCONT DEC R8 MET OUR REPETITIONS, YET?, JNE HCHARL NO, SO KEEP WRITING*џ OF SIT?џFOR SIT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)H MOV R11,R15 SAVE RETURN LINK* SRL R5,8 }' SRL R6,8 RIGHT JUSTIFY SRL R8,8 }3 SLA R5,5 x32 FOR SIT ADDRESS OF ROW9 A R6,R5 ADD COLUMN VALUE FOR SIT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* DATA >0A0A,>2A10 *'* FORMAT IS ROW|COL||ASCII|REPETITION *'* NOTE . . . THE FIRST ROW AND COLUMN *'* ON THE SCREEN IS 0, NOT 1. A VALUE *'* OF ZERO IN THESE POSITIONS CAUSES *'* THE SUBROUTINE TO CRASH AND VDP GO *џ*џ ENABLE INTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)SKYRTN B *R11 RETURN TO CALLER'***************************************'* DRAWS A HORIZONTAL LINE OF CHARACTERS'***************************************'***************************************'* SIMULATION OF THE BASIC SUBROUTINE *џ ENABLE INTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ( MOVB @H01,@STRTSD START THE SOUND* SOCB @H01,@RAMFLG LIST IS IN VDPRAM LIMI 2)SOUNDR B *R11 RETURN TO CALLER%*************************************%* STANDARD KEYBOARD SCAN ROUTINE *%*************************************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ&HCHARL LI VDPADD,SIT GET SIT START' A R5,VDPADD ADD THE OFFSET BL @WRTCL- DATA 1,MYWS+14 WRITE YOUR CHARACTER/ INC R5 POINT TO NEXT POSITION) CI R5,SIT+>2FF PAST END OF SIT?џFOR SIT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* 'CRAZY'. RETURN LINKAGE IS IN R15 *'***************************************"HCHAR MOVB *R11+,R5 START ROW"HCCC MOVB *R11+,R6 START COL(HCC MOVB *R11+,R7 CHARACTER VALUE)HC MOVB *R11+,R8 # OF REPETITIONSџ GO *џ*џ ENABLE INTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)HCHART B *R15 RETURN TO CALLER'***************************************'* DRAWS A VERTICAL LINE OF CHARACTERS *'***************************************'***************************************'* SIMULATION OF THE BASIC SUBROUTINE *џDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ, JNE VCHARL NO, SO KEEP WRITING*)VCHART B *R15 RETURN TO CALLER&**************************************&* ROUTINE TO CLEAR THE SCREEN *&**************************************CLEAR MOV R11,R12 CLR R3џ ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)VCHARL LI VDPADD,SIT GET START OF SIT% A R5,VDPADD VDPADD EQU 0 BL @WRTCL- DATA 1,MYWS+14 WRITE YOUR CHARACTER4 AI R5,32 POINT TO NEXT VERT POSITION) CI R5,SIT+>2FF PAST END OF SIT?џT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* 'CRAZY'. RETURN LINKAGE IS IN R15 *'***************************************"VCHAR MOVB *R11+,R5 START ROW"VCCC MOVB *R11+,R6 START COL(VCC MOVB *R11+,R7 CHARACTER VALUE)VC MOVB *R11+,R8 # OF REPETITIONSџ GO *џ*џDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* 'CALL VCHAR'. THE PARAMETERS ARE *'* PASSED FOLLOWING THE BL @HCHAR STMT *'* IN DATA STMTS OR REGISTERS MAY BE *'* PRELOADED AND BL TO ONE OF THE ENTRY*'* POINTS WITHIN THE SUBROUTINE. I.E.: *'* BL @VCHAR *џ*џDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ LI R4,>2020CLEARL MOV R3,VDPADD BL @WRTCL DATA 2,MYWS+8 INCT R3 CI R3,>0300 JL CLEARL B *R12%*************************************%* VDP WRITE TO REGISTER ROUTINE. THE*џ1,R12 CLR R3џ ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ JLE VLCONT NO*& LI R6,>0300 LENGTH OF SIT5 S R6,R5 POINT NOW TO FIRST ROW AGAIN/ INC R5 AND MOVE OVER 1 COLUMN*2VLCONT DEC R8 MET OUR REPETITIONS, YET?џT END OF SIT?џT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)V MOV R11,R15 SAVE RETURN LINK* SRL R5,8 }' SRL R6,8 RIGHT JUSTIFY SRL R8,8 }3 SLA R5,5 x32 FOR SIT ADDRESS OF ROW9 A R6,R5 ADD COLUMN VALUE FOR SIT ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* DATA >0A0A,>2A10 *'* FORMAT IS ROW|COL||ASCII|REPETITION *'* NOTE . . . THE FIRST ROW AND COLUMN *'* ON THE SCREEN IS 0, NOT 1. A VALUE *'* OF ZERO IN THESE POSITIONS CAUSES *'* THE SUBROUTINE TO CRASH AND VDP GO *џ*џDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ+R00010 MOVB @VDPRD,*RLOC+ VDPRD EQU >8800 DEC RCOUNT JGT R00010% MOVB @INTFLG,@INTFLG IN INT? JNE RDEXIT$ LIMI 2 ENABLE INTS)RDEXIT B *R11 RETURN TO CALLER%*************************************џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%* DATA SAL,2,MYWS+2 *%*************************************/RDVCL MOV *R11+,VDPADD VDPADD EQU 0 (R0)/RDCL MOV *R11+,RCOUNT RCOUNT EQU 2 (R3)/RDL MOV *R11+,RLOC RLOC EQU 1 (R4)џ *џ AND RETURN TO CALLERџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ- SWPB R0 NOW SET UP HIGH BYTE MOVB R0,@VDPWA* SWPB R0 RESTORE PARAMETER% MOVB @INTFLG,@INTFLG IN INT? JNE VEXIT* LIMI 2 ENABLE INTERRUPTS-VEXIT B *R11 AND RETURN TO CALLERџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%* PARAMETER IS PASSED DOWN AS DATA *%* USING THIS FORMAT: (LB, THEN HB) *%* VALUE TO WRITE/8/VDP REG. # *%* I.E. BL @VWTR *%* DATA >1187 *%* THIS INSTANCE CHANGES VDP REG. 7 *џ CLR R3џ ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%* W R I T E T O V D P ROUTINE *%* THIS ROUTINE ASSUMES THAT THE *%* PARAMETERS ARE PASSED FOLLOWING *%* THE BL @WRTVCL STATEMENT. I.E.: *%* BL @WRTVCL *%* DATA SAL,2,MYWS+2 *џ************************џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%READ LIMI 0 DISABLE INTS SWPB VDPADD' MOVB VDPADD,@VDPWA SEND LO BYTE( SWPB VDPADD WASTE SOME TIME( MOVB VDPADD,@VDPWA SEND HI BYTE( NOP WASTE SOME TIMEџ *џ AND RETURN TO CALLERџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%*************************************%* R E A D F R O M V D P ROUTINE *%* THIS ROUTINE ASSUMES THAT THE *%* PARAMETERS ARE PASSED FOLLOWING *%* THE BL @RDVCL STATEMENT. I.E.: *%* BL @RDVCL *џ AND RETURN TO CALLERџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%* TO >11 (CHANGES BACKGROUND COLOR) *%* RETURN LINKAGE IS R11. *%*************************************VWTRS MOV *R11+,R0%VWTRSG LIMI 0 DISABLE INTS( MOVB R0,@VDPWA VDPWA EQU >8C02џ VDP REG. 7 *џ CLR R3џ ADDRESS*џINTSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ%*************************************/WRTVCL MOV *R11+,VDPADD VDPADD EQU 0 (R0)/WRTCL MOV *R11+,WCOUNT WCOUNT EQU 2 (R3)/WRTL MOV *R11+,WLOC WLOC EQU 1 (R4)%WRITE LIMI 0 DISABLE INTS SWPB VDPADDџ*************џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)WTEXIT B *R11 RETURN TO CALLERџ LI R2,>55 GET READY)* SLA R2,9 NOW CONTAINS >AA1* CB R2,R1 IS THERE A >AA AT >4000?-* JNE PROTEC NO, SO KICK 'EM OUT!*$ LIMI 2 ENABLE INTSџ*џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ DEC WCOUNT JGT W00010 LI WCOUNT,>4000' S WCOUNT,VDPADD RESTORE VDPADD% MOVB @INTFLG,@INTFLG IN INT? JNE WTEXIT**PROTEC LI R1,>0020 >20#* SLA R1,9 NOW, >4000џ VDPWD EQU >8C00џ**********џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ/VDPWA EQU >8C02 VDP READ/WRITE ADDRESS1SCAN EQU >000E ADDRESS OF KSCAN ROUTINE+SIT EQU >0000 SCREEN IMAGE TABLE.SAL EQU >0300 SPRITE ATTRIBUTE LIST$CT EQU >0380 COLOR TABLEџ****************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћCPURAM EQU >8300 CPURAM/DISINT EQU >83C2 DISABLE INTERRUPT BYTE>EXTINT EQU >83C4 ADDRESS OF EXTERNAL INTERRUPT ROUTINE.SNDPNT EQU >83CC POINTER TO SOUND LIST#STRTSD EQU >83CE START BYTEџ****************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ* FILE IS DATA(****************************************(* BOPPIE'S GREAT CHASE *(* *(* WRITTEN BY: JOHN PHILLIPS *(* DESIGNED BY: JOHN PHILLIPS *џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ&* MOVB *R1,R1 SHOULD BE >AA"* LI R2,>55 GET READY)* SLA R2,9 NOW CONTAINS >AA1* CB R2,R1 IS THERE A >AA AT >4000?-* JNE PROTEC NO, SO KICK 'EM OUT!*$ LIMI 2 ENABLE INTSџ*џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ' MOVB VDPADD,@VDPWA SEND LO BYTE( SWPB VDPADD WASTE SOME TIME* ORI R0,>4000 SET FLAG TO WRITE MOVB VDPADD,@VDPWA >8C02( NOP WASTE SOME TIME+W00010 MOVB *WLOC+,@VDPWD VDPWD EQU >8C00џ**********џRџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ$SVVDP1 EQU >83D4 SAVE VDP R10SCNTIM EQU >83D6 SCREEN TIME OUT COUNTER/RAMFLG EQU >83FD VDP RAM FLAG FOR SOUND&VDPRD EQU >8800 VDP READ DATA'VDPWD EQU >8C00 VDP WRITE DATAџ START BYTEџ****************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ(* DATE STARTED: 2/5/84 *(* *(****************************************'***************************************'* MEMORY MAPPED E Q U A T E S *'***************************************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ.SVT EQU >0780 SPRITE VELOCITY TABLE/SDL EQU >0400 SPRITE DESCRIPTOR LIST1PDT EQU >0800 PATTERN DESCRIPTOR TABLE'***************************************'* C P U R A M E Q U A T E S *џџ****************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ@FACPOS EQU >833A LAST POSITION OF CURRENT PICKED UP FACE6FACCHR EQU >833C WHICH CHAR FACE WAS PICKED UP*SPNCHR EQU >833D SPIN CHAR # (0-7)/NUMBOP EQU >833E NUMBER OF BOPPIES LEFTџ LAST POSITION OF SPINNERџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ.MBOP EQU >8330 BOP'S DIR FROM KB RTN9BOPSPD EQU >8331 SPEED OF BOPPING WHEN STATIONARY0FBOP EQU >8332 BOP FIRE FLAG 0=NO FIRE9ACTFLG EQU >8333 ACTION FLAG FOR FALLING, JUMPINGџSCORE AREAџDOM # SEEDџ********џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'*======================================*$*** MIKE'S EQUATES >20 AND ABOVE ****'*======================================-BOPINF EQU >8320 BOPPIE'S STATUS BYTE'BOPDLY EQU >8321 BOPPIE'S DELAYџNTWS RANDOM # SEEDџ********џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'***************************************%MYWS EQU >8300 MY WORKSPACE)KEYBRD EQU CPURAM+>74 KEYBOARD TO SCAN%KEY EQU CPURAM+>75 KEY RETURNED#JOYY EQU CPURAM+>76 JOYSTICK Y#JOYX EQU CPURAM+>77 JOYSTICK Xџ************џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ,NUMUMB EQU >833F NUMBER OF UMBRELLAS,SAVETH EQU >8340 2 SAVED THRONE SPOT.TEMPSC EQU >8342 TEMP SCORE (THRU >47)(SKILL EQU >8348 SKILL LEVEL 0-3-MAXLET EQU >8349 MAX LETTERS TO GUESSџSITION OF SPINNERџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ2STARF EQU >8334 0=NOT CARRYING 1=CARRYING2FACEF EQU >8335 0=NOT CARRYING 1=CARRYING&DBF EQU >8336 DEBOUNCE FLAG2NUMFAC EQU >8337 NUMBER OF FACES DEPOSITED1SPNPOS EQU >8338 LAST POSITION OF SPINNERџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ2BOPPIX EQU >8322 BOPPIES PIXEL MOVED COUNT&SCSTRT EQU >8324 THROUGH >8329+SCEND EQU SCSTRT+5 END OF SCORE BYTES(HISTRT EQU >832A HIGH SCORE AREA/HIEND EQU HISTRT+5 END OF HIGH SCORE AREAџDOM # SEEDџ********џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ#TIMER EQU CPURAM+>79 TIMER BYTE$STATUS EQU CPURAM+>7C STATUS BYTE$MOTION EQU CPURAM+>7A MOTION BYTE-INTWS EQU CPURAM+>C0 INTERRRUPT WORKSPACE&GPLWS EQU CPURAM+>E0 GPL WORKSPACE&SEED EQU INTWS RANDOM # SEEDџ********џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'***************************************VDPADD EQU 0 R0!RCOUNT EQU 2 R3 F V!WCOUNT EQU 2 R3 O D!RLOC EQU 1 R4 R PWLOC EQU 1 R4'***************************************џ *џORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ4SNPPIX EQU >8390 SNAPPERS' PIXEL MOVED COUNT4FCFLSH EQU >8395 1 BYTE FOR FACE FLASH COUNT5INTFLG EQU >8396 1 BYTE 0=NOT IN AN INTERRUPT ******************************** * EQUATES NEEDED FOR EDITOR *џE LEVELџ RANDOM WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'*======================================*$*** JOHN'S EQUATES >80 AND ABOVE ****'*======================================3****** EQU >8380 2 BYTES RESERVED FOR KSCAN,SNAPIN EQU >8382 SNAPPER INFORMATIONџRETURN ADDRESSџD RANDOM WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ)GUESSP EQU >834A GUESSING PATTERN&GUESSW EQU >8352 GUESSING WORD7ARWPNT EQU >835A SCREEN SPOT FOR POINTING ARROWBWHCHLT EQU >835C ARRAY POINTER FOR CURRENT LETTER TO MATCH*SAVEW EQU >835D SAVED RANDOM WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* WORKSPACE E Q U A T E S *'***************************************R0LB EQU MYWS+1 R0R1LB EQU MYWS+3 R1R2LB EQU MYWS+5 R2R3LB EQU MYWS+7 R3R4LB EQU MYWS+9 R4R5LB EQU MYWS+11 R5џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ ********************************3LOADED EQU >83A6 0=NO WORD LIST LOADED, YETNUMWRD EQU >2000WRDCNT EQU NUMWRD+2WRDLEN EQU WRDCNT+6WORDS EQU WRDLEN+24'***************************************'* R E G I S T E R E Q U A T E S *џORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ** 0=NOT ON 1=UP 2=DOWN 3=RIGHT 4=LEFT,SNPDLY EQU >8387 SNAPPER DELAY BYTES * 1 BYTE @/SAVEYX EQU >838C SAVED SNAPPER POSITION1SNPNUM EQU >838E WHICH SNAPPER TO PROCESS#LEVEL EQU >838F GAME LEVELџ RANDOM WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ.MAXSNP EQU >835E MAXIMUM # OF SNAPPERS+FALDLY EQU >835F FALL DELAY COUNTER,FIRFLG EQU >8360 FIRE FLAG 0=NO FIRE*SNDFLG EQU >8361 SOUND OFF/ON FLAG*3BANKRA EQU >836E BANK SWITCH RETURN ADDRESSџD RANDOM WORDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћR6LB EQU MYWS+13 R6R7LB EQU MYWS+15 R7R8LB EQU MYWS+17 R8R9LB EQU MYWS+19 R9R10LB EQU MYWS+21 R10R11LB EQU MYWS+23 R11R12LB EQU MYWS+25 R12R13LB EQU MYWS+27 R13џQU MYWS+11 R5џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ# DATA >D0D0,>D0F0,>F0F0,>F0F0# DATA >F0F0,>F0F0,>F0F0,>F0F0$SALINI DATA >C000,>800A BOPPIE BODY! DATA >C000,>C40E UMBRELLA" DATA >C000,>0000 UNDEFINED" DATA >C000,>A002 SNAPPER 1" DATA >C000,>A005 SNAPPER 2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ&MSCSNP EQU MSCBUF SNAPPER MUSIC%MSCOFF EQU MSCSNP+512 ALL GENS OFF&BEEP EQU MSCOFF+6 BEEP FOR GATE%RISE EQU BEEP+32 RISING SOUND+GONG EQU RISE+49 GONG FOR NEW LEVEL* EQU GONG+29џ LISTџ R13џQU MYWS+11 R5џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћH0F BYTE 15H12 BYTE >12HC0 BYTE >C0HD0 BYTE >D0HF4 BYTE >F4H4F BYTE >4FHFF BYTE >FF"H0000 DATA >0000 FOR JOYST+VDPREG BYTE >00,>E2,>00,>0E,>01,>06,>00,>01'***************************************џ BYTE 13H0E BYTE 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ!*********************************WHERE DATA DOWN DATA AID DATA LEFT DATA RIGHT DATA GOBACK DATA UP'***************************************'* B Y T E S T A T E M E N T S *џ******* BOP'S DIR POINTER TABLE*џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ" DATA >C000,>A009 SNAPPER 3" DATA >C000,>A00D SNAPPER 4" DATA >C000,>A007 SNAPPER 5& DATA >C080,>C80A GOLDEN THRONE0 DATA >C000,>C004 BOPPIE'S EYES AND MOUTH DATA >D000SALINT BYTE 100,112,>80,>AџSNAPPER 2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'***************************************'* D A T A S T A T E M E N T S *'***************************************ZEROES DATA 0,0,0,0#CPYRIT DATA >3C42,>99A1,>A199,>423C#COLORS DATA >6040,>70F4,>F0F0,>F0F0# DATA >F0F0,>F0F0,>F0A0,>D0D0џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћR14LB EQU MYWS+29 R14R15LB EQU MYWS+31 R15'***************************************'* S O U N D L I S T E Q U A T E S *'***************************************,MSCBUF EQU >3800 START OF MUSIC LISTџ R13џQU MYWS+11 R5џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'*************************************** H00 BYTE 0 H01 BYTE 1 H02 BYTE 2 H03 BYTE 3 H04 BYTE 4 H05 BYTE 5 H06 BYTE 6 H07 BYTE 7 H08 BYTE 8 H09 BYTE 9H0A BYTE 10H0B BYTE 11H0C BYTE 12H0D BYTE 13H0E BYTE 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ BYTE 100,112,>84,>4* BYTE 31,72-16,>88,>6* BYTE 31,104-16,>8C,>6* BYTE 31,136-16,>90,>6* BYTE 31,168-16,>94,>6 BYTE >D0SALINO BYTE 23,160,>80,>C,>D0!*********************************** BOP'S DIR POINTER TABLE*џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'* C H A R A C T E R D E F I N E S *'***************************************8LADDER DATA >8181,>81FF,>8181,>81FF LADDER CHAR;SMUMBR DATA >3C7E,>CB08,>0808,>2810 SMALL UMBRELLA5ARROW DATA >1818,>3C7E,>1818,>1818 UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ TEXT ' WAY TO GO! ' TEXT ' TERRIFIC! ' TEXT ' BOP AWAY! ' TEXT ' YOU GOT IT! ' TEXT ' DOING GREAT! ' TEXT ' GO FOR IT! ' TEXT ' KEEP GOING! ' џOD JOB! 'џџ UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћOPT4 TEXT '4) ADVANCED' 11OPT5 TEXT '5) EXPERT' 9OPT6 TEXT '6) PRO' 6OPT7 TEXT '7) MASTER' 11OPT8 TEXT '8) WIZARD' 11!OPTP TEXT 'PRESS THE NUMBER' 16!OPTP1 TEXT ' OF YOUR CHOICE ' 16џMEDIATE' 15џ' 11џ UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ'****************************************TITLEM TEXT ' THE GREAT WORD RACE ' 25$COPYRM TEXT ' @1987 J. PHILLIPS' 18'PRESSM TEXT 'PRESS ANY KEY TO BEGIN' 22+EGO1 TEXT 'DESIGNED BY: JOHN PHILLIPS' 26SCOREM TEXT 'S C O R E :' 11џ UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ7TRANSV DATA >FF00,>0000,>0000,>0000 TRANSVERSE: DATA >FFFF,>FFFF,>0000,>0000 TOP CROSSWALK5SIDEWA DATA >EFDF,>BF7F,>0000,>0000 SIDEWALK9SMLBOP DATA >3C7E,>CFCF,>FBC7,>7E3C SMALL BOPPIE*џ818 UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ* FILE IS >> DUCK << DEF DUCK* AORG >A000* UNL* COPY "DSK1.ROMHDR" COPY "DSK1.BANKCODE" COPY "DSK1.DATA" COPY "DSK1.SPRITE" COPY "DSK1.MAZES" COPY "DSK1.INITS" COPY "DSK1.GETKEY"џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ+OPTWRD TEXT 'PRESS W FOR WORD LIST MENU' 26BLANKS TEXT ' 'SNDM TEXT 'SOUND:' 6OFFM TEXT 'OFF'ONM TEXT 'ON '* R E W A R D M E S S A G E S RWDMSG EQU $* 1234567890123456 TEXT ' GOOD JOB! 'џџ UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћHIGHM TEXT 'HIGH SCORE:' 11%OVERM TEXT ' G A M E O V E R ' 20%RDBKM TEXT ' PRESS REDO OR BACK ' 20OPTH TEXT 'P R E S S :' 11OPT1 TEXT '1) TRAINING' 11OPT2 TEXT '2) BEGINNER' 11 OPT3 TEXT '3) INTERMEDIATE' 15џ' 11џ UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ#SPINRS DATA >1010,>1010,>1010,>1010# DATA >0002,>0408,>1020,>4000# DATA >0000,>00FF,>0000,>0000# DATA >0040,>2010,>0804,>0200*'***************************************'* T E X T S T A T E M E N T S *џ*џ818 UP ARROWџ 14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЂЪBKEBEPB GBOIBNGB! B BBB>>B>>BBBBBР№Bј8BммB<мBи8B№BBBF 9ЂњB?8B}}B|}B=BBBB€рB№pBИИBxИBАpBрBBBBB9?B78BBBBBР№F 9Ѓ*Bј˜BœќBьB8xB№BBBB?3BsBowB8?BBBB€рB№0B8јBиИBp№BрBBBF OUND ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЁЊBCKB PB RB EB SB SB :B1)B TBRABINBINBG2B) BBEBGIBNNBERB3)B IBNTBERBMEBDIF 9ЁкBATBE4B) BADBVABNCBEDB5)B EBXPBERBT6B) BPRBO7B) BMABSTBERB8)B WBIZBARBDPF 9Ђ BREBSSB TBHEB NBUMBBEBR BOFB YBOUBR BCHBOIBCEB PBREBSSB WB FBORB WBORBD F LISTџOR KEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9 ŠBаB €B аBЎфBЏBЎиBЎоBЕФBЎъBBBBB B B BBРBаєBOџBBтBBF 9 КBBBџBBџB<~BЫBB(BB<~BBBџBBBBџџBџџBBBяпBПBF 9 ъBB<~BЯЯBћЧB~?BBBBBР№Bј˜BœќBќ B˜јB№РBBBBBBBB?B=BBF 9ЃŠBBBР№Bј8B<ќBќB0рBBB9?B?0BBBBBР№BјјBќќB|ќBјјB№РBBBF 9ЃКBBBBBB BBBBBР№BјxB|ўBоBB00BШBƒ$BШBƒ&BШBƒ(B BBЩBСIB BО(B B)BB BјBBF RRUPTSџTџRDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЋЪBОўBeB BЁїB BОўB…B BЂB BОўBуBBЂ)B BОўB‹BBЂKBа BƒaBB BОўF 9ЋњB’BBЂTBB BОўB’BBЂQB BОўBШBBЂ B BОўBшBBЂBBЃиB!BРBF 9Ќ*BBB B BПB BОўBBB ‹B BМ–BарBƒuB ƒBƒBSBBƒBsB BƒBWBF D OFFSETџRDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЊЊBB€BТBа"B ДB BОВB€B‚B‚BBїBи B ЕBƒдBи B Bƒ–B BОўB€B B 8B F 9ЊкBО”B BОўB BB 0B BОўBBBЁUB BОўBcBBЁB BОўB&BBЁ-B BОўBхF 9Ћ BBЁ?B BОАBуBиBƒдBBЂиB!B@BBBB B BПBBЄиB!B@BB BF *џRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9БњB Bƒ_B`BБдB˜ BƒHB  BBи B  Bƒ_BBи B žBƒ_B BОаBBBƒ B%B B BЙŒF 9В*B‡B BB BОаBBBƒ B%BB BПBBƒ B%BєB BОўBBBƒ B`BБдBи F 9ВZB ЁBƒ Bи B œBƒ3B BОўBBB ­B`BБдBУKBа Bƒ6BBBа Bƒ2BBи B œBƒ6BRF џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9АкBСЧBB‡BBCB‡BBB˜ Bƒ B ЁBB`BБjB`BБ€BBˆB BОўBBBƒ Bи F 9Б B žBƒ B`BБ€B‡B B)B‡B B&B˜ Bƒ0B BBС`BƒŒB BЙŒBСЧB B‡BBB˜ F 9Б:Bƒ B ЁBB`BБjB`BБ€BB€B BОўBBBƒ Bи B Bƒ B`BБ€B‡B BB`BБ€F џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЏКBƒ1B BОаBBBƒB ‰B‰BBB`BА8BТ B BBb BHBBˆBBB)BBF 9ЏъB)BџќB BПBBƒB`BА8B˜ Bƒ"B  BB BЙкBBв Bƒ B ŠB B :B*B€B BОаF 9АBBBƒB˜ BƒBBв`BƒBB)BB BПBBƒB BОаBBBƒ B%BBШBƒŒF IT! 'џџ>0020џџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЎšBƒBBBУB BТЃB BZBƒBB#BƒB B BƒB BBжBШ BƒvBƒvBвBи BƒvF 9ЎЪBƒvBB Bи BƒwBƒwBBBBЦBBBУBBBРBBBНB BКBКBи B F 9ЎњBƒ2BрBиBƒ0B^Bа BƒHBB`BЕФB˜ BƒHB BB˜ BƒHB  B B BОўBЏBBƒRB F џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ВŠBа Bƒ2BOBи B Bƒ6Bа Bƒ3BBHB BОаBBBƒŒBС`BƒŒB%B B BЙŒB‡B BCF 9ВКBСЧBBа Bƒ4BB4BB`BРB BПBBƒBи B œBƒ4BШBƒ8B'B‡B`B BРB F 9ВъBПBB œBи B Bƒ4BB‡BBBBа Bƒ5BBРB BПBB œBШBƒ:Bи BƒBƒD5,EIGHTHџ06џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9БjBи B ЁBƒ Bи B Bƒ"Bи B œBƒ3B`BБЄBС`BƒŒB%BџB%BџќBб Bƒ B †BB BЁfBЏXF 9БšB BОўBBBƒ Bб`BƒHBBи B ЁBƒ!BBб`BƒB …B˜ BƒHB  BBи%BЏD5,EIGHTHџ06џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЕZBЁB BЁoBрBƒ B B BЕшBƒ*Bƒ$BB BОўBЁB BЁzB Bƒ B BОB˜ BƒuB БBгF 9ЕŠBарBƒuB ƒBƒBB BƒB8BBƒBBBƒB9BBУB BНрB:B BМ†BB BОўF 9ЕКBBB ЎB`B­B BНрB:B BМ†BB BОўBBB ЎBBBи B Bƒ–B`BЋtBР;F їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9Д:BНрB:Bа Bƒ>B*Bx B Bƒ>Bа`Bƒ>B B !B!BГТBBBBКB BПBа Bƒ5BBР F 9ДjBƒ:B BПBBƒ9F,0*џ6џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9И*B  BB%BB BЙŒBСЧBB`BЙ2BBЈBРB B BB BПBBƒ BирB žBƒ‚B`F 9ИZBЙ2B‡BBBС`BƒŒB˜#Bƒ‚B  BB%BB BЙŒBСЧBB`BЙ2BB BРB B BF 9ИŠB BПBBƒ BирB Bƒ‚B`BЙ2B‡B BBGB BНЮBJB0B JBТJB BТIBB‰BF џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9З BПBBƒBРB B B B BОвBBƒ B%BBШBƒŒBв#BƒBB`BЙ2BирB ЄBƒBв#F 9З:Bƒ‚B ˆBˆBBCBС`BƒŒB BНЮBJBB JBТJB*BB BЁjBЖNBЁjBЖVB BЙŒB‡B F 9ЗjBBТIBBJB BBЪB‰BС`BƒŒBЁjBЖNBЁjBЖVB BЙŒB‡B BBBТ B BНЮBТHF џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЕъBР{BРЛBЬpBB§B[BBBBBBBB B B BBBB BB B BF 9ЖBBBBBBBBBBBBBBBBBBBBBBB BF 9ЖJB(2B9F,0*џ6џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ГЊB BОўBBBƒ Bи B Bƒ3Bи B œBƒ_BЖB B Bh B BhhB BhhBh BУ‹Bа Bƒ3BF 9ГкBBЭBBBС B $B$B B BЛ”BBBТIBBBBB№B^B BНрB:B BНрF 9Д B:&B BОаBBBƒŒBBBBюBhBƒŒB BПBBƒŒBBBBўB‘рBƒŒBѓB F 49+џIGHTHџ06џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЗšBJBBŠBBB)BBирBƒBƒ‚B B 9B)B BРB B BB BПBBƒB`BЙ2F 9ЗЪBв#Bƒ‚B ˆBB BТBBˆBBBС`BƒŒBЁhBЖNBBBaFBЁhBЖVB BЙŒB‡B`BF 9ЗњB`BИЄBС`BƒŒBЁhBЖNBЁhBЖVB BЙŒB‡B`BB`BИЄB‡B BBС`BƒŒB%BB˜#Bƒ‚F џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЖzBƒŽBƒBСB BбcBƒ‚BB BНЮBJBBСŠBвFB 6B&BАBВ`B ŸBиЩBƒ‚BирB ЄBƒBF 9ЖЊB—xBРB B B B BПBBƒ B`BЙ:BвЃBƒ‡BBxрB Bƒ‡B`BЙvBв#BƒBHBBF 9ЖкBвЃBƒ‚B ŠB B :B*B BРB B BB BОвBBƒB˜ BƒBBв`BƒBB)BB F џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ИКBBС`BƒŒBЁiBЖNBBBaFBЁiBЖVB BЙŒB‡B`BBхBС`BƒŒBЁiBЖNBЁiBЖVB BЙŒF 9ИъB‡B BкB‡B`BзB‡BBB‡BBB‡B BBBŠBBЪBирBƒBƒ‚BИрB F 9ЙBƒ‚B :B*B BРB B BB BПBBƒBС`BƒŒB%BџBбЃBƒ‚B †BB BЁfBЖVBРF џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9МЊBƒжB BОB˜ BƒuB БBјBZB Bи B Bƒ–BИ B Bƒ•B˜ Bƒ•B ЋB(Bи B œBƒ•B BОаF 9МкBƒBBƒшB˜B АBBб B АBBб B ЏB BПBBƒшBа Bƒ5BB BОаBBBƒъB˜F 9Н B ІBBб`B ІBBб`B ЈB BПBBƒъB BОаBBBƒъB †BB€Ba‡B &B VB&BЄиF E IT OUT*џAGEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ЛŠB`BЛјB\BРћBС;BТ{BТЛBШ Bƒ~BРB BОвBBƒ B%BBƒBBB%BBС…B …BFF 9ЛКBџBРB BОвBBƒB'BB„BBB'BBТB ‡BHBџBaХBGBbBHB‚GBB‚ˆF 9ЛъBB BBЩBТрBƒ~B[B BНрB:B BНЮBJBB JB*BЂWBРJBBHBBB BПF E IT OUT*џAGEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9КjBB Bи B žBƒtB BОB˜ BƒuB БBмB BОB˜ BƒuB БBњBиBƒzBиBƒtB_BУ Bа F 9КšBƒ5BLB BЛBB BBBТIBDBBBи B œBƒ5B BОўBBB ІBBBв Bƒ\F 9КЪB ˆBš Bƒ> DUCKROM << LIST COPY "DSK1.ROMHDR" UNL COPY "DSK1.BANKROM" COPY "DSK1.DATA" COPY "DSK1.SPRITE" COPY "DSK1.MAZES" COPY "DSK1.INITS" COPY "DSK1.GETKEY" COPY "DSK1.MOVEBOP"џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ОъBˆBBќBи Bƒ–Bƒ–BBBB[BР;BРЛBР{BBBРBиBŒBРB`B@BиBŒBF 9ПBи1BŒBBќBB@B`Bи Bƒ–Bƒ–BBBB[F 6ЊŽDUCK F LETTERџ,9,10џEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9НЪBƒРB€B BoхB:`BƒРB*BzЙBШ BƒРB[Bи BƒaBƒaBBЫB BBBШ;BƒЬBи B BƒЮF 9НњBј B Bƒ§BBB[BBBрBƒрB BBрBƒBи Bƒ–Bƒ–BBBB[Bб{BбЛBбћF 9О*Bв;BУЫB …B †B ˆB UBЁFBBB B BПBBƒB…B…BџBBBBaFBB№B_F E IT OUT*џAGEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћШ ! !Ъж Ш! -‚!* -‚  !ФИ€P H!8р n "PШ џкƒ*Ш џмƒ,р!v -vР$ !2 n)ІШ!xˆ !vџиW +ђ)ЌРQ -‚€)ЌP` nP )ќ )Ќ˜ pї -‚ e !ФР‚а$ -‚ H ШƒV ,† -vТа€ вЂРl` l[їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ COPY "DSK1.FIREBOP" COPY "DSK1.BITEBOP" COPY "DSK1.MOVESNAP" COPY "DSK1.SUBS" COPY "DSK1.INTERRUPT" COPY "DSK1.COMUTL" LIST FINISH EQU $ END џ COPY "DSK1.GETKEY" COPY "DSK1.MOVEBOP"џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ: 99/4 AS 0169: 99/4 AS 0170A jBњB[BТ‹BрBƒtB C!оB˜ BƒuCBњBрBƒжB C!оB˜ BƒuCBјBZB Bи C‰Bƒ–F LETTERџ,9,10џEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ9ОZBб{BбЛBбћBв;BУЫB …B †B ˆB UBЁFBBB B BПBBƒB%B B…BџBBBF 9ОŠBaFB…BBюB_BУ BУBB BРB BПBBƒBУBƒBBїB\BР;BBBиBŒF 9ОКBРBиBŒBРBи Bƒ–Bƒ–BBBB[BР;BРЛBР{BBBРBиBŒBРBиBŒBBм`F ROM 7,8,9,10џEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ -‚ H` lсТиƒ"р*V иƒ|Р *Vѓƒ|д`!2Ш ƒ*џкШ ƒ,џмрƒрТр hи jœи kœ[Ш ƒі hи ˜ jи ˜ k j[џ "h"ВР џиџиШџк ШџмШ џкƒ*Ш џмƒ, "P "žр/Єи ƒд&АиŒШиŒр/Мрїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ $:р&BШ%ВШ%Д`0^р&B`0|Рриƒд иŒШиŒр&Bр" Р`"`" `/Є "˜Ш&V +J[ "œ $: &j`#`/Єє "˜ )Ќ PоH§Ш&Ž +t)ЌРс`%ИШ"ž $4С "žр"ž ‡м "œ $:€С"џЊр"˜`#РУСРСљ -;Oџџџџџџџџџџџџџџџџџџџџџџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ‰qр"” *$Тš #РZ'N%*'ъ(%Ж&Z&D)B)z&š&Ў%‚$:'Ќ%ИСТaр"ŒШ $ЈТр/Є[ "˜р"”ˆџи<Ш$hШ "Œ$j`$р +О`&B`"œˆџи&Т(‚`$рр"˜ '~Р "ŒбRр"œр$р`ƒˆџиёР`џиРС`&B№ &j`(nцƒф`"œхТ(‚юƒьТр/Є‹0І[‹4И[ їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћСTб• ††[УТEТ Ђ ƒ оxƒ§Р‰џиXf H€Hњ[Р‰§ТBЂFŽy€I[р HР +H`" ƒ(+N *ъ€D0Т† +ТDТHЦXHI€Hћё џиƒ(+x *ъ * +.ТТHI ЮxќA џиХТTУ ЃРŒУТоx §ЮТ ƒBи€Т ƒB€ƒ(+Т`"–и *ъ€Dѓ *г ŒŒŒТТEс +.ТŒ +дƒ(+і)ќїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћШ )Ш)Ш )  -‚6Њ()((Vи`"ž №иƒдиŒШиŒр"žд…р"˜[Ш"’Тˆ"Œˆ"Š$џь`/Є`" р"  " ФШ"’Тˆˆ"ˆ„$Ш"’Р "’`# 0љїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ #Тb "ŽТHbШ&јˆ([Ф`" $Т('‚ „($ѕШ &ј‰Lh&ј!.њр"”ТBb`"Œ&вЦ † Шˆ&іјТXТ Ђ "ŒРˆС&вїФ`" $ЩТb V: )6ЊШ "Ž)Ш "ŒТb "Žb$„/Ф`" ЂЂ "ŽРˆ[Т "ŽУЂШ"Š('Ш"ˆ[р"” $рС "Œ&Oїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ$рр"˜б`ƒu`"” Т`"Œ)OС‚Т ˆжX њд…`)z`/Є "œ $:Т(`/ЄHˆџи  РH#`/ЄCРH "˜%РH`/ЄРС '~Р "ŒРС '~ю`/Є "œ $:Т "˜`HУ(џшТ`/ЄШ HРШ`#/`/МР`%ВР %ДРр/ЈС /ЌШ /І" р/Мр/Єр&B`0^Тр/Єр/Є‹0ІТЫ  &Bїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ"ЌУС "˜6АШ"Œ 'Š &ў (pаРа "šТAbC (:LЂ &ј`/М*PŠРЪШ #nр"Њи "Њƒy˜ ƒy"Ђ  "Ќ "Њˆ "Њ"Єё -zРърƒр р"hи ƒ|ƒ| ˜ ƒu"Ѓнˆ "Ќ"ЈйШ "І"Ќр"Ќр"h ўв ƒu ŠТр/Є -†(  7Юр(bЮр(bЮр(b`/МŠЎŠŠŠїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ€   dш Ш>,*` ˆ(0оˆLі ‰)0о‰о *Xо *X[ТСШ'P)ќТCй֘*Yж *XШ *T*VвИ–J† С†ў`*R†ЦжFЦШ‰жJШхС†ђС‰aƒЦдЦЦ†[žС>Ш*^ $џиїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћТBТˆˆоxќж`(b[ "”[ *EOF (VERSION 1.2) Ш(n`/Є ˆџиР`џиТ‹ '~ТЪР "ŒТ`(Ў ‰>К'оHћ`"˜!р(nШ(Ќ6Њ`/ЄF Ќ`/М"ЌШ(Ўˆ (ЌџиЪ +ђРФє6ЊЩТ (nЂбRд "š`/М†bШ)Ђ‚† `/Є† (їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ *ъ€DкТУТCоx §ТžТ`*^ *fЧŠТ^)§УСЩ'PЦЪвИ& *RJбИЦ оJЩћ юЯ‡Џ-6,ŠSр,№рƒрР`ƒVШ,ž -vбС ‡ƒJ†Ц Ш,К -vм€˜-OѓС†>†;рƒа ƒVЈƒVШƒTС ,рƒаŒ (Ш ƒаїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћˆ 4 ˆ 4 4Ш 44 ˆ 4Ш 4˜8/АТHP‰˜/Ањ`0МУ Ш /Ў3`Ш 44 У`џиШ/Њ)ІШ3b +ђ)ІР<Т 4 ТHŠ)ќчˆ 4фШ 3–˜/Аˆ 4мžzјТ 3–Šыbр4вШ 44  Š)ќЫТр4‚Ъђ‹‚ЪФШ 4  3`Ш 4 4bHШ 4УŠc†c‰Ш/ЊУ`3`Ш 44 ˆ џи`/К Љр/МїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћЫУ џи˜85 5(УLШ а vn6АРр/ЈС /ЌРCШ /І" "С /ЌШ /І" `" р" „-$  " С$џњШ /І" С /ЌР`/ЎРр/ЈР /Њ`/Мр/Є "˜ 4ќ.Ы'1’Ш/Є€ 5Њ- 4ќ/' 1ЌШ/Є`0’ 5(УL 4ќ/11ЪШ/Є-`0М 5(УЬУL 5,УŒcѕŽШ 1ц +JРїУO6АРMРЭїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћEFORE LINE, FILE NAME?REPLACE STRING (Y/N/A)?SHOW LINE?DELETE START LINE, STOP LINE? TABS 123456789 123456789 123456789 123456789 123456789 123456789 123456789 123456789 / VYNA()€ Ÿїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ@˜-N№"Р ƒвР’шШƒвТТRТСFХ”…ђХƒJ‚”Гьћ™чр-6€р-6ѓр,№€Њ.т-V-Š-V-–-V-Ђ-V-М-V-жР> .з`ˆ€Р> -ўиŒ€Р>Р~РО . -В€м`ˆќ[Р>Р~РО -ў -Ь€и1Œќ[Р>Р~РО -ў‚Bџў -ь€иŒСиŒСBїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћР /Њ"6Њ`1іЃ†Ш4 Ш 4`/М Ш 4Ш4 4ИШ /Є 4ь/мУ 4 Ш 44  4  /Т)Ќƒ‡оw‰0#љСр4‰0˜/АоwјСЩ /ТaЪ')ЌШ4 Ср4‡)ќ‰0оwј‰0о`/БњШ 4В +О/ТТ 4У`4У 4в ƒu˜ /Гʘ /Др/̘ /ЕВ /М 0У`4‡6Њ7 VїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћФ " ‚6њЕр" $А 4ќ.Є'2$Ш/Є`0’ 5ЊУLСЧеЃGУ‡е 4ќ.Z2€Ш/Єэ7 P˜8/А њС†i7р/̘/В  /Мˆ˜85р/К7 /И )ЌШ 4Ј 4  )ќƒ 4 Ш 44  /Ў Ш 4ݘ8/А4˜8/Ж  5,УL˜8/А'˜8/Ж, 5,,)Ќˆ 4%Ш 4 5,,)Ќˆ 4їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ „з /Оз /Пз /Р  ўз /С[FF24EE1ZMM2CC1€DD1ДRR0аSS1˜II0ъHH1AA1,TT6(Ш " /ІШ/Њ` "ŒШ4 Ш/ЎШ/ЈШ/Ќ 4ќ.JРCФ0ІШ/Є7р"˜ " р/И`#в ƒu02—Ъ /0^љ 0 4ђ.xфЯУп_ 4ќ.~&0тШ/Єи /К`2F 4ќ.ђ0ќШ/Єїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћј[`@РиŒРиŒ[E(DIT,F(IND,R(EPLACE,M(OVE,I(NSERT,C(OPY,S(HOW,D(ELETE,A(DJUST,T(AB,H(OME?FIND ()/STRING/?ERROR REPLACE ()/OLD/NEW/?MOVE START LINE, STOP LINE, AFTER LINE?COPY START LINE, STOP LINE, AFTER LINE?INSERT Bїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ' MOVB @ACTFLG,R0 IS HE FALLING?( JEQ BNFALL NO, SO CONTINUE+ JMP FBPRTN JUST EXIT FOR NOW0BNFALL BL @RDVCL READ HIS POSITION IN R5 DATA BOPSAL,2,SAVEYX MOV @SAVEYX,R5 COPY ITџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ2 MOVB @DBF,R0 HAS HE RELEASED FIRE KEY?* JNE TRYMIK I DON'T KNOW, YET. JMP BOPFIR YES, SO I CAN PROCESS.TRYMIK MOVB @FBOP,R0 WAS FIRE KEY PRESSED?( JNE MFEXIT YES, SO EXECUTEџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћЊ?џ ХDIT1 їїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ6Њ ЌТFн /Б ќТ;СЛоx§[`0М,E dш7ЧТHЬ֘850††ы˜/Б ˜/А ˜5˜/З˜8/Жэ†йF ЬТ вx ‰)џа‰ ЮТIЬ:f5 Ѓ Fђёˆ џи`/ИУ џиУ  ˆ[Ш 6&7 5,УL 5,УŒ 5,ŒСЧЬУЬУc ЄŒЧƒСЬƒOœШ 5іШ6 )ІШ5ј +ђ)Іїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ) AI R5,>0908 ADJUST TO CENTER6 BL @READCH READ CHARACTER HE IS COVERING*"STTEST CI R7,>20 ON SPACE?. JEQ LOOKF YES, SO LOOK TO FLOAT, MOV R7,R7 ARE WE ON A LADDER? JNE FNOLAD NOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ5 MOVB @H00,@DBF NO, SO CLEAR MY FLAG AND EXIT,MFEXIT JMP FBPRTN NO, SO EXIT MODULE.BOPFIR MOVB @FBOP,R0 WAS FIRE KEY PRESSED?$ JEQ FBPRTN NO, SO EXIT, MOVB @H01,@DBF RESET DEBOUNCE FLAG*џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ* FILE IS FIREBOP'***************************************'* ROUTINE TO TAKE ACTION WHEN FIRE KEY*'* IS PRESSED. RETURN LINK IS R13. *'***************************************$FIRBOP MOV R11,R13 SAVE RETURNџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћР СЧ 5і +t)ЌР ьУ УOˆ џиУ`џи` 4ќ/NV &вТ:(7ж 0ZŠ&ії6RШ/Є`0’7ТH)P )ЌЦ†‚H ˜8/Бњ˜80ZЮ†Š)ќђ`0М )Ќƒ њ:bŒŠ$є &в$ЮМF§`1Zїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћ3 MOVB @STARF,R0 IS THE STAR ON THE SCREEN?. JNE GSTAR NO, HE IS CARRYING IT0 JMP FBPRTN YES, SO CANNOT DROP IT%GSTAR LI R3,>6000 STAR PATTERN- MOV R5,VDPADD SIT SPOT STILL THEREџ JNE FNOLAD NOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ8* JH ULEVEL NO, SO CAN PICK UP IN ANY ORDER<* MOVB @WHCHLT,R8 GET WHICH LETTER WE ARE LOOKING FOR* SRL R8,8 ADJUSTK* CB @R7LB,@GUESSP(R8) COMPARE THE CORRECT LETTER TO THE ONE WE'VE GOTџE FONFAC YESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ JNE FNOSTR NO0 MOV R5,VDPADD PUT LADDER CHAR BACK IN BL @WRTCL DATA 1,H00, MOVB @H01,@STARF CARRYING STAR AGAIN JMP FBPRTN*'FNOSTR CI R7,>18 ANY FACE CHAR? JHE FONFAC YESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ0 AI R5,>110C ADJUST TO BOTTOM CENTER' BL @READCH READ THAT CHAR" CI R7,8 ON CROSS?& JEQ GOFL YES, SO FLOAT$ JMP FBPRTN NO, SO EXIT**GOFL SB @H01,@NUMUMB ONE LESS UMBRELLAџџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ(****************************************(* LOOK TO FLOAT WHEN KEY PRESSED *(****************************************UMBREM DATA >2020,>2020 DATA >0120,>2020 DATA >0101,>2020 DATA >0101,>0120*џO CALLERџH ONE IT ISџYESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћB* JNE FBPRTN NOT THE RIGHT LETTER, SO CAN'T PICK IT UP.ULEVEL MOV R5,VDPADD PUT LADDER CHAR THERE BL @WRTCL DATA 1,H00. MOV R5,@FACPOS SAVE POSITION OF FACE- MOVB @R7LB,@FACCHR AND WHICH ONE IT ISџYESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ: JMP FBPRTN NO FACE, SO WORTHLESS FIRE BUTTON1FONFAC MOVB @FACEF,R0 IS HE CARRYING A LETTER?; JNE FBPRTN YES, SO CANNOT PICK UP ANOTHER ONE%* CB @SKILL,@H01 FIRST LEVEL?џACE CHAR? JHE FONFAC YESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ, BL @WRTCL PUT STAR ON SCREEN! DATA 1,MYWS+6< MOVB @H00,@STARF NOW HE IS NOT CARRYING STAR ANYMORE. MOV R5,@SPNPOS SAVE SPINNER POSITION" JMP FBPRTN AND EXIT*(FNOLAD CI R7,>60 ARE WE ON STAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ/LOOKF MOVB @BOPPIX,R0 HAS HE MOVED 8 PIXELS?+ JNE FBPRTN NO, SO CANNOT DROP, MOVB @NUMUMB,R0 ANY UMBRELLAS LEFT?+ JEQ FBPRTN NO, SO CAN'T FLOAT*) MOV @SAVEYX,R5 RESTORE POSITIONџLLERџH ONE IT ISџYESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў їїџџџџџџџџџџџћ$ MOV R13,@>837E SAVE RETURN& BL @SCORE ADD 50 POINTS DATA >0050+ MOV @>837E,R13 AND RESTORE RETURN/ MOVB @H01,@FACEF AND SET FLAG TO SAY SO*)FBPRTN B *R13 RETURN TO CALLERџH ONE IT ISџYESџSTAR?џOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ) MOVB @NUMUMB,WLOC MOVE TO RESISTER SRL WLOC,8 ADJUST" SLA WLOC,2 MULT BY 48 AI WLOC,UMBREM POINTS TO CORRECT SHOW SEQUENCE* LI VDPADD,23*32+26 SPOT TO SHOW) LI WCOUNT,4 4 BYTES TO WRITEџџOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ MOVB @KEY,R3& CI R3,>FF00 KEY PRESSED ?( JEQ CHKJOY NO, CHECK JOYSTCHKKEY CI R3,>0500 JGT FIPA SWPB R3 SLA R3,1 MOV @WHERE(R3),R10 B *R10FIPA CI R3,>1200 JEQ FIREџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ, CLR @KEYBRD CHECK THE KEYBOARDY9CANTD CLR R5 FOR PASSING VALUE TO BOP ROUTINEBRDINC AB @H01,@KEYBRD( CLR R3 ANOTHER FOR FUN) CB @KEYBRD,@H01 FIRST TIME THRU?џ***********************INPUT MOV R11,R14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ/ BL @WRTVCL PUT UMBRELLA ON SCREEN DATA BOPSAL+4,2,MYWS+10, MOVB @H01,@ACTFLG SET FLAG TO FALLING5 MOVB @H00,@FALDLY AND CLEAR FALL DELAY COUNTER! JMP FBPRTN AND EXITџ,-12*256 UMBRELLA ABOVEџS TO WRITEџџOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ BL @WRITE*) CB @SKILL,@H07 AT EIGHTH LEVEL?$ JNE NOT8TH NO, SO SKIP* MOVB @NUMUMB,R0 OUT OF UMBRELLAS?$ JNE NOT8TH NO, SO SKIP- BL @HCHAR FILL GAP WITH LADDERџT,4 4 BYTES TO WRITEџџOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ CI R3,>0D00 JEQ FIRE CI R3,>0B00 JEQ PASE JMP BRDINCCHKJOY MOV @JOYY,@JOYY JEQ BRDINC MOVB @JOYY,@JOYY JGT UP JLT DOWN MOVB @JOYX,@JOYX JGT RIGHTџ JEQ FIREџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ0 JNE FRST NO, SO DON'T CLEAR MBOP5 CLR R3 NO DIR GIVEN, SO JUST BOUNCE' MOVB R3,@FBOP CLEAR FIRE FLAG( MOVB R3,@MBOP MOVE IT TO FLAGFRST CB @KEYBRD,@H03 JEQ INPTRT BL @SCANKYџ11,R14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ* FILE IS GETKEY********************************************* *** ROUTINE TO TEST KEYBOARD AND JOYSTICKS *** RETURN LINK IN R14 *********************************************INPUT MOV R11,R14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў!їїџџџџџџџџџџџћ. BYTE 8,10,0,1 WHEN OUT OF UMBRELLAS*%NOT8TH MOV @SAVEYX,R5 GET POSITION( AI R5,8*256 UMBRELLA ON TOP* BL @WRTVCL PUT BOPPIE DOWN 8 DATA BOPSAL,2,MYWS+10' AI R5,-12*256 UMBRELLA ABOVEџS TO WRITEџџOџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ'DUCK LIMI 0 LOAD WORKSPACE LWPI MYWS*===/* LI R0,3 GET GPL RETURN ADDRESS* BL @BANKSW*==5 LI R0,INTERR ADDRESS OF INTERRUPT ROUTINE* MOV R0,@EXTINT SET UP THE VECTORџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ+ BL @WRTVCL AND WIPE OUT AGAIN DATA 21*32+15,8,BLANKS!NOAID B @BRDINC NEXT TRYџ YES, SO DISPLAY WORD DATA 21*32+15,8,GUESSW& BL @DELAY FOR 3 SECONDS DATA 6џSO CANNOT DISPLAYџ *R14 *********џEџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ * A I D * *********(AID MOVB @SKILL,R0 TRAINING LEVEL? JNE AIDABV NO.8 B @GOBACK YES, SO RETURN TO OPTION SCREEN%AIDABV CB @SKILL,@H01 FIRST LEVEL?/ JEQ NOAID YES, SO CANNOT DISPLAYџ *R14 *********џEџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ1LEFT LI R5,>0400 PUT BOP DIR IN HIGH BYTE JMP BRDINC*RIGHT LI R5,>0300 JMP BRDINC*DOWN LI R5,>0200 JMP BRDINC*UP LI R5,>0100 JMP BRDINC*PASE BL @PAUSES JMP BRDINC*џRIGHTџ JEQ FIREџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ8 MOVB @H01,@INTFLG DO NOT ALLOW MY INTERRUPTS, YET* MOVB @H00,@FCFLSH CLEAR FLASH TIMER*********************** LOAD VDP REGISTERS *********************** LI R0,>80 CLR R2LVDPR MOVB @VDPREG(R2),R0 BL @VWTRSGџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ* FILE IS INITSLETMAX BYTE 3,3,4,5,5,6,7,8SNPMAX BYTE 0,1,1,2,2,3,3,4 EVEN'***************************************'* INITIALIZATION ROUTINES FOR DUCK *'*************************************** MAIN EQU $џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ% CB @SKILL,@H04 FIFTH LEVEL?/ JHE NOAID YES, SO CANNOT DISPLAY- BL @WRTVCL YES, SO DISPLAY WORD DATA 21*32+15,8,GUESSW& BL @DELAY FOR 3 SECONDS DATA 6џSO CANNOT DISPLAYџ *R14 *********џEџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ*FIRE MOVB @H01,@FBOP FIRE BUTTON PRESSED) JMP CHKJOY FOR MOVE AND SHOOT&**************************************&* RETURN POINT FOR MOVING SUBROUTINES*&**************************************INPTRT MOVB R5,@MBOP B *R14 *********џEџ14џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў"їїџџџџџџџџџџџћ INC R0 INC R2 CI R2,7 JLE LVDPR MOVB @VDPREG+1,@SVVDP1***************************** LOAD LOWER CASE CHAR SET ****************************** LI R0,PDT+>100* MOV R0,@>834A* MOVB @H00,@STATUSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ DATA 23*32+5,22,PRESSM* BL @VWTRS/ DATA >E381 MAKE SPRITES MAGNIFIED MOVB R0,@SVVDP1 LI WLOC,BOPPIE AI WLOC,64 LI VDPADD,SDL LI WCOUNT,32 BL @WRITE* BL @WRTVCLџ,@STATUSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ$ BL @WRTVCL COLOR TABLE DATA CT,32,COLORS%*************************************%* CREATE TITLE SCREEN AND GET INPUT *%*************************************% BL @CLEAR CLEAR SCREENџ*******џ MOVB @H00,@STATUSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ/ DATA >E381 MAKE SPRITES MAGNIFIED MOVB R0,@SVVDP1 BL @WRTVCL DATA 2*32+3,11,OPTH BL @WRTVCL DATA 5*32+5,11,OPT1 BL @WRTVCL DATA 6*32+5,11,OPT2 BL @WRTVCL DATA 7*32+5,15,OPT3џT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ1 MOVB @H00,@LOADED NO WORD LIST LOADED, YET&**************************************&* CLEAR HIGH SCORE AREA *&**************************************) LI R0,>3030 CLEAR HIGH SCORE MOV R0,@HISTRT MOV R0,@HISTRT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ5* DATA SDL,32,BOPPIE+64 LOAD BIG BOPPIE PATTERN LI WLOC,MOUTH AI WLOC,64 LI VDPADD,SDL+32 LI WCOUNT,32 BL @WRITE* BL @WRTVCL* DATA SDL+32,32,MOUTH+64.* BL @WRTVCL LOAD DLM SPRITESџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ, BL @WRTVCL LOAD COPYRIGHT CHAR DATA PDT+>200,8,CPYRIT BL @WRTVCL DATA 0*32+3,26,EGO1 BL @WRTVCL DATA 11*32+3,25,TITLEM BL @WRTVCL DATA 17*32+6,18,COPYRM BL @WRTVCLџ00,@STATUSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ,* LI R0,4 CALL JPLLNK ROUTINE* BL @BANKSW * LIMI 0 MOVB @H01,@INTFLG'***************************************'* LOAD COLORS FOR COLOR TABLE *'***************************************џ MOVB @H00,@STATUSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ MOV R0,@HISTRT+4'***************************************'* CREATE OPTION SCREEN. *'*************************************** BACK EQU $%OPCHUN BL @CLEAR CLEAR SCREEN BL @VWTRSџ MOV R0,@HISTRT MOV R0,@HISTRT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў#їїџџџџџџџџџџџћ* DATA SDL+64,4*32,DLM BL @WRTVCL/ DATA SAL,09,SALINT PUT HIM ON THE SCREEN*% BL @DEBOUN WAIT FOR KEY' BL @WRTVCL DELETE SPRITES DATA SAL,1,HD0! MOVB @H01,@SNDFLG SOUND ONџ LOAD DLM SPRITESџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ BL @WRTVCL DATA 8*32+5,11,OPT4 BL @WRTVCL DATA 9*32+5,9,OPT5 BL @WRTVCL DATA 10*32+5,6,OPT6 BL @WRTVCL DATA 11*32+5,9,OPT7 BL @WRTVCL DATA 12*32+5,9,OPT8 BL @WRTVCLџ,15,OPT3џT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ) JNE TURNOF YES, SO TURN OFF-TURNON MOVB @H01,@SNDFLG NO, SO TURN SOUND ON' BL @WRTVCL CHANGE MESSAGE DATA 20*32+18,3,ONM' JMP MASK14 AND LOOP AGAIN'TURNOF MOVB @H00,@SNDFLG TURN OFF SOUNDџIS SOUND ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ CI R3,119 JEQ GOTOWL$ JMP NOSKEY NEITHER KEY&**************************************&* JUMP OFF TO WORD LIST EDITOR *&**************************************0GOTOWL CLR R0 EDITOR IS FIRST ROUTINEџ LISTџOR KEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ/* DATA SDL,32,6*32+SNAPRS LOAD BIG SNAPPER LI WLOC,SNAPRS AI WLOC,6*32 LI VDPADD,SDL LI WCOUNT,32 BL @WRITE BL @WRTVCL. DATA SAL,5,SALINO PUT HIM ON THE SCREEN%MASK14 BL @DEBOUN WAIT FOR KEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ DATA 15*32+3,26,OPTWRD' BL @WRTVCL SOUND MSG DATA 20*32+11,6,SNDM" MOVB @SNDFLG,R0 SOUND ON? JEQ SOFFM NO%SONM BL @WRTVCL PUT SOUND ON DATA 20*32+18,3,ONMџ BL @WRTVCLџ,15,OPT3џT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ' BL @WRTVCL CHANGE MESSAGE DATA 20*32+18,3,OFFM' JMP MASK14 AND LOOP AGAIN*NOSKEY CI R3,>31 1 KEY? JL MASK14 TOO LOW CI R3,>38 8 KEY?! JH MASK14 TOO HIGHџND ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ& BL @BANKSW OFF WE GO * B @BACK&**************************************&* WE WILL RETURN TO THE MENU AGAIN! *&* *&**************************************%FIGSND MOVB @SNDFLG,R0 IS SOUND ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ& MOVB @KEY,R3 GET KEY VALUE SRL R3,8 ADJUST CI R3,>53 S KEY? JEQ FIGSND" CI R3,115 LITTLE S? JEQ FIGSND CI R3,'W' W?) JEQ GOTOWL OFF TO WORD LISTџOR KEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў$їїџџџџџџџџџџџћ* JMP OPTPP AND BRANCH AROUND&SOFFM BL @WRTVCL PUT SOUND OFF DATA 20*32+18,3,OFFMOPTPP BL @WRTVCL DATA 22*32+8,16,OPTP BL @WRTVCL DATA 23*32+8,16,OPTP1** BL @WRTVCLџNMџ BL @WRTVCLџ,15,OPT3џT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ'***************************************'* LOAD CHARACTERS FOR SPRITES *'* == ENTRY POINT FOR REDO KEY == *'***************************************%REDO BL @CLEAR CLEAR SCREEN) LI VDPADD,SDL START OF SPRITESџ************џKџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ& LI R0,2 |& BL @BANKSW |&*=====================================)* BL @WRTVCL LOAD BIG NUMBERS5* DATA PDT+>380,14*32,NUMS (GETS BIG FACES, TOO)'***************************************џKџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ'* LOAD CHARACTER PATTERNS *'***************************************LOADCH BL @WRTVCL( DATA PDT,24,LADDER LADDER PATTERN BL @WRTVCL( DATA PDT+>40,16,TRANSV TRANSVERSE BL @WRTVCL& DATA PDT+>80,8,SIDEWA SIDEWALKџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ# LI R2,>31 ASCII BIAS, S R2,R3 0,1,2,3,4 FOR SKILL) MOVB @R3LB,@SKILL HAVE SKILL LEVEL= MOVB @LETMAX(R3),@MAXLET NOW HAVE MAX LETTERS TO GUESS9 MOVB @SNPMAX(R3),@MAXSNP AND MAXIMUM # OF SNAPPERSџ ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ5 LI R3,24*4 MAXIMUM # OF SPRITE PATTERNS+ZSDL BL @WRTCL WRITE OUT 8 ZEROES DATA 8,ZEROES+ AI VDPADD,8 POINT TO NEXT SPOT DEC R3 DONE? JNE ZSDL** BL @WRTVCL START OF SNAPPERSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ'* LOAD SOUND LISTS *'***************************************&* BL @WRTVCL SNAPPER MUSIC* DATA MSCBUF,512,SNPMSC+* BL @WRTVCL AND ALL SOUNDS OFF"* DATA MSCBUF+>200,116,OFFMSCџ************************џKџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ BL @WRTVCL4 DATA PDT+>340,8,SMLBOP LOAD SMALL BOPPIE CHAR&*=====================================&* LOAD SOUND LISTS AND BIG NUMBERS |&* BY CALLING ROUTINE IN OTHER BANK |&* |џ PDT+>80,8,SIDEWA SIDEWALKџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ) BL @VWTRS RESTORE SPRITES" DATA >E281 TO NORMAL MOVB R0,@SVVDP1 BL @WRTVCL DATA SAL,1,HD0% BL @CLEAR CLEAR SCREEN'***************************************џND MAXIMUM # OF SNAPPERSџ ON?џEYџT+2џїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў%їїџџџџџџџџџџџћ3 DATA SDL,16*32,BOPPIE 8 PATTERNS OF SNAPPERS4 BL @WRTVCL PUT OUT UMBRELLA AND THRONE DATA SDL+>220,64,UMBREL!*********************************!* PUT OUT ADDITIONAL CHARS *!*********************************џTART OF SNAPPERSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ!*********************************)NEWLVL LI R10,21 21 ROWS TO CLEAR% CLR R9 ROW 0, COL 0'CLRTOP MOV R9,R5 PARAMETER LIST BL @HCC! BYTE >20,>20 32 32'S!! AI R9,1*256 NEXT ROWџ *џRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ&* TO THE VERY FIRST MAZE OF THE GAME *&**************************************$ MOVB @H00,@LEVEL FIRST LEVEL* MOVB @H04,@NUMBOP 4 RESERVE BOPPIES- LI R0,>3030 ASCII CHARS FOR ZERO. MOV R0,@SCSTRT CLEAR SCORE TO ZEROESџERSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ'***************************************'* DETERMINE HOW LONG WORD IS ON SCREEN*'***************************************( CB @SKILL,@H04 SCRAMBLE LEVEL?' JL NOSCRM NO, SO PROCEED5 BL @PAUSES YES, SO WAIT FOR KEY PRESSEDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ* MOV @MAZES(R10),R10 GET MAZE TO PUT* BL @INTERL CREATE FIRST MAZE- MOVB @H00,@BOPSPD HE CAN START BOPPING( MOVB @H00,@DBF NO DEBOUNCE NOW+ MOVB @H00,@NUMFAC NO FACES DEPOSITEDџ MULT BY 2 FOR WORD OFFSETџRDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ' DEC R10 DONE WITH ALL?- JNE CLRTOP NO, SO KEEP CLEARING'*======================================'* NEWWRD IS NOW IN THE OTHER BANK |'*======================================,* BL @NEWWRD GET A MATCHING WORDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ MOV R0,@SCSTRT+2 MOV R0,@SCSTRT+4!*********************************!* == PUT OUT THE MAZE == *!* THIS IS THE ENTRY POINT FOR *!* NEW MAZE GENERATION. BRANCH *!* HERE WHEN 4 FACES ARE SUCCESS-*!* FULLY RECAPTURED. *џRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ. BL @WRTVCL PUT OUT SCORE MESSAGE DATA 21*32+1,11,SCOREM/ BL @HCHAR SHOW BOPPIES REMAINING BYTE 21,26,>68,4&**************************************&* INITIALIZE ANY VARIABLES IN RELATIONџ**********џTART OF SNAPPERSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ. MOVB @H00,@SPNCHR FIRST SPINNER PATTERN/ MOVB @H00,@INTFLG ALLOW INTERRUPTS AGAIN$ MOVB @H04,@NUMUMB 3 UMBRELLAS, BL @HCHAR SHOW UMBRELLAS LEFT BYTE 23,26,1,4. LIMI 2 AND ENABLE INTERRUPTSџTџRDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&їїџџџџџџџџџџџћ LI R0,1 BL @BANKSW*5 MOV @ARWPNT,VDPADD PUT LOCATOR ARROW ON SCREEN BL @WRTCL DATA 1,H02( MOVB @SKILL,R10 GET SKILL LEVEL SRL R10,8 ADJUST2 SLA R10,1 MULT BY 2 FOR WORD OFFSETџRDџџRSџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ% JMP GOTBIT AND LET'S GO*%NOSCRM BL @WRTVCL DISPLAY WORD DATA 21*32+15,8,GUESSW' BL @DELAY WAIT 5 SECONDS DATA 10% CB @SKILL,@H01 FIRST LEVEL?3 JLE GOTBIT YES, SO DON'T ERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ1 BL @DRPFAC SEE IF HE DROPPED A FACE' BL @MOVSNP MOVE A SNAPPER2 BL @BITE SEE IF SNAPPER GOT BOPPIE' BL @MOVSNP MOVE A SNAPPER JMP SCANITџ BL @MOVSNP MOVE A SNAPPERџT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ%*************************************%* *%* M A I N P L A Y I N G L O O P *%* *%*************************************+SCANIT CLR @SCNTIM NO SCREEN TIME OUTџ BIT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ(ZARYS MOV R2,*R0+ ZERO OUT ARRAYS DEC R1 JNE ZARYS* CLR @BOPINF ALSO GETS @BOPDLY& MOVB @H01,@STARF CARRYING STAR( MOVB @H00,@FACEF NO FACE, EITHER!*********************************џ GETS BIT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ1 BL @WRTVCL NO, SO BLANK THE MESSAGE DATA 21*32+15,8,BLANKS'***************************************'* INITIALIZE ANY VARIABLES NEEDED *'* *'* ENTRY POINT FOR WHEN BOPPIE GETS BIT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ* FILE IS INTERRUPT'***************************************'* INTERRUPT ROUTINE. WORKSPACE IS GPLWS'* SO 13,14,15 CANNOT BE DESTROYED *'***************************************0INTERR MOVB @H01,@INTFLG SIGNAL IN INTERRUPT NOWџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ* BL @INPUT GET SOME KB INPUT& BL @MOVSNP MOVE SNAPPERS$ BL @MOVBOP MOVE BOPPIE' BL @MOVSNP MOVE A SNAPPER% BL @FIRBOP FIRE ROUTINE' BL @MOVSNP MOVE A SNAPPERџT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ!* PLACE ALL SPRITES ON SCREEN *!*********************************. BL @WRTVCL PUT SPRITES ON SCREEN DATA SAL,41,SALINI: BL @WRTVCL AND PUT THRONE AS PER INTERPRETER DATA SAL+>20,2,SAVETHџ GETS BIT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў'їїџџџџџџџџџџџћ'***************************************.GOTBIT MOVB @H00,@SNPNUM PROCESS FIRST SNAPPER5 LI R0,SNAPIN START OF ARRAYS FOR SNAPPERS# CLR R2 ALL ZEROES2 LI R1,5 5 ELEMENTS FOR TWO ARRAYSџE GETS BIT*џERASE LETTERџDџїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўїїџџџџџџџџџџџћхххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххххх