processor 6502 include "vcs.h" include "macro.h" 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 Scor = $C6 Digi1 = $C8 Digi2 = $CA Digi3 = $CC Digi4 = $CE Vueltas3 = $F1 Vueltas4 = $F2 Puntaje = $F3 Backg = $FA Backg2 = $FC CaeCabz = Noparray2 ColorBK = Noparray YardCastle = PunteroRoom YardCastle2 = PunteroRoomBKP Delay = Vueltas3 Curvit = $D4 Curvit2 = $D5 Curvit3 = $D6 Curvit4 = $D7 Curvit5 = $D8 Curvit6 = $D9 Curvit7 = $DA Curvit8 = $DB Velo = $FE;FD;CaeCabz Motor = $DC Motor2 = $DD Motor3 = $DE Motor4 = $DF 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 Amanecer = 8 Bicmaps = Curvit ;///////////////// Start of Code ///////////////////////////////////// SEG org $1000 rORG $F000 JMP Sajmp Sabnk LDA $081F;1FF8 NOP NOP NOP NOP JMP Star;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 ;jmp Star_ lda <#PunteroRoomF ;sta PunteroRoom lda >#PunteroRoomF ;sta PunteroRoom + 1 jsr Mover_Fondo ; ldy #0 ; ldx #0 Llen ; lda (PunteroRoom),Y ; sta ColPir,X ; inx ; iny ; cpy #12 ; bne Llen Star sta WSYNC ldx #36;49;47;60 setP1 nop dex bne setP1 sta RESP0 lda #$30 sta HMP0 sta WSYNC sta HMOVE sta WSYNC ldx #49;50;47;20;30;Scor;#192;Scor;112 dobl nop dex bne dobl sta RESP1;RESM1;RESP1 lda #$A0;80 sta HMP1 sta WSYNC sta HMOVE ldx #30 dobl2 nop dex bne dobl2 sta RESBL lda #7 sta NUSIZ0 sta NUSIZ1 lda #6;5;1 ;sta RoomP1 lda #%00000001 sta Bicmaps lda #%00100010 sta Bicmaps + 1 lda #%00000011 sta Bicmaps + 2 lda #%00100100 sta Bicmaps + 3 lda #%00000101 sta Bicmaps + 4 lda #%00100110 sta Bicmaps + 5 ;lda <#Bitmag ;sta PunteroRoom ;lda >#Bitmag ;sta PunteroRoom + 1 lda #0 sta Noparray lda #63 sta Digi2 ldy #63 Llenar tya ror eor Digi1 ;#%00000000 and Digi2 ;#%00010000 beq Sig tya ror eor Digi3 ;#%00000100 and Digi4 ;#%00000100 sta $80,Y Sig dey bne Llenar lda Digi1 + 1 beq Sale ldy #63 Llenar2 lda $80,Y ;and Digi4 + 1 ;beq sig cpy Digi2 + 1 beq Sonid sig lda #0 cmp $80,Y bmi HayTraba lda #63 sta $80,Y jmp HayTraba Sonid lda #0 cmp $80,Y bmi HayTraba lda #1 sta AUDV0 lda #10 sta AUDC0 lda #63 sta $80,Y Sonids HayTraba dey bne Llenar2 lda #0 sta Digi1 + 1 jmp Sale2 Sale lda #1 sta Digi1 + 1 lda #0 sec sbc Digi2 + 1 ror and #%00111111 sta Digi3 + 1 ;lda Digi2 + 1 ;toco el interruptor de agua violeta? cmp Digi4 beq Encontr jmp Encos Encontr lda Digi4 + 1 and #%00111111 sta Digi2 + 1 lda #0 sta Digi4 + 1 sta Digi4 Encos Sale2 ;/////////////////////////////////////////////////// Start_Frame ;SLEEP 42 lda #229;19 ;esto si hay algo en el Anim2 va 24, si solo hay un jmp retornoanim va 25, porque se hacen lineas impares y eso hace que se ponga todo en blanco y negro sta TIM64T ;T1024T 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_BlankD STA WSYNC DEX BNE Vertical_BlankD LDA #0 STA VBLANK ; Enable TIA Output ;////////////// Start To Draw Playfield /////////////////////////////// LDX #4 ; Frase 1 empieza mas arriba TiempoD STA WSYNC DEX BNE TiempoD ; JMP ($82);Frase1 RetornoD LDA #0;Cero2 STA PF0 STA PF1 STA PF2 STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC LDA #5;1 STA CTRLPF ; JMP ($84);Frase2 Retorno2D LDA #0 ;Cero2 STA PF0 STA PF1 STA PF2 sta GRP0 sta GRP1 ;JMP ($88) lda #0 sta COLUBK sta COLUPF lda #Azul+8;0;Gris sta COLUP0 lda #Gris;Azul sta COLUP1 lda #255 sta PF1 sta PF0 lda #0 sta Noparray ldx #0 ldy #64;128;64;190;170;19;20;40;20 Loopy ;sta WSYNC sta WSYNC lda #Azul + 8 sta COLUP0 cpy Digi2 + 1 beq key ;cpy Digi4 + 1 tya and Digi4 + 1 beq keys ;jmp keys key lda #Rojo sta COLUP0 keys tya ;lda Puntaje,Y ;Colir,Y ;txa sta PF2;GRP0 sta PF1 ;sta 255 ;lda $80,X ;sta GRP0 sta COLUBK lda $80,Y ;lda #63 sta GRP0 inx dey bne LoopyN ;sta WSYNC jmp LoopyS LoopyN jmp Loopy LoopyS ldx #0 ldy #63;128;64;190;170;19;20;40;20 LoopyII ;sta WSYNC sta WSYNC ;jmp keys2 lda #Azul + 8 sta COLUP0 cpx Digi2 + 1 beq key2 ;cpx Digi4 + 1 txa and Digi4 + 1 beq keys2 ;jmp keys2 key2 lda #Rojo sta COLUP0 keys2 ;tya ;lda Puntaje,Y ;Colir,Y txa sta PF2;GRP0 sta PF1 ;sta 255 ;lda $80,X ;sta GRP0 sta COLUBK lda $80,X ;lda #63 sta GRP0 inx dey bne LoopyNII ;sta WSYNC jmp LoopySII LoopyNII jmp LoopyII LoopySII LDA #0;255;0 ;Cero2 STA PF0 STA PF1 STA PF2 sta GRP0 sta GRP1 LDX #1;17;9;18;40;90;50;30;50;90;112 DibujaColaD STA WSYNC DEX BNE DibujaColaD lda #0 sta COLUP0 lda Digi1 sta GRP0 STA WSYNC STA WSYNC STA WSYNC lda Digi2 sta GRP0 STA WSYNC STA WSYNC STA WSYNC lda Digi3 sta GRP0 STA WSYNC STA WSYNC STA WSYNC lda Digi4 sta GRP0 STA WSYNC STA WSYNC STA WSYNC lda #0 sta GRP0 ; sta HMOVE lda Delay beq DeciD dec Delay jmp RetDeciD DeciD LDA SWCHA AND #%00010000 BEQ DecisionNearD LDA SWCHA AND #%01000000 BEQ Decision2NearD LDA SWCHA AND #%00100000 BEQ Decision3NearD LDA SWCHA AND #%10000000 BEQ Decision4NearD ;BEQ TogImg LDA INPT4 BMI RetDeciD JMP Boton;Decision DecisionNearD lda Delay beq Act jmp RetDeciD Act inc Digi1 lda #5 sta Delay jmp RetDeciD ;inc RoomP1 ; JMP Decision Decision2NearD lda Delay beq Act2 jmp RetDeciD Act2 inc Digi2 lda #5 sta Delay jmp RetDeciD ;dec Noparray2;PunteroRoom;nada ;dec Noparray2;PunteroRoom;nada lda #1 sta TogCamina jsr Mover_Fondo jmp RetDeciD ; JMP Decision2 Decision3NearD lda Delay beq Act3 jmp RetDeciD Act3 inc Digi3 lda #5 sta Delay jmp RetDeciD ; JMP Decision3 Decision4NearD lda Delay beq Act4 jmp RetDeciD Act4 lda #1 sta AUDV0 lda #0 sta AUDC0 inc Digi4 lda #5 sta Delay jmp RetDeciD ; JMP Decision4 inc Noparray2;incPunteroRoom;noHaceNada inc Noparray2;incPunteroRoom;noHaceNada jsr Mover_Fondo RetDeciD inc Puntaje ;////////////// End Of Display //////////////////////////////////////// LDA #%01000010 ; Disable VIA Output STA VBLANK ; 30 scanlines of overscan... ; LDX #30 ;Overscan STA WSYNC ; DEX ; BNE Overscan OverscanLoopD lda INTIM bne OverscanLoopD lda #65 sta TIM64T overscan2 lda INTIM bne overscan2 sta WSYNC JMP Start_Frame ;jmp Star_ Boton lda #5 sta Delay lda Digi2 + 1 beq Rand jmp Rands Rand lda Puntaje sta Digi2 + 1 sta Digi3 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 ror Digi3 + 1 rol Digi4 + 1 Rands ldy #63 Borragua lda #0 sta $80,Y dey bne Borragua ldy #63 jmp Llenar ;inc RoomP1 jmp RetDeciD Mover_Fondo ldy #0 ldx #0 Llen2 lda (PunteroRoom),Y sta ColPir,X inx iny cpy #12 bne Llen2 rts Star_ sta WSYNC ldx #49;47;60 setP1_ nop dex bne setP1_ sta RESP0 lda #$D0 sta HMP0 sta WSYNC sta HMOVE sta WSYNC ldx #49;48;49;50;47;20;30;Scor;#192;Scor;112 dobl_ nop dex bne dobl_ sta RESP1;RESM1;RESP1 lda #$20 sta HMP1 sta WSYNC sta HMOVE ldx #30 dobl2_ nop dex bne dobl2_ sta RESBL lda #3 sta NUSIZ0 sta NUSIZ1 lda #6;5;1 ;sta RoomP1 lda #%00000001 sta Bicmaps lda #%00100010 sta Bicmaps + 1 lda #%00000011 sta Bicmaps + 2 lda #%00100100 sta Bicmaps + 3 lda #%00000101 sta Bicmaps + 4 lda #%00100110 sta Bicmaps + 5 lda #0 sta Noparray ;/////////////////////////////////////////////////// Start_Frame_ ;SLEEP 42 lda #229;19 ;esto si hay algo en el Anim2 va 24, si solo hay un jmp retornoanim va 25, porque se hacen lineas impares y eso hace que se ponga todo en blanco y negro sta TIM64T ;T1024T 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_BlankD_ STA WSYNC DEX BNE Vertical_BlankD_ LDA #0 STA VBLANK ; Enable TIA Output ;////////////// Start To Draw Playfield /////////////////////////////// LDX #4 ; Frase 1 empieza mas arriba TiempoD_ STA WSYNC DEX BNE TiempoD_ ; JMP ($82);Frase1 RetornoD_ LDA #0;Cero2 STA PF0 STA PF1 STA PF2 STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC STA WSYNC LDA #5;1 STA CTRLPF ; JMP ($84);Frase2 Retorno2D_ LDA #0 ;Cero2 STA PF0 STA PF1 STA PF2 sta GRP0 sta GRP1 ;JMP ($88) lda #0 sta COLUBK sta COLUPF lda #Gris sta COLUP0 lda #Gris;Azul sta COLUP1 lda #0 sta Noparray ldy #19;20;40;20 Loopy_ lda Colir,Y sta COLUP0 sta COLUP1 sty PunteroRoomBKP + 1 ldy Noparray lda (PunteroRoom),Y sta Bicmaps iny lda (PunteroRoom),Y sta Bicmaps + 1 iny lda (PunteroRoom),Y sta Bicmaps + 2 iny lda (PunteroRoom),Y sta Bicmaps + 3 iny lda (PunteroRoom),Y sta Bicmaps + 4 iny lda (PunteroRoom),Y sta Bicmaps + 5 lda Noparray clc adc #6 sta Noparray ldy PunteroRoomBKP + 1 sta WSYNC lda Bicmaps + 1; ;#%11110111 sta GRP0 ; ldx #6 ;RoomP1 looc_ ; dex ; bne looc nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop lda Bicmaps + 3 ;+ 2 ;#%00001000 sta GRP0 ; ldx #1 ;RoomP1 loocb_ ; dex ; bne loocb ; nop lda Bicmaps + 5 ;+ 4 ;#%00001000 sta GRP0 sta WSYNC lda #0 sta GRP0 lda Bicmaps ;+ 1 ;#%11110111 sta GRP1 ; ldx #1 ;RoomP1 looc2_ ; dex ; bne looc2 nop nop nop nop nop nop nop nop nop nop nop nop nop nop nop ;nop ;;nop lda Bicmaps + 2 ;3 ;#%00001000 sta GRP1 ; ldx #1 ;RoomP1 looc2b_ ; dex ; bne looc2b ; nop lda Bicmaps + 4; 5 ;#%00001000 sta GRP1 ;sta WSYNC lda #0 sta GRP1 dey bne LoopyN_ ;sta WSYNC jmp LoopyS_ LoopyN_ jmp Loopy_ LoopyS_ LDA #0;255;0 ;Cero2 STA PF0 STA PF1 STA PF2 sta GRP0 sta GRP1 inc Puntaje lda Puntaje and #%00111100 clc ror ;ror ;ror ;ror ;ror tay lda TogCamina beq NoAccio lda PunteroRoomF2,Y sta PunteroRoom iny lda PunteroRoomF2,Y sta PunteroRoom + 1 jmp NoAcc2 NoAccio lda PunteroRoomF,Y sta PunteroRoom iny lda PunteroRoomF,Y sta PunteroRoom + 1 NoAcc2 cpy #8*2 + 1 ;15*2 + 1 beq Sali jmp Salis Sali lda TogCamina beq Alpri lda #0 sta Puntaje sta TogCamina lda PunteroRoomF sta PunteroRoom lda PunteroRoomF + 1 sta PunteroRoom + 1 jmp Sabnk Alpri lda #0 sta Puntaje Salis LDX #17;9;18;40;90;50;30;50;90;112 DibujaColaD_ STA WSYNC DEX BNE DibujaColaD_ ; sta HMOVE DeciD_ LDA SWCHA AND #%00010000 BEQ DecisionNearD_ LDA SWCHA AND #%01000000 BEQ Decision2NearD_ LDA SWCHA AND #%00100000 BEQ Decision3NearD_ LDA SWCHA AND #%10000000 BEQ Decision4NearD_ ;BEQ TogImg LDA INPT4 BMI RetDeciD_ JMP Boton;Decision DecisionNearD_ ;inc RoomP1 ; JMP Decision Decision2NearD_ ; JMP Decision2 Decision3NearD_ ; JMP Decision3 Decision4NearD_ ; JMP Decision4 RetDeciD_ ;////////////// End Of Display //////////////////////////////////////// LDA #%01000010 ; Disable VIA Output STA VBLANK ; 30 scanlines of overscan... ; LDX #30 ;Overscan STA WSYNC ; DEX ; BNE Overscan OverscanLoopD_ lda INTIM bne OverscanLoopD_ lda #65 sta TIM64T overscan22 lda INTIM bne overscan22 sta WSYNC ;JMP Start_Frame_ jmp Lejos;Star .ALIGN 256 ;Bicmaps ; .byte #%00000001 ; .byte #%00100010 ; .byte #%00000011 ; .byte #%00100100 ; .byte #%00000101 ; .byte #%00100110 ; .byte #%00000111 ; .byte #%00001000 Bitmag .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11000001, %10000010, %00010000, %00010000, %00000100, %00000010 .byte #%00001100, %00001100, %00010000, %00010000, %00000100, %00000010 .byte #%00100000, %00000000, %01100000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000011, %00010000, %00001000, %00000010 .byte #%00100100, %00000000, %00000000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000000, %11000000, %00001000, %00000010 .byte #%00100100, %10000000, %00000000, %00000000, %00001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000011, %00001000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %11001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %00110000, %00000100 .byte #%00100100, %00110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %00000000, %00001000, %00011000, %00000011, %00001000 .byte #%00100011, %00000000, %00011100, %00111000, %00000000, %00000000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00110000 .byte #%00110000, %01100011, %11110111, %11101111, %11010110, %00000000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00000011 ;-------------------------------------------------- Fra2 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00110000, %01100000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00000011, %00000010, %00000001, %00000000, %00010000 .byte #%00010011, %00000000, %00011000, %00000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %11000000, %00000000, %11000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %00110000, %00000000, %00001100, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %11000000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %00110000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %01000000 .byte #%00010010, %00000000, %00000000, %00000000, %00001100, %01000000 .byte #%00010010, %11000000, %00001000, %00010000, %00000000, %01000000 .byte #%00010000, %00000000, %00011100, %00111000, %00000000, %11000000 .byte #%00001100, %00010110, %01101111, %11110110, %01111000, %00000000 .byte #%00000000, %01101011, %11110111, %11101111, %11000110, %00001100 .byte #%11000000, %00010100, %00000000, %00000000, %00111000, %00000000 ;------------------------------------------------------------------------ .ALIGN 256 Fra3 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11000001, %10000010, %00010000, %00010000, %00000100, %00000010 .byte #%00001100, %00001100, %00010000, %00010000, %00000100, %00000010 .byte #%00100000, %00000000, %01100000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000011, %00010000, %00001000, %00000010 .byte #%00100100, %00000000, %00000000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000000, %11000000, %00001000, %00000010 .byte #%00100100, %10000000, %00000000, %00000000, %00001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000011, %00001000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %11001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %00110000, %00000100 .byte #%00100100, %00110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %00000000, %00001000, %00011000, %00000011, %00001000 .byte #%00100011, %00000000, %00011100, %00111000, %00000000, %00000000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00110000 .byte #%00110000, %01100011, %11110111, %11101111, %11010110, %00000000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00000011 ;-------------------------------------------------------------------------- Fra4 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00110000, %01100000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00000011, %00000010, %00000001, %00000000, %00010000 .byte #%00010011, %00000000, %00011000, %00000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %11000000, %00000000, %11000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %00110000, %00000000, %00001100, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %11000000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %00110000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %01000000 .byte #%00010010, %00000000, %00000000, %00000000, %00001100, %01000000 .byte #%00010010, %11000000, %00001000, %00010000, %00000000, %01000000 .byte #%00010000, %00000000, %00011100, %00111000, %00000000, %11000000 .byte #%00001100, %00010110, %01101111, %11110110, %01111000, %00000000 .byte #%00000000, %01101011, %11110111, %11101111, %11000110, %00001100 .byte #%11000000, %00010100, %00000000, %00000000, %00111000, %00000000 ;-------------------------------------------------------------------------- .ALIGN 256 Fra5 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11000001, %10000010, %00010000, %00010000, %00000100, %00000010 .byte #%00001100, %00001100, %00010000, %00010000, %00000100, %00000010 .byte #%00100000, %00000000, %01100000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000011, %00010000, %00001000, %00000010 .byte #%00100100, %00000000, %00000000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000000, %11000000, %00001000, %00000010 .byte #%00100100, %10000000, %00000000, %00000000, %00001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000011, %00001000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %11001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %00110000, %00000100 .byte #%00100100, %00110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %00000000, %00001000, %00011000, %00000011, %00001000 .byte #%00100011, %00000000, %00011100, %00111000, %00000000, %00000000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00110000 .byte #%00110000, %01100011, %11110111, %11101111, %11010110, %00000000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00000011 ;--------------------------------------------------------------- Fra6 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00110000, %01100000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00000011, %00000010, %00000001, %00000000, %00010000 .byte #%00010011, %00000000, %00011000, %00000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %11000000, %00000000, %11000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %00110000, %00000000, %00001100, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %11000000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %00110000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %01000000 .byte #%00010010, %00000000, %00000000, %00000000, %00001100, %01000000 .byte #%00010010, %11000000, %00001000, %00010000, %00000000, %01000000 .byte #%00010000, %00000000, %00011100, %00111000, %00000000, %11000000 .byte #%00001100, %00010110, %01101111, %11110110, %01111000, %00000000 .byte #%00000000, %01101011, %11110111, %11101111, %11000110, %00001100 .byte #%11000000, %00010100, %00000000, %00000000, %00111000, %00000000 ;---------------------------------------------------------- .ALIGN 256 Fra7 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00010000, %10000010, %00000001, %00000000, %00010000 .byte #%01100000, %11000000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00000000, %10000010, %00000001, %00000000, %00100000 .byte #%00001100, %00001100, %10000010, %00000010, %00000000, %00100000 .byte #%00000000, %00000000, %00000010, %00000010, %00000000, %00100000 .byte #%00000000, %11000000, %01100000, %00000010, %00000000, %00100000 .byte #%00000000, %00000000, %00000011, %00000001, %00000000, %01000000 .byte #%00000000, %11000000, %00000000, %00000001, %00000000, %01000000 .byte #%00000000, %00000000, %00000000, %11000000, %00000000, %01000000 .byte #%00000000, %11000000, %00000000, %00001100, %00000000, %00100000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00100000 .byte #%00000000, %11000000, %00000000, %00000000, %11000000, %00100000 .byte #%00000000, %00000000, %00001000, %00011000, %00000000, %00100000 .byte #%00000000, %11000000, %00011100, %00111000, %00110000, %00100000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00100000 .byte #%00000011, %01100011, %11110111, %11101111, %11010110, %00000000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00000000 Fra8 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00010000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00010000, %10000010, %00000001, %00000000, %00010000 .byte #%11000000, %00010000, %10000010, %00000010, %00000000, %00010000 .byte #%00001100, %00010000, %10000010, %00000010, %00000000, %00100000 .byte #%00000000, %11000000, %10000010, %00000010, %00000000, %00100000 .byte #%00000000, %00000000, %10000010, %00000010, %00000000, %00100000 .byte #%11000000, %00001100, %10000100, %00000001, %00000000, %00100000 .byte #%00001100, %00000000, %00000100, %00000001, %00000000, %01000000 .byte #%00000000, %00000000, %01100000, %00000001, %00000000, %01000000 .byte #%00000000, %11000000, %00000011, %00000001, %00000000, %01000000 .byte #%00000000, %00000000, %00000000, %00000001, %00000000, %01000000 .byte #%00000000, %11000000, %00000000, %11000001, %00000000, %01000000 .byte #%00000000, %00000000, %00001000, %00011001, %00000000, %01000000 .byte #%00000000, %11000000, %00011100, %00111000, %00000000, %00100000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00100000 .byte #%00000000, %01100011, %11110111, %11101111, %11010110, %00100000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00100000 .ALIGN 256 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Fra9 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00010111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00010111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%00000000,%00000000,%00000100,%00011111,%00000000,%00000000 .byte #%00000000,%00000000,%00000111,%11110000,%11000000,%00000000 .byte #%00000000,%00000000,%00110110,%01100000,%00001100,%00000000 .byte #%00000000,%00000000,%00000000,%00000011,%00000000,%11000000 .byte #%00000000,%00000011,%00000000,%00000000,%00000000,%00001100 .byte #%00000000,%00000000,%00000000,%00000000,%00110000,%00000000 .byte #%00000000,%00110000,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00001000,%00010000,%00000011,%00000000 .byte #%00000011,%00000000,%00011100,%00111000,%00000000,%00000000 .byte #%00000000,%00011110,%01101111,%11110110,%01101000,%00110000 .byte #%00110000,%01100011,%11110111,%11101111,%11010110,%00000000 .byte #%00000000,%00011100,%00000000,%00000000,%00101000,%00000011 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Fra10 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00010011,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00010011,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00010011,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%00000000,%00000000,%00000100,%00010011,%00000000,%00000000 .byte #%00000000,%00000000,%00001111,%11110000,%11000000,%00000000 .byte #%00000000,%00000000,%00000110,%01101100,%00001100,%00000000 .byte #%00000000,%00000000,%11000000,%00000000,%00000000,%11000000 .byte #%00000000,%00000000,%00000000,%00000000,%11000000,%00001100 .byte #%00000000,%00001100,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00000000,%00000000,%00001100,%00000000 .byte #%00000000,%11000000,%00001000,%00010000,%00000000,%00000000 .byte #%00000000,%00000000,%00011100,%00111000,%00000000,%11000000 .byte #%00001100,%00011110,%01101111,%11110110,%01101000,%00000000 .byte #%00000000,%01100011,%11110111,%11101111,%11010110,%00001100 .byte #%11000000,%00011100,%00000000,%00000000,%00101000,%00000000 ;;;;;;;;;;;;;;; .ALIGN 256 Fra11 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011110,%10011111,%11111111 .byte #%11111111,%11111111,%11111000,%00011110,%10011111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%10111111,%11111111 .byte #%00000000,%00000000,%00000100,%00011111,%10100000,%00000000 .byte #%00000000,%00000000,%00000111,%11110000,%11110000,%00000000 .byte #%00000000,%00000000,%00110110,%01100000,%00000011,%00000000 .byte #%00000000,%00000000,%00000000,%00000011,%00000000,%00110000 .byte #%00000000,%00000011,%00000000,%00000000,%00000000,%00000011 .byte #%00000000,%00000000,%00000000,%00000000,%00110000,%00000000 .byte #%00000000,%00110000,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00011000,%00010000,%00000011,%00000000 .byte #%00000011,%00000000,%00011100,%00111000,%00000000,%00000000 .byte #%00000000,%00010110,%01101111,%11110110,%01111000,%00110000 .byte #%00110000,%01101011,%11110111,%11101111,%11000110,%00000000 .byte #%00000000,%00010100,%00000000,%00000000,%00111000,%00000011 Fra12 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%10001111,%11111111 .byte #%11111111,%11111111,%11111000,%00011110,%10001111,%11111111 .byte #%11111111,%11111111,%11111000,%00011110,%10001111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%10001111,%11111111 .byte #%00000000,%00000000,%00000100,%00011111,%10010000,%00000000 .byte #%00000000,%00000000,%00001111,%11110000,%11110000,%00000000 .byte #%00000000,%00000000,%00000110,%01101100,%00000011,%00000000 .byte #%00000000,%00000000,%11000000,%00000000,%00000000,%00110000 .byte #%00000000,%00000000,%00000000,%00000000,%11000000,%00000011 .byte #%00000000,%00001100,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00000000,%00000000,%00001100,%00000000 .byte #%00000000,%11000000,%00011000,%00010000,%00000000,%00000000 .byte #%00000000,%00000000,%00011100,%00111000,%00000000,%11000000 .byte #%00001100,%00010110,%01101111,%11110110,%01111000,%00000000 .byte #%00000000,%01101011,%11110111,%11101111,%11000110,%00001100 .byte #%11000000,%00010100,%00000000,%00000000,%00111000,%00000000 .ALIGN 256 Fra13 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11001001,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11001001,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%10001001,%11111111 .byte #%00000000,%00000000,%00000100,%00011111,%10001001,%00000000 .byte #%00000000,%00000000,%00000111,%11110000,%11001001,%00000000 .byte #%00000000,%00000000,%00110110,%01100000,%00111001,%00000000 .byte #%00000000,%00000000,%00000000,%00000011,%00001111,%11000000 .byte #%00000000,%00000011,%00000000,%00000000,%00001001,%00001100 .byte #%00000000,%00000000,%00000000,%00000000,%00110000,%00000000 .byte #%00000000,%00110000,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00001000,%00010000,%00000011,%00000000 .byte #%00000011,%00000000,%00011100,%00111000,%00000000,%00000000 .byte #%00000000,%00111100,%01101111,%11110110,%01101000,%00110000 .byte #%00110000,%01100011,%11110111,%11101111,%11010110,%00000000 .byte #%00000000,%00011100,%00000000,%00000000,%00101000,%00000011 Fra14 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11001000,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11001000,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11001000,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%10001000,%11111111 .byte #%00000000,%00000000,%00000100,%00011111,%10001000,%10000000 .byte #%00000000,%00000000,%00000111,%11110000,%11001000,%10000000 .byte #%00000000,%00000000,%00000110,%01101100,%00111000,%10000000 .byte #%00000000,%00000000,%11000000,%00000000,%00001111,%11000000 .byte #%00000000,%00000000,%00000000,%00000000,%11001001,%00001100 .byte #%00000000,%00001100,%00000000,%00000000,%00000000,%00000000 .byte #%00000000,%00000000,%00000000,%00000000,%00001100,%00000000 .byte #%00000000,%11000000,%00001000,%00010000,%00000000,%00000000 .byte #%00000000,%00000000,%00011100,%00111000,%00000000,%11000000 .byte #%00001100,%00111100,%01101111,%11110110,%01101000,%00000000 .byte #%00000000,%01100011,%11110111,%11101111,%11010110,%00001100 .byte #%11000000,%00011100,%00000000,%00000000,%00101000,%00000000 .ALIGN 256 Fra15 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111111,%11111111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%11111111 .byte #%11111111,%11111111,%11111000,%00011111,%11111111,%00100001 .byte #%11111111,%11111111,%11111000,%00011111,%11111100,%00100001 .byte #%11111111,%11111111,%11111000,%00011111,%11111100,%00100001 .byte #%11111111,%11111111,%11111000,%00011111,%11111110,%00100001 .byte #%00000000,%00000000,%00000100,%00101111,%00000011,%00100010 .byte #%00000000,%00000000,%00000111,%11110000,%11110011,%00100010 .byte #%00000000,%00000000,%00110110,%01100000,%00001111,%00100010 .byte #%00000000,%00000000,%00000000,%00000011,%00000011,%00100010 .byte #%00000000,%00000011,%00000000,%00000000,%00000001,%11111111 .byte #%00000000,%00000000,%00000000,%00000000,%00110000,%00100010 .byte #%00000000,%00110000,%00000000,%00000000,%00000000,%00100010 .byte #%00000000,%00000000,%00011000,%00010000,%00000011,%00000000 .byte #%00000011,%00000000,%00011100,%00111000,%00000000,%00000000 .byte #%00000000,%00010110,%01101111,%11110110,%01111000,%00110000 .byte #%00110000,%01101011,%11110111,%11101111,%11000110,%00000000 .byte #%00000000,%00010100,%00000000,%00000000,%00111000,%00000011 ;;;; Cai .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11111111, %11000010, %00010000, %00010000, %00000100, %00000010 .byte #%11000001, %10000010, %00010000, %00010000, %00000100, %00000010 .byte #%00001100, %00001100, %00010000, %00010000, %00000100, %00000010 .byte #%00100000, %00000000, %01100000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000011, %00010000, %00001000, %00000010 .byte #%00100100, %00000000, %00000000, %00010000, %00001000, %00000010 .byte #%00100100, %11000000, %00000000, %11000000, %00001000, %00000010 .byte #%00100100, %10000000, %00000000, %00000000, %00001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000011, %00001000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %11001000, %00000100 .byte #%00100100, %10110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %10000000, %00000000, %00000000, %00110000, %00000100 .byte #%00100100, %00110000, %00000000, %00000000, %00000000, %00000100 .byte #%00100100, %00000000, %00001000, %00011000, %00000011, %00001000 .byte #%00100011, %00000000, %00011100, %00111000, %00000000, %00000000 .byte #%00000000, %00011110, %01101111, %11110110, %01101000, %00110000 .byte #%00110000, %01100011, %11110111, %11101111, %11010110, %00000000 .byte #%00000000, %00011100, %00000000, %00000000, %00101000, %00000011 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; .ALIGN 256 Cai2 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%11111111, %11010000, %10000010, %00000001, %00000000, %00010000 .byte #%00110000, %01100000, %10000010, %00000001, %00000000, %00010000 .byte #%00000000, %00000011, %00000010, %00000001, %00000000, %00010000 .byte #%00010011, %00000000, %00011000, %00000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %11000000, %00000000, %11000001, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000001, %00000000, %00100000 .byte #%00010010, %00110000, %00000000, %00001100, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %11000000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %00100000 .byte #%00010010, %00000000, %00000000, %00000000, %00110000, %00100000 .byte #%00010010, %00110000, %00000000, %00000000, %00000000, %01000000 .byte #%00010010, %00000000, %00000000, %00000000, %00001100, %01000000 .byte #%00010010, %11000000, %00001000, %00010000, %00000000, %01000000 .byte #%00010000, %00000000, %00011100, %00111000, %00000000, %11000000 .byte #%00001100, %00010110, %01101111, %11110110, %01111000, %00000000 .byte #%00000000, %01101011, %11110111, %11101111, %11000110, %00001100 .byte #%11000000, %00010100, %00000000, %00000000, %00111000, %00000000 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Cai3 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; .ALIGN 256 Cai4 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 .byte #%00000000, %00000000, %00000000, %00000000, %00000000, %00000000 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Cai5 PunteroRoomF .word Bitmag .word Fra2 .word Fra3 .word Fra4 .word Fra5 .word Fra6 .word Fra7 .word Fra8 .word Fra8 .word Fra10 .word Fra11 .word Fra12 .word Fra13 .word Fra14 .word Fra15 .word Fra15 PunteroRoomF2 .word Bitmag .word Fra2 .word Fra3 .word Fra4 .word Fra5 .word Fra6 .word Cai .word Cai2 .word Cai2 .word Fra10 .word Fra11 .word Fra12 .word Fra13 .word Fra14 .word Fra15 .word Fra15 Lejos lda <#Melodia sta $A3 lda >#Melodia sta $A4 lda $A1 beq Resea1 jmp Musica Resea1 lda #161;145;124;9 sta $A1 Musica LDA #4;1 STA AUDC0 lda #4;2;4;10 sta AUDV0 LDA DuracionNota BEQ ResetNota DEC DuracionNota JMP RetornarA4 ResetNota LDA #5 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 #161;145;129;65;45;34;150 STA $A1 LDY $A1 LDA ($A3),Y STA AUDF0 DEC $A1 lda #0 sta $BD JMP Retorno4 Retorno4 jmp Star 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 #0 ; .byte #0 ; .byte A_2 ; .byte B_2 ; .byte G_2 ; .byte A_2 ; .byte D_3 ; .byte B_2 ; .byte A_2 ; .byte G_2 .byte #0 .byte #0 ; .byte A_2 ; .byte E_2 ; .byte A_2 ; .byte D_4 ; .byte E_2 ; .byte A_2 ; .byte E_2 ; .byte A_2 ; ; .byte F_3 ; .byte C_3 ; .byte F_3 ; .byte A_2 ; .byte C_3 ; .byte F_3 ; .byte C_3 ; .byte F_2 ; ; .byte A_2 ;.byte C_2 ;.byte D_2 ;.byte G_2 ;.byte C_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte B_2 .byte B_2 .byte C_3 .byte C_3 .byte C_2 .byte C_2 .byte D_2 .byte D_2 .byte E_2 .byte D_2 .byte C_2 .byte C_2 .byte C_2 .byte C_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte B_2 .byte A_2 .byte A_2 .byte B_2 .byte C_2 .byte C_2 .byte D_2 .byte D_2 .byte E_2 .byte D_2 .byte C_2 .byte C_2 .byte C_2 .byte C_2 .byte D_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte A_2 .byte B_2 .byte B_2 .byte C_3 .byte C_3 .byte C_2 .byte C_2 .byte D_2 .byte D_2 .byte E_2 .byte D_2 .byte C_2 .byte C_2 .byte C_2 .byte C_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte G_2 .byte B_2 .byte A_2 .byte A_2 .byte B_2 .byte C_2 .byte C_2 .byte D_2 .byte D_2 .byte E_2 .byte D_2 .byte C_2 .byte C_2 .byte C_2 .byte C_2 .byte D_2 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte Fs_2 .byte E_2 .byte E_2 .byte D_2 .byte Fs_2 .byte Fs_2 .byte G_2 .byte G_2 .byte A_2 .byte Fs_2 .byte Fs_2 .byte G_2 .byte G_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte F_2 .byte F_2 .byte A_2 .byte A_2 .byte G_2 .byte C_3 .byte C_3 .byte Cs_3 .byte Cs_3 .byte Ds_3 .byte C_3 .byte C_3 .byte Cs_3 .byte Cs_3 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte E_2 .byte Fs_2 .byte E_2 .byte E_2 .byte D_2 .byte Fs_2 .byte Fs_2 .byte G_2 .byte G_2 .byte A_2 .byte Fs_2 .byte Fs_2 .byte G_2 .byte G_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte D_2 .byte F_2 .byte F_2 .byte A_2 .byte A_2 .byte G_2 .byte C_3 .byte C_3 .byte Cs_3 .byte Cs_3 .byte Ds_3 .byte C_3 .byte C_3 .byte Cs_3 .byte Cs_3 Colir .byte #Naranja .byte #Marron .byte #Naranja - 2 .byte #Naranja - 6 .byte #Rojo;Naranja - 8 .byte #Amarillo .byte #Gris .byte #Gris .byte #Gris .byte #Gris .byte #Gris .byte #Gris .byte #Gris .byte #Gris ;Azul .byte #Gris - 2;Naranja .byte #Gris ; Amarillo .byte #Gris + 2 ;Celeste .byte #Gris + 4 ;Celeste - 5 .byte #Celeste - 6 .byte #Celeste - 8 ;////////////// Set Vectors /////////////////////////////////////////// org $1FFA rORG $FFFA ; Interrupt Vectors .word Reset ; NMI .word Reset ; RESET .word Reset ; IRQ ;END ;END