View/Edit #7165:rgb

Name(s): rgb

1:  {r, g, b, ?bits = 16} = args
2:  r = toint(r)
3:  g = toint(g)
4:  b = toint(b)
5:  bits = toint(bits)
6:  if (bits == 16)
7:    r = r * (2 ^ 5 - 1) / 100
8:    g = g * (2 ^ 6 - 1) / 100
9:    b = b * (2 ^ 5 - 1) / 100
10:   colour = r * 2 ^ 11 + g * 2 ^ 5 + b
11: endif
12: if (callers())
13:   return colour
14: else
15:   hex = $math_utils:base_conversion(colour, 10, 16)
16:   hex = $string_utils:space(8 - length(hex), "0") + hex
17:   return player:tell(colour, " = 0x", hex)
18: endif
19: "Last modified by Dax (#789) on Tue May  3 14:09:36 2005 MDT."

Verb arguments: any any any
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: manta (#7165)

You are not logged in.