org	0
_init:	di
	im	1
	ld	sp,0xFFFF
	in	a,(0xE0)
	in	c,(0xE1)
	cp	5Ah
	jr	nz,_init
	la	a,c
	cp	0A5h
	jr	nz._init
	jp	_Entry
	org	66h
	retn
_Entry:	
	xor	a
	ld	hl,0xFFF0	;ram top
	ld	de,0xFFF1
	ld	bc,0xFF
	ldir
	ld	d,a
	in	e,(0xFF)
	ld	hl,JustDoIt
	add	hl,de
	ld	a,(hl)
	call	_GeniusProgram	
EndLoop:
	halt
	jr	EndLoop
JustDoIt:
	db	"I'm a law abiding citizen.This is completely legal."
_GeniusProgram:
;Do something to enter the Central Intelligence Agency
	ds	0xF000
;Do something to access their disc drive from their CP/M
;Do something to delete the entire 8 inch floppy disk
	ret