home *** CD-ROM | disk | FTP | other *** search
/ Best Objectech Shareware Selections / UNTITLED.iso / boss / word / misc / 009 / qbscr.inc < prev    next >
Text File  |  1991-05-04  |  2KB  |  31 lines
  1. '──────────────────────────────────────────────────────────────────────────
  2. ' DECLARE statements for all the QBSCR routines
  3. '──────────────────────────────────────────────────────────────────────────
  4.   DECLARE FUNCTION BlockSize% (l%, r%, t%, b%)
  5.   DECLARE FUNCTION ColorChk ()
  6.   DECLARE FUNCTION GetBackground% (row%, col%)
  7.   DECLARE FUNCTION GetForeground% (row%, col%)
  8.   DECLARE FUNCTION GetVideoSegment! ()
  9.   DECLARE FUNCTION MakeMenu% (choice$(), numOfChoices%, justify$, leftColumn!, rightColumn!, row%, marker$, fg%, bg%, hfg%, hBG%, qfg%, qbg%)
  10.   DECLARE FUNCTION SubMenu% (choice$(), currentMenu%, numOfChoices%, justify$, leftColumn!, rightColumn!, row%, marker$, fg%, bg%, hfg%, hBG%, qfg%, qbg%)
  11.   DECLARE FUNCTION ScreenBlank$ (delay)
  12.   DECLARE FUNCTION SelectList$ (items$(), numItems%, topRow%, botRow%, leftCol%, maxWidth%, normFG%, normBG%, hiFG%, hBG%)
  13.   DECLARE SUB Banner (st$, row%, fore%, back%)
  14.   DECLARE SUB BlockRestore (l%, r%, t%, b%, scrArray%(), segment!)
  15.   DECLARE SUB BlockSave (l%, r%, t%, b%, scrArray%(), segment!)
  16.   DECLARE SUB BuildScreen (file$, mode%)
  17.   DECLARE SUB Center (st$, row%)
  18.   DECLARE SUB ClrScr (mode%, fillChar$)
  19.   DECLARE SUB DisplayEntry (entry$, qfg%, qbg%, hfg%, hBG%, fg%, bg%, marker$, actionCode%)
  20.   DECLARE SUB GetScreen (file$)
  21.   DECLARE SUB MakeWindow (topRow!, leftCol!, botRow!, rightCol!, foreColor%, backColor%, windowType%, frameType%, shadowColor%, explodeType%, label$)
  22.   DECLARE SUB MultiMenu (menusArray$(), numEntries%(), menuTitles$(), justify$, marker$, shadowCode%, fg%, bg%, hfg%, hBG%, qfg%, qbg%, menuSelected%, menuEntrySelected%)
  23.   DECLARE SUB OffCenter (st$, row%, leftCol%, rightCol%, fore%, back%)
  24.   DECLARE SUB PutScreen (file$)
  25.   DECLARE SUB QBPrint (st$, row%, col%, fore%, back%)
  26.   DECLARE SUB ScrnRestore (firstLine%, lastLine%, scrArray%(), segment)
  27.   DECLARE SUB ScrnSave (firstLine%, lastLine%, scrArray%(), segment)
  28.   DECLARE SUB ViewList (list$(), listLen%, maxWidth%, topRow%, botRow%, leftCol%, fg%, bg%)
  29.   DECLARE SUB Wipe (top%, bottom%, lft%, rght%, back%)
  30.  
  31.