public inted.
public intnum.

public enab.
enab.:
ei
ret

public disab.
disab.:
di
ret

public int0.
int0.:
af=>sp
a=1->inted.
a=0->intnum.
af<=sp
ret

public int1.
int1.:
af=>sp
a=1->inted.
a=1->intnum.
af<=sp
ret

public int2.
int2.:
af=>sp
a=1->inted.
a=2->intnum.
af<=sp
ret

public int3.
int3.:
af=>sp
a=1->inted.
a=3->intnum.
af<=sp
ret

public int4.
int4.:
af=>sp
a=1->inted.
a=4->intnum.
af<=sp
ret

public int5.
int5.:
af=>sp
a=1->inted.
a=5->intnum.
af<=sp
ret

public int6.
int6.:
af=>sp
a=1->inted.
a=6->intnum.
af<=sp
ret

public int7.
int7.:
af=>sp
a=1->inted.
a=7->intnum.
af<=sp
ret

public main.
public reset.
reset.:
	hl = *6
	sp = hl
	jmp main.

public mode.
mode.:
	&0x56ed
	ret