Textbox2Hovertext

<lsl> // Textbox2Hovertext.LSL by Ackley Bing . January 2013 // A simple script to allow hovertext to be set with a dialog text box

integer listenhandle;

default {

   touch_start(integer num)
   {
       llSetTimerEvent(30.0);
       llTextBox( llDetectedKey(0), "Set Hovertext", (listenhandle = llListen(1, "", llGetOwner(), "")) );
   }
   listen(integer channel, string name, key id, string message)
   {
       llSetText(message, <1.0,1.0,1.0>, 1.0);
   }
   timer()
   {
       if (listenhandle) llListenRemove(listenhandle--);
       else llSetTimerEvent(0.0);
   }

} </lsl>