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

20 lines
361 B
Plaintext

require'vcs'
mappers.F4()
local bank_core,bank_fx = rom0,rom1
location(bank_fx)
@@kernel
ldx#0xd0 @_loop sta WSYNC stx COLUBK dex bne _loop rts
location(bank_core)
@@main
init()
@_frame
overscan() vblank() screen_begin() far(kernel) screen_end() jmp _frame
;
writebin(filename..'.bin')
writesym(filename..'.sym')
print(stats)