[Back to SCREEN SWAG index] [Back to Main SWAG index] [Original]

    {
    I use alot of line draws and some text on the screen....the lines come out
    first and then the text a second or two later....is there a way so that the
    whole output comes at once.  I tried Setvisualpage and setactivepage but the
    the whole output screen is off.

            To Turn On/Off the Screen you may use these procedure
    }
    Procedure OnScreen;
    Begin
         Port[$3c4]:=1;
         Port[$3c5]:=Screen_AttriBute_Tempolary;
    end;

    Procedure OffScreen;
    Begin
         Port[$3c4]:=1;
         Screen_Attribute_Tempolary:=Port[$3c5];
         Port[$3c5]:=Screen_AttriBute_Tempolary or $20;
    end;

[Back to SCREEN SWAG index] [Back to Main SWAG index] [Original]