Лазил по элите, нашёл квест онлайн админов...сам не проверял т.к. у меня есть другой вариант, поэтому сказать работает ли этот квест или нет я не знаю, перевод тоже не делал вот оригинал:
Code
quest gmonline begin state start begin when login with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 1) setskin(NOWINDOW) if get_time() > pc.getqf("abgelaufen") then pc.setqf("abgelaufen",get_time()+60*60*24) end end when logout with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 0) setskin(NOWINDOW) end when 20095.chat."Teamler Online" begin local sa = {'Test1','Test2'} local sga = {'Test3'} local ga = {'Test4','Test5'} local sgm = {'Test6'} local gm = {'Test7','Test8'} local anzahlSA = 2 local anzahlSGA = 1 local anzahlGA = 2 local anzahlSGM = 1 local anzahlGM = 2 --Server Admin-- i = 1 say_title(" Teamler Online") say("") say_yellow("Vergiss die Eckigen Klammern nicht!!!") say("") while i <= anzahlSA do local text = sa[number(i ,i)]; local name = '[SA]' ..text if game.get_event_flag(""..name.."")== 1 then say_green("SA "..name.." ist Online.") else say_red("SA "..name.." ist Offline.") end i = i + 1 end
--SGA-- i = 1 while i <= anzahlSGA do local text = sga[number(i ,i)]; local name = '[SGA]' ..text if game.get_event_flag(""..name.."")== 1 then
say_green("SGA "..name.." ist Online.") else
say_red("SGA "..name.." ist Offline.") end i = i + 1 end
--GA-- i = 1 while i <= anzahlGA do local text = ga[number(i ,i)]; local name = '[GA]' ..text if game.get_event_flag(""..name.."")== 1 then
say_green("GA "..name.." ist Online.") else
say_red("GA "..name.." ist Offline.") end i = i + 1 end --SGM-- i = 1 while i <= anzahlSGM do local text = sgm[number(i ,i)]; local name = '[SGM]' ..text if game.get_event_flag(""..name.."")== 1 then
say_green("SGM "..name.." ist Online.") else
say_red("SGM "..name.." ist Offline.") end i = i + 1 end --GM-- i = 1 while i <= anzahlGM do local text = gm[number(i ,i)]; local name = '[GM]' ..text if game.get_event_flag(""..name.."")== 1 then say_green("GM "..name.." ist Online.") else say_red("GM "..name.." ist Offline.") end i = i + 1 end end end end
Кто проверит, напишите работает он или нет и если есть возможность приложите скрин
Квест полностью рабочий, спасибо, правда там не много убрать, т.к. он не распознал команду say_red и т.п., просто вместо этого сделайте say По крайней мере у меня вышло.)
Добавлено (25.11.2011, 00:22) --------------------------------------------- Полностью рабочий кв. [spoiler="Quest."] quest gmonline begin state start begin when login with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 1) setskin(NOWINDOW) if get_time() > pc.getqf("abgelaufen") then pc.setqf("abgelaufen",get_time()+60*60*24) end end when logout with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 0) setskin(NOWINDOW) end when 20095.chat." Администрация Онлайн." begin local sa = {'Vagabund'} local gm = {'[GM]Magic','[GM]Egor'} local anzahlSA = 1 local anzahlGM = 2 --Server Admin-- i = 1 say_title(" Администрация Онлайн. ") say("") say("") while i <= anzahlSA do local text = sa[number(i ,i)]; local name = '' ..text if game.get_event_flag(""..name.."")== 1 then say_reward(" "..name.." В сети. ") else say_reward(" "..name.." Оффлайн. ") end i = i + 1 end
--GM-- say_title(" Используя ники след. Админов, ") say_title(" не забудьте GM, выделить квардратными скобками! ") i = 1 while i <= anzahlGM do local text = gm[number(i ,i)]; local name = '' ..text if game.get_event_flag(""..name.."")== 1 then say_reward(" GM"..name.." В сети.") else say_reward(" GM"..name.." Оффлайн.") end i = i + 1 end end end end [/spoiler]
quest gmonline begin state start begin when login begin set_state(information) end end state information begin when letter begin send_letter(" Список администрации онлайн: ") end when button or info begin say(" Имя Статус ") say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~") if game.get_event_flag("NikName1")== 1 then say_reward(" NikName1 онлайн ") else say(" NikName1 оффлайн") end if game.get_event_flag("NikName2")== 1 then say_reward(" NikName2 онлайн ") else say(" NikName2 оффлайн ") end if game.get_event_flag("NikName3")== 1 then say_reward(" NikName3 онлайн ") else say(" NikName3 оффлайн ") end end end end
NikName1 - ник 1ого гма, NikName2 - ник 2ого гма, NikName3 - ник 3его гма пишем...Далее думаю понятно. Квест взят с сервер файлов by kay .
Чем Вас этот не устраивает?) quest gmonline begin state start begin when login with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 1) setskin(NOWINDOW) if get_time() > pc.getqf("abgelaufen") then pc.setqf("abgelaufen",get_time()+60*60*24) end end when logout with pc.is_gm() begin local name = pc.get_name() game.set_event_flag(name, 0) setskin(NOWINDOW) end when 20095.chat." Администрация Онлайн." begin local sa = {' Ник Админа '} local gm = {' Ник Админа ',' Ник Админа '} local anzahlSA = 1 local anzahlGM = 2 --Server Admin-- i = 1 say_title(" Администрация Онлайн. ") say("") say("") while i <= anzahlSA do local text = sa[number(i ,i)]; local name = '' ..text if game.get_event_flag(""..name.."")== 1 then say_reward(" "..name.." В сети. ") else say_reward(" "..name.." Оффлайн. ") end i = i + 1 end
--GM-- say_title(" Используя ники след. Админов, ") say_title(" не забудьте GM, выделить квардратными скобками! ") i = 1 while i <= anzahlGM do local text = gm[number(i ,i)]; local name = '' ..text if game.get_event_flag(""..name.."")== 1 then say_reward(" GM"..name.." В сети.") else say_reward(" GM"..name.." Оффлайн.") end i = i + 1 end end end end Он работает