File tree 2 files changed +17
-16
lines changed
2 files changed +17
-16
lines changed Original file line number Diff line number Diff line change
1
+ Rebol [
2
+ Title: "ANSI escape sequences support"
3
+ File: %mezz-ansi.reb
4
+ Version: 1.0.0
5
+ Date: 4-Mar-2021
6
+ Purpose: "Decorate any value with bright ANSI color sequences"
7
+ ]
8
+
9
+ ;- using 2x append to avoid making a reduced block for the output
10
+ as-gray : func [ value] [append append copy "^[ [1;30m" value "^[ [0m" ]
11
+ as-red : func [ value] [append append copy "^[ [1;31m" value "^[ [0m" ]
12
+ as-green : func [ value] [append append copy "^[ [1;32m" value "^[ [0m" ]
13
+ as-yellow : func [ value] [append append copy "^[ [1;33m" value "^[ [0m" ]
14
+ as-blue : func [ value] [append append copy "^[ [1;34m" value "^[ [0m" ]
15
+ as-purple : func [ value] [append append copy "^[ [1;35m" value "^[ [0m" ]
16
+ as-cyan : func [ value] [append append copy "^[ [1;36m" value "^[ [0m" ]
17
+ as-white : func [ value] [append append copy "^[ [1;37m" value "^[ [0m" ]
Original file line number Diff line number Diff line change @@ -61,19 +61,3 @@ mint: 100.136.116
61
61
62
62
reblue: 38.58.108
63
63
base-color: 200.200.200
64
-
65
- import module [
66
- name: as-colors
67
- version: 1.0.0
68
- purpose: "Decorate any value with bright ANSI color sequences"
69
- ][
70
- ;- using 2x append to avoid making a reduced block for the output
71
- export as-gray : func [ value] [append append copy "^[ [1;30m" value "^[ [0m" ]
72
- export as-red : func [ value] [append append copy "^[ [1;31m" value "^[ [0m" ]
73
- export as-green : func [ value] [append append copy "^[ [1;32m" value "^[ [0m" ]
74
- export as-yellow : func [ value] [append append copy "^[ [1;33m" value "^[ [0m" ]
75
- export as-blue : func [ value] [append append copy "^[ [1;34m" value "^[ [0m" ]
76
- export as-purple : func [ value] [append append copy "^[ [1;35m" value "^[ [0m" ]
77
- export as-cyan : func [ value] [append append copy "^[ [1;36m" value "^[ [0m" ]
78
- export as-white : func [ value] [append append copy "^[ [1;37m" value "^[ [0m" ]
79
- ]
You can’t perform that action at this time.
0 commit comments