BBS: Inland Empire Archive Date: 05-22-92 (17:07) Number: 157 From: JOHN GALLAS Refer#: NONE To: MARK BUTLER Recvd: NO Subj: video memory segment Conf: (2) Quik_Bas
MB> On 05-17-92 John Gallas wrote to All...
MB>
MB> JG> Is there a way that I can determine wether to use &HB000 or &HB800
MB> JG> when doing stuff with the screen? And also, how do I save and load
MB> JG> screens with BSAVE and BLOAD?
MB>
MB> This little function will do the trick...
MB>
MB> FUNCTION CRT%
MB> IF (PEEK(1040) AND 48) = 48 THEN
MB> CRT = 0 '<-------- monochrome, use &HB000
MB> ELSE
MB> CRT = -1 '<-------- color, use &HB800
MB> END IF
MB> END FUNCTION
I tried that on my monochrome monitor and it told me
that I had color. Then I ran my CGA simulator and it said
that I had monochrome. So I think you have the two mixed
around, if the above statement is true, then it will be
mono else color.
--- ProBoard v1.21 [Reg]
* Origin: The O-Zone BBS 612/591-7767 New Hope, MN (1:282/30.0)

Books at Amazon:
Back to BASIC: The History, Corruption, and Future of the Language
Hackers: Heroes of the Computer Revolution (including Tiny BASIC)
Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution
The Advent of the Algorithm: The Idea that Rules the World
Moths in the Machine: The Power and Perils of Programming
Mastering Visual Basic .NET