( tests/cond )

%RTN { RSW2 JMP2 }
%RTN? { CLN2 JMP2? }

|0100 @RESET 

	#00 #d0

	$loop NOP
		( incr ) SWP #01 ADD SWP 
		DUP2 LTH ^$loop SWP JMP?
	POP =Console.byte

	,routine JSR2

BRK

@routine


	CLN2 JMP2

	#aa
	

RTN

|c000 @FRAME
|d000 @ERROR 

|FF00 ;Console { pad 8 char 1 byte 1 short 2 }

|FFF0 .RESET .FRAME .ERROR ( vectors )
|FFF8 [ 13fd 1ef3 1bf2 ] ( palette )