;name Freeze-x!
;author Stefan Strack
;strategy Bomb with JMP 0, then with DAT 0
;strategy Submitted: @date@

dist    equ     211
scanptr equ     scan-3

scan    add     #dist+1,scan-3    ; simple imptrap
        jmz     scan,   <scan-3
        slt     #bomb-scan-3,scan-3
        jmp     scan
        slt     #1,     @scan-3   ; is this a bomb?
        mov     bomb+1, bomb
        mov     bomb,   @scan-3
        jmp     scan
bomb    jmp     bomb,   #1

        end     scan