;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;HDMA Brightness Gradient

;by Ice Man

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



	lorom				;\ ROM is LoRom

	header				;| and has a header

	org $228000			;/ Address to insert code



;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;RATS Tag Macro

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



macro RATS_start(id)

	db "STAR"

	dw RATS_Endcode-RATS_Startcode 

	dw RATS_Endcode-RATS_Startcode^#$FFFF

RATS_Startcode:

endmacro



macro RATS_end(id)

RATS_Endcode:

endmacro



;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;HDMA Channel Settings

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



%RATS_start(0)

	REP #$20			;\ Set processor 16 bit

	LDA #$0000			;| $4350 = $2100

	STA $4350			;| $4351 = Mode 00

	LDA #Gradient		;| Get gradient pointer

	STA $4352			;| low and high byte

	PHK					;| Get bank

	PLY					;| 

	STY $4354			;| Store to address bank

	SEP #$20			;/ Set processor 8 bit



	LDA #$20			;\ Enable HDMA

	TSB $0D9F			;| on channel 5

	RTL 				;/ Return



;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;Table Settings

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



Gradient:

	db $08,$05

	db $08,$06

	db $08,$07

	db $08,$08

	db $08,$09

	db $08,$0A

	db $08,$0B

	db $08,$0C

	db $08,$0D

	db $08,$0E

	db $40,$0F

	db $08,$0E

	db $08,$0D

	db $08,$0C

	db $08,$0B

	db $08,$0A

	db $08,$09

	db $08,$08

	db $08,$07

	db $08,$06

	db $08,$05

	db $00

%RATS_end(0)

Now to insert it to the actual level:

1. Pick your level you want the effect to be used, e.g. level105

2. In levelinit.asm or levelmain.asm serch for level105

3. You'll most likely see a basic test code, replace that with a RTS, if

there's not one yet.

4. Now get your offset you inserted your HDMA effect to, e.g. $228000

5. Add $08 bytes (caused by the RATS tag) and it will become $228008

6. In the level105 field add this "JSL $228008" without the ""

7. Insert level.asm and the HDMA file you picked via Xkas.

@1c4 @2c4

; Gibt Mario einen P-Ballon

db $42

JMP MarioBelow : JMP MarioAbove : JMP MarioSide : JMP SpriteV : JMP SpriteH : JMP MarioCape : JMP MarioFireBall

JMP Corner : JMP HeadIn : JMP BodyIn



Corner:

HeadIn:

BodyIn:

MarioAbove:

MarioBelow:

MarioSide:

LDA #$09		;Startwert

STA $7E13F3		;P-Ballon-Fliegen

SpriteV:

SpriteH:

MarioCape:

MarioFireBall:

GotCoins:

	RTL

LDA #$09		;Startwert

STA $7E1891

STA $7E13F3		;P-Ballon-Fliegen

LDA #$09		;Startwert

STA $7E13F3		;P-Ballon-Fliegen

STA $7E1891