Hello, this days i found this quest auto notice with timer, original quest language was italian i translated to english.
QUEST IT IS NOT MADE BY ME, ( OWNER : Superisi )
Hope you like it, and its useful for you.
I tested it works 100%.
QUEST IT IS NOT MADE BY ME, ( OWNER : Superisi )
PHP Code:
quest automex begin
state start begin
when letter with pc . is_gm ( ) begin
send_letter ( "GM Auto Notice" )
end
when button or info begin
a = select ( "Enable Auto Message" , "Disable Auto Message" , "Set Auto Message" , "Set time" , "Close" )
if a == 1 then
if game . get_event_flag ( "auto" ) >= 1 then
say ( "Already active" )
else
say ( "Auto Message On" )
game . set_event_flag ( "auto" , 1 )
server_timer ( "mex" , t )
end
elseif a == 2 then
say ( "Auto Message Off" )
game . set_event_flag ( "auto" , 0 )
clear_server_timer ( "mex" )
clear_server_timer ( "mex1" )
elseif a == 3 then
say ( "Enter your message" )
s = input ( )
say ( "Other Message:" )
b = input ( )
say ( "Other Message:" )
c = input ( )
elseif a == 4 then
say ( "Auto post time:" )
m = tonumber(input())
if m == nil then
say ( "You must enter a number" )
elseif m < 1 then
say ( "You must enter a positive number" )
else
h = select ( "Seconds" , "Minutes" , "Hours" )
if h == 1 then
t = m
elseif h == 2 then
t = tonumber(m * 60)
elseif h == 3 then
t = tonumber(m * 60 * 60)
end
end
end
end
when mex.server_timer begin
if game.get_event_flag ( "auto" ) == 1 then
notice_all ( ""..s )
if b != "" then
notice_all ( ""..b )
end
if c != "" then
notice_all ( ""..c )
end
server_timer ( "mex1" , t )
else
end
end
when mex1.server_timer begin
if game . get_event_flag ( "auto" ) == 1 then
notice_all ( ""..s )
if b != "" then
notice_all ( ""..b )
end
if c != "" then
notice_all ( ""..c )
end
server_timer ( "mex" , t )
else
end
end
end
end
I tested it works 100%.
