def tlisp_rgb(red, green, blue):
"""Return a color from RED, GREEN, and BLUE values from 0 to 1."""
colors = (red, green, blue)
for x in colors:
if x < 0 or x > 1:
raise lispError("Illegal color intensity in " + repl_str(colors))
scaled = tuple(int(x*255) for x in colors)
return '"#%02x%02x%02x"' % scaled
def tlisp_pixelsize(size):
"""Change pixel size to SIZE."""
_check_nums(size)
if size <= 0 or not isinstance(size, numbers.Integral):
raise lispError("Invalid pixel size: " + repl_str(size))
tlisp_pixel.size = size
def lisp_print_return(val1, val2):
print(repl_str(val1))
return val2
def lisp_error(msg=None):
msg = "" if msg is None else repl_str(msg)
raise lispError(msg)
def lisp_print(val):
print(repl_str(val))
def lisp_display(val):
if lisp_stringp(val):
val = eval(val)
print(repl_str(val), end="")