39 lines
802 B
Plaintext
39 lines
802 B
Plaintext
--[[ martysama0134 - sample USERPANEL from QUEST
|
|
NOTES:
|
|
-) The scroll is automatically resent after closing the menu
|
|
-) To disable the automatic resend, set RESEND_LETTER to false or 0
|
|
]]
|
|
define RESEND_LETTER true
|
|
quest userpanel begin
|
|
state start begin
|
|
|
|
function ResendLetter(title)
|
|
set_skin(NOWINDOW)
|
|
makequestbutton(title)
|
|
q.set_title(title)
|
|
q.start()
|
|
end
|
|
|
|
function Message()
|
|
say("Are you sure about that?")
|
|
local s1=select("Yes", "No")
|
|
if s1==2 then return end
|
|
say("OKKKKKKKKKKK")
|
|
wait()
|
|
say("KEEP GOIINNNNNNNNNG")
|
|
wait() --required
|
|
end
|
|
|
|
when letter begin
|
|
send_letter("UserPanel")
|
|
end
|
|
|
|
when button or info begin
|
|
userpanel.Message()
|
|
if RESEND_LETTER or RESEND_LETTER==1 then
|
|
userpanel.ResendLetter("UserPanel")
|
|
end
|
|
end
|
|
end
|
|
end
|