BCX Console Demonstration Program s140.bas |
CLS COLOR 14, 0 LOCATE 1, 1 PRINT "ABC"; COLOR 7, 0 PRINT PRINT "The ASCII Value of the Char at Y, X [1, 2] =", SCREEN(1, 2) PRINT "The Color Attribute of Char at Y, X [1, 2] =", SCREEN(1, 2, 1)
ABC
The ASCII Value of the Char at Y, X [1, 2] = 66
The Color Attribute of Char at Y, X [1, 2] = 14