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