The CONTROL CRT statement can be used to control various CRT attributes, while the STATUS CRT can be used to read the status of those attributes. A complete list of the CONTROL and STATUS registers for the CRT follows this example:
ON CYCLE 1,15 CALL Time
LOOP
PRINT TABXY(RND*68+1,RND*(STATUS(CRT,13)-)+1);CHR$(32+RND*96);
END LOOP
END
SUB Time
STATUS CRT,0;Col,Row
CONTROL CRT,0;70,1
PRINT TIME$(TIMEDATE);
CONTROL CRT,0;Col,Row
SUBEND
|