; ; System equates ; ; OS EQUATES ; ---------- ; ; Syntax: ; Use '=' for addresses ; and '#' for values ; ; IO EQUATES ; ICHID EQU $0000 ICDNO EQU $0001 ICCOM EQU $0002 ICSTA EQU $0003 ICBAL EQU $0004 ICBAH EQU $0005 ICPTL EQU $0006 ICPTH EQU $0007 ICBLL EQU $0008 ICBLH EQU $0009 ICAX1 EQU $000A ICAX2 EQU $000B ICAX3 EQU $000C ICAX4 EQU $000D ICAX5 EQU $000E ICAX6 EQU $000F ; ; DISPLAY LIST EQUATES ; ADLI EQU $0080 AVB EQU $0040 ALMS EQU $0040 AVSCR EQU $0020 AHSCR EQU $0010 AJMP EQU $0001 AEMPTY1 EQU $0000 AEMPTY2 EQU $0010 AEMPTY3 EQU $0020 AEMPTY4 EQU $0030 AEMPTY5 EQU $0040 AEMPTY6 EQU $0050 AEMPTY7 EQU $0060 AEMPTY8 EQU $0070 ; ; OS VARIABLES FOR XL/XE ; ; PAGE 0 ; NGFLAG EQU $0001 CASINI EQU $0002 RAMLO EQU $0004 TRAMSZ EQU $0006 CMCMD EQU $0007 WARMST EQU $0008 BOOT EQU $0009 DOSVEC EQU $000A DOSINI EQU $000C APPMHI EQU $000E POKMSK EQU $0010 BRKKEY EQU $0011 RTCLOK EQU $0012 BUFADR EQU $0015 ICCOMT EQU $0017 DSKFMS EQU $0018 DSKUTL EQU $001A ABUFPT EQU $001C ICHIDZ EQU $0020 ICDNOZ EQU $0021 ICCOMZ EQU $0022 ICSTAZ EQU $0023 ICBALZ EQU $0024 ICBAHZ EQU $0025 ICPTLZ EQU $0026 ICPTHZ EQU $0027 ICBLLZ EQU $0028 ICBLHZ EQU $0029 ICAX1Z EQU $002A ICAX2Z EQU $002B ICAX3Z EQU $002C ICAX4Z EQU $002D ICAX5Z EQU $002E ICAX6Z EQU $002F STATUS EQU $0030 CHKSUM EQU $0031 BUFRLO EQU $0032 BUFRHI EQU $0033 BFENLO EQU $0034 BFENHI EQU $0035 LTEMP EQU $0036 BUFRFL EQU $0038 RECVDN EQU $0039 XMTDON EQU $003A CHKSNT EQU $003B NOCKSM EQU $003C BPTR EQU $003D FTYPE EQU $003E FEOF EQU $003F FREQ EQU $0040 SOUNDR EQU $0041 CRITIC EQU $0042 FMSZPG EQU $0043 ZCHAIN EQU $004A DSTAT EQU $004C ATRACT EQU $004D DRKMSK EQU $004E COLRSH EQU $004F TEMP EQU $0050 HOLD1 EQU $0051 LMARGN EQU $0052 RMARGN EQU $0053 ROWCRS EQU $0054 COLCRS EQU $0055 DINDEX EQU $0057 SAVMSC EQU $0058 OLDROW EQU $005A OLDCOL EQU $005B OLDCHR EQU $005D OLDADR EQU $005E FKDEF EQU $0060 PALNTS EQU $0062 LOGCOL EQU $0063 ADRESS EQU $0064 MLTTMP EQU $0066 SAVADR EQU $0068 RAMTOP EQU $006A BUFCNT EQU $006B BUFSTR EQU $006C BITMSK EQU $006E SHFAMT EQU $006F ROWAC EQU $0070 COLAC EQU $0072 ENDPT EQU $0074 DELTAR EQU $0076 DELTAC EQU $0077 KEYDEF EQU $0079 SWPFLG EQU $007B HOLDCH EQU $007C INSDAT EQU $007D COUNTR EQU $007E LOMEM EQU $0080 VNTP EQU $0082 VNTD EQU $0084 VVTP EQU $0086 STMTAB EQU $0088 STMCUR EQU $008A STARP EQU $008C RUNSTK EQU $008E TOPSTK EQU $0090 MEOLFLG EQU $0092 POKADR EQU $0095 DATAD EQU $00B6 DATALN EQU $00B7 STOPLN EQU $00BA SAVCUR EQU $00BE IOCMD EQU $00C0 IODVC EQU $00C1 PROMPT EQU $00C2 ERRSAVE EQU $00C3 COLOUR EQU $00C8 PTABW EQU $00C9 LOADFLG EQU $00CA FR0 EQU $00D4 FRE EQU $00DA FR1 EQU $00E0 FR2 EQU $00E6 FRX EQU $00EC EEXP EQU $00ED NSIGN EQU $00EE ESIGN EQU $00EF FCHRFLG EQU $00F0 DIGRT EQU $00F1 CIX EQU $00F2 INBUFF EQU $00F3 ZTEMP1 EQU $00F5 ZTEMP4 EQU $00F7 ZTEMP3 EQU $00F9 RADFLG EQU $00FB FLPTR EQU $00FC FPTR2 EQU $00FE ; ; PAGE 2 ; VDSLST EQU $0200 VPRCED EQU $0202 VINTER EQU $0204 VBREAK EQU $0206 VKEYBD EQU $0208 VSERIN EQU $020A VSEROR EQU $020C VSEROC EQU $020E VTIMR1 EQU $0210 VTIMR2 EQU $0212 VTIMR4 EQU $0214 VIMIRQ EQU $0216 CDTMV1 EQU $0218 CDTMV2 EQU $021A CDTMV3 EQU $021C CDTMV4 EQU $021E CDTMV5 EQU $0220 VVBLKI EQU $0222 VVBLKD EQU $0224 CDTMA1 EQU $0226 CDTMA2 EQU $0228 CDTMF3 EQU $022A SRTIMR EQU $022B CDTMF4 EQU $022C INTEMP EQU $022D CDTMF5 EQU $022E SDMCTL EQU $022F SDLSTL EQU $0230 SDLSTH EQU $0231 SSKCTL EQU $0232 SPARE EQU $0233 LPENH EQU $0234 LPENV EQU $0235 BRKKY EQU $0236 VPIRQ EQU $0238 CDEVIC EQU $023A CCOMND EQU $023B CAUX1 EQU $023C CAUX2 EQU $023D TMPSIO EQU $023E ERRFLG EQU $023F DFLAGS EQU $0240 DBSECT EQU $0241 BOOTAD EQU $0242 COLDST EQU $0244 RECLEN EQU $0245 DSKTIM EQU $0246 PDVMSK EQU $0247 SHPDVS EQU $0248 PDMSK EQU $0249 RELADR EQU $024A PPTMPA EQU $024C PPTMPX EQU $024D CHSALT EQU $026B VSFLAG EQU $026C KEYDIS EQU $026D FINE EQU $026E GPRIOR EQU $026F PADDL0 EQU $0270 PADDL1 EQU $0271 PADDL2 EQU $0272 PADDL3 EQU $0273 PADDL4 EQU $0274 PADDL5 EQU $0275 PADDL6 EQU $0276 PADDL7 EQU $0277 STICK0 EQU $0278 STICK1 EQU $0279 STICK2 EQU $027A STICK3 EQU $027B PTRIG0 EQU $027C PTRIG1 EQU $027D PTRIG2 EQU $027E PTRIG3 EQU $027F PTRIG4 EQU $0280 PTRIG5 EQU $0281 PTRIG6 EQU $0282 PTRIG7 EQU $0283 STRIG0 EQU $0284 STRIG1 EQU $0285 STRIG2 EQU $0286 STRIG3 EQU $0287 HIBYTE EQU $0288 WMODE EQU $0289 BLIM EQU $028A IMASK EQU $028B JVECK EQU $028C NEWADR EQU $028E TXTROW EQU $0290 TXTCOL EQU $0291 TINDEX EQU $0293 TXTMSC EQU $0294 TXTOLD EQU $0296 CRETRY EQU $029C HOLD3 EQU $029D SUBTMP EQU $029E HOLD2 EQU $029F DMASK EQU $02A0 TMPLBT EQU $02A1 ESCFLG EQU $02A2 TABMAP EQU $02A3 LOGMAP EQU $02B2 INVFLG EQU $02B6 FILFLG EQU $02B7 TMPROW EQU $02B8 TMPCOL EQU $02B9 SCRFLG EQU $02BB HOLD4 EQU $02BC DRETRY EQU $02BD SHFLOC EQU $02BE BOTSCR EQU $02BF PCOLR0 EQU $02C0 PCOLR1 EQU $02C1 PCOLR2 EQU $02C2 PCOLR3 EQU $02C3 COLOR0 EQU $02C4 COLOR1 EQU $02C5 COLOR2 EQU $02C6 COLOR3 EQU $02C7 COLOR4 EQU $02C8 RUNADR EQU $02C9 HIUSED EQU $02CB ZHIUSE EQU $02CD GBYTEA EQU $02CF LOADAD EQU $02D1 ZLOADA EQU $02D3 DSCTLN EQU $02D5 ACMISR EQU $02D7 KRPDER EQU $02D9 KEYREP EQU $02DA NOCLIK EQU $02DB HELPFG EQU $02DC DMASAV EQU $02DD PBPNT EQU $02DE PBUFSZ EQU $02DF RUNAD EQU $02E0 INITAD EQU $02E2 RAMSIZ EQU $02E4 MEMTOP EQU $02E5 MEMLO EQU $02E7 HNDLOD EQU $02E9 DVSTAT EQU $02EA CBAUDL EQU $02EE CBAUDH EQU $02EF CRSINH EQU $02F0 KEYDEL EQU $02F1 CH1 EQU $02F2 CHACT EQU $02F3 CHBAS EQU $02F4 NEWROW EQU $02F5 NEWCOL EQU $02F6 ROWINC EQU $02F8 COLINC EQU $02F9 CHAR EQU $02FA ATACHR EQU $02FB CH EQU $02FC FILDAT EQU $02FD DSPFLG EQU $02FE SSFLAG EQU $02FF ; ; PAGE 3 ; DDEVIC EQU $0300 DUNIT EQU $0301 DCOMND EQU $0302 DSTATS EQU $0303 DBUFLO EQU $0304 DBUFHI EQU $0305 DTIMLO EQU $0306 DUNUSE EQU $0307 DBYTLO EQU $0308 DBYTHI EQU $0309 DAUX1 EQU $030A DAUX2 EQU $030B TIMER1 EQU $030C ADDCOR EQU $030E CASFLG EQU $030F TIMER2 EQU $0310 TEMP1 EQU $0312 TEMP2 EQU $0314 TEMP3 EQU $0315 SAVIO EQU $0316 TIMFLG EQU $0317 STACKP EQU $0318 TSTAT EQU $0319 HATABS EQU $031A PUPBT1 EQU $033D PUPBT2 EQU $033E PUPBT3 EQU $033F IOCB0 EQU $0340 IOCB1 EQU $0350 IOCB2 EQU $0360 IOCB3 EQU $0370 IOCB4 EQU $0380 IOCB5 EQU $0390 IOCB6 EQU $03A0 IOCB7 EQU $03B0 PRNBUF EQU $03C0 SUPERF EQU $03E8 CKEY EQU $03E9 CASSBT EQU $03EA CARTCK EQU $03EB DERRF EQU $03EC ACMVAR EQU $03ED BASICF EQU $03F8 MINTLK EQU $03F9 GINTLK EQU $03FA CHLINK EQU $03FB CASBUF EQU $03FD ; ; HARDWARE REGISTERS ; ; GTIA ; HPOSP0 EQU $D000 HPOSP1 EQU $D001 HPOSP2 EQU $D002 HPOSP3 EQU $D003 HPOSM0 EQU $D004 HPOSM1 EQU $D005 HPOSM2 EQU $D006 HPOSM3 EQU $D007 SIZEP0 EQU $D008 SIZEP1 EQU $D009 SIZEP2 EQU $D00A SIZEP3 EQU $D00B SIZEM EQU $D00C GRAFP0 EQU $D00D GRAFP1 EQU $D00E GRAFP2 EQU $D00F GRAFP3 EQU $D010 GRAFM EQU $D011 COLPM0 EQU $D012 COLPM1 EQU $D013 COLPM2 EQU $D014 COLPM3 EQU $D015 COLPF0 EQU $D016 COLPF1 EQU $D017 COLPF2 EQU $D018 COLPF3 EQU $D019 COLBK EQU $D01A PRIOR EQU $D01B VDELAY EQU $D01C GRACTL EQU $D01D HITCLR EQU $D01E CONSOL EQU $D01F ; ; POKEY ; AUDF1 EQU $D200 AUDC1 EQU $D201 AUDF2 EQU $D202 AUDC2 EQU $D203 AUDF3 EQU $D204 AUDC3 EQU $D205 AUDF4 EQU $D206 AUDC4 EQU $D207 AUDCTL EQU $D208 STIMER EQU $D209 SKREST EQU $D20A POTGO EQU $D20B SEROUT EQU $D20D IRQEN EQU $D20E SKCTL EQU $D20F ; ; PIA ; PORTA EQU $D300 PORTB EQU $D301 PACTL EQU $D302 PBCTL EQU $D303 ; ; ANTIC ; DMACLT EQU $D400 CHACTL EQU $D401 DLISTL EQU $D402 DLISTH EQU $D403 HSCROL EQU $D404 VSCROL EQU $D405 PMBASE EQU $D407 CHBASE EQU $D409 WSYNC EQU $D40A VCOUNT EQU $D40B PENH EQU $D40C PENV EQU $D40D NMIEN EQU $D40E NMIRES EQU $D40F ; ; FLOATING POINT ROUTINES ; AFP EQU $D800 FASC EQU $D8E6 IFP EQU $D9AA FPI EQU $D9D2 ZFR0 EQU $DA44 ZF1 EQU $DA46 FSUB EQU $DA60 FADD EQU $DA66 FMUL EQU $DADB FDIV EQU $DB28 PLYEVL EQU $DD40 FLD0R EQU $DD89 FLD0P EQU $DD8D FLD1R EQU $DD98 FLD1P EQU $DD9C FSTOR EQU $DDA7 FSTOP EQU $DDAB FMOVE EQU $DDB6 EXP EQU $DDC0 EXP10 EQU $DDCC LOG EQU $DECD LOG10 EQU $DED1 ; ; ROM VECTORS ; DSKINV EQU $E453 CIOV EQU $E456 SIOV EQU $E459 SETVBV EQU $E45C SYSVBV EQU $E45F XITVBV EQU $E462 SIOINV EQU $E465 SENDEV EQU $E468 INTINV EQU $E46B CIOINV EQU $E46E SELFSV EQU $E471 WARMSV EQU $E474 COLDSV EQU $E477 RBLOKV EQU $E47A CSOPIV EQU $E47D PUPDIV EQU $E480 SELFTSV EQU $E483 PENTV EQU $E486 PHUNLV EQU $E489 PHINIV EQU $E48C GPDVV EQU $E48F ; ; Code equates ; L0094 EQU $0094 L0097 EQU $0097 L0098 EQU $0098 L0099 EQU $0099 L009A EQU $009A L009B EQU $009B L009C EQU $009C L009D EQU $009D L009E EQU $009E L009F EQU $009F L00A0 EQU $00A0 L00A1 EQU $00A1 L00A2 EQU $00A2 L00A3 EQU $00A3 L00A4 EQU $00A4 L00A5 EQU $00A5 L00A6 EQU $00A6 L00A7 EQU $00A7 L00A8 EQU $00A8 L00A9 EQU $00A9 L00AA EQU $00AA L00AB EQU $00AB L00AC EQU $00AC L00AD EQU $00AD L00AE EQU $00AE L00AF EQU $00AF L00B0 EQU $00B0 L00B1 EQU $00B1 L00B9 EQU $00B9 L00BC EQU $00BC L00CB EQU $00CB L00CC EQU $00CC L00CD EQU $00CD L00CE EQU $00CE L00CF EQU $00CF L00D0 EQU $00D0 L00D1 EQU $00D1 L00D2 EQU $00D2 L00D3 EQU $00D3 L0480 EQU $0480 L0488 EQU $0488 L0493 EQU $0493 L049B EQU $049B L04A6 EQU $04A6 L04AE EQU $04AE L04B9 EQU $04B9 L04CC EQU $04CC L04DF EQU $04DF L04E7 EQU $04E7 L04EF EQU $04EF L04F2 EQU $04F2 L0505 EQU $0505 L0515 EQU $0515 L0518 EQU $0518 L052B EQU $052B L053E EQU $053E L0552 EQU $0552 L0566 EQU $0566 L057A EQU $057A L058E EQU $058E L05A2 EQU $05A2 L05AA EQU $05AA L05B2 EQU $05B2 L05BA EQU $05BA L05BB EQU $05BB L05C2 EQU $05C2 L05C3 EQU $05C3 L05CA EQU $05CA L05CB EQU $05CB L08C0 EQU $08C0 L08C1 EQU $08C1 L0990 EQU $0990 L0D00 EQU $0D00 L0D01 EQU $0D01 L1004 EQU $1004 L102D EQU $102D L1039 EQU $1039 L103B EQU $103B L1EC8 EQU $1EC8 LCFF1 EQU $CFF1 LFB51 EQU $FB51 ; ; Start of code ; ORG $A000 ; BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK BRK SEI LDA #$2E STA SDMCTL LDA #$03 STA GRACTL LDA #$11 STA GPRIOR LDA #$08 STA PMBASE LDA #$2A STA VDSLST LDA #$B2 STA VDSLST+1 LDA #$07 LDX #$B1 LDY #$DA JSR SETVBV LDA #$C0 STA NMIEN LDA #$95 STA VKEYBD LDA #$B1 STA VKEYBD+1 LDA #$40 STA POKMSK STA IRQEN CLI LDA #$10 STA STMTAB+1 LDA #$0D STA STMCUR LDX #$00 LDY #$00 STX L0094 LA84D STX POKADR STX L0098 STX L0099 TXA ASL TAX TYA ADC STMTAB+1 STA STMTAB+1 STA L0D00,X LDA #$00 ADC STMCUR STA STMCUR STA L0D01,X LDY #$00 INX TXA STA (STMTAB+1),Y INY LDA POKADR LSR STA L009A CLC ADC #$02 STA (STMTAB+1),Y INY STA ERRSAVE LDX L0094 LA87D LDA L009A STA L009B LA881 LDA LBBF5,X STA (STMTAB+1),Y INY INX DEC L009B BPL LA881 LDA #$FF STA (STMTAB+1),Y INY DEC L0099 BPL LA87D STX L0094 STY L0099 LA899 DEC L0098 BMI LA8BB LDA L0099 SEC SBC ERRSAVE SBC ERRSAVE STA L0099 LDX ERRSAVE LA8A8 STY L009A LDY L0099 LDA (STMTAB+1),Y INY STY L0099 LDY L009A STA (STMTAB+1),Y INY DEX BNE LA8A8 BEQ LA899 LA8BB LDX POKADR INX CPX #$08 BNE LA84D LDY #$10 LDA #$40 LDX #$00 LA8C8 PHA STA L08C0,X TYA STA L08C1,X PLA INX INX CPX #$C0 BEQ LA8DF CLC ADC #$28 BCC LA8C8 INY BCS LA8C8 LA8DF LDA #$80 STA SDLSTL LDA #$BF STA SDLSTH LDX #$3B LA8EB LDA LB9C0,X STA L1004,X DEX BPL LA8EB INX STX STMTAB LDA VNTD+1 CLC ADC #$11 STA L102D LDA VVTP CLC ADC #$10 STA L1039 LDA VNTP+1 BEQ LA915 LDX #$04 LDA #$00 LA90F STA L103B,X DEX BPL LA90F LA915 LDA #$00 LDX #$89 LA919 STA L0000,X INX BNE LA919 DEX TXS LA920 STA L0990,X DEX BNE LA920 LDA #$0C STA FR2+4 LDA #$06 STA ZTEMP4+1 STA FR1 CLC LDA FR0+5 ADC VVTP STA FR0+5 LDA VVTP LSR CLC ADC FRE STA FRE LA93F JSR LB446 LA942 LDA STMTAB BEQ LA942 LDA #$90 STA SDLSTL LDA #$BF STA SDLSTH LDX #$27 LDA #$00 LA954 STA L1004,X DEX BPL LA954 LDX #$80 LDA #$06 JSR LB59A LDA VNTD+1 BEQ LA97C LDA ESIGN TAX EOR #$01 TAY LDA LB9FE,X TAX LDA #$1C STA L1004,X LDA LB9FC,Y LDX #$F4 JSR LB59A LA97C LDA #$80 STA L009C LDY #$3C STY L009D LDA #$01 LDY #$06 LDX #$00 JSR LB9A6 LDA #$62 STA INBUFF STA FCHRFLG LDA #$AA JSR LB38F LA998 LDX #$00 STX L00A0 STX ATRACT DEX TXS LDA CIX BEQ LA9A7 JSR LB5D1 LA9A7 LDA FCHRFLG BEQ LA9BE LDA INBUFF BNE LA9BB STA FCHRFLG LDX #$00 JSR LB9A3 LDA #$00 JSR LB38F LA9BB JMP LAF33 LA9BE LDA CIX BEQ LA9D7 LDX #$00 LDA VNTD BNE LA9CA LDX ESIGN LA9CA LDA STRIG0,X TAX EOR L009E AND L009E STX L009E LSR BCS LA9DA LA9D7 JMP LAA46 LA9DA LDA L00A5 BEQ LA9E2 LDA L00CD BNE LA9F3 LA9E2 LDA #$00 STA AUDCTL LDA #$1F LDY #$29 LDX #$04 JSR LB9A6 JMP LAA46 LA9F3 LDY #$07 LA9F5 LDA L0505,Y BEQ LA9FE DEY BPL LA9F5 BRK LA9FE DEC L00A5 DEC L00CD LDA #$51 STA L00AD LDA #$56 STA L00AE LDX L009D INX STX L00B0 LDA L009C SEC SBC #$2D STA L00AF JSR LB86F JSR LB7B0 LDA L00CD BNE LAA23 JSR LB40B LAA23 LDA #$E3 STA STMCUR+1 LDA #$BB STA STARP LDX L009D LDA L009C SEC SBC #$2E TAY LDA #$55 JSR LB664 LDA #$20 STA AUDCTL LDA #$2E LDY #$4C LDX #$04 JSR LB9A6 LAA46 LDA L00CD LDX #$A6 LAA4A TAY CLC LDA L08C0,X ADC #$13 STA STMTAB+1 LDA L08C1,X ADC #$00 STA STMCUR TYA LDY #$02 LAA5D ORA (STMTAB+1),Y BNE LAA6D DEY BPL LAA5D INX INX CPX #$B6 BNE LAA4A JSR LB40B LAA6D LDX #$02 LAA6F BNE LAA75 LDA L00A8 BNE LAA7D LAA75 LDA L04EF,X BNE LAA7D LAA7A JMP LAB0E LAA7D LDA HPOSM1,X AND #$04 BEQ LAA7A LDA #$00 STA HPOSP1,X STX POKADR CPX #$00 BNE LAAE1 LDA L00A8 BEQ LAAE1 LDA #$01 STA L0099 LDA #$00 JSR LB978 LDA L00A9 LSR BCS LAAAB LDA #$BE STA STMCUR+1 LDA #$BB STA STARP BNE LAAC1 LAAAB ASL ASL BCS LAAB9 LDA #$7A STA STMCUR+1 LDA #$BB STA STARP BNE LAAC1 LAAB9 LDA #$9C STA STMCUR+1 LDA #$BB STA STARP LAAC1 LDA L00AA SEC SBC #$30 TAY LDA #$AA LDX L00AB JSR LB664 LDA L00AB CLC ADC #$04 TAY LDA #$00 STA L00A8 LDA L00AA SEC SBC #$2D LDX #$18 BNE LAB05 LAAE1 LDA #$01 STA L0099 LDA #$25 JSR LB978 LDA L00B9,X JSR LB944 TXA CLC ADC #$10 TAX LDA #$00 STA L04DF,X LDA L0493,X CLC ADC #$02 TAY LDA L0480,X ADC #$02 LAB05 STA L00AF STY L00B0 JSR LB8D4 LDX POKADR LAB0E DEX BMI LAB14 JMP LAA6F LAB14 LDA #$90 STA STMCUR+1 LDA #$09 STA STARP LDY #$03 CLC LDA #$0E ADC L00A1 TAX LAB24 STY POKADR LDA L04DF,X BEQ LAB52 LDA HPOSP0,Y AND #$04 BEQ LAB52 LDA #$00 STA L0099 LDA #$25 JSR LB978 JSR LB8CA LDA L00A9,X JSR LB944 LDA L0505,X SEC SBC L04DF,X STA L04DF,X BEQ LAB52 JSR LB76A LAB52 LDY POKADR LDA L00BC,Y TAY LDA #$00 STA (STMCUR+1),Y DEX DEX LDY POKADR DEY BPL LAB24 LDX #$07 LDA L00A1 BEQ LAB6E DEX LDA #$00 BEQ LAB70 LAB6E LDA #$01 LAB70 STA L00A1 LDY #$03 LDA #$80 LAB76 STA L0098 LDA L04E7,X BEQ LAB97 STY POKADR LDA L0098 LDY L049B,X ORA (STMCUR+1),Y STA (STMCUR+1),Y TYA LDY POKADR STA L00BC,Y LDA L0488,X CLC ADC #$30 STA HPOSM0,Y LAB97 LDA L0098 LSR LSR DEX DEX DEY BPL LAB76 LDX #$0F STX HITCLR JSR LB3BE LDX #$07 JSR LB3BE JSR LB2EB LDA L00A8 BNE LAC30 LDA COLOUR BEQ LABBD DEC COLOUR JMP LAC30 LABBD LDA L00A3 BEQ LAC30 LDA L0515 BNE LAC30 LDY SKREST CPY #$18 BCC LAC30 CPY #$34 BCS LAC30 STY L00AB LDA SKREST STA L00A9 LSR BCC LABF3 ASL ASL BCS LABE9 LDA #$72 STA STMCUR+1 LDA #$BB STA STARP BNE LABFB LABE9 LDA #$94 STA STMCUR+1 LDA #$BB STA STARP BNE LABFB LABF3 LDA #$B6 STA STMCUR+1 LDA #$BB STA STARP LABFB LDA L00A9 BMI LAC03 LDA #$30 BNE LAC05 LAC03 LDA #$C8 LAC05 STA L00AA STA L0515 STA L00A8 LDA #$07 LDX #$01 JSR LB6E0 LDA L00AA STA HPOSP1 LDA #$00 STA L00AC LDA FR0+4 STA COLOUR LDA NSIGN BNE LAC2D LDA #$6F LDY #$74 LDX #$06 JSR LB9A6 LAC2D JMP LAD85 LAC30 LDA L00CC BNE LAC37 JMP LAD67 LAC37 LDA L00A3 BEQ LAC42 LDA SKREST AND #$03 BNE LAC45 LAC42 JMP LACED LAC45 LDY L00CB BNE LAC4C JMP LAD5F LAC4C LDA L00A8 BEQ LAC75 LDA LOADFLG BEQ LAC58 DEC LOADFLG BPL LAC75 LAC58 LDA L00AA CMP #$35 BCC LAC75 CMP #$C1 BCS LAC75 SEC SBC #$2C TAX LDA #$08 STA LOADFLG LDA #$FF STA POKADR LDA L00AB CLC ADC #$04 BNE LAC9A LAC75 LDX #$07 LAC77 LDA L04E7,X BEQ LAC87 LDA L049B,X CMP #$18 BCC LAC87 CMP #$34 BCC LAC8C LAC87 DEX BPL LAC77 BMI LACC8 LAC8C PHA LDA #$00 STA POKADR LDA L00B1,X STA ERRSAVE LDA L0488,X TAX PLA LAC9A STA L00AE STX L00AD STY L0097 LACA0 JSR LB7C9 TXA LDY POKADR BMI LACB6 LACA8 CMP ERRSAVE,Y BNE LACB3 JSR LB944 JMP LACC1 LACB3 DEY BPL LACA8 LACB6 LDY POKADR INY STA ERRSAVE,Y STY POKADR JSR LB84F LACC1 DEC L0097 BNE LACA0 JMP LAD5F LACC8 LDA SKREST CMP #$A0 BCS LACEA LDY #$07 LACD1 LDX L04E7,Y BEQ LACDB CMP L04AE,Y BEQ LACEA LACDB DEY BPL LACD1 STA L00AD LDA #$08 STA L00AE JSR LB7C9 JSR LB84F LACEA JMP LAD5F LACED LDX L00A7 BNE LACF4 LACF1 JMP LAD85 LACF4 LDA L00A2 BEQ LACF1 LDA SKREST CMP #$9E BCS LACF1 LDX #$02 LAD01 LDY L0515,X BEQ LAD0C DEX BPL LAD01 JMP LAD5F LAD0C STA L00AD LDY #$08 STY L00AE LDA #$DF STA STMCUR+1 LDA #$BB STA STARP LDA #$02 STX POKADR INX JSR LB6E0 LDA L00AD LDX POKADR CLC ADC #$30 STA HPOSP1,X JSR LB7C9 TXA INC NSIGN DEC L00A2 DEC L00A7 LDX POKADR STA L00B9,X TAX CLC LDA POKADR ADC #$10 TAY LDA LB822,X SEC SBC #$02 STA L00AF LDA #$55 STA L00B0 JSR LB86F LDA #$65 LDY #$6A LDX #$06 JSR LB9A6 LDA L00CB BEQ LAD5F DEC L00CB LAD5F LDA L00CB BNE LAD85 STA L00CC BEQ LAD85 LAD67 DEC PTABW BNE LAD85 LDA L00A3 CMP #$05 BCC LAD73 LDA #$04 LAD73 CMP L00A6 BCC LAD79 LDA L00A6 LAD79 STA L00CB ORA L00A2 BEQ LAD85 STA L00CC LDA FR0+3 STA PTABW LAD85 LDA L00A8 BEQ LADBF LDA FR0+2 CLC ADC L00AC STA L00AC BCC LADBF LDX L00AA LDA L00A9 BMI LAD9F INX CPX #$C8 BCS LADAC BCC LADA4 LAD9F DEX CPX #$30 BCC LADAC LADA4 STX HPOSP1 STX L00AA JMP LADBF LADAC LDA #$00 STA L00A8 STA HPOSP1 STA L0515 LDA NSIGN BNE LADBF LDX #$06 JSR LB9A3 LADBF LDX #$12 LADC1 LDA L04DF,X BNE LADC9 JMP LAEE9 LADC9 SEC LDA L00A4 ADC L04CC,X STA L04CC,X BCS LADD7 JMP LAEE9 LADD7 LDA #$00 STA ERRSAVE LDA L0493,X CMP #$0A BCC LAE32 CMP #$51 BCS LAE32 LDA L0480,X CMP #$02 BCC LAE32 CMP #$99 BCS LAE32 LDY #$07 LADF3 STY POKADR LDA LBB09,Y CLC ADC L0480,X STA L0098 LDA LBB11,Y CLC ADC L0493,X ASL TAY LDA L08C0,Y STA STMTAB+1 LDA L08C1,Y STA STMCUR LDA L0098 LSR LSR TAY LDA (STMTAB+1),Y PHA LDA L0098 AND #$03 TAY PLA AND LBB19,Y EOR LBB19,Y BNE LAE2A SEC BCS LAE2B LAE2A CLC LAE2B ROR ERRSAVE LDY POKADR DEY BPL LADF3 LAE32 LDA ERRSAVE BEQ LAE3A STA L00B0,X BNE LAE63 LAE3A LDA L00B0,X BEQ LAE63 LDA #$00 STA L00B0,X LDY L00A9,X LDA LB822,Y SEC SBC #$02 STA L00AF LDA #$55 STA L00B0 LDA L0480,X STA L00AD LDA L0493,X STA L00AE STX POKADR TXA TAY JSR LB86F LDX POKADR LAE63 LDA L00B0,X BNE LAE92 JSR LB95B DEC L04DF,X BEQ LAE72 JMP LAEBD LAE72 LDA #$00 STA LCFF1,X LDY L0480,X INY INY STY L00AF LDY L0493,X INY INY STY L00B0 JSR LB8D4 STX POKADR JSR LB829 LDX POKADR JMP LAEE9 LAE92 LDA ERRSAVE AND #$0F BNE LAEA1 INC L0480,X INC L0493,X JMP LAEBD LAEA1 LDA ERRSAVE AND #$F0 BNE LAEB0 DEC L0480,X INC L0493,X JMP LAEBD LAEB0 AND #$7E BNE LAEBA INC L0493,X JMP LAEBD LAEBA DEC L0493,X LAEBD LDA L0480,X CLC ADC #$30 STA LCFF1,X TXA SEC SBC #$0F ASL TAY LDA L0493,X SEC SBC #$01 CLC ADC LBB29,Y STA STMTAB+1 LDA #$00 ADC LBB2A,Y STA STMCUR LDY #$04 LAEE1 LDA LBBDE,Y STA (STMTAB+1),Y DEY BPL LAEE1 LAEE9 DEX CPX #$0F BEQ LAEF1 JMP LADC1 LAEF1 LDA L00A0 BNE LAF36 LDA FR1 ORA L00CD ORA L00CE BEQ LAF14 LDA L00A3 ORA L00A2 BNE LAF33 LDX #$0A LAF05 ORA L04E7,X DEX BPL LAF05 ORA L00A8 STA CIX BNE LAF14 STA HPOSP0 LAF14 LDA #$00 STA L00A3 STA L00A2 LDX #$13 LAF1C LDA L053E,X BPL LAF33 DEX BPL LAF1C LDA L00A6 CLC ADC L00A7 ADC L00A5 CMP #$13 BNE LAF33 LDA L00A8 BEQ LAF39 LAF33 JSR LB587 LAF36 JMP LA998 LAF39 LDX #$00 STX HPOSP0 STX FR1 LDA #$15 STA POKADR+1 LAF44 DEC L00CD BMI LAF6B JSR LB7B0 LDA POKADR+1 CLC ADC #$04 STA POKADR+1 TAY LDX #$20 LDA #$55 JSR LB664 LDA #$00 STA L0099 LDA #$05 JSR LB978 LDX #$05 JSR LB56C JMP LAF44 LAF6B LDA L00CE BEQ LAF75 JSR LB40B JMP LAF44 LAF75 LDA #$37 STA STMCUR+1 LDA #$BB STA STARP LDA #$0B STA POKADR+1 LDX #$05 LAF83 STX POKADR LDA FR1+1,X BMI LAFB4 INC FR1 LDA #$00 LDY LBB31,X LDX #$59 JSR LB664 LDA POKADR+1 CLC ADC #$0E STA POKADR+1 TAY LDX #$30 LDA #$55 JSR LB664 LDA #$01 STA L0099 LDA #$00 JSR LB978 LDX #$0F JSR LB56C LDX POKADR LAFB4 DEX BPL LAF83 LDA VNTP+1 BEQ LAFBE JMP LB045 LAFBE LDA #$00 STA L0098 LDA FRE+4 AND #$0F STA L0099 LDA FRE+4 LSR LSR LSR LSR TAX LDA #$00 CPX #$01 BCC LAFDB CLC LAFD6 ADC #$0A DEX BNE LAFD6 LAFDB ADC L0099 STA L0099 LAFDF LDA L0099 CMP FRE+5 BEQ LB01C LDA FR1 CMP #$06 BEQ LB01C LDA SKREST LSR AND #$07 TAX BCS LB002 LAFF4 CPX #$06 BCC LAFFA LDX #$05 LAFFA LDA FR1+1,X BMI LB010 DEX JMP LAFF4 LB002 CPX #$06 BCC LB008 LDX #$00 LB008 LDA FR1+1,X BMI LB010 INX JMP LB002 LB010 LDA #$00 STA FR1+1,X INC FR1 INC FRE+5 INC L0098 BNE LAFDF LB01C LDA L0098 BEQ LB045 LDA #$A4 STA AUDC2 LDA #$12 STA L009A LB029 LDA SKREST AND #$1E BNE LB032 LDA #$1E LB032 ADC #$08 STA AUDF2 LDX #$06 JSR LB580 DEC L009A BPL LB029 LDA #$00 STA AUDC2 LB045 LDY FR1 BNE LB06C SEC LDA LOMEM SBC FRE+2 LDA LOMEM+1 SBC FRE+3 LDA VNTP SBC FRE+4 BCS LB061 LDX #$02 LB05A LDA FRE+2,X STA LOMEM,X DEX BPL LB05A LB061 LDA VNTD+1 BEQ LB069 LDA ZTEMP4+1 BNE LB074 LB069 JMP LB0AB LB06C LDY VNTD+1 BEQ LB089 LDY ZTEMP4+1 BEQ LB089 LB074 LDX #$0A LB076 LDY INBUFF+1,X LDA FRE+2,X STA INBUFF+1,X STY FRE+2,X DEX BPL LB076 LDA ESIGN EOR #$01 STA ESIGN BNE LB0A3 LB089 LDX FR0+5 INX CPX #$15 BCC LB092 LDX #$13 LB092 STX FR0+5 TXA LSR BCS LB0A3 LDX FRE INX CPX #$0A BCC LB0A1 LDX #$00 LB0A1 STX FRE LB0A3 LDX #$5A JSR LB580 JMP LA93F LB0AB JSR LB551 LDA #$00 STA COLOR0 STA COLOR4 LDA #$63 STA STMCUR+1 LDA #$BC STA STARP LDX #$30 LDY #$18 LDA #$55 JSR LB664 LDA #$28 STA STMCUR+1 LDA #$BD STA STARP LDX #$30 LDY #$58 LDA #$55 JSR LB664 LDA #$0B LDY #$10 LDX #$00 JSR LB9A6 LDA #$15 LDY #$10 LDX #$02 JSR LB9A6 LDA #$06 STA POKADR LDA #$01 STA POKADR+1 LB0F2 LDA POKADR+1 STA L0097 LDA #$00 STA L00A0 LDA SKREST ORA #$08 AND #$FB STA COLOR0 STA COLOR4 LB107 LDA L00A0 BEQ LB107 DEC L0097 BEQ LB12B LDA COLOR4 AND #$F0 STA COLOR4 LDA SKREST AND #$0B ORA COLOR4 STA COLOR4 STA COLOR0 LDA #$00 STA L00A0 BEQ LB107 LB12B INC POKADR+1 DEC POKADR BNE LB0F2 LDA #$34 STA COLOR0 STA COLOR1 LDA #$FF STA L0097 LB13D LDA #$08 STA POKADR LB141 LDA #$00 STA L00A0 LDA SKREST AND L0097 STA COLOR4 LB14D LDA L00A0 BEQ LB14D DEC POKADR BNE LB141 LSR L0097 BCS LB13D LDA #$00 STA COLOR4 LDA #$FE STA RTCLOK+1 LB162 LDA RTCLOK+1 BNE LB162 LDA #$13 STA L0094 LB16A LDA SKREST AND #$1F CLC ADC #$1F STA L00B0 LDA SKREST AND #$7F CLC ADC #$10 STA L00AF LDX L0094 JSR LB8D4 LDX #$10 JSR LB2D9 DEC L0094 BPL LB16A LDX #$FF JSR LB2D9 JMP LA8DF RTS TXA PHA LDA DIGRT EOR #$FF STA DIGRT LDA STIMER CMP #$AD BNE LB1AE LDA VNTD EOR #$FF STA VNTD LB1AA CLI JMP LA8DF LB1AE CMP #$3E BNE LB1BB LDA VVTP+1 EOR #$FF STA VVTP+1 JMP LB1AA LB1BB CMP #$C0 BCS LB1D1 TAX LDA LFB51,X CMP #$3A BCS LB1D1 CMP #$30 BCC LB1D1 SBC #$30 STA VVTP BPL LB1AA LB1D1 CLI LDA DIGRT BNE LB1D1 PLA TAX PLA RTI CLD LDA #$FF STA L00A0 CLC LDA FR2+4 ADC #$10 STA FR2+4 STA COLPF2 DEC INBUFF LDA SKREST AND #$0F ORA #$B0 STA ICAX2Z LDA #$00 STA ICAX1Z LDY SKREST STA (ICAX1Z),Y LDA CONSOL TAY EOR L009F AND L009F STY L009F LSR BCS LB221 LSR BCC LB215 LDA VNTD+1 EOR #$01 STA VNTD+1 BCS LB21E LB215 LSR BCC LB227 LDA VNTP+1 EOR #$01 STA VNTP+1 LB21E JMP LA8DF LB221 ROL STA STMTAB JMP LA915 LB227 JMP XITVBV PHA TXA PHA TYA PHA CLD LDA VCOUNT LDX #$04 LB235 CMP LB2D4,X BEQ LB270 BCS LB23F DEX BPL LB235 LB23F LDA DIGRT BNE LB26D LDA PORTA TAX EOR FR2+5 AND FR2+5 STX FR2+5 LSR LSR BCC LB25D TAY TXA LSR BCC LB25A INC FRX BCS LB25C LB25A DEC FRX LB25C TYA LB25D LSR LSR BCC LB26D TXA AND #$04 BEQ LB26B INC EEXP JMP LB26D LB26B DEC EEXP LB26D JMP LB2CE LB270 CMP #$66 BNE LB27B LDA L00D2 STA COLPF1 BNE LB2CE LB27B LDA FR2+3 BNE LB2CE LDX #$07 LB281 LDA L05CA,X BEQ LB2CB DEC L05CA,X BNE LB2CB DEC L05BA,X BNE LB2B8 LDY L05C2,X BNE LB29B TYA STA AUDF1,X BEQ LB2CB LB29B TXA PHA LDA #$04 STA FR2+2 LB2A1 LDA LBA00,Y STA L05A2,X TXA CLC ADC #$08 TAX INY DEC FR2+2 BPL LB2A1 PLA TAX LDA L05A2,X BNE LB2C2 LB2B8 CLC LDA L05AA,X ADC L05A2,X STA L05A2,X LB2C2 STA AUDF1,X LDA L05B2,X STA L05CA,X LB2CB DEX BPL LB281 LB2CE PLA TAY PLA TAX PLA RTI LB2D4 ASL ICBLLZ EOR #$66 ROR LB2D9 STX ERRSAVE LB2DB LDA #$00 STA L00A0 JSR LB2EB LB2E2 LDA L00A0 BEQ LB2E2 DEC ERRSAVE BNE LB2DB RTS LB2EB LDX L00CF INX CPX #$0A BCC LB2F4 LDX #$00 LB2F4 STX L00CF LB2F6 LDY L053E,X BPL LB2FE JMP LB382 LB2FE CPY #$08 BCC LB312 LDA #$00 STA L0552,X LDY #$07 DEC L053E,X INC L0566,X INC L057A,X LB312 STX POKADR TYA ASL TAX LDA L0D00,X STA STMCUR+1 LDA L0D01,X STA STARP LDX POKADR LDY L0566,X CPY #$FF BNE LB331 LDY #$9F DEC L057A,X BNE LB33A LB331 CPY #$A0 BCC LB33E LDY #$00 INC L057A,X LB33A TYA STA L0566,X LB33E LDA L0552,X PHA LDA L057A,X TAX PLA JSR LB664 LDX POKADR LDA L0552,X BEQ LB35D INC L053E,X DEC L0566,X DEC L057A,X JMP LB382 LB35D DEC L053E,X BPL LB37C LDA L058E,X AND #$7F TAY LDA #$00 STA L0505,Y LDA L058E,X BMI LB37C LSR LSR LSR STX L0098 TAX INC L00A5,X LDX L0098 LB37C INC L0566,X INC L057A,X LB382 TXA CLC ADC #$0A TAX CPX #$14 BCS LB38E JMP LB2F6 LB38E RTS LB38F PHA LDA FR0+5 AND #$FE CMP #$0B BCC LB39A LDA #$0A LB39A TAY LDA LBDED,Y STA STMCUR+1 LDA LBDEE,Y STA STARP LDX #$28 LDY #$29 PLA PHA JSR LB664 LDA #$B9 STA STMCUR+1 LDA #$BE STA STARP LDX #$28 LDY #$34 PLA JMP LB664 LB3BE LDA L04DF,X BEQ LB407 LDA L00A4 CPX #$08 BCS LB3CC LDA #$D0 SEC LB3CC ADC L04CC,X STA L04CC,X BCC LB407 DEC L04DF,X BNE LB3EC JSR LB764 JSR LB8CA CPX #$08 BCC LB407 STX POKADR JSR LB829 LDX POKADR BPL LB407 LB3EC LDY L0480,X STX L0098 LDA #$55 CPX #$08 BCC LB3F9 LDA #$AA LB3F9 STA RUNSTK LDA L0493,X TAX JSR LB70F LDX L0098 JSR LB95B LB407 DEX BPL LB3BE RTS LB40B LDA L00CE BEQ LB445 DEC L00CE LDA #$4D STA STMCUR+1 LDA #$BB STA STARP LDX #$58 LDY #$4A LDA #$AA JSR LB664 LDA #$EB STA STMCUR+1 LDA #$BB STA STARP LDY #$0A LB42C STY POKADR LDA LBB1D,Y TAX LDA LBB1E,Y TAY LDA #$55 JSR LB664 LDY POKADR DEY DEY BPL LB42C LDA #$06 STA L00CD LB445 RTS LB446 LDA #$00 STA L00A1 LDY #$07 LB44C STA L00BC,Y DEY BPL LB44C STA FR2+1 STA L00CF JSR LB551 LDX #$12 LB45B STA L04DF,X STA L0505,X DEX BPL LB45B STA L00A8 LDX #$06 LB468 STA HPOSP1,X DEX BPL LB468 STA COLOUR STA PTABW STA LOADFLG LDX #$06 LB476 JSR LB9A3 DEX DEX BPL LB476 LDA #$AA LDX #$77 LB481 STA L1EC8,X DEX BPL LB481 LDA #$05 STA L00CE JSR LB40B LDA #$37 STA STMCUR+1 LDA #$BB STA STARP LDX #$05 LB498 STX POKADR LDA FR1+1,X BMI LB4AA LDY LBB31,X LDX #$59 LDA #$55 JSR LB664 LDX POKADR LB4AA DEX BPL LB498 LDA #$08 STA L00A6 STA L00A5 LDA #$03 STA L00A7 LDA FRE ASL ADC FRE ASL TAX LDY #$05 LB4C0 LDA LBA79,X STA L00D0,Y INX DEY BPL LB4C0 LDA FR0+5 ASL ADC FR0+5 TAX LDY #$02 LB4D2 LDA LBAB5,X STA L00A2,Y INX DEY BPL LB4D2 LDA FR0+5 LSR STA L0098 ASL ADC L0098 TAX CPX #$13 BCC LB4EB LDX #$12 LB4EB LDY #$02 LB4ED LDA LBAF4,X STA FR0+2,Y INX DEY BPL LB4ED LDA VNTD BEQ LB502 LDA L00A4 CLC ADC #$0A STA L00A4 LB502 LDA VVTP+1 BEQ LB511 CLC LDA L00A3 ADC L00A2 STA L00A2 LDA #$00 STA L00A3 LB511 LDA L00D3 STA COLOR4 LDA FR0 STA COLOR1 LDA FR0+1 STA COLOR0 LDA L00D1 STA PCOLR0 LDA L00D0 STA PCOLR1 STA PCOLR2 STA PCOLR3 LDA #$0A STA L00CF LDA #$FF LDX #$13 LB538 STA L053E,X DEX BPL LB538 LDY FR1 CPY #$04 BCC LB546 LDY #$03 LB546 STY FR1 LDA #$04 STA L00CB STA L00CC STA CIX RTS LB551 LDA #$00 LDY #$40 STY STMTAB+1 LDY #$10 STY STMCUR LDX #$10 LB55D LDY #$FF LB55F STA (STMTAB+1),Y DEY BNE LB55F STA (STMTAB+1),Y INC STMCUR DEX BNE LB55D RTS LB56C STX INBUFF LDA #$00 STA L00A0 JSR LB587 LDA #$5B LDY #$60 LDX #$00 JSR LB9A6 LDX INBUFF LB580 STX INBUFF LB582 LDA INBUFF BNE LB582 RTS LB587 LDA L00A0 BNE LB595 LDX ESIGN LDA LB9FC,X LDX #$DC JSR LB59A LB595 LDA L00A0 BEQ LB595 RTS LB59A STA L0098 LDA #$02 STA L0099 LB5A0 LDA L0000,X TAY AND #$0F PHA TYA LSR LSR LSR LSR PHA INX DEC L0099 BPL LB5A0 LDX #$F0 LDY L0098 LDA #$05 STA L0099 LB5B9 PLA BNE LB5C3 LDA L0099 BEQ LB5C5 TXA BNE LB5C5 LB5C3 LDX #$00 LB5C5 CLC ADC #$50 STA L1004,Y INY DEC L0099 BPL LB5B9 RTS LB5D1 LDA VNTD BEQ LB5E9 CLC LDA L009C ADC FRX TAX CLC LDA L009D ADC EEXP TAY LDA #$00 STA FRX STA EEXP BEQ LB624 LB5E9 LDX ESIGN LDA STICK0,X LDX L009C LDY L009D LSR BCC LB605 LSR BCC LB60D LB5F8 LSR BCC LB61E LSR BCS LB624 LDA L009C ADC #$01 JMP LB623 LB605 SEC LDA L009D SBC #$01 JMP LB611 LB60D LDA L009D ADC #$01 LB611 TAY LDX ESIGN LDA STICK0,X LDX L009C LSR LSR JMP LB5F8 LB61E SEC LDA L009C SBC #$01 LB623 TAX LB624 TYA BMI LB62B CMP #$08 BCS LB62D LB62B LDA #$08 LB62D CMP #$4F BCC LB633 LDA #$4F LB633 TAY CPX #$2F BCS LB63A LDX #$2F LB63A CPX #$C9 BCC LB640 LDX #$C9 LB640 STX HPOSP0 STX L009C STY L009D LDA L00CE BNE LB655 LDA #$DB STA STMCUR+1 LDA #$BB STA STARP BNE LB65D LB655 LDA #$D8 STA STMCUR+1 LDA #$BB STA STARP LB65D LDA #$02 LDX #$00 JMP LB6E0 LB664 STA RUNSTK CPX #$61 BCS LB671 TXA ASL TAX CPY #$A0 BCC LB672 LB671 BRK LB672 TYA LSR LSR CLC ADC L08C0,X STA STMTAB+1 LDA L08C1,X ADC #$00 STA STMCUR TYA AND #$03 ASL STA RUNSTK+1 LDY #$00 LDA (STMCUR+1),Y STA L009A INY LDA (STMCUR+1),Y STA STARP+1 INY STY TOPSTK LB696 LDY #$FF STY L0098 INY LB69B LDA #$FF STA L0099 STY TOPSTK+1 LDY TOPSTK LDA (STMCUR+1),Y INC TOPSTK LDY TOPSTK+1 LDX RUNSTK+1 BEQ LB6B4 LB6AD SEC ROR ROR L0099 DEX BNE LB6AD LB6B4 AND L0098 TAX AND (STMTAB+1),Y STA (STMTAB+1),Y TXA EOR #$FF AND RUNSTK ORA (STMTAB+1),Y STA (STMTAB+1),Y LDA L0099 STA L0098 INY CPY STARP+1 BNE LB69B DEC L009A BEQ LB6DF LDA STMTAB+1 CLC ADC #$28 STA STMTAB+1 BCC LB696 INC STMCUR JMP LB696 LB6DF RTS LB6E0 STA L0098 STY L0099 TXA ASL TAX LDA LBB29,X STA STMTAB+1 LDA LBB2A,X STA STMCUR LDA #$00 LDY #$7F LB6F5 STA (STMTAB+1),Y DEY BPL LB6F5 CLC LDA L0099 ADC STMTAB+1 STA STMTAB+1 BCC LB705 INC STMCUR LB705 LDY L0098 LB707 LDA (STMCUR+1),Y STA (STMTAB+1),Y DEY BPL LB707 RTS LB70F CPX #$60 BCS LB71A TXA ASL TAX CPY #$A0 BCC LB71B LB71A BRK LB71B LDA L08C0,X STA STMTAB+1 LDA L08C1,X STA STMCUR TYA AND #$03 TAX TYA LSR LSR TAY LDA LB73F,X TAX AND (STMTAB+1),Y STA L009B TXA EOR #$FF AND RUNSTK ORA L009B STA (STMTAB+1),Y RTS LB73F DFB $3F,$CF,$F3,$FC LB743 LDA L052B,X BPL LB759 LB748 CPX #$08 BCS LB750 DEC L0493,X RTS LB750 INC L0493,X RTS LB754 LDA L052B,X BPL LB748 LB759 LSR BCC LB760 INC L0480,X RTS LB760 DEC L0480,X RTS LB764 LDA L0505,X STA L04DF,X LB76A LDA #$00 STA RUNSTK LDA L04A6,X STA L0480,X LDA L04B9,X STA L0493,X LDA #$00 STA L04F2,X LB77F LDY L0480,X LDA L0493,X STX L0098 TAX JSR LB70F LDX L0098 CLC LDA L04F2,X ADC L0518,X STA L04F2,X CMP L0505,X BCC LB7A7 BEQ LB7A7 SBC L0505,X STA L04F2,X JSR LB743 LB7A7 JSR LB754 DEC L04DF,X BNE LB77F RTS LB7B0 LDA L00CD ASL TAY LDA LBB1D,Y TAX LDA LBB1E,Y TAY LDA #$EB STA STMCUR+1 LDA #$BB STA STARP LDA #$AA JMP LB664 LB7C9 LDA SKREST AND #$0F LDX FR1 BEQ LB7FA LB7D2 CMP #$06 BCC LB7DA SBC #$06 BCS LB7D2 LB7DA TAX BIT SKREST LB7DE LDA FR1+1,X BEQ LB7F4 BVC LB7ED INX CPX #$06 BCC LB7DE LDX #$00 BEQ LB7DE LB7ED DEX BPL LB7DE LDX #$05 BNE LB7DE LB7F4 INC FR1+1,X DEC FR1 BPL LB81E LB7FA LDX FR2+1 BNE LB802 LDX #$06 BNE LB818 LB802 CMP #$07 BCC LB80A SBC #$07 BCS LB802 LB80A TAX CPX #$06 BEQ LB818 LDA FR1+1,X BNE LB818 TXA ADC #$04 BCC LB802 LB818 LDA FR1+1,X BMI LB81E INC FR1+1,X LB81E LDA LB822,X RTS LB822 DFB $13,$26,$3A,$67 DFB $7A,$8C,$50 LB829 DFB $B5,$A9,$C9,$07 DFB $90,$01,$00 CMP #$06 BNE LB849 LB834 LDA L00CD CMP #$04 BCC LB842 DEC L00CD JSR LB7B0 JMP LB834 LB842 DEC FR2+1 LDA #$00 STA L00CD RTS LB849 TAX LDA #$FF STA FR1+1,X RTS LB84F LDY #$0F LB851 LDA L0505,Y BEQ LB85C DEY CPY #$07 BNE LB851 BRK LB85C TXA STA L00A9,Y DEC L00A3 DEC L00CB DEC L00A6 LDA LB822,X STA L00AF LDA #$57 STA L00B0 LB86F LDA L00AD STA L04A6,Y STA L0480,Y LDA L00AE STA L04B9,Y STA L0493,Y SEC SBC L00B0 BCS LB888 EOR #$FF ADC #$01 LB888 STA FRE+1 SEC LDA L00AF SBC L00AD BCS LB89A EOR #$FF ADC #$01 TAX LDA #$00 BEQ LB89D LB89A TAX LDA #$01 LB89D STA L052B,Y TXA CMP FRE+1 BCS LB8AA TAX LDA FRE+1 BCC LB8B6 LB8AA TAX LDA #$80 ORA L052B,Y STA L052B,Y TXA LDX FRE+1 LB8B6 STA L0505,Y STA L04DF,Y INX TXA STA L0518,Y LDA #$00 STA L04F2,Y STA L04CC,Y RTS LB8CA LDA L0480,X STA L00AF LDA L0493,X STA L00B0 LB8D4 STX L0098 LDA #$0B LDY #$10 LDX #$00 JSR LB9A6 LDA #$15 LDY #$1A LDX #$02 JSR LB9A6 LDY L0098 CPY #$18 BCC LB8FD LDA NSIGN BNE LB8F7 LDX #$06 JSR LB9A3 LB8F7 LDY #$10 LDA #$80 BMI LB920 LB8FD CPY #$10 BCC LB91E DEC NSIGN BNE LB91E STY L0099 LDA L00A8 BEQ LB917 LDA #$6F LDY #$74 LDX #$06 JSR LB9A6 JMP LB91C LB917 LDX #$06 JSR LB9A3 LB91C LDY L0099 LB91E LDA #$00 LB920 LDX L053E,Y BMI LB926 BRK LB926 STY L0099 ORA L0099 STA L058E,Y LDA L00AF STA L0566,Y LDA L00B0 STA L057A,Y LDA #$00 STA L053E,Y LDA #$FF STA L0552,Y LDX L0098 RTS LB944 CMP #$06 BEQ LB958 TAY LDA FR1+1,Y BMI LB957 SBC #$00 BNE LB954 INC FR1 LB954 STA FR1+1,Y LB957 RTS LB958 DEC FR2+1 RTS LB95B LDA L04F2,X CLC ADC L0518,X STA L04F2,X CMP L0505,X BCC LB975 BEQ LB975 SBC L0505,X STA L04F2,X JSR LB743 LB975 JMP LB754 LB978 STA L0098 LDA FR0+5 LSR CMP #$06 BCC LB983 LDA #$05 LB983 STA L009A SED LB986 CLC LDA L0098 ADC FRE+2 STA FRE+2 LDA L0099 ADC FRE+3 STA FRE+3 LDA #$00 ADC FRE+4 STA FRE+4 BCC LB99D STA FRE+5 LB99D DEC L009A BPL LB986 CLD RTS LB9A3 LDA #$00 TAY LB9A6 INC FR2+3 STA L05C2,X TYA STA L05C3,X LDA #$01 STA L05CA,X STA L05CB,X STA L05BA,X STA L05BB,X DEC FR2+3 RTS LB9C0 DFB $00,$00,$2D,$29 DFB $33,$33,$29,$2C DFB $25,$00,$23,$2F DFB $2D,$2D,$21,$2E DFB $24,$00,$00,$00 DFB $23,$2F,$30,$39 DFB $32,$29,$27,$28 DFB $34,$00,$11,$19 DFB $18,$11,$00,$21 DFB $34,$21,$32,$29 DFB $00,$00,$30,$2C DFB $21,$39,$25,$32 DFB $00,$33,$2B,$29 DFB $30,$00,$00,$22 DFB $2F,$2E,$35,$33 LB9FC DFB $15,$21 LB9FE DFB $1B,$27 LBA00 DFB $00,$10,$01,$02 DFB $20,$01,$A4,$00 DFB $02,$20,$06,$A0 DFB $04,$10,$10,$00 DFB $86,$FE,$40,$04 DFB $00,$C0,$04,$10 DFB $10,$00,$86,$FE DFB $40,$04,$00,$18 DFB $FF,$02,$10,$24 DFB $08,$00,$20,$01 DFB $00,$A4,$FF,$10 DFB $04,$00,$40,$00 DFB $10,$01,$33,$36 DFB $FA,$10,$01,$38 DFB $30,$0B,$10,$01 DFB $3D,$40,$F5,$18 DFB $01,$42,$40,$FA DFB $10,$01,$47,$40 DFB $06,$10,$10,$00 DFB $82,$02,$20,$01 DFB $51,$84,$00,$10 DFB $04,$56,$84,$FF DFB $38,$04,$00,$10 DFB $00,$04,$01,$00 DFB $2F,$0F,$04,$01 DFB $00,$30,$FE,$01 DFB $18,$65,$A4,$00 DFB $01,$18,$6A,$50 DFB $FE,$01,$20,$6F DFB $A4,$00,$01,$20 DFB $74 LBA79 DFB $84,$34,$00,$1A DFB $0F,$C4,$84,$C4 DFB $00,$1A,$0F,$34 DFB $D8,$34,$00,$84 DFB $0F,$48,$88,$1A DFB $00,$34,$0F,$C4 DFB $00,$48,$84,$1A DFB $0F,$38,$84,$3C DFB $8E,$1A,$00,$1C DFB $1C,$00,$6E,$C4 DFB $38,$48,$3A,$00 DFB $1C,$C4,$84,$88 DFB $68,$DA,$0C,$34 DFB $00,$1A,$88,$00 DFB $34,$1A,$0F,$2A LBAB5 DFB $10,$08,$00,$15 DFB $0C,$00,$1A,$0F DFB $00,$20,$12,$00 DFB $26,$0C,$00,$28 DFB $10,$01,$2A,$0E DFB $01,$2B,$11,$02 DFB $2D,$0A,$03,$2F DFB $0D,$04,$34,$10 DFB $04,$38,$13,$05 DFB $3D,$0C,$05,$41 DFB $0E,$06,$44,$10 DFB $06,$48,$12,$07 DFB $4A,$0E,$07,$4C DFB $10,$07,$4C,$12 DFB $07,$4C,$14,$07 DFB $4C,$14,$07 LBAF4 DFB $F0,$88,$28,$A0 DFB $78,$32,$80,$6C DFB $44,$80,$60,$4A DFB $60,$50,$50,$40 DFB $38,$54,$20,$20 DFB $58 LBB09 DFB $FE,$FD,$FF,$01