Jeśli chcesz wziąć udział w dyskusjach na forum - zaloguj się. Jeżeli nie masz loginu - poproś o członkostwo.
Vanilla 1.1.4 jest produktem Lussumo. Więcej informacji: Dokumentacja, Forum.
0100 WSYNC = $D40A
0110 *=$600
0120 LDA #$34
0130 STA $D302 ;PACTL
0140 LDY #$02
0150 LDX #$00
0160 LDA #$03
0170 JSR $E45C ;SETVBV
0180 LDA #$FF
0190 STA $022A
0200 Z1 LDA $022A
0210 BNE Z1
0220 SEI
0230 STA $D40E ;NMIEN
0240 ; STA $D400 ;DMACTL
0250 L0 LDA #$00
0260 JSR PUTBYTE ;WYSLIJ BAJT
0270 DEC LI1
0280 BNE L0
0290 ; DEC LIC
0300 ; BNE L0
0310 CLI
0320 LDA #$3C
0330 STA $D302
0340 STA $D303
0350 LDA #$40
0360 STA $D40E
0370 BRK
0380 ; RTS ;ALTERNATYWNY KONIEC
0390 PUTBYTE LDY #$08 ;WYSLIJ BAJT
0400 WY1 ROR A
0410 TAX
0420 LDA #$34
0430 STA WSYNC ;KONCZENIE POPRZED
0440 STA $D303 ;USTAW 0
0450 LDA $02C8
0460 EOR #$0F
0470 STA $02C8
0480 STA $D01A
0490 BCS WY3
0500 LDA #$3C
0510 STA WSYNC ;CZEK NA 1
0520 STA $D303 ;USTAW 1
0530 WY2 TXA
0540 DEY
0550 BNE WY1
0560 RTS
0570 WY3 STA WSYNC
0580 LDA #$3C
0590 STA WSYNC ;CZEK NA 1
0600 STA $D303 ;USTAW 1
0610 STA WSYNC
0620 BNE WY2
0630 LIC .BYTE 0
0640 LI1 .BYTE 0