Screen 13

 BBS: Inland Empire Archive
Date: 04-11-93 (02:04)             Number: 329
From: EARL MONTGOMERY              Refer#: NONE
  To: KEN POIRIER                   Recvd: NO  
Subj: Screen 13                      Conf: (2) Quik_Bas

'Ken Poirier asked for help:

'I'm have truble loading and save graphics in screen 13
'bload and bsave don't realy seem to do any thing. also, is
'there a way to load a .pcx or .gif type file on the
'screen? any thing would be apreceated. thanx!

'Earl's reply:

'Ken here is a simple example of Bsaving and Bloading Screen 13
'It does not provide for saving the palettes but if you are
'interested in how to do that let me know.

SCREEN 13
DEF SEG=&HA000
CIRCLE(100,100),90,8
PAINT(102,102),14,8
BSAVE"TEST.BIN",0,63999
SLEEP(5)
CLS
BLOAD"TEST.BIN",0
DO
LOOP

'As for loading GIFs, if you can find a copy of my program
'VGACLIP.EXE it will allow you to capture any 320*200*256
'graphic screen along with the palettes. It is a TSR. If
'get a copy of it let me know and I'll provide the source
'code to load the captured file back into QB.
'Earl


--- Opus-CBCS 1.73a
 * Origin: HARDWIRED - The WOCin' Bug Zapper (1:124/4210.0)