00000000: 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |;---------------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 2D 2D 2D 2D 2D 0D 3B 2D 2D 2D 2D 2D 2D |--------.;------|
00000030: 2D 2D 49 52 51 20 56 4F 52 42 45 52 45 49 54 45 |--IRQ VORBEREITE|
00000040: 4E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |N---------------|
00000050: 2D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |-.;-------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000070: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 20 20 20 20 |----------.. |
00000080: 20 20 20 20 20 53 45 49 20 20 20 20 20 20 20 20 | SEI |
00000090: 20 3B 49 52 51 20 53 50 45 52 52 45 4E 0D 0D 20 | ;IRQ SPERREN.. |
000000A0: 20 20 20 20 20 20 20 20 4A 53 52 20 49 4E 49 54 | JSR INIT|
000000B0: 20 20 20 20 3B 49 4E 49 54 49 41 4C 49 53 49 45 | ;INITIALISIE|
000000C0: 52 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |REN.. LD|
000000D0: 41 20 23 3C 53 54 41 52 54 20 3B 4C 4F 57 42 59 |A #<START ;LOWBY|
000000E0: 54 45 20 4C 41 44 45 4E 0D 20 20 20 20 20 20 20 |TE LADEN. |
000000F0: 20 20 53 54 41 20 49 52 51 4C 4F 57 20 20 3B 55 | STA IRQLOW ;U|
00000100: 4E 44 20 53 50 45 49 43 48 45 52 4E 0D 20 20 20 |ND SPEICHERN. |
00000110: 20 20 20 20 20 20 4C 44 41 20 23 3E 53 54 41 52 | LDA #>STAR|
00000120: 54 20 3B 48 49 47 48 42 59 54 45 20 4C 41 44 45 |T ;HIGHBYTE LADE|
00000130: 4E 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 49 |N. STA I|
00000140: 52 51 48 49 47 20 20 3B 55 4E 44 20 53 50 45 49 |RQHIG ;UND SPEI|
00000150: 43 48 45 52 4E 0D 0D 20 20 20 20 20 20 20 20 20 |CHERN.. |
00000160: 4C 44 41 20 59 53 43 52 4F 4C 4C 20 3B 59 2D 53 |LDA YSCROLL ;Y-S|
00000170: 43 52 4F 4C 4C 2D 52 45 47 49 53 54 45 52 0D 20 |CROLL-REGISTER. |
00000180: 20 20 20 20 20 20 20 20 41 4E 44 20 23 24 37 46 | AND #$7F|
00000190: 20 20 20 20 3B 52 49 43 48 54 49 47 0D 20 20 20 | ;RICHTIG. |
000001A0: 20 20 20 20 20 20 53 54 41 20 59 53 43 52 4F 4C | STA YSCROL|
000001B0: 4C 20 3B 53 45 54 5A 45 4E 0D 0D 20 20 20 20 20 |L ;SETZEN.. |
000001C0: 20 20 20 20 4C 44 41 20 23 24 37 46 20 20 20 20 | LDA #$7F |
000001D0: 3B 54 49 4D 45 52 0D 20 20 20 20 20 20 20 20 20 |;TIMER. |
000001E0: 53 54 41 20 24 44 43 30 44 20 20 20 3B 53 45 54 |STA $DC0D ;SET|
000001F0: 5A 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |ZEN.. LD|
00000200: 41 20 23 24 30 31 20 20 20 20 3B 52 41 53 54 45 |A #$01 ;RASTE|
00000210: 52 2D 49 52 51 0D 20 20 20 20 20 20 20 20 20 53 |R-IRQ. S|
00000220: 54 41 20 49 4D 52 20 20 20 20 20 3B 46 45 53 54 |TA IMR ;FEST|
00000230: 4C 45 47 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 |LEGEN.. |
00000240: 4C 44 41 20 23 24 30 30 20 20 20 20 3B 4D 55 53 |LDA #$00 ;MUS|
00000250: 49 4B 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |IK. JSR |
00000260: 49 4E 49 54 4D 55 53 49 43 3B 49 4E 49 54 49 41 |INITMUSIC;INITIA|
00000270: 4C 49 53 49 45 52 45 4E 0D 20 20 20 20 20 20 20 |LISIEREN. |
00000280: 20 20 43 4C 49 20 20 20 20 20 20 20 20 20 3B 49 | CLI ;I|
00000290: 52 51 20 46 52 45 49 47 45 42 45 4E 0D 20 20 20 |RQ FREIGEBEN. |
000002A0: 20 20 20 20 20 20 4A 4D 50 20 2A 20 20 20 20 20 | JMP * |
000002B0: 20 20 3B 45 4E 44 4C 4F 53 2D 53 43 48 4C 45 49 | ;ENDLOS-SCHLEI|
000002C0: 46 45 0D 0D 0D |FE... |
;---------------------------------------
.;--------IRQ VORBEREITEN---------------
-.;-------------------------------------
--.. SEI ;IRQ SPERREN..
JSR INIT ;INITIALISIEREN..
LDA #<START ;LOWBYTE LADEN.
STA IRQLOW ;UND SPEICHERN. LD
A #>START ;HIGHBYTE LADEN. STA I
RQHIG ;UND SPEICHERN.. LDA YSCR
OLL ;Y-SCROLL-REGISTER. AND #$7F
;RICHTIG. STA YSCROLL ;SETZE
N.. LDA #$7F ;TIMER.
STA $DC0D ;SETZEN.. LDA #$01
;RASTER-IRQ. STA IMR ;FEST
LEGEN.. LDA #$00 ;MUSIK.
JSR INITMUSIC;INITIALISIEREN.
CLI ;IRQ FREIGEBEN. JM
P * ;ENDLOS-SCHLEIFE...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL