processor 6502 include "vcs.h" include "macro.h" MAC LineaMarquee LDX #4 ; 192 Scanlines to Display LDY #0 .Draw_Picture ;LDA #0 ;STA PF0 ;STA PF1 ;STA PF2 LDA {1},Y ADC {2},Y STA $BE,X LDA {3},Y ADC {4},Y STA $C3,X LDA {5},Y ADC {6},Y STA $C8,X LDA {7},Y ADC {8},Y STA $CD,X LDA {9},Y ADC {10},Y STA $D3,X INY DEX BNE .Draw_Picture ENDM ; MAC LineaMarqueeEx ; LDA #8 ; STA $80 ;.DoblePasada ; STA WSYNC ; LDA $D9,Y ; STA PF0 ; LDA $DE,Y ; STA PF1 ; LDA $E4,Y ; STA PF2 ; SLEEP 12 ; LDA $E9,Y ; STA PF0 ; LDA $EE,Y ; STA PF1 ; LDA $F4,Y ; STA PF2 ; ; DEC $80 ; BNE .DoblePasada ; JMP Retorno ; ENDM MAC Linea1old LDX #4 ; 192 Scanlines to Display LDY #0 .Draw_Picture LDA #0 STA PF0 STA PF1 STA PF2 LDA {2},Y ADC {3},Y STA $92 LDA {4},Y ADC {5},Y STA $93 LDA {7},Y ADC {8},Y STA $94 LDA {9},Y ADC {10},Y STA $95 LDA #8 STA $80 .DoblePasada STA WSYNC LDA {1},Y STA PF0 LDA $92 STA PF1 LDA $93 STA PF2 SLEEP 12 LDA {6},Y STA PF0 LDA $94 STA PF1 LDA $95 STA PF2 DEC $80 BNE .DoblePasada INY DEX BNE .Draw_Picture JMP Retorno ENDM MAC Linea2old LDX #4 ; 192 Scanlines to Display LDY #0 .Draw_Picture2 LDA #0 STA PF0 STA PF1 STA PF2 LDA {2},Y ADC {3},Y STA $92 LDA {4},Y ADC {5},Y STA $93 LDA {7},Y ADC {8},Y STA $94 LDA {9},Y ADC {10},Y STA $95 LDA #8 STA $80 .DoblePasada2 STA WSYNC LDA {1},Y STA PF0 LDA $92 STA PF1 LDA $93 STA PF2 SLEEP 12 LDA {6},Y STA PF0 LDA $94 STA PF1 LDA $95 STA PF2 DEC $80 BNE .DoblePasada2 INY DEX BNE .Draw_Picture2 JMP Retorno2 ENDM MAC Linea1 LDA <#{1} STA $92 LDA >#{1} STA $93 LDA <#{2} STA $94 LDA >#{2} STA $95 LDA <#{3} STA $96 LDA >#{3} STA $97 LDA <#{4} STA $98 LDA >#{4} STA $99 JSR Linea JMP Retorno ENDM MAC Linea2 LDA <#{1} STA $92 LDA >#{1} STA $93 LDA <#{2} STA $94 LDA >#{2} STA $95 LDA <#{3} STA $96 LDA >#{3} STA $97 LDA <#{4} STA $98 LDA >#{4} STA $99 JSR Linea JMP Retorno2 ENDM MAC Linea1pir LDX #4 ; 192 Scanlines to Display LDY #0 .Draw_Picture LDA #0 STA PF0 STA PF1 STA PF2 LDA {2},Y ADC {3},Y STA $92 LDA {4},Y ADC {5},Y STA $93 LDA {7},Y ADC {8},Y STA $94 LDA {9},Y ADC {10},Y STA $95 LDA #8 STA $80 .DoblePasada STA WSYNC LDA {1},Y STA PF0 LDA $92 STA PF1 LDA $93 STA PF2 SLEEP 12 LDA {6},Y STA PF0 LDA $94 STA PF1 LDA $95 STA PF2 DEC $80 BNE .DoblePasada INY DEX BNE .Draw_Picture JMP Retorn ENDM MAC Linea2pir LDX #4 ; 192 Scanlines to Display LDY #0 .Draw_Picture2 LDA #0 STA PF0 STA PF1 STA PF2 LDA {2},Y ADC {3},Y STA $92 LDA {4},Y ADC {5},Y STA $93 LDA {7},Y ADC {8},Y STA $94 LDA {9},Y ADC {10},Y STA $95 LDA #8 STA $80 .DoblePasada2 STA WSYNC LDA {1},Y STA PF0 LDA $92 STA PF1 LDA $93 STA PF2 SLEEP 12 LDA {6},Y STA PF0 LDA $94 STA PF1 LDA $95 STA PF2 DEC $80 BNE .DoblePasada2 INY DEX BNE .Draw_Picture2 JMP Retorn2 ENDM Gris = 8 Marron = 4*8 Verde = 3*16 + 10 Naranja = 4*16 + 10 Celeste = 9*16 + 14 Azul = 11*16 + 4 Amarillo = 2*16 + 14 ; es amarillo? Rojo = 6*16 + 4 ; es rojo? PunteroRoom = $86 PunteroRoomBKP = $8C TieneObjeto = 1 Guante = 2 Lamp = 4 Llave = 8 PushQ = 16 Dia2 = 32 Inventario = $8E ControlBoton = $8F Temp = $91 DuracionNota = $A2 Noparray = $A8 Personaje = $A9 TogCamina = $AB ContaX = $AC Vueltas = $AD TogPersonaje = $AE Personaje1 = $AF Personaje2 = $B1 Vueltas1 = $B3 Vueltas2 = $B4 ContAnim = $B5 PuntAnim = $B6 SaltAnim = $B7 Noparray2 = $B9 RoomP1 = $BA RoomP2 = $BB ContaY = $C3 ColPir = $C4 ColPir2 = $C5 Puntaje = $F3 Backg = $FA Backg2 = $FC C_7 = 0 C_6 = 1 F_5 = 2 C_5 = 3 Gs_4 = 4 F_4 = 5 D_4 = 6 C_4 = 7 As_3 = 8 Gs_3 = 9 Fs_3 = 10 F_3 = 11 Ds_3 = 12 D_3 = 13 Cs_3 = 14 C_3 = 15 B_2 = 16 As_2 = 17 A_2 = 18 Gs_2 = 19 G_2 = 20 Fs_2 = 21 F_2 = 23 E_2 = 24 Ds_2 = 25 D_2 = 27 Cs_2 = 29 C_2 = 30 ORG $D000 RORG $F000 JMP Sajmp2 Sabnk2 LDA $1FF9 NOP NOP NOP NOP Sajmp2 LDA <#LineaW STA $82 LDA >#LineaW STA $83 LDA $BE CMP #0 BEQ ColCero LDA #Celeste STA ColPir LDA #Azul STA ColPir2 JMP ColS ColCero LDA #Naranja STA ColPir LDA #Rojo STA ColPir2 ColS LDA RoomP2 CMP #0 BEQ RP2Cero JMP RP2Sa RP2Cero LDA <#HolyGrail STA $82 LDA >#HolyGrail STA $83 LDA #161 STA RoomP2 JMP RP2Sal RP2Sa LDA RoomP2 CMP #161 BEQ RP2161 JMP RP2Sa2 RP2161 LDA <#Voodoo STA $82 LDA >#Voodoo STA $83 LDA #188 STA RoomP2 JMP RP2Sal ;Esto esta corregido de la version anterior que decia RP2Sa2 RP2Sa2 LDA RoomP2 CMP #188 BEQ RP2188 JMP RP2Sa3 RP2188 LDA <#Salamanca STA $82 LDA >#Salamanca STA $83 LDA #184 STA RoomP2 ;LDA #1 ;STA $BE JMP RP2Sal RP2Sa3 LDA RoomP2 CMP #184 BEQ RP2184 JMP RP2Sa4 RP2184 LDA #1 STA $BE LDA <#Cozumel STA $82 LDA >#Cozumel STA $83 LDA #157 STA RoomP2 JMP RP2Sal RP2Sa4 LDA RoomP2 CMP #157 BEQ RP2157 JMP RP2Sa5 RP2157 LDA Puntaje CMP #40 BMI Menos40 CMP #50 BMI Menos50 CMP #60 BMI Menos60 LDA <#Score4 STA $82 LDA >#Score4 STA $83 JMP RP2Sal Menos40 LDA <#Score1 STA $82 LDA >#Score1 STA $83 JMP RP2Sal Menos50 LDA <#Score2 STA $82 LDA >#Score2 STA $83 JMP RP2Sal Menos60 LDA <#Score3 STA $82 LDA >#Score3 STA $83 JMP RP2Sal RP2Sa5 RP2Sal Start_Frame0 LDA #8 STA COLUPF LDA #0 STA COLUBK ; Start VSYNC LDA #2 STA VSYNC STA WSYNC STA WSYNC STA WSYNC ; 3 Scanlines of VSYNC LDA #0 STA VSYNC ; End VSYNC ; 37 Scanlines of Vertical Blank... LDX #37 Vertical_Blank1 STA WSYNC DEX BNE Vertical_Blank1 LDA #0 STA VBLANK ; Enable TIA Output ;////////////// Start To Draw Playfield /////////////////////////////// LDX #51 ; 192 Scanlines to Display LDY #0 Draw_Picture1 LDA #2 STA $80 DoblePasada1 STA WSYNC LDA #Verde ;8 STA COLUPF LDA Text11-1,Y STA PF0 LDA Text21-1,Y STA PF1 LDA Text31-1,Y STA PF2 ;SLEEP 2 LDA Text41-1,Y STA PF0 LDA Text51-1,Y STA PF1 LDA Text61-1,Y STA PF2 STA WSYNC LDA #Gris ;4*8 STA COLUPF LDA Text12-1,Y STA PF0 LDA Text22-1,Y STA PF1 LDA Text32-1,Y STA PF2 ;SLEEP 2 LDA Text42-1,Y STA PF0 LDA Text52-1,Y STA PF1 LDA Text62-1,Y STA PF2 ;STA WSYNC DEC $80 BNE DoblePasada1 INY DEX BNE Draw_Picture1 JMP ($82);Linea1pir W12,W12,W12,W12,W12,W12,W12,W12,W12,W12 Retorn ; LDX #70 ;DibujaCola ; STA WSYNC ; DEX ; BNE DibujaCola ;////////////// End Of Display //////////////////////////////////////// LDA #%01000010 ; Disable VIA Output STA VBLANK ; 30 scanlines of overscan... LDX #30 Overscan1 STA WSYNC DEX BNE Overscan1 ;////////// SEGUNDA PASADA //////////////////////////////////////////////////// ; Start VSYNC LDA #2 STA VSYNC STA WSYNC STA WSYNC STA WSYNC ; 3 Scanlines of VSYNC LDA #0 STA VSYNC ; End VSYNC ; 37 Scanlines of Vertical Blank... LDX #37 Vertical_Blank2 STA WSYNC DEX BNE Vertical_Blank2 LDA #0 STA VBLANK ; Enable TIA Output ;////////////// Start To Draw Playfield /////////////////////////////// LDX #61 ; 192 Scanlines to Display LDY #0 Draw_Picture2 LDA #2 STA $80 DoblePasada2 STA WSYNC LDA ColPir;#Celeste ;3*16 + 10 STA COLUPF LDA Text13-1,Y STA PF0 LDA Text23-1,Y STA PF1 LDA Text33-1,Y STA PF2 ;SLEEP 2 LDA Text43-1,Y STA PF0 LDA Text53-1,Y STA PF1 LDA Text63-1,Y STA PF2 STA WSYNC LDA ColPir2;#Azul ;4*16 + 10 STA COLUPF LDA Text14-1,Y STA PF0 LDA Text24-1,Y STA PF1 LDA Text34-1,Y STA PF2 ;SLEEP 2 LDA Text44-1,Y STA PF0 LDA Text54-1,Y STA PF1 LDA Text64-1,Y STA PF2 ;STA WSYNC DEC $80 BNE DoblePasada2 INY DEX BNE Draw_Picture2 ; LDX #70 ;DibujaCola2 ; STA WSYNC ; DEX ; BNE DibujaCola2 ;////////////// End Of Display //////////////////////////////////////// LDA #%01000010 ; Disable VIA Output STA VBLANK ; 30 scanlines of overscan... LDX #30 Overscan2 STA WSYNC DEX BNE Overscan2 JMP AnimTxt RetTxt JMP Start_Frame0 ; Build Next Frame ; Playfield generated by TIA Playfield Painter ; Mode Used = ASYMMETRICAL ; Playfields generated = PF0, PF1, PF2, PF3, PF4, PF5 ; Datas lines are reversed ; 192 Line(s) saved = 191 - 0 AnimTxt DEC ContAnim BEQ SalTxt JMP SalTxt2 SalTxt LDA <#CeroLin1;LineaMarqueeEx STA $82 LDA >#CeroLin1;LineaMarqueeEx STA $83 JMP Sabnk2;LDA $1FF9 SalTxt2 JMP RetTxt LineaW Linea1pir Cero,Cero,Cero,Cero,Cero,Cero,Cero,Cero,Cero,Cero W12 .byte #%01010000 .byte #%01110000 .byte #%01010000 .byte #%01010000 Text11 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%10000000 .byte #%10100000 .byte #%00100000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text21 .byte #%00000011 .byte #%00000110 .byte #%00000100 .byte #%00001000 .byte #%00000000 .byte #%00010000 .byte #%00110000 .byte #%00000000 .byte #%01100000 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%00100000 .byte #%00100000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000010 .byte #%00000010 .byte #%00000010 .byte #%00000000 .byte #%00000010 .byte #%00000001 .byte #%00000000 Text31 .byte #%00110001 .byte #%01100000 .byte #%01000000 .byte #%10000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000010 .byte #%00000001 .byte #%00000000 Text41 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text51 .byte #%00000000 .byte #%00000000 .byte #%00000100 .byte #%00000000 .byte #%00000110 .byte #%00000011 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text61 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000011 .byte #%00000011 .byte #%00000000 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00010000 .byte #%00011000 .byte #%00010000 .byte #%00000000 Text12 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01000000 .byte #%01000000 .byte #%01010000 .byte #%00000000 .byte #%00010000 .byte #%10110000 .byte #%11010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01110000 .byte #%01000000 .byte #%10000000 .byte #%10000000 .byte #%00000000 .byte #%01000000 .byte #%00000000 .byte #%00110000 .byte #%00010000 .byte #%00000000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%10010000 .byte #%00010000 .byte #%00000000 .byte #%10000000 .byte #%10100000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text22 .byte #%00000000 .byte #%00000000 .byte #%00001011 .byte #%00000111 .byte #%00010111 .byte #%00101000 .byte #%00001000 .byte #%00000111 .byte #%10000101 .byte #%00000110 .byte #%01111000 .byte #%11101000 .byte #%11110000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100110 .byte #%00011000 .byte #%10000000 .byte #%00001000 .byte #%00000100 .byte #%00000000 .byte #%00000100 .byte #%00001001 .byte #%00001101 .byte #%00000110 .byte #%00000000 .byte #%00000010 .byte #%00000000 Text32 .byte #%01000000 .byte #%00000000 .byte #%10111111 .byte #%00111111 .byte #%01111111 .byte #%00000000 .byte #%10000000 .byte #%01111101 .byte #%01111110 .byte #%00111100 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%01011000 .byte #%00111110 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000100 .byte #%00000010 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00001000 .byte #%01000000 .byte #%10001110 .byte #%00010000 .byte #%01000100 .byte #%00000000 Text42 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%00100000 .byte #%00100000 .byte #%10110000 .byte #%01110000 .byte #%11100000 .byte #%00000000 Text52 .byte #%00000000 .byte #%00000100 .byte #%10000000 .byte #%10000000 .byte #%10000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000010 .byte #%01000000 .byte #%01000000 .byte #%00000000 .byte #%01000001 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000111 .byte #%00000010 .byte #%00000010 .byte #%00000000 .byte #%00000010 .byte #%01000000 .byte #%00010001 .byte #%00000000 .byte #%00000000 .byte #%10011000 .byte #%00111000 .byte #%11000100 .byte #%00000000 Text62 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00001100 .byte #%00100000 .byte #%01101000 .byte #%01000000 .byte #%01000000 .byte #%01000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%00110000 .byte #%00100000 .byte #%00010000 .byte #%00001000 .byte #%00001001 .byte #%00000100 .byte #%00000010 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00001010 .byte #%00010000 .byte #%00000100 .byte #%00000100 .byte #%00011000 .byte #%00000101 .byte #%00001000 .byte #%00000001 .byte #%00000011 .byte #%00000100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00001000 .byte #%00000001 .byte #%00010001 .byte #%00000111 .byte #%00000011 .byte #%00000000 .byte #%00000101 .byte #%00000100 .byte #%00000000 Text13 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text23 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000001 .byte #%00000011 .byte #%00000011 .byte #%00000011 .byte #%00001011 .byte #%00000111 .byte #%00000111 .byte #%00000111 .byte #%00001111 .byte #%00001111 .byte #%00001111 .byte #%00000111 .byte #%00000111 .byte #%00000111 .byte #%00000001 .byte #%00000001 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text33 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01111111 .byte #%01001111 .byte #%10000000 .byte #%11000000 .byte #%11000000 .byte #%11000000 .byte #%11100011 .byte #%11111110 .byte #%11000000 .byte #%01000001 .byte #%01000111 .byte #%10111111 .byte #%00111111 .byte #%01111111 .byte #%00000111 .byte #%00000111 .byte #%00000111 .byte #%11000000 .byte #%11000000 .byte #%11100000 .byte #%11100000 .byte #%11000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text43 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%11000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00110000 .byte #%00110000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00110000 .byte #%11110000 .byte #%11110000 .byte #%00110000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%00010000 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text53 .byte #%11000000 .byte #%10000000 .byte #%00000000 .byte #%00000100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11111000 .byte #%01111000 .byte #%01111000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%11000000 .byte #%10000000 .byte #%00000000 .byte #%11000000 .byte #%11000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text63 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00011100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text14 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%00010000 .byte #%00000000 .byte #%01000000 .byte #%01000000 .byte #%11010000 .byte #%01010000 .byte #%01010000 .byte #%11010000 .byte #%11100000 .byte #%11110000 .byte #%01110000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%11100000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%00000000 Text24 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000110 .byte #%00000100 .byte #%00010100 .byte #%00001100 .byte #%00000100 .byte #%00001000 .byte #%00001000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00010000 .byte #%00011000 .byte #%00001000 .byte #%00000000 .byte #%00000010 .byte #%00000110 .byte #%00000011 .byte #%00000000 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%10000000 .byte #%00000000 .byte #%11110000 .byte #%11110000 .byte #%11110000 .byte #%11111000 .byte #%11111100 .byte #%11111100 .byte #%00000000 Text34 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%10000000 .byte #%10000000 .byte #%10000000 .byte #%10000000 .byte #%10110000 .byte #%01100111 .byte #%00100011 .byte #%00000001 .byte #%00100011 .byte #%00011100 .byte #%00000000 .byte #%00111111 .byte #%00111110 .byte #%10111000 .byte #%01000000 .byte #%11000000 .byte #%00000000 .byte #%00111000 .byte #%00011000 .byte #%00001000 .byte #%00101101 .byte #%00101111 .byte #%00000110 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text44 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11110000 .byte #%01110000 .byte #%10110000 .byte #%00110000 .byte #%00010000 .byte #%00100000 .byte #%00000000 .byte #%01000000 .byte #%00110000 .byte #%00110000 .byte #%00000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%11000000 .byte #%11110000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01110000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11100000 .byte #%10100000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text54 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11100000 .byte #%00100000 .byte #%11100000 .byte #%00000000 .byte #%00000000 .byte #%00111000 .byte #%00111000 .byte #%11111000 .byte #%00110100 .byte #%01111100 .byte #%10111100 .byte #%00000000 .byte #%10000000 .byte #%10000000 .byte #%00111100 .byte #%00011100 .byte #%00000000 .byte #%00011000 .byte #%00000000 .byte #%00000000 .byte #%01000000 .byte #%11000000 .byte #%00100000 .byte #%00100000 .byte #%01100000 .byte #%11000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text64 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%01111000 .byte #%01110000 .byte #%01110000 .byte #%01110000 .byte #%01101000 .byte #%01110000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%01110000 .byte #%01110000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%00000000 Cero .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 E4 .byte #%00000110 .byte #%00000101 .byte #%00000011 .byte #%00000111 I1 .byte #%01000000 .byte #%01000000 .byte #%01000000 .byte #%01000000 L1 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%01110000 P1 .byte #%00110000 .byte #%01010000 .byte #%00110000 .byte #%00010000 S3 .byte #%00001110 .byte #%00001100 .byte #%00000010 .byte #%00001110 M3 .byte #%00001010 .byte #%00001110 .byte #%00001010 .byte #%00001010 A4 .byte #%00000010 .byte #%00000101 .byte #%00000111 .byte #%00000101 W1 .byte #%01010000 .byte #%01010000 .byte #%01110000 .byte #%01010000 A2 .byte #%01000000 .byte #%10100000 .byte #%11100000 .byte #%10100000 T4 .byte #%00000111 .byte #%00000010 .byte #%00000010 .byte #%00000010 O1 .byte #%00100000 .byte #%01010000 .byte #%01010000 .byte #%00100000 M2 .byte #%10100000 .byte #%11100000 .byte #%10100000 .byte #%10100000 E3 .byte #%00000110 .byte #%00001010 .byte #%00001100 .byte #%00001110 Inte1 .byte #%00110000 .byte #%01000000 .byte #%00100000 .byte #%00100000 U1 .byte #%01010000 .byte #%01010000 .byte #%01010000 .byte #%00100000 B3 .byte #%00001000 .byte #%00001100 .byte #%00001010 .byte #%00001110 O4 .byte #%00000010 .byte #%00000101 .byte #%00000101 .byte #%00000010 R1 .byte #%01110000 .byte #%01010000 .byte #%00110000 .byte #%01010000 M1 .byte #%01010000 .byte #%01110000 .byte #%01010000 .byte #%01010000 O3 .byte #%00000100 .byte #%00001010 .byte #%00001010 .byte #%00000100 M4 .byte #%00000101 .byte #%00000111 .byte #%00000101 .byte #%00000101 J1 .byte #%01000000 .byte #%01000000 .byte #%01010000 .byte #%01110000 U4 .byte #%00000101 .byte #%00000101 .byte #%00000101 .byte #%00000010 A1 .byte #%00100000 .byte #%01010000 .byte #%01110000 .byte #%01010000 Y2 .byte #%10100000 .byte #%10100000 .byte #%01000000 .byte #%01000000 K3 .byte #%00001010 .byte #%00001100 .byte #%00001010 .byte #%00001010 E1 .byte #%01100000 .byte #%01010000 .byte #%00110000 .byte #%01110000 I3 .byte #%00000100 .byte #%00000100 .byte #%00000100 .byte #%00000100 G3 .byte #%00001110 .byte #%00001000 .byte #%00001010 .byte #%00001110 I4 .byte #%00000010 .byte #%00000010 .byte #%00000010 .byte #%00000010 U3 .byte #%00001010 .byte #%00001010 .byte #%00001010 .byte #%00000100 P4 .byte #%00000011 .byte #%00000101 .byte #%00000011 .byte #%00000001 R3 .byte #%00001110 .byte #%00001010 .byte #%00001100 .byte #%00001010 C4 .byte #%00000110 .byte #%00000001 .byte #%00000001 .byte #%00000110 R4 .byte #%00000111 .byte #%00000101 .byte #%00000011 .byte #%00000101 R2 .byte #%11100000 .byte #%10100000 .byte #%11000000 .byte #%10100000 Y3 .byte #%00001010 .byte #%00001010 .byte #%00000100 .byte #%00000100 E2 .byte #%01100000 .byte #%10100000 .byte #%11000000 .byte #%11100000 F1 .byte #%01110000 .byte #%00010000 .byte #%00110000 .byte #%00010000 L3 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001110 O2 .byte #%01000000 .byte #%10100000 .byte #%10100000 .byte #%01000000 A3 .byte #%00000100 .byte #%00001010 .byte #%00001110 .byte #%00001010 H1 .byte #%01010000 .byte #%01110000 .byte #%01010000 .byte #%01010000 G1 .byte #%01110000 .byte #%00010000 .byte #%01010000 .byte #%01110000 Y4 .byte #%00000101 .byte #%00000101 .byte #%00000010 .byte #%00000010 D4 .byte #%00000011 .byte #%00000101 .byte #%00000101 .byte #%00000011 V1 .byte #%01010000 .byte #%01010000 .byte #%01010000 .byte #%00100000 C3 .byte #%00001110 .byte #%00001000 .byte #%00001000 .byte #%00001110 S1 .byte #%01110000 .byte #%00100000 .byte #%01000000 .byte #%01110000 L2 .byte #%10000000 .byte #%10000000 .byte #%10000000 .byte #%11100000 C1 .byte #%01110000 .byte #%00010000 .byte #%00010000 .byte #%01110000 Z3 .byte #%00001110 .byte #%00000100 .byte #%00001000 .byte #%00001110 C2 .byte #%11100000 .byte #%10000000 .byte #%10000000 .byte #%11100000 Cuatro2 .byte #%10100000 .byte #%10100000 .byte #%11100000 .byte #%00100000 Cinco2 .byte #%01100000 .byte #%01000000 .byte #%00100000 .byte #%11000000 Seis2 .byte #%01100000 .byte #%11000000 .byte #%10100000 .byte #%01000000 Siete2 .byte #%11100000 .byte #%00100000 .byte #%01000000 .byte #%10000000 HolyGrail Linea1pir H1,O2,L3,Y4,Cero,G1,R2,A3,I4,L1 Voodoo Linea1pir V1,O2,O3,D4,O1,O1,Cero,Cero,Cero,Cero Salamanca Linea1pir S1,A2,L3,A4,M1,A1,M2,C3,A4,Cero Cozumel Linea1pir C1,O2,Z3,U4,M1,E1,L2,Cero,Cero,Cero Score1 Linea1pir S1,C2,O3,R4,E1,Cero,Cuatro2,O3,Cero,Cero Score2 Linea1pir S1,C2,O3,R4,E1,Cero,Cinco2,O3,Cero,Cero Score3 Linea1pir S1,C2,O3,R4,E1,Cero,Seis2,O3,Cero,Cero Score4 Linea1pir S1,C2,O3,R4,E1,Cero,Siete2,O3,Cero,Cero ;////////////// Set Vectors /////////////////////////////////////////// ORG $DFFA RORG $FFFA ; Interrupt Vectors .word Reset ; NMI .word Reset ; RESET .word Reset ; IRQ ;///////////////// Start of Code ///////////////////////////////////// SEG ORG $E000 RORG $F000 JMP Sajmp Sabnk LDA $1FF8 NOP NOP NOP NOP JMP Start_Frame Sajmp Reset ; Clear RAM, TIA registers and Set Stack Pointer to #$FF SEI CLD LDX #$FF TXS LDA #0 Clear_Mem STA 0,X DEX BNE Clear_Mem LDA #$00 STA COLUBK ; Set Background to Black ;LDA #15*8 ;STA COLUPF ;LDA #0 LDA #TieneObjeto STA Inventario LDA #2 STA $81 LDA <#Habitacion1 STA PunteroRoom STA PunteroRoomBKP LDA >#Habitacion1 STA PunteroRoom + 1 STA PunteroRoomBKP + 1 ;LDA PunteroRoom ;ADC #4 ;STA PunteroRoom ;LDA <#WELCOME ;;LDY #0 ;;LDA (PunteroRoom),Y ;STA $82 ;LDA >#WELCOME ;;INY ;;LDA (PunteroRoom),Y ;STA $83 ;LDA <#SOMETHING ;;INY ;;LDA (PunteroRoom),Y ;STA $84 ;LDA >#SOMETHING ;;INY ;;LDA (PunteroRoom),Y ;STA $85 LDA <#CeroLin1;LineaMarqueeEx STA $82 LDA >#CeroLin1;LineaMarqueeEx STA $83 LDA <#IslaBack;CeroLine STA $84 LDA >#IslaBack;CeroLine STA $85 ;LineaMarquee W1,E2,L3,C4,O1,M1,E2,Cero, Cero, Cero LDA <#Isla;DibujaHabitacion3;Calle1 STA $88 LDA >#Isla;DibujaHabitacion3;Calle1 STA $89 ;LDA <#Pirata2;Calle2 ;STA $8A ;LDA >#Pirata2;Calle2 ;STA $8B LDA #1 STA AUDC0 LDA #0;10 STA AUDV0 LDA #34;150;146;10 STA $A1 LDA <#Melodia STA $A3 LDA >#Melodia STA $A4 LDA #80 STA $A5 ;LDA <#Nops7 ;STA $A6 ;LDA >#Nops7 ;STA $A7 LDA <#CeroP STA Personaje1 LDA >#CeroP STA Personaje1 + 1 ;LDA #2 ;STA Vueltas ;STA Vueltas1 ;LDA #3 ;STA Vueltas2 LDA #0 STA Vueltas STA Vueltas1 STA Vueltas2 LDA #0;13;14 STA ContaX LDA <#CeroP STA Personaje2 LDA >#CeroP STA Personaje2 + 1 LDA Personaje2 ADC #5 STA Personaje2 LDA #10;255;50 STA ContAnim LDA #18 STA Noparray2 LDA <#Arcos22 STA Backg LDA >#Arcos22 STA Backg + 1 LDA <#Arcos22_2 STA Backg2 LDA >#Arcos22_2 STA Backg2 + 1 LDA #0 STA HMP0 LDA <#ColorP STA Vueltas1 LDA >#ColorP STA Vueltas2 ;/////////////////// Picture Starts Here ///////////////////////////// Start_Frame lda #25 sta T1024T LDA Vueltas BEQ VCero LDA #0 STA Vueltas STA HMP0 JMP VSal VCero LDA #1 STA Vueltas VSal LDY PuntAnim LDA Anim,Y STA SaltAnim INY LDA Anim,Y STA SaltAnim + 1 JMP (SaltAnim) RetornoAnim ;JMP Marquesina RetornoMarq LDA #8 STA COLUPF ; Start VSYNC LDA #2 STA VSYNC STA WSYNC STA WSYNC STA WSYNC ; 3 Scanlines of VSYNC LDA #0 STA VSYNC ; End VSYNC ; 37 Scanlines of Vertical Blank... LDX #37 Vertical_Blank STA WSYNC DEX BNE Vertical_Blank LDA #0 STA VBLANK ; Enable TIA Output ;////////////// Start To Draw Playfield /////////////////////////////// LDX #4 ; Frase 1 empieza mas arriba Tiempo STA WSYNC DEX BNE Tiempo JMP ($82);Frase1 Retorno LDA Cero2 STA PF0 STA PF1 STA PF2 STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC LDA #1 STA CTRLPF JMP ($84);Frase2 Retorno2 JMP CeroPers LDA TogPersonaje BEQ CeroPers LDA RoomP1 CMP RoomP2 BEQ HayPers JMP CeroPers HayPers LDA #0 STA TogPersonaje LDA Personaje2 STA Personaje LDA Personaje2 + 1 STA Personaje + 1 ;LDY Noparray2 ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 ;LDA Vueltas2 ;STA Vueltas JMP CeroPersS CeroPers LDA #1 STA TogPersonaje LDA Personaje1 STA Personaje LDA Personaje1 + 1 STA Personaje + 1 ;LDY Noparray ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 ;LDA Vueltas1 ;STA Vueltas CeroPersS LDA Cero2 STA PF0 STA PF1 STA PF2 LDA #1 STA CTRLPF JMP ($88) Retorno3 LDA #0 STA CTRLPF LDA Cero2 STA PF0 STA PF1 STA PF2 LDA #0 STA GRP0 STA GRP1 LDA $BD BEQ Retorno4 JMP Musica Retorno4 ;LDX #184 LDX #10; 90;50;30;50;90;112 DibujaCola STA WSYNC DEX BNE DibujaCola STA HMOVE LDA SWCHA AND #%00010000 BEQ DecisionNear LDA SWCHA AND #%01000000 BEQ Decision2Near LDA SWCHA AND #%00100000 BEQ Decision3Near LDA SWCHA AND #%10000000 BEQ Decision4Near ;BEQ TogImg LDA INPT4 BMI RetDeci JMP Boton;Decision DecisionNear JMP Decision Decision2Near JMP Decision2 Decision3Near JMP Decision3 Decision4Near JMP Decision4 ;TogImg ; LDA $90 ; CMP #1 ; BEQ Uno ; LDA #1 ; STA $90 ; JMP RetDeci ;Uno ; LDA #0 ; STA $90 RetDeci ;JMP HabiChgS3 LDA ContaX CMP #$9F;14 BEQ BordeIzq CMP #$FD BEQ BordeDer JMP HabiChgS3 BordeIzq LDA #$FD STA ContaX INC RoomP1 INC Puntaje JMP HabiChgS3 BordeDer LDA #$9F STA ContaX DEC RoomP1 INC Puntaje JMP HabiChgS3 LDA ContaX CMP #14 BMI HabiChgS LDA #0 STA ContaX LDA #28 STA Noparray INC RoomP1 JMP HabiChgS3 HabiChgS LDA ContaX CMP #0 BMI HabiChgS2 JMP HabiChgS3 HabiChgS2 LDA #$9F;14 STA ContaX LDA #0 STA Noparray DEC RoomP1 HabiChgS3 LDA ContaY CMP #16 BMI HabiChgS4 LDA #0 STA ContaY LDA <#CeroP STA Personaje1 LDA >#CeroP STA Personaje1 + 1 LDA Personaje1 SBC #10 STA Personaje1 LDA <#ColorP STA Vueltas1 LDA >#ColorP STA Vueltas2 LDA Vueltas1 SBC #10 STA Vueltas1 LDA #0 STA TogCamina ;LDA #0 ;STA ContaY INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC RoomP1 INC Puntaje ;LDA Personaje1 ;SBC #7 ;STA Personaje1 JMP HabiChgS6 HabiChgS4 LDA ContaY CMP #0 BMI HabiChgS5 JMP HabiChgS6 HabiChgS5 LDA #16 STA ContaY LDA <#CeroP STA Personaje1 LDA >#CeroP STA Personaje1 + 1 LDA Personaje1 ADC #10 STA Personaje1 LDA <#ColorP STA Vueltas1 LDA >#ColorP STA Vueltas2 LDA Vueltas1 ADC #11 STA Vueltas1 LDA #0 STA TogCamina ;LDA #7 ;STA ContaY DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 DEC RoomP1 INC Puntaje ;LDA Personaje1 ;ADC #7 ;STA Personaje1 HabiChgS6 ;LDA RoomP1 ;CMP #5 ;BEQ Iglesia ;CMP #10 ;BEQ Altar ;LDA <#Arcos22 ;STA Backg ;LDA >#Arcos22 ;STA Backg + 1 ;JMP IglesiaS ;Iglesia ;LDA <#Arcos23 ;STA Backg ;LDA >#Arcos23 ;STA Backg + 1 ;JMP IglesiaS ;Altar ;LDA <#Arcos21 ;STA Backg ;LDA >#Arcos21 ;STA Backg + 1 ;IglesiaS LDA CXP0FB AND #128 BEQ NoTocoPiso LDA #0 STA ColPir STA CXCLR LDA <#Palanca CMP Backg BEQ MoverPalanca JMP MapaS MoverPalanca LDA <#Palanca2 STA Backg LDA >#Palanca2 STA Backg + 1 LDA <#Arcos_Escaler STA Backg2 LDA >#Arcos_Escaler STA Backg2 + 1 JMP MapaS NoTocoPiso LDA #1 STA ColPir LDA #0 STA CXCLR JMP MapaS LDA <#MapaMundi STA $D0 LDA >#MapaMundi STA $D1 LDY RoomP1 LDA ($D0),Y CMP #0 BEQ MapaCero LDA <#Arcos22 STA Backg LDA >#Arcos22 STA Backg + 1 LDA <#Arcos22_2 STA Backg2 LDA >#Arcos22_2 STA Backg2 + 1 JMP MapaS MapaCero LDA <#Arcos0 STA Backg LDA >#Arcos0 STA Backg + 1 LDA <#Arcos0 STA Backg2 LDA >#Arcos0 STA Backg2 + 1 MapaS ;////////////// End Of Display //////////////////////////////////////// LDA #%01000010 ; Disable VIA Output STA VBLANK ; 30 scanlines of overscan... ; LDX #30 ;Overscan STA WSYNC ; DEX ; BNE Overscan OverscanLoop lda INTIM bne OverscanLoop sta WSYNC ; LDA $90 ; CMP #1 ; BEQ MostraImg JMP Start_Frame ;MostraImg ; JMP Start_Frame0 ; Build Next Frame ; Playfield generated by TIA Playfield Painter ; Mode Used = ASYMMETRICAL ; Playfields generated = PF0, PF1, PF2, PF3, PF4, PF5 ; Datas lines are reversed ; 192 Line(s) saved = 191 - 0 Decision LDA #0 STA SWCHA ;LDA #8 ;STA REFP0 LDA CXP0FB AND #128 BEQ EstaEnElAire ;Si esta en el aire no puede saltar JMP Aire EstaEnElAire JMP Decision5 Aire LDA Inventario CMP #85 BEQ VaIzq JMP VaDer VaIzq LDA #$20 STA HMP0 JMP VaS VaDer LDA #$E0 STA HMP0 VaS LDA #14 STA PuntAnim ;;INC Noparray ;;INC Noparray ;;DEC ContaX ;LDY Noparray ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 ;INC Personaje1 ;INC Vueltas1 ;INC ContaY JMP Decision5 Decision2 LDA #0 STA SWCHA ;LDA #8 STA REFP0 LDA #$20 STA HMP0 LDA #85 ;codigo inventado para saber para donde va STA Inventario ;;INC Noparray ;;INC Noparray INC ContaX;DEC ContaX ;LDY Noparray ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 ;;DEC Personaje1 ;;DEC ContaY JMP Decision5 Decision3 LDA #0 STA SWCHA LDA #0 STA HMP0 LDA #8 STA REFP0 ;;DEC Noparray ;;DEC Noparray ;;INC ContaX ;LDY Noparray ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 DEC Personaje1 DEC Vueltas1 DEC ContaY JMP Decision5 Decision4 LDA #0 STA SWCHA LDA #8;0 STA REFP0 LDA #$E0 STA HMP0 LDA #32 ;codigo inventado para saber para donde va STA Inventario ;;DEC Noparray ;;DEC Noparray DEC ContaX;INC ContaX ;LDY Noparray ;LDA NopsArray,Y ;STA $A6 ;INY ;LDA NopsArray,Y ;STA $A7 ;;INC Personaje1 ;;INC ContaY JMP Decision5 Decision5 ;LDA TogCamina ;BEQ CeroCam ;LDA #0 ;STA TogCamina ;LDA Personaje1 ;SEC;CLC ;SBC #28 ;STA Personaje1 ;JMP CeroCamS CeroCam ;LDA #1 ;STA TogCamina ;LDA Personaje1 ;CLC;SEC ;ADC #28 ;STA Personaje1 CeroCamS ; LDA ContaX ;Necesito cambiar el alto de los pixeles con "Vueltas" porque el personaje a la derecha consume muchos ciclos con los "Nops" ; CMP #8 ; BMI CeroCamS2 ; LDA #2 ; STA Vueltas1 ; JMP CeroCamS3 ;CeroCamS2 ; CMP #3 ; BMI AA ; JMP BB ;AA LDA #4 ; STA Vueltas1 ; JMP CeroCamS3 ;BB LDA #3 ; STA Vueltas1 ;CeroCamS3 JMP RetDeci ; LDA PunteroRoom ; ADC #4 ; STA PunteroRoom ; LDY #8 ; LDA (PunteroRoom),Y ;La condicion, tener algo en el inventario ; AND Inventario ; BEQ Cuatro ; DEC $81 ; BEQ Cuatro ;Vuelta ; LDY #0 ; LDA (PunteroRoom),Y ; STA $82 ; INY ; LDA (PunteroRoom),Y ; STA $83 ; INY ; LDA (PunteroRoom),Y ; STA $84 ; INY ; LDA (PunteroRoom),Y ; STA $85 ; JMP RetDeci ;Cuatro ; LDA #2 ; STA $81 ; LDY #0 ; LDX #0 ; LDA PunteroRoomBKP,Y ; STA PunteroRoom,X ; INY ; INX ; LDA PunteroRoomBKP,Y ; STA PunteroRoom,X ; JMP Vuelta Boton LDA RoomP1 CMP RoomP2 BEQ Sabank JMP Sasabank Sabank LDA #100 STA ContAnim JMP Sabnk;LDA $1FF8 Sasabank ; LDA ControlBoton ; CMP #0 ; BEQ Boton2 ; INC ControlBoton ; CMP #7 ; BEQ ResetBoton ; JMP RetDeci ;Boton2 ; LDY #16 ; LDA <(PunteroRoom),Y ; ORA Inventario ; STA Inventario ; ;LDY #18 ;Carga la melodia ; ;LDA (PunteroRoom),Y ; ;STA $A3 ; ;INY ; ;LDA (PunteroRoom),Y ; ;STA $A4 ; ;LDA #10 ; ;STA AUDV0 ; ;LDA #10 ; ;STA $A1 ; ;LDA #0 ; ;STA DuracionNota ; LDY #10 ;Carga imagen ; LDA (PunteroRoom),Y ; STA $88 ; INY ; LDA (PunteroRoom),Y ; STA $89 ; LDY #24 ; LDX #0 ; LDA (PunteroRoom),Y ; STA Temp,X ; ;STA PunteroRoom,X ; ;STA PunteroRoomBKP,X ; INY ; INX ; LDA (PunteroRoom),Y ; STA Temp,X ; ;STA PunteroRoom,X ; ;STA PunteroRoomBKP,X ; LDX #0 ; LDY #0 ; LDA Temp,Y ; STA PunteroRoom,X ; STA PunteroRoomBKP,X ; INY ; INX ; LDA Temp,Y ; STA PunteroRoom,X ; STA PunteroRoomBKP,X ; INC ControlBoton ; JMP RetDeci;Vuelta;RetDeci ;ResetBoton ; LDA #0 ; STA ControlBoton JMP RetDeci ALIGN 256 MapaMundi .byte 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byte 0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,0 .byte 0,1,0,1,0,1,1,0,0,0,0,0,0,0,1,0 .byte 0,0,0,0,0,1,1,0,0,0,0,0,0,1,1,0 .byte 0,0,1,0,0,1,1,0,0,0,0,0,0,1,1,0 .byte 0,1,1,0,1,1,1,1,0,0,0,0,1,1,1,0 .byte 0,1,1,0,1,1,1,1,1,0,0,1,1,1,1,0 .byte 0,1,1,1,1,1,1,1,1,0,0,0,1,1,1,0 .byte 0,1,1,1,1,1,1,1,1,0,0,0,0,1,0,0 .byte 0,1,0,0,0,0,0,0,0,0,0,1,0,1,0,1 .byte 0,1,1,0,1,0,0,1,1,0,0,1,0,1,0,1 .byte 0,1,0,0,1,0,1,1,1,0,0,1,1,1,1,1 .byte 0,1,1,0,1,1,1,0,0,0,0,1,1,1,1,1 .byte 0,1,1,1,1,1,1,0,0,0,0,1,1,1,1,1 .byte 0,1,1,1,0,0,0,0,1,1,0,0,0,0,1,1 .byte 0,1,1,1,1,1,1,0,1,0,0,0,1,1,1,1 Cero2 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 E22 .byte #%00000111 .byte #%00000110 .byte #%00000101 .byte #%00000011 L12 .byte #%01110000 .byte #%01000000 .byte #%01000000 .byte #%01000000 W14 .byte #%01010000 .byte #%01110000 .byte #%01010000 .byte #%01010000 C22 .byte #%00000011 .byte #%00000100 .byte #%00000100 .byte #%00000011 O12 .byte #%00100000 .byte #%01010000 .byte #%01010000 .byte #%00100000 M22 .byte #%00000101 .byte #%00000101 .byte #%00000111 .byte #%00000101 E12 .byte #%01110000 .byte #%01100000 .byte #%01010000 .byte #%00110000 S12 .byte #%01110000 .byte #%00100000 .byte #%01000000 .byte #%01110000 T12 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%01110000 G12 .byte #%01110000 .byte #%01010000 .byte #%01000000 .byte #%01110000 I12 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 O22 .byte #%00000010 .byte #%00000101 .byte #%00000101 .byte #%00000010 M12 .byte #%01010000 .byte #%01010000 .byte #%01110000 .byte #%01010000 F12 .byte #%01000000 .byte #%01100000 .byte #%01000000 .byte #%01110000 A12 .byte #%01010000 .byte #%01110000 .byte #%01010000 .byte #%00100000 U22 .byte #%00000010 .byte #%00000101 .byte #%00000101 .byte #%00000101 W22 .byte #%00000101 .byte #%00000111 .byte #%00000101 .byte #%00000101 P22 .byte #%00000100 .byte #%00000110 .byte #%00000101 .byte #%00000110 P12 .byte #%01000000 .byte #%01100000 .byte #%01010000 .byte #%01100000 A22 .byte #%00000101 .byte #%00000111 .byte #%00000101 .byte #%00000010 D22 .byte #%00000110 .byte #%00000101 .byte #%00000101 .byte #%00000110 I22 .byte #%00000010 .byte #%00000010 .byte #%00000010 .byte #%00000010 T22 .byte #%00000010 .byte #%00000010 .byte #%00000010 .byte #%00000111 U12 .byte #%00100000 .byte #%01010000 .byte #%01010000 .byte #%01010000 B12 .byte #%01100000 .byte #%01010000 .byte #%01100000 .byte #%01000000 R12 .byte #%01010000 .byte #%01100000 .byte #%01010000 .byte #%01100000 J12 .byte #%01100000 .byte #%00010000 .byte #%00010000 .byte #%00010000 L22 .byte #%00000111 .byte #%00000100 .byte #%00000100 .byte #%00000100 S22 .byte #%00000111 .byte #%00000010 .byte #%00000100 .byte #%00000111 Y12 .byte #%00100000 .byte #%00100000 .byte #%01010000 .byte #%01010000 D .byte #%00110000 .byte #%01010000 .byte #%01010000 .byte #%00110000 A .byte #%00000010 .byte #%00000101 .byte #%00000111 .byte #%00000101 Y .byte #%01010000 .byte #%01010000 .byte #%00100000 .byte #%00100000 One .byte #%00010000 .byte #%00011000 .byte #%00010000 .byte #%00010000 CeroLin1 Linea1 Cero2,Cero2,Cero2,Cero2 CeroLine Linea2 Cero2,Cero2,Cero2,Cero2 ;Linea2 D,A,Y,One ; ALIGN 256 Habitacion1 ; .word WELCOME ; .word SOMETHING ; .word AWFUL ; .word HAPPENED ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word Habitacion1 ; .word Habitacion1 ; .word Habitacion2 ; .word Habitacion2 ;Habitacion2 ; .word FINDOUT ; .word BEFORE ; .word JOHNCROMW ; .word ELLCOMES ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word Habitacion2 ; .word Habitacion2 ; .word RoomOne ; .word RoomOne ;RoomOne ; .word ROOMONE ; .word CeroLine ; .word ROOMONE ; .word CeroLine ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word RoomTwo ; .word RoomTwo ; .word RoomTwo ; .word RoomTwo ;RoomTwo ; .word ROOMTWO ; .word CeroLine ; .word GOTODOOR ; .word CeroLine ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #Isla ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word #TieneObjeto ; .word RoomTwo ; .word RoomTwo ; .word RoomTwo ; .word RoomTwo ALIGN 256 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Arcos21 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Palanca .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%01111100 .byte #%01000100 .byte #%00000000 .byte #%00000000 Arcos22 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11111111 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Arcos22_2 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11111111 .byte #%00000000 .byte #%00000000 Arcos23 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Palanca2 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%01000100 .byte #%01111100 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11111111 .byte #%00000000 .byte #%00000000 ALIGN 256 ;--------------------- .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11111000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%11111111 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 Arcos_Escaler .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%00100000 .byte #%11111111 .byte #%00000000 .byte #%00000000 Arcos0 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 .byte #%11111111 Muelle .byte #%00000000 .byte #%10000000 .byte #%11000000 .byte #%11100000 .byte #%11110000 .byte #%11111000 .byte #%11110000 .byte #%10010000 .byte #%10010000 .byte #%11110000 .byte #%11110101 .byte #%11111111 .byte #%11111111 .byte #%11010101 .byte #%11010101 .byte #%11010101 .byte #%11010101 .byte #%11010101 Muelle2 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%11010101 .byte #%11111111 .byte #%11111111 .byte #%11010101 .byte #%11010101 .byte #%11010101 .byte #%11010101 .byte #%11010101 MuelleC .byte #Azul .byte #Azul + 1 .byte #Azul + 2 .byte #Azul + 3 .byte #Azul + 4 .byte #Verde .byte #Azul + 5 .byte #Naranja .byte #Naranja + 1 .byte #Azul + 6 .byte #Azul + 7 .byte #Azul + 8 .byte #Azul + 9 .byte #Azul + 10 .byte #Azul .byte #Azul + 1 .byte #Azul + 2 .byte #Azul + 3 MuelleC2 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #0 .byte #Gris .byte #Gris Cleric .byte #%00000000 .byte #%11000000 .byte #%11110000 .byte #%11111100 .byte #%11111100 .byte #%11111100 .byte #%11111000 .byte #%11111000 .byte #%11111000 .byte #%11111000 .byte #%10010100 .byte #%01010100 .byte #%00110100 .byte #%10011000 .byte #%00010000 .byte #%11010000 .byte #%00010000 .byte #%11110000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 CeroP .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%00010000 .byte #%00011100 .byte #%00011000 .byte #%00100100 .byte #%01011010 .byte #%01011010 .byte #%00011010 .byte #%00100100 .byte #%00100100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 CeroP2 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00100000 .byte #%00010000 .byte #%00011100 .byte #%00011000 .byte #%00100100 .byte #%00111100 .byte #%00111100 .byte #%00011000 .byte #%00011000 .byte #%00011000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 ColorP .byte #Naranja; %00000000 .byte #Naranja; %00000000 .byte #Naranja; %00000000 .byte #Naranja; %00000000 .byte #Naranja; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #255; %00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 ;include "imagen4.txt" ;include "calle.btm" ;include "pirata.btm" Linea LDX #4 ; 192 Scanlines to Display LDY #0 Draw_Picture LDA #8 STA $80 DoblePasada STA WSYNC LDA ($92),Y STA PF0 LDA Cero2,Y STA PF1 LDA ($94),Y STA PF2 SLEEP 4 LDA ($96),Y STA PF0 LDA Cero2,Y STA PF1 LDA ($98),Y STA PF2 DEC $80 BNE DoblePasada INY DEX BNE Draw_Picture RTS Anim .word #Anim1 .word #Anim2 .word #Anim3 .word #Anim4 .word #Anim5 .word #Anim6 .word #Anim7 .word #Anim8 .word #Anim9 .word #Anim10 .word #Anim11 .word #Anim12 .word #Anim13 .word #Anim14 .word #Anim15 Anim1 LDA #215 STA COLUP0 STA COLUP1 ;LDA #6 ;STA RoomP2 LDA #$40 STA HMP1 LDA <#Text1 STA Personaje1 LDA >#Text1 STA Personaje1 + 1 DEC ContAnim BEQ SumarAnim JMP RetornoAnim SumarAnim LDA <#Text2 STA Personaje1 LDA >#Text2 STA Personaje1 + 1 LDA #0 STA HMP1 INC PuntAnim INC PuntAnim LDA #5; 10 ;255;50 STA ContAnim JMP RetornoAnim Anim2 DEC ContAnim BEQ SumarAnim2 JMP RetornoAnim SumarAnim2 LDA <#Text3 STA Personaje1 LDA >#Text3 STA Personaje1 + 1 LDA #5; 10 ;255;50 STA ContAnim STA WSYNC ;para evitar el gris por lineas impares STA WSYNC INC PuntAnim INC PuntAnim JMP RetornoAnim Anim3 ;LDA #0 ;STA COLUBK ;JMP Start_Frame0 DEC ContAnim BEQ SumarAnim3 JMP RetornoAnim SumarAnim3 LDA <#Text4 STA Personaje1 LDA >#Text4 STA Personaje1 + 1 LDA #5; 10 ;255;50 STA ContAnim STA WSYNC STA WSYNC CLC LDA Backg ADC ColPir STA Backg LDA Backg2 ADC ColPir STA Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim4 DEC ContAnim BEQ SumarAnim4 JMP RetornoAnim SumarAnim4 LDA <#Text5 STA Personaje1 LDA >#Text5 STA Personaje1 + 1 LDA #5; 10 STA ContAnim STA WSYNC STA WSYNC CLC LDA Backg ADC ColPir STA Backg LDA Backg2 ADC ColPir STA Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim5 DEC ContAnim BEQ SumarAnim5 JMP RetornoAnim SumarAnim5 LDA <#Text6 STA Personaje1 LDA >#Text6 STA Personaje1 + 1 LDA #5; 10 STA ContAnim STA WSYNC STA WSYNC CLC LDA Backg ADC ColPir STA Backg LDA Backg2 ADC ColPir STA Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim6 DEC ContAnim BEQ SumarAnim6 JMP RetornoAnim SumarAnim6 LDA <#Text7 STA Personaje1 LDA >#Text7 STA Personaje1 + 1 LDA #5; 10 STA ContAnim STA WSYNC STA WSYNC CLC LDA Backg ADC ColPir STA Backg LDA Backg2 ADC ColPir STA Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim7 DEC ContAnim BEQ SumarAnim7 JMP RetornoAnim SumarAnim7 LDA #4 STA PuntAnim LDA #1 STA ContAnim STA WSYNC STA WSYNC CLC LDA Backg ADC ColPir STA Backg LDA Backg2 ADC ColPir STA Backg2 JMP RetornoAnim Anim8 LDA <#Tex1 STA Personaje1 LDA >#Tex1 STA Personaje1 + 1 STA WSYNC STA WSYNC DEC Backg DEC Backg2 DEC ContAnim BEQ SumarAnim8 JMP RetornoAnim SumarAnim8 LDA <#Tex2 STA Personaje1 LDA >#Tex2 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim9 DEC ContAnim BEQ SumarAnim9 JMP RetornoAnim SumarAnim9 LDA <#Tex3 STA Personaje1 LDA >#Tex3 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim10 DEC ContAnim BEQ SumarAnim10 JMP RetornoAnim SumarAnim10 LDA <#Tex4 STA Personaje1 LDA >#Tex4 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim11 DEC ContAnim BEQ SumarAnim11 JMP RetornoAnim SumarAnim11 LDA <#Tex5 STA Personaje1 LDA >#Tex5 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim12 DEC ContAnim BEQ SumarAnim12 JMP RetornoAnim SumarAnim12 LDA <#Tex6 STA Personaje1 LDA >#Tex6 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim13 DEC ContAnim BEQ SumarAnim13 JMP RetornoAnim SumarAnim13 LDA <#Tex7 STA Personaje1 LDA >#Tex7 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim14 DEC ContAnim BEQ SumarAnim14 JMP RetornoAnim SumarAnim14 LDA <#Tex8 STA Personaje1 LDA >#Tex8 STA Personaje1 + 1 LDA #5 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 INC PuntAnim INC PuntAnim JMP RetornoAnim Anim15 DEC ContAnim BEQ SumarAnim15 JMP RetornoAnim SumarAnim15 LDA #4 STA PuntAnim LDA #1 STA ContAnim STA WSYNC STA WSYNC DEC Backg DEC Backg2 JMP RetornoAnim Isla ;DibujaHabitacion4 ;Carpa LDX #18 ;10 ; 192 Scanlines to Display LDY #0 LDA $BE BEQ Isla2 LDA #0 STA $90 LDA #Naranja STA $A0 JMP Draw_PictureW2 Isla2 LDA #0;Verde;#Celeste ;SBC #13 ;LDA #219 STA $90 LDA #Naranja;Celeste;#Verde ;SBC #11 ;LDA #215 ;LDA #0 STA $A0 Draw_PictureW2 LDA #2; 4;Vueltas;#4 STA $80 ;LDA $90 ;ADC #1 ;STA $90 ;;INC $90 ;;INC $A0 DoblePasadaW2 ;STX COLUPF LDA $A0 STA COLUPF LDA $90 STA COLUBK STA WSYNC LDA #0;Arcos12,Y STA PF0 LDA (Backg),Y ;Arcos22,Y STA PF1 LDA (Backg2),Y;#0;Arcos22,Y STA PF2 ;JMP ($A6) ;Nops NoOper ; LDA TogPersonaje ; BEQ CePers ; JMP HaPers CePers ; LDA (Vueltas1),Y ; STA COLUP1 ; LDA (Personaje),Y ; STA GRP1 ; JMP SaPers HaPers LDA (Vueltas1),Y STA COLUP0 LDA (Personaje),Y STA GRP0 SaPers ;STA RESP0 DEC $80 BNE DoblePasadaW2 INY DEX BNE Draw_PictureW2 JMP Retorno3 IslaBack LDX #18 ;10 ; 192 Scanlines to Display LDY #0 Draw_PictureW22 LDA #4;Vueltas;#4 STA $80 LDA MuelleC,Y STA COLUBK LDA MuelleC2,Y STA COLUPF STA WSYNC LDA #0;Arcos12,Y STA PF0 LDA Muelle,Y ;Arcos22,Y STA PF1 LDA Muelle2,Y;#0;Arcos22,Y STA PF2 INY DEX BNE Draw_PictureW22 JMP Retorno2 PuertaCerrada .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 .byte #%00010000 ; LDX #8 ; 192 Scanlines to Display ; LDA #Verde ; SBC #10 ; STA $A0 ;Draw_PictureW_Verde ; LDA #4 ; STA $80 ; LDA $90 ; ADC #1 ; STA $90 ; ;INC $90 ; INC $A0 ;DoblePasadaW_Verde ; ;STX COLUPF ; LDA $A0 ; STA COLUPF ; LDA $90 ; STA COLUBK ; STA WSYNC ; LDA Arcos12,Y ; NOP ;Si este nop lo pongo dos lineas mas arriba no funciona el juego paso de habitacion y se queda esperando, el puntanim de 6 vuelve a 2 y el roomp2 se pone en cero ??????? ; STA PF0 ; LDA Arcos22,Y ; STA PF1 ; LDA Arcos32,Y ; STA PF2 ; DEC $80 ; BNE DoblePasadaW_Verde ; INY ; DEX ; BNE Draw_PictureW_Verde ; ; JMP Retorno3 Musica LDA DuracionNota BEQ ResetNota DEC DuracionNota JMP RetornarA4 ResetNota LDA #20 STA DuracionNota LDA $A1 ;CMP #0 BEQ RetornarA4 LDY $A1 LDA ($A3),Y BEQ Volumen STA AUDF0 DEC $A1 DEC DuracionNota RetornarA4 JMP Retorno4 Volumen ;LDA #0 ;STA AUDV0 LDA #34;150 STA $A1 LDY $A1 LDA ($A3),Y STA AUDF0 DEC $A1 JMP Retorno4 Melodia .byte #0 .byte #0 .byte E_2 .byte D_2 .byte E_2 .byte F_2 .byte D_2 .byte C_2 .byte D_2;B_2 .byte C_2 .byte E_2 .byte D_2 .byte E_2 .byte F_2 .byte G_2 .byte A_2 .byte G_2 .byte F_2 .byte E_2 .byte D_2 .byte C_2 .byte E_2 .byte G_2 .byte C_3 .byte B_2 .byte C_3 .byte G_2 .byte G_2 .byte A_2 .byte F_2 .byte F_2 .byte G_2 .byte E_2 .byte D_2 .byte C_2 LineaMarqueeEx LDY #0 LDX #4 Pri LDA #8 STA $80 DoblePas STA WSYNC LDA $D9,Y STA PF0 LDA $DE,Y STA PF1 LDA $E4,Y STA PF2 SLEEP 6 LDA $E9,Y STA PF0 LDA $EE,Y STA PF1 LDA $F4,Y STA PF2 DEC $80 BNE DoblePas INY DEX BEQ Sale JMP Pri Sale JMP Retorno Marquesina DEC $F9 BMI Marq JMP RetornoMarq Marq LDA #5 STA $F9 ROL $D4 ROL $CE ROL $C9 ROL $C4 ROL $BF ROR $F4 ROL $EE ROR $E9 LDA $E9 AND #8 BEQ NoCarry CLC ROR $E4 ROL $DE ROR $D9 LDA $E4 ORA #128 STA $E4 JMP Dos NoCarry CLC ROR $E4 ROL $DE ROR $D9 ;JMP RetornoMarq Dos CLC ROL $D5 ROL $CF ROL $CA ROL $C5 ROL $C0 ROR $F5 ROL $EF ROR $EA LDA $EA AND #8 BEQ NoCarry2 CLC ROR $E5 ROL $DF ROR $DA LDA $E5 ORA #128 STA $E5 JMP Tres NoCarry2 CLC ROR $E5 ROL $DF ROR $DA ;JMP RetornoMarq Tres CLC ROL $D6 ROL $D0 ROL $CB ROL $C6 ROL $C1 ROR $F6 ROL $F0 ROR $EB LDA $EB AND #8 BEQ NoCarry3 CLC ROR $E6 ROL $E0 ROR $DB LDA $E6 ORA #128 STA $E6 JMP Cuatro NoCarry3 CLC ROR $E6 ROL $E0 ROR $DB ;JMP RetornoMarq Cuatro CLC ROL $D7 ROL $D1 ROL $CC ROL $C7 ROL $C2 ROR $F7 ROL $F1 ROR $EC LDA $EC AND #8 BEQ NoCarry4 CLC ROR $E7 ROL $E1 ROR $DC LDA $E7 ORA #128 STA $E7 JMP RetornoMarq NoCarry4 CLC ROR $E7 ROL $E1 ROR $DC JMP RetornoMarq Text1 .byte #%00000000 .byte #%00110000 .byte #%00110000 .byte #%00110000 .byte #%00001000 .byte #%00001000 .byte #%00001000 .byte #%00010100 .byte #%00001100 .byte #%00010100 .byte #%00010100 .byte #%00000010 .byte #%00001001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text2 .byte #%00000000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%00110000 .byte #%00001000 .byte #%01110000 .byte #%00001000 .byte #%00111000 .byte #%01101100 .byte #%01100110 .byte #%00100011 .byte #%00100001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text3 .byte #%00000000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%00110000 .byte #%00010000 .byte #%00010000 .byte #%00100000 .byte #%00111000 .byte #%00101000 .byte #%00101111 .byte #%00100001 .byte #%00100000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text4 .byte #%00000000 .byte #%01000000 .byte #%01100000 .byte #%01100000 .byte #%00100000 .byte #%00100000 .byte #%11010000 .byte #%00110000 .byte #%00110000 .byte #%01110000 .byte #%00111000 .byte #%00010100 .byte #%00001000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text5 .byte #%00000000 .byte #%01000000 .byte #%01100000 .byte #%01100000 .byte #%00100000 .byte #%00010000 .byte #%11101000 .byte #%00101000 .byte #%00010000 .byte #%00110000 .byte #%01101000 .byte #%01100100 .byte #%00100010 .byte #%00100010 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text6 .byte #%00000000 .byte #%01100000 .byte #%01100000 .byte #%01100000 .byte #%00010000 .byte #%01001000 .byte #%01010000 .byte #%00001000 .byte #%00011000 .byte #%00101000 .byte #%00101111 .byte #%00010001 .byte #%00010000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Text7 .byte #%00000000 .byte #%00000000 .byte #%01100000 .byte #%01100000 .byte #%00100000 .byte #%00010000 .byte #%01110000 .byte #%01010000 .byte #%00010000 .byte #%00110000 .byte #%00111110 .byte #%00010010 .byte #%00011000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex1 .byte #%00000000 .byte #%00000000 .byte #%00110000 .byte #%00110000 .byte #%00001100 .byte #%00011111 .byte #%00011101 .byte #%01100100 .byte #%00011000 .byte #%00011110 .byte #%00001010 .byte #%00000100 .byte #%00000110 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex2 .byte #%00000000 .byte #%00000000 .byte #%00110000 .byte #%00110110 .byte #%10001001 .byte #%01111000 .byte #%00011000 .byte #%00111100 .byte #%01111100 .byte #%01101100 .byte #%00100100 .byte #%00100111 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex3 .byte #%00110000 .byte #%00110000 .byte #%10000000 .byte #%01110000 .byte #%00011000 .byte #%00011100 .byte #%01110000 .byte #%01001100 .byte #%00101100 .byte #%01100100 .byte #%00000010 .byte #%00000011 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex4 .byte #%00000000 .byte #%00000000 .byte #%10100000 .byte #%01110000 .byte #%00110000 .byte #%00011000 .byte #%00011000 .byte #%00111000 .byte #%01011000 .byte #%10001100 .byte #%10000110 .byte #%00000011 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex5 .byte #%00000000 .byte #%01111000 .byte #%01111000 .byte #%00101100 .byte #%00001100 .byte #%01111100 .byte #%10001100 .byte #%00000010 .byte #%00000001 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex6 .byte #%00000000 .byte #%01111000 .byte #%01101100 .byte #%00001010 .byte #%00011001 .byte #%01111000 .byte #%10011111 .byte #%00001100 .byte #%00000100 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex7 .byte #%00000000 .byte #%01111000 .byte #%01101110 .byte #%00001011 .byte #%00001000 .byte #%00011000 .byte #%01110110 .byte #%01111010 .byte #%01011000 .byte #%10000000 .byte #%10000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 Tex8 .byte #%00000000 .byte #%00000000 .byte #%01100000 .byte #%01110000 .byte #%00001100 .byte #%00001010 .byte #%00001101 .byte #%00111000 .byte #%00110000 .byte #%00010000 .byte #%00001000 .byte #%00011000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 .byte #%00000000 ;////////////// Set Vectors /////////////////////////////////////////// ORG $EFFA RORG $FFFA ; Interrupt Vectors .word Reset ; NMI .word Reset ; RESET .word Reset ; IRQ ;END END