:open_border (2,16) .macro open_border(badline_offset,total_lines) { .for (i=0;i<total_lines;i++) { jsr delay44 .if i&7 == badline_offset: stx $d016 sta $d016,y } stx $d016 sta $d016 } } Delay44: .for (i=0;i<4;i++) { pha pla } nop nop rts
.var i = 0 :open_border(2,16) .macro open_border(badline_offset,total_lines) { .for (i=0;i<total_lines;i++) { jsr Delay44 stx $d016 .if([i&7] == badline_offset) { sta $d016,y stx $d016 } sta $d016 } } Delay44: .for (i=0;i<4;i++) { pha pla } nop nop rts
delay44: nop jsr :+ : jsr :+ : rts