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

    {
    SANTERI SALMINEN

    > how can i wait For the vertical retrace, in Pascal.

    Some routines For retraces:
    As you can see, $3DA reveals all of them.
    }

     Repeat Until Port[$3DA] And 8 = 8; { Wait For Vertical retrace              }
     Repeat Until Port[$3DA] And 8 = 0; { Wait For the end of Vertical retrace   }
     Repeat Until Port[$3DA] And 1 = 1; { Wait For Horizontal retrace            }
     Repeat Until Port[$3DA] And 1 = 0; { Wait For the end of Horizontal retrace }

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