10 lines
341 B
Plaintext
10 lines
341 B
Plaintext
5 rem inverse video
|
|
10 print chr$(18);"reverse on";chr$(146);" reverse off"
|
|
20 print
|
|
25 rem newline (cr) also terminates reverse mode
|
|
30 print chr$(18);"this is reversed... ";:print "so is this."
|
|
40 print
|
|
50 print chr$(18);"this is reversed... ":print "this is not."
|
|
60 print
|
|
70 print chr$(18);"this is reversed... ";chr$(13);"this is not."
|