;redcode-lights
;name papyrus
;author physsio
;assert CORESIZE == 410
main mov.ab #2, loop
mov.a #1, ptr
copy mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
mov.i {ptr, <ptr
loop djn.b copy, #0
spl 2, {2
jmp @ptr, {1
mov.ab #-233, ptr
jmp main, >1
ptr dat 57, 142
for 84
spl main, loop
rof