.kl_new_frame_fly equ &bcd7
.kl_init_event equ &bcef

;; This kind of interrupt runs with the firmware.
;; It can be used from within BASIC to execute a binary program.

org &8000
nolist

;; setup an interrupt to be executed every frame flyback 
;; (50hz)
ld hl,ff_event_block
ld b,class
ld c,0
ld de,ff_event_routine
call kl_new_frame_fly
ret

.ff_event_block 
defs 10


.ff_event_routine
ret