prog8/examples/cx16/highresbitmap-4c.p8
2021-01-28 22:28:14 +01:00

41 lines
693 B
Lua

%target cx16
%import gfx2
%import textio
%zeropage basicsafe
main {
sub start () {
gfx2.text_charset(3)
test()
gfx2.screen_mode(0)
txt.print("done!\n")
}
sub test() {
gfx2.screen_mode(6)
ubyte color
uword yy
; for color in 3 downto 0 {
; for yy in 100 to 120 {
; uword xx
; for xx in 10 to 500 {
; gfx2.plot(xx, yy, color)
; }
; }
; }
for color in 3 downto 0 {
for yy in 130 to 150 {
gfx2.horizontal_line(10, yy, 400, color)
}
}
sys.wait(5*60)
}
}