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

    > Also does anyone know how to import TheDraw Files into a prg and get
    > them to show properly. Thanks.

    Save the Files into Bin Format, then run BinOBJ on them. When you select a
    public name, remember that this will be the Procedure's name.

    After that Write:

    Procedure <public name>; External; {$L <objname>}

    Walkthrough example:

    Saved File: Welcom.Bin

    BinOBJ WELCOME WELCOME WELCOMESCREEN

    In pascal:

    Procedure WelcomeScreen; External; {$L WELCOME.OBJ}

    In order to display, dump the Procedure to b800:0 -

    Move(@WelcomeScreen,Mem[$B800:0],4000];

    4000 is the size For 80x25. The size is x*y*2.

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