;REDCODE
;NAME	Scarlet
;AUTHOR	Lezek
;ASSERT 1

GAIT	EQU	20
SCARLET	SEQ	GAIT+10,	GAIT
	JMP	AURA
	ADD	STEP,	SCARLET
	JMN	SCARLET,	SCARLET
AURA	SPL	#0,	0
APOC	MOV	DEATH,	>SCARLET
	MOV	DEATH,	>SCARLET
	MOV	DEATH,	>SCARLET
	MOV	DEATH,	>SCARLET
	JMP	APOC,	0
DEATH	DAT	0,	10
STEP	DAT	GAIT,	GAIT
END