View/Edit #4342:encode_seq

Name(s): encode_seq

1:  {codes, ?bgcodes = 0} = args
2:  for i in [1..2]
3:    codes[i] = $ansi_utils.codes_colours[codes[i] in $ansi_utils.colours]
4:  endfor
5:  codes[1..1] = codes[1] == "0" ? {} | {codes[1]}
6:  code = "&esc;[0"
7:  "We always want a hard reset of all active ansi codes before starting... why not?"
8:  for x in (codes)
9:    code = tostr(code, ";", x)
10: endfor
11: return tostr(code, "m")
12: "Last modified by Cecil (#7407) on Mon Oct 22 20:08:33 2001 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Cecil (#7407)

You are not logged in.