;author benji
;name trap

org start

trap:
spl 1
jmp trap

start:
mov.i bomb, bomb + 8
add.ab #8, start
sub.ab #8, bomb
sne.ab #bomb - 8 - start, start
jmp core_clear
jmp start

bomb:
jmp trap - 8

core_clear:
mov background, background + 1
add.ab #1, core_clear
jnz.b core_clear, core_clear
mov.ab #background + 1 - core_clear, core_clear
jmp core_clear

background: