X7ROOT File Manager
Current Path:
/usr/share/awk
usr
/
share
/
awk
/
📁
..
📄
assert.awk
(382 B)
📄
bits2str.awk
(327 B)
📄
cliff_rand.awk
(307 B)
📄
ctime.awk
(233 B)
📄
ftrans.awk
(317 B)
📄
getopt.awk
(2.18 KB)
📄
gettime.awk
(2.43 KB)
📄
group.awk
(1.75 KB)
📄
join.awk
(378 B)
📄
libintl.awk
(238 B)
📄
noassign.awk
(425 B)
📄
ord.awk
(937 B)
📄
passwd.awk
(1.17 KB)
📄
quicksort.awk
(1023 B)
📄
readable.awk
(492 B)
📄
rewind.awk
(404 B)
📄
round.awk
(661 B)
📄
strtonum.awk
(1.43 KB)
📄
walkarray.awk
(214 B)
📄
zerofile.awk
(424 B)
Editing: ord.awk
# ord.awk --- do ord and chr # Global identifiers: # _ord_: numerical values indexed by characters # _ord_init: function to initialize _ord_ # # Arnold Robbins, arnold@skeeve.com, Public Domain # 16 January, 1992 # 20 July, 1992, revised BEGIN { _ord_init() } function _ord_init( low, high, i, t) { low = sprintf("%c", 7) # BEL is ascii 7 if (low == "\a") { # regular ascii low = 0 high = 127 } else if (sprintf("%c", 128 + 7) == "\a") { # ascii, mark parity low = 128 high = 255 } else { # ebcdic(!) low = 0 high = 255 } for (i = low; i <= high; i++) { t = sprintf("%c", i) _ord_[t] = i } } function ord(str, c) { # only first character is of interest c = substr(str, 1, 1) return _ord_[c] } function chr(c) { # force c to be numeric by adding 0 return sprintf("%c", c + 0) }
Upload File
Create Folder