;redcode
;name SaboClear
;author Lukasz Adamowski
;assert 1

	PIN	13

start	stp	#-5,	#-5
clea	spl	$0,	{clea-5
	mov	$clea-5,	{clea-1
	mov	$clea-5,	{clea-1
	jmp	$-1,	{clea-5