I took the liberty of making some small adjustments (mainly using a custom character set in 16x8 mode so we can clear the sceen by just writing zeroes everywhere) The following will do a full-frame cycle through all colors on PAL - only the bottom two lines will be black. I tested this on a real VC-20 with analog monitor (with h size and v size adjusted so the entire frame is visible) - also verified that the border color is never displayed, apart from on the bottom lines by changing the 8 in line 135 to 9. Cheers Michiel 10 poke 52,28 20 poke 56,28 30 clr 60 poke 36864,4 70 poke 36865,5 80 poke 36866,30 90 poke 36867,39 95 poke 36869,255 100 fori=7168to i+570 110 poke i,. 120 next 130 c=0 135 poke36879,c*16+8 140 get a$ 150 if a$="" then 140 170 c=c+1 180 if c>15 then 130 190 goto 135Received on 2021-09-02 01:00:03
Archive generated by hypermail 2.3.0.