All pastes #286802 Raw Edit

Mine

public text v1 · immutable
#286802 ·published 2006-12-20 22:42 UTC
rendered paste body
include "include\ATJ2085_Ports.inc"
org 0
defs 0x800

start:
	di
	ld a,0
	out (WATCHDOG_REG),a ; disable watchdog


	ld a,0x1f   ;MFP_SELECT_CS0S|GPOA2_ENABLE|GPOA2_OUTPUT_2|GPOA2_OUTPUT_1|GPOA2_OUTPUT_0
	out (MFP_GPOA_SELECT_REG),a

	ld a, EM_PAGE_HI_CE3_INV ; for output to the lcd
	out (EM_PAGE_HI_REG),a

	ld sp,lastl ; set stack

	im 1

	ld a,MINT_ENABLE_RTC
	out (MINT_ENABLE_REG),a
	
	ld	hl,misrstart
	ld	de,0x0038
	ld	bc,misrend-misrstart
	ldir

	ld	hl,nmisrstart
	ld	de,0x0066
	ld	bc,nmisrend-nmisrstart
	ldir

        ;ei ; enabling interrupts freezes the player

hang:
	ld a,0xff
	ld (0x8000),a
	jr hang


misrstart:
	ei
	reti
misrend:
nmisrstart:
	retn
nmisrend:

defs 1000
lastl: