;redcode
;name Bewitching-Z
;author S.Fernandes
;strategy scanner with alt step for Tournament Weekend
;assert CORESIZE==8000

step    equ     3096

eye     mov    slow         ,   <hit+step
scan    add    #step        ,   eye
        jmz    scan         ,   @eye
hit     mov    @jump        ,   @eye
        jmn    eye          ,   hit

slow    spl    0            ,   <clear-11
clear   mov    cleanup      ,   <clear-6
jump    jmp    clear        ,   0

cleanup dat    <2667        ,   <-11

        end     scan+1