WriteBetween                                                   FastTTT



Purpose   To write text centered between two points.

Declaration    WriteBetween(X1,X2,Y,F,B: integer; ST: string);

          X1 is the left most X coord (1..79)
          X2 is the right most X Coord (2..80)
          Y is the Y coord or line number (1..25)
          F is the foreground (0..15)
          B is the background (0..15)
          ST is the string or text to be displayed

Uses FastTTT.

Remarks   If the length of the string is greater than the distance
          between the X coordinates, the string will simply be written
          commencing at X1.



Example


               USES FASTTTT;
               BEGIN
                 WRITEBETWEEN(1,40,15,0,'LEFT SIDE');
                 WRITEBETWEEN(41,80,14,0,'RIGHT SIDE');
               END.