TIP: Click on subject to list as thread! ANSI
echo: cis.os9.68000.osk
to: Kevin Darling 76703,4227 (X)
from: LARRY OLSON 72227,3467
date: 1992-08-29 12:39:31
subject: #source_part 2

#: 16335 S12/OS9/68000 (OSK)
    29-Aug-92  12:39:31
Sb: #source_part 2
Fm: LARRY OLSON 72227,3467
To: Kevin Darling 76703,4227 (X)



       /* draw and fill a box at location xloc,yloc */
       /* if foreground = background put white box around color box */

fbox(path, xloc, yloc, fcol, bcol)
int path,xloc,yloc;
int fcol,bcol;

{
   int xloc2, yloc2;

   xloc2 = xloc + 11;
   yloc2 = yloc + 5;

   if ( fcol == bcol ) {
       SetDPtr(path, xloc -1, yloc -1); 
       FColor(path, 15); 
       Box(path, xloc2 +1, yloc2 +1); 
       } 

   SetDPtr(path, xloc, yloc);
   FColor(path, fcol);
   Bar(path, xloc2, yloc2);

   return 0;
}

There is 1 Reply.

SOURCE: compuserve via textfiles.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.