!mode = $0100
!item_box = $0DC2
!drop_item = $028008


	lda !mode
	eor #$14
	bne end
        lda !item_box
        beq end
	sta !item_box
	jml !drop_item
end:
	rtl

back to listings