;redcode-94
;assert CORESIZE == 8000
;name ha_12c.red
djn.x  # 21,<-16
mov.i  $ 19,>  3
jmp.x  $ -1,>-19
jmp.i  # -9,@ 21
sne.a  > 14,* 15
nop.ba #-12,< 10
seq.b  > -1,>-20
slt.a  {  1,*  9
spl.a  # 14,@-15
mod.i  @  4,*  1
jmn.ba >  5,< 20
nop.i  >  2,# 17
sub.x  $ 25,> 11
mul.i  >-18,$ 15
sub.a  < -9,# -7
jmn.ab < 12,@  7
spl.ba <-11,# -9
nop.b  @ 21,$-14
end
;188