|
.program vga_free_run
|
|
|
|
entrypoint_vga_free_run:
|
|
pull
|
|
loop:
|
|
out pins, 1 [2]
|
|
jmp loop
|
|
|
|
.program vga_sync
|
|
|
|
entrypoint_vga_sync:
|
|
pull
|
|
mov isr, osr
|
|
pull
|
|
|
|
loop:
|
|
mov x, isr
|
|
set pins, 0
|
|
hsync_pulse:
|
|
jmp x-- hsync_pulse
|
|
|
|
mov x, osr
|
|
set pins, 1
|
|
hsync_idle:
|
|
jmp x-- hsync_idle
|
|
jmp loop
|