Edit history, like a true winner, start of redraw logic.

include/ui.bm

@@ -8,7 +8,7 @@ function textinput$ (x as integer,y as integer,w as integer,h as integer,__text
     end if
     drawtextinput x,y,w,h,__text,1
     if not mouseclicked then exit function
-    text=""
+    'text=""
     cursor=len(text)+1
     dim relativeX as integer
     do