home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 19
/
CD_ASCQ_19_010295.iso
/
dos
/
prg
/
bas
/
hanlin3
/
qbwiz20
/
demo.bas
< prev
next >
Wrap
BASIC Source File
|
1992-07-13
|
910b
|
24 lines
REM $INCLUDE: 'QBWIZ.BI'
' Example program demonstrating the use of the QBWiz library.
' You can compile and link this using the CREATE.BAT file.
DEFINT A-Z
PRINT "This is a demo program that uses a few of the functions provided by the QBWiz"
PRINT "library, which works directly with QuickBasic 4.5 internal information."
PRINT
IF REDIRECTION% THEN
PRINT "Output has been redirected."
PRINT "No screen information will be printed."
ELSE
PRINT "Output is going to the screen."
PRINT
PRINT "Display type: "; CRT$
PRINT "Screen size :"; SCREENHEIGHT%; "by"; SCREENWIDTH%
PRINT "Current foreground color:"; FORECOLOR%
PRINT "Current background color:"; BACKCOLOR%
PRINT "The cursor is ";
IF NOT SHOWCURSOR THEN PRINT "not ";
PRINT "visible. Its size is"; CURSORSTART; ","; CURSORSTOP
END IF