anchor.diff:  					wxTextCtrl:writeText(Disp,"\n"),
   					Print = lists:sublist(Str,length(Prompt)+1,length(Str)),
   					home ! {exec, unicode:characters_to_binary(Print)},
  -					wxloop(Disp,Input,Prompt);
  -			% end;
  +					wxloop(Disp,Input,Prompt)
  +			end;
   		Wx ->
   			Cmd = Wx#wx.event,
   			case Cmd of
  
positive.code: 	wxTextCtrl:writeText(TextInput,?PROMPT),
  	wxEvtHandler:connect(Dlg,close_window),
  	wxEvtHandler:connect(TextInput,command_text_enter),
  	wxEvtHandler:connect(TextInput,left_down),
  	wxEvtHandler:connect(TextInput,key_down,[{callback,fun input/2},{userData,{TextInput,?PROMPT}}]),
  	wxloop(TextDisplay,TextInput,?PROMPT).
  
  
negative.code: 			wxloop(Disp,Input,Prompt);
  		Wx when Wx#wx.obj == Input ->
  			Cmd = Wx#wx.event,
  			case Cmd of
  				#wxMouse{} ->
  					% self() ! {print,"MOUSE!"},
  					wxloop(Disp,Input,Prompt);
  				% #wxClipboardText{} ->
  				% 	Clip = wxClipboard:get(),
  				% 	self() ! {print,io_lib:fwrite("~p~n",[get(clip)])},
  				% 	wxloop(Disp,Input,Prompt);
  				_ ->
  					wxTextCtrl:setValue(Input,Prompt),
  					wxTextCtrl:setInsertionPoint(Input,length(Prompt)),
  					Str = Cmd#wxCommand.cmdString,
  