@on-reset ( -> )
	;on-input #10 DEO2
	BRK

@on-input ( -> )
	#12 DEI
	DUP #0a NEQ ?{ #0d18 DEO }
	#18 DEO