Activate_Visible_Screen


Purpose   Redirects all subsequent screen writing activity back to the
          visible screen.

Decln.    Activate_Visible_Screen;

Remarks   The visible screen is effectively screen 0. This command is the
          equivalent of Activate_Virtual_Screen(0);

Example

BEGIN
    CREATESCREEN(3,25);
    ACTIVATE_VIRTUAL_SCREEN(3);
    CLEARTEXT(1,1,80,25,WHITE,BLUE);
    WRITECENTER(1,YELLOW,BLUE,'HELP SYSTEM');
    ......
    SLIDERESTORESCREEN(3,DOWN);
    ACTIVATE_VISIBLE_SCREEN;
    WRITE(1,25,WHITE,RED,'PRESS ANY KEY TO CONTINUE');
END;