here is the script ;
key id;
string mess = "demo";
list menu = ["<< PREV","CANCEL","NEXT >>"];
integer chan;
integer h;
//=======================================================
init()
{
llListenRemove
;key id;
h = llListen(chan, "",id, ""
;}
//======================================================
dialog()
{
id = llDetectedKey(0);
chan = llFloor(llFrand(100000.0)) + 1000;
init();
llDialog(id,mess,menu,chan);
}
//=====================================================
default
{
state_entry()
{
}
touch_start(integer total_number)
{
dialog();
}
listen( integer channel, string name, key id, string message )
{
if (message == "<< PREV"

{
llMessageLinked(LINK_THIS , 0, "back", NULL_KEY);
llListenRemove
; }
if (message == "NEXT >>"

{
llMessageLinked(LINK_THIS , 0, "forward", NULL_KEY);
llListenRemove
; }
if (message == "CANCEL"

{
llListenRemove
; }
}
}
