;redcode-94
;assert CORESIZE == 8000
;name ha_28c.red
djn.x  # 21,<-20
seq.i  * 10,@ 19
jmp.x  $ -1,$-21
mul.a  # -4,$-12
jmp.b  # -9,@ 21
sne.ba > 18,* 15
nop.ba *-12,{ 10
seq.b  > -1,>-20
jmz.a  { 18,*  9
seq.f  >  5,*-12
djn.a  @ 14,$-15
mod.i  *-10,*  1
jmn.ba > 25,# -6
nop.i  # -9,* 17
sub.x  $  1,@ 11
mul.i  >-18,$ 15
djn.a  < -9,# -7
jmn.b  < 12,@  7
spl.f  < 13,# -9
nop.b  @ 13,<-12
end
;169