path: root/samples/screen.orgaasm

	LIT ,Screen
@loop
	DUP DUP STA   ( draw pixel )
	INC DUP       ( overflow check )
	JNZ ,loop
@infinite
	SLP
	JMP ,infinite