---------------------------------- -- Regenbogenstein Quest by bjoern.ebert17 -- (c) by DarkSide 2010 ---------------------------------- quest regenbogen begin state start begin when 50512.use begin
say_title("Regenbogenstein:") say("Du möchtest also deine Skills auf") say("Perfekter-Meister setzen?")
if pc.job ==0 then say("Wähle deine Lehre aus")
local s=select("Körper","Mental")
if s==1 then --Körper pc.set_skill_group(1) pc.set_skill_level(1 ,59) pc.set_skill_level(2 ,59) pc.set_skill_level(3 ,59) pc.set_skill_level(4 ,59) pc.set_skill_level(5 ,59) say("Deine Skills sind auf Perfekter Meister") end
if s==2 then --Mentalo pc.set_skill_group(2) pc.set_skill_level(16 ,59) pc.set_skill_level(17 ,59) pc.set_skill_level(18 ,59) pc.set_skill_level(19 ,59) pc.set_skill_level(20 ,59) say("Deine Skills sind auf Perfekter Meister") end
elseif pc.job ==1 then say("Wähle deine Lehre aus")
local s=select("Nahkampf","Bogen")
if s==1 then --Nahkampf pc.set_skill_group(3) pc.set_skill_level(31 ,59) pc.set_skill_level(32 ,59) pc.set_skill_level(33 ,59) pc.set_skill_level(34 ,59) pc.set_skill_level(35 ,59) say("Deine Skills sind auf Perfekter Meister") end
if s==2 then --Fernkampf pc.set_skill_group(4) pc.set_skill_level(46 ,59) pc.set_skill_level(47 ,59) pc.set_skill_level(48 ,59) pc.set_skill_level(49 ,59) pc.set_skill_level(50 ,59) say("Deine Skills sind auf Perfekter Meister") end
elseif pc.job ==2 then say("Wähle deine Lehre aus") local s=select("Magie","Waffe")
if s==1 then --Magie pc.set_skill_group(5) pc.set_skill_level(76 ,59) pc.set_skill_level(77 ,59) pc.set_skill_level(78 ,59) pc.set_skill_level(79 ,59) pc.set_skill_level(80 ,59) pc.set_skill_level(81, 59) say("Deine Skills sind auf Perfekter Meister") end
if s==2 then --Waffe pc.set_skill_group(6) pc.set_skill_level(61 ,59) pc.set_skill_level(62 ,59) pc.set_skill_level(63 ,59) pc.set_skill_level(64 ,59) pc.set_skill_level(65 ,59) pc.set_skill_level(66 ,59) say("Deine Skills sind auf Perfekter Meister") end
elseif pc.job ==3 then say("Wähle deine Lehre aus") local s=select("Heil","Drachen")
if s==1 then --Heil pc.set_skill_group(7) pc.set_skill_level(106 ,59) pc.set_skill_level(107 ,59) pc.set_skill_level(108 ,59) pc.set_skill_level(109 ,59) pc.set_skill_level(110 ,59) pc.set_skill_level(111 ,59) say("Deine Skills sind auf Perfekter Meister") end
if s==2 then --Drachen pc.set_skill_group(8) pc.set_skill_level(91 ,59) pc.set_skill_level(92 ,59) pc.set_skill_level(93 ,59) pc.set_skill_level(94 ,59) pc.set_skill_level(95 ,59) pc.set_skill_level(96 ,59) say("Deine Skills sind auf Perfekter Meister") end end end end end
quest regenbogen begin
state start begin
when 50512.use begin
say_title ( "Regenbogenstein" )
say ( "Hiermit kannst du eine" )
say ( "Fertigkeit perfektionieren." )
say ( "" )
wait ( )
say_title ( "Regenbogenstein" )
local result = BuildSkillList(pc.get_job(), pc.get_skill_group())
local vnum_list = result[1]
local name_list = result[2]
if table.getn(vnum_list) < 2 then
say("Es gibt keine Fertigkeiten!")
say("")
return
end
say("Welche Fertigkeit willst du auf P bringen?")
say("")
local i = select_table(name_list)
if table.getn(name_list) == i then
return
end
local name = name_list[i]
local vnum = vnum_list[i]
say_title("Regenbogenstein:")
say_reward("Dieser Stein ermöglicht es dir,")
say_reward("deine Fertigkeit auf P zu bringen!")
say(string.format("%s auf Perfekten Meister?", name))
say("")
local s = select("Ja", "Nein")
if 2 == s then
return
end
if 1 == s then
say_title("Regenbogenstein:")
say("Einmal benutzt, ist dies nicht mehr Rückgängig zu machen.")
say("Trotzdem benutzen?")
say("")
local c = select("Ja", "Nein")
if 2 == c then
return
end
if 1 == c then
pc.set_skill_level((vnum) ,59)
say_reward("Deine Fertigkeit wurde auf P gesetzt.")
say_reward("Viel Spaß weiterhin auf Ironyu.")
pc.removeitem("50512", 1)
end
end
end
Wie man Quest-Files einfügt wisst ihr ja denke ich mal?!?
Aber so wie du das da stehen hast wirds nicht klappen, erstens weil du nicht in der selben Sekunde Skillgroup und Skills setzen kannst, und zweitens weil der Regenbogenstein dir ermöglicht, dich nochma komplett umzuskillen.
Naja, Thanks haste trotzdem für die Mühe (wars doch oder?)
regenbogen stein 09/13/2010 - Metin2 Private Server - 1 Replies was bringt der ich hab schon überall gesucht
Regenbogen quest oder seelenstein quest 08/29/2010 - Metin2 Private Server - 0 Replies Hallo
Langsam verzweifel ich.
1 Habe die Hongkong list geladen und eine neue quest eingefügt
2 habe ich die regenbogen.quest in den quest ordner geladen
dann in VPC
1cd /usr/rain/channel/share_data/locale/hongkong/quest eingegeben
2 die make in make.sh umbenannt
3 Make.sh ausgeführt
Regenbogen stein ?!? 08/21/2010 - Metin2 Private Server - 33 Replies was bringt ein regen bogen stein ?
ich habe den stein von nem GM gedroppt ^^
bite um antwort :confused:
mfg Hattanix (zZaos)