rom.asm

;header.asm-------------------
	dc.l 0x00FFE000
	dc.l EntryPoint
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l HBlankInterrupt
	dc.l Exception
	dc.l VBlankInterrupt
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception
	dc.l Exception

	dc.b "SEGA GENESIS"
	dc.b "(C)DAWNING 2018.MAY"
	dc.b "ROM"
	dc.b "ROM"
	dc.b "GM 00000000-00"
	dc.w 0x0000
	dc.b "J"
	dc.l 0x00000000
	dc.l __end
	dc.l 0x00FF0000
	dc.l 0x00FFFFFF
	dc.l 0x00000000
	dc.l 0x00000000
	dc.l 0x00000000
	dc.l 0x00000000
	dc.l 0x00000000
	dc.l 0x00000000
	dc.b " "
	dc.b "JUE"

;data.asm------------------------
VDPRegisters:
VDPReg0:  dc.b 0x14
VDPReg1:  dc.b 0x74
VDPReg2:  dc.b 0x30
VDPReg3:  dc.b 0x00
VDPReg4:  dc.b 0x07
VDPReg5:  dc.b 0x78
VDPReg6:  dc.b 0x00
VDPReg7:  dc.b 0x00
VDPReg8:  dc.b 0x00
VDPReg9:  dc.b 0x00
VDPRegA:  dc.b 0xFF
VDPRegB:  dc.b 0x00
VDPRegC:  dc.b 0x81
VDPRegD:  dc.b 0x3F
VDPRegE:  dc.b 0x00
VDPRegF:  dc.b 0x02
VDPReg10: dc.b 0x01
VDPReg11: dc.b 0x00
VDPReg12: dc.b 0x00
VDPReg13: dc.b 0xFF
VDPReg14: dc.b 0xFF
VDPReg15: dc.b 0x00
VDPReg16: dc.b 0x00
VDPReg17: dc.b 0x80

Z80Data:
	dc.w 0xAF01, 0xD91F
	dc.w 0x1127, 0x0021
	dc.w 0x2600, 0xF977
	dc.w 0xEDB0, 0xDDE1
	dc.w 0xFDE1, 0xED47
	dc.w 0xED4F, 0xD1E1
	dc.w 0xF108, 0xD9C1
	dc.w 0xD1E1, 0xF1F9
	dc.w 0xF3ED, 0x5636
	dc.w 0xE9E9, 0x8104
	dc.w 0x8F01

PSGData:
	dc.w 0x9FBF, 0xDFFF

;init.asm-------------------------
__init:

EntryPoint:
	tst.w 0x00A10008
	bne Main
	tst.w 0x00A1000C
	bne Main

	move.l #0x00000000, d0
	move.l #0x00000000, a0
	move.l #0x00003FFF, d1
@Clear:
	move.l d0, -(a0)
	dbra d1, @Clear

	move.b 0x00A10001, d0
	andi.b #0x0F, d0
	beq @Skip
	move.l #'SEGA', 0x00A14000
@Skip:
	move.w #0x0100, 0x00A11100
	move.w #0x0100, 0x00A11200

@Wait:
	btst #0x0, 0x00A11100
	bne @Wait

	move.l #Z80Data, a0
	move.l #0x00A00000, a1
	move.l #0x29, d0
@CopyZ80:
	move.b (a0)+, (a1)+
	dbra d0, @CopyZ80

	move.w #0x0000, 0x00A11200
	move.w #0x0000, 0x00A11100

	move.l #PSGData, a0
	move.l #0x03, d0
@CopyPSG:
	move.b (a0)+, 0x00C00011
	dbra d0, @CopyPSG

	move.l #VDPRegisters, a0
	move.l #0x18, d0
	move.l #0x00008000, d1

@CopyVDP:
	move.b (a0)+, d1
	move.w d1, 0x00C00004
	add.w #0x0100, d1
	dbra d0, @CopyVDP

	move.b #0x00, 0x000A10009
	move.b #0x00, 0x000A1000B
	move.b #0x00, 0x000A1000D

	move.l #0x00000000, a0
	movem.l (a0), d0-d7/a1-a7

	jmp __main

;palette.asm-----------------------
Palette:
	dc.w 0x0000
	dc.w 0x000E
	dc.w 0x00E0
	dc.w 0x0E00
	dc.w 0x0000
	dc.w 0x0EEE
	dc.w 0x00EE
	dc.w 0x008E
	dc.w 0x0E0E
	dc.w 0x0808
	dc.w 0x0444
	dc.w 0x0888
	dc.w 0x0EE0
	dc.w 0x000A
	dc.w 0x0600
	dc.w 0x0060

;characters.asm-------------------
Characters:
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11111110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x00000000

	dc.l 0x11111110
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11111110
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11111110
	dc.l 0x00000000

	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11000000
	dc.l 0x11111110
	dc.l 0x00000000

	dc.l 0x01111100
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x01111100
	dc.l 0x00000000

	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11010110
	dc.l 0x11111110
	dc.l 0x11101110
	dc.l 0x11000110
	dc.l 0x00000000

	dc.l 0x11111100
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11111100
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x00000000

	dc.l 0x11111100
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11000110
	dc.l 0x11111100
	dc.l 0x00000000

;main.asm---------------------------
	;include 'header.asm'
	;include 'init.asm'
__main:
	move.w #0x8F02, 0x00C00004
	move.l #0x40000003, 0x00C00004

	move.l #0xC0000003, 0x00C00004
	lea Palette, a0
	move.l #0x07, d0

	move.l #0x40200000, 0x00C00004
	lea Characters, a0
	move.l #0x37, d0

@Loop:
	move.l (a0)+, 0x00C00000
	dbra d0, @Loop

	move.l #0x40000003, 0x00C00004
	move.w #0x0001, 0x00C00000

Main:
	jmp Main

HBlankInterrupt:
VBlankInterrupt:
	rte

Exception:
	rte

	;include 'data.asm'
	;include 'palette.asm'
	;include 'characters.asm'

__end