RosettaCodeData/Task/Terminal-control-Inverse-video/BASIC/terminal-control-inverse-video-3.basic

4 lines
163 B
Text
Raw Permalink Normal View History

2014-01-17 05:32:22 +00:00
inverse$ = CHR$(17)+CHR$(128)+CHR$(17)+CHR$(15)
normal$ = CHR$(17)+CHR$(128+15)+CHR$(17)+CHR$(0)
PRINT inverse$ + "Inverse" + normal$ + " video"