1 \ Words for controlling terminal colours via ANSI escape sequences
3 : escape 27 emit [char] [ emit ;
4 : escape-end [char] m emit ;
10 escape emit [char] 0 + emit escape-end
30 escape [char] 1 emit escape-end
34 escape [char] 0 emit escape-end
38 escape [char] 2 emit [char] J emit
39 escape [char] 0 emit [char] ; emit [char] 0 emit [char] f emit
43 \ fg red ( set fg colour to red )
44 \ bg green ( set bg colour to green )
45 \ bold ( use a bold font )
46 \ reset-term ( return everything to normal )
47 \ clear-term ( clear terminal and return cursor to origin )