aboutsummaryrefslogtreecommitdiff
path: root/examples/keyb.s
blob: 3871a1ddfd71b49fcbfe40d29193b9eb6a532466 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
	set a, 0
	set b, 0
	set c, 0xf000
:loop
	ife [0x9000], 0
		set pc, loop
	set b, [0x9000]
	bor b, c
	set [0x8000 + a], b
	set [0x9000], 0
	add a, 1
	set pc, loop