04-03-2004, 04:01 AM
Plasma357 wrote on a topic some months ago:
This should be useful here, not?
(I found these words at DEF SEG = &HB800, at 29th Octobre, 2003)
I have not got anything to show up here now, but I am interested in this subject. I will do something as soon as I will have time
Quote:To disable blinking:
Code:
junk = INP(&H3DA) 'disable text blinking
OUT &H3C0, &H20 + &H10 'and enable all the background colors
OldAttr = INP(&H3C1)
OUT &H3C0, OldAttr AND &HF7
junk = INP(&H3DA)
To change a character on the screen:
Code:
POKE (Row - 1) * NumCols * 2 + (Col - 1) * 2, Char
To change a color on the screen:
Code:
POKE (Row - 1) * NumCols * 2 + (Col - 1) * 2 + 1, Colr
Where NumCols is the number of columns active (80 or 40).
This should be useful here, not?
(I found these words at DEF SEG = &HB800, at 29th Octobre, 2003)
I have not got anything to show up here now, but I am interested in this subject. I will do something as soon as I will have time
fter 60 million years a civilization will search for a meteorite destroying most of the living creatures around this age...
There must be a better future for the Cheetahs!
http://rcs.fateback.com/
There must be a better future for the Cheetahs!
http://rcs.fateback.com/