WriteAT


Purpose   Writes to the screen el quicko.

Decln.    WriteAT(X,Y,F,B:byte;Str:StrScreen);

Remarks   X, Y are the coordinates of the first character.
          F, B are the foreground and background display colors.
          Str is the string to be written.

Example

CONST
    HEADING = 'TOOLKIT';
VAR
  NAME : STRING;
BEGIN
    NAME := "BOBBO";
    WRITEAT(1,1,WHITE,BLACK,'WELCOME');
    WRITEAT(10,10,CYAN,RED,HEADING');
    WRITEAT(40,3,LIGHTCYAN,LIGHTGRAY,'TO'+'THE SHOW');
    WRITEAT(70,20,GREEN,BLACK,NAME);
END;

The example writes various strings to the screen and illustrates that
strings, constants, variables and concatenated strings are valid.