mirror of
https://github.com/irmen/prog8.git
synced 2024-07-30 01:29:08 +00:00
improved horizontal_line in highres 4c
This commit is contained in:
parent
2575263438
commit
81a91d62cb
@ -277,9 +277,9 @@ _done
|
|||||||
ora colorbits,y
|
ora colorbits,y
|
||||||
sta cx16.VERA_DATA0
|
sta cx16.VERA_DATA0
|
||||||
cpy #%00000011 ; next vera byte?
|
cpy #%00000011 ; next vera byte?
|
||||||
bne + ; TODO should be ++?
|
bne ++
|
||||||
inc cx16.VERA_ADDR_L
|
inc cx16.VERA_ADDR_L
|
||||||
bne + ; TODO should be ++?
|
bne ++
|
||||||
inc cx16.VERA_ADDR_M
|
inc cx16.VERA_ADDR_M
|
||||||
+ bne +
|
+ bne +
|
||||||
inc cx16.VERA_ADDR_H
|
inc cx16.VERA_ADDR_H
|
||||||
|
@ -11,28 +11,12 @@ main {
|
|||||||
|
|
||||||
c64.SETTIM(0,0,0)
|
c64.SETTIM(0,0,0)
|
||||||
|
|
||||||
ubyte yy
|
ubyte rr
|
||||||
uword rw
|
for rr in 0 to 2 {
|
||||||
|
uword yy
|
||||||
repeat 20000 {
|
for yy in 20 to 420 {
|
||||||
rw = rndw()
|
gfx2.horizontal_line(10, yy, 610, (lsb(yy>>3) + rr) & 3)
|
||||||
yy = (lsb(rw) & 127) + 20
|
}
|
||||||
gfx2.plot(msb(rw), yy, 1)
|
|
||||||
}
|
|
||||||
repeat 20000 {
|
|
||||||
rw = rndw()
|
|
||||||
yy = (lsb(rw) & 127) + 20
|
|
||||||
gfx2.plot(msb(rw), yy, 2)
|
|
||||||
}
|
|
||||||
repeat 20000 {
|
|
||||||
rw = rndw()
|
|
||||||
yy = (lsb(rw) & 127) + 20
|
|
||||||
gfx2.plot(msb(rw), yy, 3)
|
|
||||||
}
|
|
||||||
repeat 50000 {
|
|
||||||
rw = rndw()
|
|
||||||
yy = (lsb(rw) & 127) + 20
|
|
||||||
gfx2.plot(msb(rw), yy, 0)
|
|
||||||
}
|
}
|
||||||
|
|
||||||
uword time = c64.RDTIM16()
|
uword time = c64.RDTIM16()
|
||||||
|
Loading…
Reference in New Issue
Block a user