Textbox2Hovertext

<lsl> // Textbox2Hovertext by Ackley Bing & Omei Qunhua // A simple script to allow object owners to change the "hovertext" // on their prims using a text entry box (llTextBox).

integer listenhandle;

default {

   touch_start(integer num)
   {
       key writer = llDetectedKey(0);
       if(writer!=llGetOwner()) return; // remove this line to allow anyone to change the hover text
       llListenRemove(listenhandle);
       llSetTimerEvent(60.0); // Time to input text until script closes listener in case target doesnt enter anything into textbox
       listenhandle=llListen(-12345, "", writer, "");
       llTextBox( writer, "Set Hovertext", -12345);
   }
   listen(integer channel, string name, key id, string message)
   {
       llSetText(message, <1, 1, 1>, 1);
       llListenRemove(listenhandle);
       llSetTimerEvent(0.0);
   }
   timer()
   {
       llListenRemove(listenhandle);
       llSetTimerEvent(0.0);
   }

} </lsl>