;redcode-94nop
;name Jinx 2
;author Christian Schmidt
;strategy scanner
;assert 1

sStep equ    997
sSep  equ    803
sGate equ    (head-4)

head  spl    #-4,     { 879 
loop  mov    head,    >head
      add.f  step,    scan
scan  seq    }sSep+8, sSep
      mov.b  scan,    *loop
      djn    loop,    #500
step  spl    #sStep,  #sStep
      mov    clr,     >sGate
      djn.f  -1,      >sGate
clr   dat    >5335,   2-sGate

for 48
      dat    0,       0
rof

org qGo

qf equ qKil
qs equ 200
qd equ 4000
qi equ 7
qr equ 8

qBmb dat {qi*qr-10, {1
qGo seq qd+qf+qs, qf+qs
jmp qSki, {qd+qf+qs+qi+2
sne qd+qf+5*qs, qf+5*qs
seq qf+4*qs, {qTab
jmp qFas, }qTab
sne qd+qf+8*qs, qf+8*qs
seq qf+7*qs, {qTab-1
jmp qFas, {qFas
sne qd+qf+10*qs, qf+10*qs
seq qf+9*qs, {qTab+1
jmp qFas, }qFas
seq qd+qf+2*qs, qf+2*qs
jmp qFas, {qTab
seq qd+qf+6*qs, qf+6*qs
djn.a qFas, {qFas
seq qd+qf+3*qs, qf+3*qs
jmp qFas, {qd+qf+3*qs+qi+2
sne qd+qf+14*qs, qf+14*qs
seq qf+13*qs, <qTab
jmp qSlo, >qTab
sne qd+qf+17*qs, qf+17*qs
seq qf+16*qs, <qTab-1
jmp qSlo, {qSlo
seq qd+qf+11*qs, qf+11*qs
jmp qSlo, <qTab
seq qd+qf+15*qs, qf+15*qs
djn.b qSlo, {qSlo
sne qd+qf+12*qs, qf+12*qs
jmz loop, qd+qf+12*qs-qi 
qSlo mov.ba qTab, qTab
qFas mul.ab qTab, qKil
qSki sne qBmb-1, @qKil
add #qd, qKil
qLoo mov.i qBmb, @qKil
qKil mov.i qBmb, *qs
sub.ab #qi, qKil
djn qLoo, #qr
jmp loop, <-4000
dat 5408, 7217
qTab dat 4804, 6613
dSrc dat 5810, qBmb-5 

end