; redcode-94
; assert CORESIZE == 8000
; name x_25.red
spl.i  #  5,$ -4
sne.b  @  1,>  2
djn.ba @  1,> -4
spl.b  { -1,> -2                  
djn.ab {  0,$ -3                  
end
; 4; 1