.program vga_free_run
entrypoint_vga_free_run:
pull
loop:
out pins, 1 [2]
jmp loop
.program vga_sync
entrypoint_vga_sync:
set x, 31
mov osr, x
out pins, 1 [30]
set x, 0