;redcode-nano
;name on-speed
;author brx
;strategy kind-of d-clear mangling itself, yadda.
;assert CORESIZE==80

      spl #9, }0
      mov 3, }-1
      mov 2, }-2
      djn.f -2, }-3
      dat #5, }0