set a 33 :loop set [0x8000+i] a add a 1 add i 1 ifg i 0x180 set i 0 ifg a 126 set a 33 set pc loop