;redcode
;author Matt Hastings
;name Proteus 3
	mov s5,<ptr1
start	mov s4,<ptr1
arb	mov s3,<ptr1
	mov s2,<ptr1
	mov s1,<ptr1
	mov s0,<ptr1
	mov s7,start-307-1+1
	mov r4,<ptr2
	mov r3,<ptr2
	mov r2,<ptr2
	mov r1,<ptr2
	mov ro,<ptr2
	mov rm,<ptr2
	mov r4a,<ptr3
	mov r3,<ptr3
	mov r2a,<ptr3
	mov r1,<ptr3
	mov ro,<ptr3
	mov rm,<ptr3
	jmp start-314-1,<ptr1
s0	spl 0,2
s1	add 3,1
s2	mov <-2584+5-1-8+1+1, 2584+1+1
s3	djn -2,#500
s4	spl -2584,2584
s5	jmp -4807+440+4,0
s7	dat #-4,#-28
rm	mov #6,6
ro	mov <-1,<2
r1	jmn -1,-2
r2	spl @0,1273
r3	jmz rm,rm
r4	mov @1,r1+1
r2a	spl @0 ,1833
r4a	mov @1,-3
ptr1	dat #0,#start-307-2
ptr2	dat #0,#arb-307+1-2584+1-1-1
ptr3	dat #0,#start-307-4807+440+2+4
