BBS: Inland Empire Archive Date: 09-26-92 (11:01) Number: 186 From: MATT PRITCHARD @ 930/21 Refer#: NONE To: THOMAS HEAD Recvd: NO Subj: Bloading 320x200x256 grap Conf: (2) Quik_Bas
TH> Help! I'd like to know how to load 320x200x256 gfx in QB. I know
TH>how to load 640x480x16 (I think), but 320x200x256 is impossible.
Actually very simple...
'Save ...
SCREEN 13
DEF SEG = &h0A000
Bytes% = &h0FA00 ' 64000 bytes (= some negative #)
BSAVE "VGASCR13.DAT", 0, Bytes%
'Load ...
SCREEN 13
DEF SEG = &H0A000
BLOAD "VGASCR13.DAT", 0
Screen 13 is a liner bitmap of 64,000 bytes at A000:0000 to A000:F9FF
Hope this helps.
-Matt P
===
* SLMR 2.1a * Backup not found: (A)bort (R)etry (P)anic
--- InterPCB 1.50
# Origin: CENTRAL BBS -Texas' BEST BBS! 214-393-7090 HST 3+GIGs (8:930/21)
* Origin: Gateway System to/from RBBS-NET (RBBS-PC 1:10/8)

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