Robju, was macht die Overworld? Zeit hast du noch, aber bis vorm Wochenende wäre schon nett.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Level INIT Code
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
REP #$20 ;\
LDA #$3200 ; | Use Mode 0 on register 2132
STA $4330 ; | 4330 = Mode, 4331 = Register for Channel 3
STA $4340 ; | 4340 = Mode, 4341 = Register for Channel 4
STA $4350 ; | 4350 = Mode, 4351 = Register for Channel 5
LDA #.HDMA_Red ; | Address of red HDMA table
STA $4332 ; | 4332 = Low-Byte of table, 4333 = High-Byte of table for Channel 3
LDY.b #.HDMA_Red>>16 ; | Address of red HDMA table, get bank byte
STY $4334 ; | 4334 = Bank-Byte of table for Channel 3
LDA #.HDMA_Green ; | Address of green HDMA table
STA $4342 ; | 4342 = Low-Byte of table, 4343 = High-Byte of table for Channel 4
LDY.b #.HDMA_Green>>16 ; | Address of green HDMA table, get bank byte
STY $4344 ; | 4344 = Bank-Byte of table for Channel 4
LDA #.HDMA_Blue ; | Address of blue HDMA table
STA $4352 ; | 4352 = Low-Byte of table, 4353 = High-Byte of table for Channel 5
LDY.b #.HDMA_Blue>>16 ; | Address of blue HDMA table, get bank byte
STY $4354 ; | 4354 = Bank-Byte of table for Channel 5
SEP #$20 ;/
LDA #%00111000
TSB $0D9F
RTS
;--------------------------
.HDMA_Red
db $1C,$27
db $1C,$26
db $1C,$25
db $1C,$24
db $1C,$23
db $1C,$22
db $1C,$21
db $1C,$20
db $00
.HDMA_Green
db $0A,$40
db $0A,$41
db $0A,$42
db $0A,$43
db $0A,$44
db $0A,$45
db $0A,$46
db $0A,$47
db $0A,$48
db $0A,$49
db $0A,$4A
db $0A,$4B
db $0A,$4C
db $0A,$4D
db $0A,$4E
db $0A,$4F
db $0A,$50
db $0A,$51
db $0A,$52
db $0A,$53
db $0A,$54
db $0A,$55
db $0A,$56
db $0A,$57
db $00
.HDMA_Blue
db $70,$9D
db $70,$9D
db $00
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Level INIT Code
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
REP #$20 ;\
LDA #$3200 ; | Use Mode 0 on register 2132
STA $4330 ; | 4330 = Mode, 4331 = Register for Channel 3
STA $4340 ; | 4340 = Mode, 4341 = Register for Channel 4
STA $4350 ; | 4350 = Mode, 4351 = Register for Channel 5
LDA #.HDMA_Red ; | Address of red HDMA table
STA $4332 ; | 4332 = Low-Byte of table, 4333 = High-Byte of table for Channel 3
LDY.b #.HDMA_Red>>16 ; | Address of red HDMA table, get bank byte
STY $4334 ; | 4334 = Bank-Byte of table for Channel 3
LDA #.HDMA_Green ; | Address of green HDMA table
STA $4342 ; | 4342 = Low-Byte of table, 4343 = High-Byte of table for Channel 4
LDY.b #.HDMA_Green>>16 ; | Address of green HDMA table, get bank byte
STY $4344 ; | 4344 = Bank-Byte of table for Channel 4
LDA #.HDMA_Blue ; | Address of blue HDMA table
STA $4352 ; | 4352 = Low-Byte of table, 4353 = High-Byte of table for Channel 5
LDY.b #.HDMA_Blue>>16 ; | Address of blue HDMA table, get bank byte
STY $4354 ; | 4354 = Bank-Byte of table for Channel 5
SEP #$20 ;/
LDA #%00111000
TSB $0D9F
RTS
;--------------------------
.HDMA_Red
db $10,$20
db $10,$21
db $10,$22
db $10,$23
db $10,$24
db $10,$25
db $10,$26
db $10,$27
db $10,$28
db $10,$29
db $10,$2A
db $10,$2B
db $10,$2C
db $10,$2D
db $00
.HDMA_Green
db $38,$40
db $38,$41
db $38,$42
db $38,$43
db $00
.HDMA_Blue
db $0E,$90
db $0E,$91
db $0E,$92
db $0E,$93
db $0E,$94
db $0E,$95
db $0E,$96
db $0E,$97
db $0E,$98
db $0E,$99
db $0E,$9A
db $0E,$9B
db $0E,$9C
db $0E,$9D
db $0E,$9E
db $0E,$9F
db $00