We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent b806fd9 commit 002fbf3Copy full SHA for 002fbf3
LIB.ITC/HILITE.FTH
@@ -1,4 +1,5 @@
1
-\ HILITE.FTH create reverse color characters and removes itself
+\ HILITE.FTH updated Mar 25 2025
2
+\ create reverse color character set
3
\ INCLUDE DSK1.TOOLS
4
5
HEX
@@ -34,9 +35,9 @@ DECIMAL
34
35
: BLINKER ( Vaddr len -- ) BEGIN 2DUP REVERSE 500 MS KEY? UNTIL 2DROP ;
36
37
: TEST PAGE ." This string will print normally"
- CR ." This will be reversed in 3 seconds"
38
+ CR ." This will be reversed in 3 seconds"
39
CR
- CR ." This one will blink"
40
+ CR ." This one will blink"
41
42
0 23 AT-XY ." Press a key to stop demo"
43
3000 MS
0 commit comments