Cerere Quest Halloween
Poftim:
Iar aici ai dropul de la dovleac,îl bagi în fișierul /usr/home/game/share/locale/germany și acolo vei găsi un fișier numit special_item_group.txt,acolo vei băga la sfârșit de tot acest cod:
Instalarea quest-ului:
Sper că te-am ajutat.
Cod: Selectaţi tot
quest halloween_dr begin
state start begin
when login begin
if game.get_event_flag("mondlicht_event") == 1 then
notice("Eventul Halloween a început!")
notice("ªansa dovleacului Halloween este " ..game.get_event_flag("mond_drop_chance").. "%")
end
end
when kill begin
local m_ind = pc.get_map_index()
if npc.is_pc() then
else
if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 70 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 90 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 250 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
end
end
end
when 9003.chat."GM: Event drop Halloween" with pc.is_gm() begin
if game.get_event_flag("mondlicht_event") == 1 then
say_title("Administrare event:")
say("")
say("Eventul Halloween este pornit!")
say("")
say_reward("Opriþi event-ul?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare event:")
say("")
say("Eventul a fost oprit.")
say("Mult noroc.")
say("")
game.set_event_flag("mondlicht_event", 0)
char_log(0, "Eventul Halloween a fost oprit de " ..pc.get_name())
notice_all("Eventul Halloween s-a terminat!")
elseif s==2 then
say_title("Administrare event:")
say("")
say("Ne mai revedem.")
say("")
end
else
say_title("Administrare event:")
say("")
say("Eventul Halloween este oprit!")
say("")
say_reward("Porniþi eventul?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare event:")
say("")
say("Eventul a fost pornit.")
say("Mult noroc.")
say("")
game.set_event_flag("mondlicht_event", 1)
char_log(0, "Eventul Halloween a fost pornit de " ..pc.get_name())
notice_all("Eventul Halloween a început!")
notice_all("Mult noroc ºi distracþie plãcutã!www.pro-area.com")
elseif s==2 then
say_title("Administrare event:")
say("")
say("Ne mai revedem.")
say("")
end
end
end
when 9003.chat."GM: Sansa drop Halloween" with pc.is_gm() begin
if pc.get_name() == "[GA]Jo3y" or pc.get_name() == "[SGA]Cyry" then
say_title("Administrare event:")
say("")
say("Cât de mare ar trebui sa fie ºansa de drop?")
say("")
say_reward("1-100")
say("")
local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 100 then
say_title("Administrare event:")
say("")
say("Numarul introdus este incorect!")
say("")
else
char_log(0, "Sansa drop Halloween a fost setata de " ..pc.get_name().. " la " ..new_chance.. "%")
game.set_event_flag("mond_drop_chance", new_chance)
say_title("Administrare event:")
say("")
say("ªansa de drop este setata la " ..new_chance.. " %.")
say("")
say("Ne mai revedem.")
say("")
end
else
say_title("Administrare event:")
say("")
say("Nu aveþi drepturile necesare pentru a efectua acest lucru.")
say("")
end
end
end
endCod: Selectaţi tot
Group ÇÒ·ÎÀ©È£¹Ú
{
Vnum 50095
1 70020 10 10
2 70003 1 3
3 80003 1 4
4 90011 5 8
5 71008 1 2
6 70024 1 1
7 70036 1 2
8 70008 2 4
9 25041 1 1
10 70102 1 5
11 27991 1 1
12 27992 1 3
13 27993 1 4
14 27994 1 3
15 50513 1 5
16 50512 1 1
17 50628 1 3
18 50625 1 4
19 50633 1 4
20 50050 1 3
21 50821 2 3
22 50822 3 5
23 50823 2 6
24 50825 2 3
25 50826 1 4
26 25040 1 1
27 30179 1 1
28 30228 1 1
29 30166 4 4
30 30168 2 3
31 30221 1 3
32 30169 3 5
33 30170 2 7
34 30224 1 4
}Cod: Selectaţi tot
cd /usr/game/quest
./qc halloween_dr.questDimitri scrie:Poftim:Iar aici ai dropul de la dovleac,îl bagi în fișierul /usr/home/game/share/locale/germany și acolo vei găsi un fișier numit special_item_group.txt,acolo vei băga la sfârșit de tot acest cod:Cod: Selectaţi tot
quest halloween_dr begin state start begin when login begin if game.get_event_flag("mondlicht_event") == 1 then notice("Eventul Halloween a început!") notice("ªansa dovleacului Halloween este " ..game.get_event_flag("mond_drop_chance").. "%") end end when kill begin local m_ind = pc.get_map_index() if npc.is_pc() then else if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 70 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 90 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 250 then if game.get_event_flag("mondlicht_event") == 1 then local chance = number(1, 100) local chance_max = game.get_event_flag("mond_drop_chance") if chance <= chance_max then pc.give_item2(50095) --game.drop_item(50095) else end else end end end end when 9003.chat."GM: Event drop Halloween" with pc.is_gm() begin if game.get_event_flag("mondlicht_event") == 1 then say_title("Administrare event:") say("") say("Eventul Halloween este pornit!") say("") say_reward("Opriþi event-ul?") local s=select("Da", "Nu") if s==1 then say_title("Administrare event:") say("") say("Eventul a fost oprit.") say("Mult noroc.") say("") game.set_event_flag("mondlicht_event", 0) char_log(0, "Eventul Halloween a fost oprit de " ..pc.get_name()) notice_all("Eventul Halloween s-a terminat!") elseif s==2 then say_title("Administrare event:") say("") say("Ne mai revedem.") say("") end else say_title("Administrare event:") say("") say("Eventul Halloween este oprit!") say("") say_reward("Porniþi eventul?") local s=select("Da", "Nu") if s==1 then say_title("Administrare event:") say("") say("Eventul a fost pornit.") say("Mult noroc.") say("") game.set_event_flag("mondlicht_event", 1) char_log(0, "Eventul Halloween a fost pornit de " ..pc.get_name()) notice_all("Eventul Halloween a început!") notice_all("Mult noroc ºi distracþie plãcutã!www.pro-area.com") elseif s==2 then say_title("Administrare event:") say("") say("Ne mai revedem.") say("") end end end when 9003.chat."GM: Sansa drop Halloween" with pc.is_gm() begin if pc.get_name() == "[GA]Jo3y" or pc.get_name() == "[SGA]Cyry" then say_title("Administrare event:") say("") say("Cât de mare ar trebui sa fie ºansa de drop?") say("") say_reward("1-100") say("") local new_chance = tonumber(input()) if new_chance < 0 or new_chance > 100 then say_title("Administrare event:") say("") say("Numarul introdus este incorect!") say("") else char_log(0, "Sansa drop Halloween a fost setata de " ..pc.get_name().. " la " ..new_chance.. "%") game.set_event_flag("mond_drop_chance", new_chance) say_title("Administrare event:") say("") say("ªansa de drop este setata la " ..new_chance.. " %.") say("") say("Ne mai revedem.") say("") end else say_title("Administrare event:") say("") say("Nu aveþi drepturile necesare pentru a efectua acest lucru.") say("") end end end endInstalarea quest-ului:Cod: Selectaţi tot
Group ÇÒ·ÎÀ©È£¹Ú { Vnum 50095 1 70020 10 10 2 70003 1 3 3 80003 1 4 4 90011 5 8 5 71008 1 2 6 70024 1 1 7 70036 1 2 8 70008 2 4 9 25041 1 1 10 70102 1 5 11 27991 1 1 12 27992 1 3 13 27993 1 4 14 27994 1 3 15 50513 1 5 16 50512 1 1 17 50628 1 3 18 50625 1 4 19 50633 1 4 20 50050 1 3 21 50821 2 3 22 50822 3 5 23 50823 2 6 24 50825 2 3 25 50826 1 4 26 25040 1 1 27 30179 1 1 28 30228 1 1 29 30166 4 4 30 30168 2 3 31 30221 1 3 32 30169 3 5 33 30170 2 7 34 30224 1 4 }Sper că te-am ajutat.Cod: Selectaţi tot
cd /usr/game/quest ./qc halloween_dr.quest
de 
de 
de -
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 22 vizitatori