1
0
mirror of https://github.com/g012/l65.git synced 2024-06-10 18:29:44 +00:00
l65/samples/vcs0.l65
2017-10-03 11:51:36 +02:00

17 lines
319 B
Plaintext

require'vcs'
mappers['2K']()
local kernel = function()
ldx#0xb0 @_loop sta WSYNC stx COLUBK dex bne _loop
end
@@main
init()
@_frame
overscan() vblank() screen(kernel) jmp _frame
; -- needed if last instruction is implied
writebin(filename..'.bin')
writesym(filename..'.sym')
print(stats)