TIP: Click on subject to list as thread! ANSI
echo: os2prog
to: Jay Collins
from: Phil Crown
date: 1995-01-22 18:41:46
subject: Os/2 VIO BOX using High ascii

> Here's how I am doing it, the code that "fills" in the box is kinda
 > slow,
 > especially on large boxes.  This is a textmode program, so the
 > VioHandle is

 JC> Thanks! It's a start anyways.

Replace this,

  for( c = LfRow + 1; c < RtRow; c++ ) {
    for( i = LfColumn + 1; i < RtColumn; i++ )
      vputchr( (PCH) Fill, c, i, Box_Color );
  }

with this. :-)

  VioScrollUp( LfRow + 1, LfColumn + 1, RtRow - 1, RtColumn - 1,
               RtRow - LfRow - 1,
               Fill,
               0 );

Here's how I call it.

LONG  main()
{

  PBYTE             Fill        = "\xb0\x09";
  PBYTE             Box_Color   = "\x01"    ;
  PBYTE             hi_color    = "\x1f"    ;
  SHORT             Box_Style   =  1        ;


  box( 0, 0, 27, 79, Box_Style, Fill, Box_Color );

}

Seems a bit redundant having the color available in Fill and Box_Color, but
as you mentioned, its a start! :-)

Phil


--- Blue Wave/Max v2.20k OS2 Beta
* Origin: * MacSavvy * Dallas * Mac * OS/2 * (214)250-4479 * (1:124/1208)
SEEN-BY: 12/2442 620/243 624/50 632/348 640/820 690/660 711/409 410 413 430
SEEN-BY: 711/807 808 809 934 942 949 712/353 515 713/888 800/1 7877/2809
@PATH: 124/1208 1204 1 396/1 3615/50 229/2 12/2442 711/409 808 809 934

SOURCE: echomail via fidonet.ozzmosis.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™.