@~АLeЖ~ Werde es später versuchen erstmal schnell andere Wuests optimieren :D
@'Jakomo Danke hat geklappt
@'Jakomo Danke hat geklappt
[SERVICE] Die Questkontrolle
11/07/2011 18:23
Chip'#4006
11/07/2011 18:30
Coniesan#4007
Quote:
Ne Warpring Quest die nicht geht fehler: Segmentation fault (core dump)
PHP Code:quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Warpring:")
say("Hallo, ich bin der Warpring!")
say("Ich freue mich, dass du mich gekauft hast.")
say("Ich biete dir viele Teleportmöglichkeiten,")
say("mit nur wenigen kleinen Klicks.")
say("Möchtest du wirklich teleportiert werden?")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if pc.get_level() <= 10 then
say_title("Warpring:")
say("Hm… Mit deinem derzeitigen Level bist du noch")
say("zu schwach für die Reise durch Zeit und Raum.")
say("Komm wieder, wenn du höher als Level 10 bist.")
return
end
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000
if cost < 1000 then
cost = 1000
end
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Jungrang",
"Waryong",
"Imha",
}
guild_map_name = guild_map_names[empire]
local empire_castle={
"Burgschlacht",
"Burgschlacht",
"Burgschlacht",
}
empire_castle =empire_castle[empire]
local sub_set = 0
if level < 60 then -- 60?? : ?????, ???,
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Abbrechen")
if sub_set == 6 then -- ??
return
end
else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete", "Abbrechen")
if sub_set == 7 then -- ??
return
end
if sub_set == 6 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert warden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Zurück", "Abbrechen") + 5
if sub_set == 12 then -- ??
return
end
if sub_set == 11 then -- ??
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?")
say_reward(string.format("Das kostet dich %d Yang.", cost))
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
--- l
say_title("Warpring:")
say("Wohin möchtest du teleportiert werden?") say_reward(string.format("Die Reise kostet %d Yang.", cost))
sub_set = select("Doyyumhwaji", "Dämonenturm", "Roter Wald", "Kuahklo Dong", "Hwang-Tempel", "Abbrechen") + 5
if sub_set == 11 then -- ??
return
end
end
end
end
end
if pc.gold < cost then
say_title("Teleporter:")
say("Du hast nicht genug Geld,")
say("Ich würde dich auch kostenlos teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
return
end
pc.changegold(-cost)
local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},
} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- spider
{
{ 85000, 525000 },
{ 85000, 525000 },
{ 85000, 525000 },
},
--tempel
{
{ 553600, 143600 },
{ 553600, 143600 },
{ 553600, 143600 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Warpring:")
say("Achtung, ich teleportiere dich jetzt. Du wirst")
say("an einem gefährlichen Ort landen, also pass auf")
say("dich auf. Viel Glück!")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3
--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
if empire==1 then
sub_set2 = select("Yongan","Jayang" , locale.cancel)
elseif empire ==2 then
sub_set2 = select("Joan","Bokjung" , locale.cancel)
elseif empire ==3 then
sub_set2 = select("Pyungmoo","Bakra" , locale.cancel)
end
if sub_set2 != 3 then
if pc.gold < cost then
say_title("Warpring:")
say("Ich würde dich auch umsonst teleportieren,")
say("aber ich habe große Schulden. Um sie zu")
say("ernähren, muss ich Geld verdienen.")
say_reward(string.format("Es kostet %d Yang.", cost))
else
if sub_set2 == 1 then
say_title("Warpring")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(469300,964200)
elseif empire == 2 then
pc.warp(55700,157900)
elseif empire == 3 then
pc.warp(969600,278400)
end
elseif sub_set2 == 2 then
say_title("Warpring:")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(353100,882900)
elseif empire == 2 then
pc.warp(145500,240000)
elseif empire == 3 then
pc.warp(863900,246000)
end
end
pc.changegold(-cost)
end
end
end
end -- end_of_chat
end -- end_of_state
end -- end_of_quest
Geh in Zeile 80 da haste folgendes stehen:
say("Wohin möchtest du teleportiert werden?") say_reward(string.format("Die Reise kostet %d Yang.", cost))
(steht in einer Zeile!)machn ENTER dazwischen ;-)
11/07/2011 19:11
xTheSoulutionxx3#4008
hallo
hab da ein paar quests die net wollen:
quest1:
quest2:
quest3:
quest4:
quest5:
quets6:
danke fürs helfen
hab da ein paar quests die net wollen:
quest1:
PHP Code:
quest make_herb_lv4 begin
state start begin
when login or levelup with pc.get_level() ==4 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen(Pfirsichblüte)")
end
when button or info begin
say_title("Die Untersuchung des Biologen(Pfirsichblüte)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Pfirsichblüten" begin
target.delete("__TARGET__")
say("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 5 Pfirsichblüten und ich werde dich Belohnen")
say("Du bekommst die Blüten von Hungrigen Alpha-Wölfe")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Pfirsichblüten")
say("")
say("Die Biologin gab euch den Auftrag")
say("5 Blüten zu sammeln!")
say("Sammelt sie von Hungrigen Alpha-Wölfe ")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50701)
say_reward(" Ihr habt".." "..pc.getqf("collect_count").." derzeit abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50701)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 173.kill begin
if pc.count_item(50701)<5-pc.getqf("collect_count") then
pc.give_item2(50701, 1)
end
end
when 20084.chat."Pfirsichblüte" with pc.count_item(50701) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Blüte in Ordnung ist ...")
say("")
pc.remove_item(50701, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 4 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Blüte ist in Ordnung")
say("Ihr habt bis jetzt ".." "..5-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 5 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say("")
say_reward("Du Erhälst Schlachtschild+4")
say_reward("Du Erhälst 1.000 Yang")
say_reward("Du Erhälst 500 Erfahrungspunkte")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
else
pc.give_item2(13004)
pc.give_exp(500)
end
pc.change_money(1000)
set_quest_state("levelup","run")
else
say("Biologin:")
say("Diese Blüte ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
PHP Code:
quest make_herb_lv7 begin
state start begin
when login or levelup with pc.get_level() ==7 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen(Glockenblume)")
end
when button or info begin
say_title("Die Untersuchung des Biologen(Glockenblume)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Glockenblumen" begin
target.delete("__TARGET__")
say("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 5 Glockenblumen und ich werde dich Belohnen")
say("Du bekommst die Blüten von Hungrigen Alpha-Blauwölfen")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Glockenblumen")
say("")
say("Die Biologin gab euch den Auftrag")
say("5 Blüten zu sammeln!")
say("Sammelt sie von Hungrigen Alpha-Blauwölfen")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50702)
say_reward(" Ihr habt".." "..pc.getqf("collect_count").." derzeit abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50702)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 175.kill begin
if pc.count_item(50702)< 5 -pc.getqf("collect_count") then
pc.give_item2(50702, 1)
end
end
when 20084.chat."Glockenblume" with pc.count_item(50702) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Blüte in Ordnung ist ...")
say("")
pc.remove_item(50702, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 4 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Blüte ist in Ordnung")
say("Ihr habt bis jetzt ".." "..5-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 5 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say("")
say_reward("Du Erhälst eine Lv0 Rüstung für deine Rasse.")
say_reward("Du Erhälst 3.000 Yang!")
say_reward("Du Erhälst 2.000 Erfahrungspunkte")
if pc.job==0 then
pc.give_item2(11203)
end
if pc.job==1 then
pc.give_item2(11403)
end
if pc.job==2 then
pc.give_item2(11603)
end
if pc.job==3 then
pc.give_item2(11803)
end
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.change_money(3000)
pc.give_exp(2000)
set_quest_state("levelup","run")
return
else
say("Biologin:")
say("Diese Blüte ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
PHP Code:
quest make_herb_lv10 begin
state start begin
when login or levelup with pc.get_level() ==10 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen(Kakiblüte)")
end
when button or info begin
say_title("Die Untersuchung des Biologen(Kakiblüte)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Kakiblüten" begin
target.delete("__TARGET__")
say("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 5 Kakiblüten und ich werde dich Belohnen")
say("Du bekommst die Blüten von Hungrigen Alpha-Grauwölfen")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Kakiblüten")
say("")
say("Die Biologin gab euch den Auftrag")
say("5 Blüten zu sammeln!")
say("Sammelt sie von Hungrigen Alpha-Grauwölfen")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50703)
say_reward(" Ihr habt derzeit".." "..pc.getqf("collect_count").." abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50703)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 177.kill begin
if pc.count_item(50703)<5- pc.getqf("collect_count")then
pc.give_item2(50703, 1)
end
end
when 20084.chat."Kakiblüte" with pc.count_item(50703) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Blüte in Ordnung ist ...")
say("")
pc.remove_item(50703, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 4 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Blüte ist in Ordnung")
say("Ihr habt bis jetzt".." "..5-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 5 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say("")
say_reward("Du Erhälst eine Kupferhalskette+3")
say_reward("Du Erhälst 5.000 Yang")
say_reward("Du Erhälst 6.500 Erfahrungspunkte")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(16023)
pc.change_money(5000)
pc.give_exp(6500)
set_quest_state("levelup","run")
return
else
say("Biologin:")
say("Diese Blüte ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
PHP Code:
quest make_herb_lv15 begin
state start begin
when login or levelup with pc.get_level() ==15 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen(Gango-Wurzel)")
end
when button or info begin
say_title("Die Untersuchung des Biologen(Gango-Wurzel)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Gango-Wurzeln" begin
target.delete("__TARGET__")
say("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 5 Gango-Wurzel und ich werde dich Belohnen")
say("Du bekommst die Wurzeln von Hungrigen Grizzlybären")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Gangowurzel")
say("")
say("Die Biologin gab euch den Auftrag")
say("5 Gangowurzel zu sammeln!")
say("Sammelt sie von Hungrigen Grizzlybären")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50704)
say_reward(" Ihr habt".." "..pc.getqf("collect_count").." derzeit abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50704)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 181.kill begin
if pc.count_item(50704)<5- pc.getqf("collect_count")then
pc.give_item2(50704, 1)
end
end
when 20084.chat."Gango-Wurzel" with pc.count_item(50704) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Gangowurzel in Ordnung ist ...")
say("")
pc.remove_item(50704, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 4 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Wurzel ist in Ordnung")
say("Ihr habt bis jetzt ".." "..5-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 5 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say("")
say_reward("Du Erhälst Kupferohrringe+3")
say_reward("Du Erhälst 10.000 Yang")
say_reward("Du Erhälst 25.000 Erfahrungspunkte")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(17023)
pc.change_money(10000)
pc.give_exp(25000)
set_quest_state("levelup","run")
return
else
say("Biologin:")
say("Diese Wurzel ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
PHP Code:
quest make_herb_lv20 begin
state start begin
when login or levelup with pc.get_level() ==20 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen(Flieder)")
end
when button or info begin
say_title("Die Untersuchung des Biologen(Flieder)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Flieder" begin
target.delete("__TARGET__")
ssay("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 10 Flieder und ich werde dich Belohnen")
say("Du bekommst die Blüten von Hungrigen Schwarzbären")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Flieder")
say("")
say("Die Biologin gab euch den Auftrag")
say("10 Blüten zu sammeln!")
say("Sammelt sie von Hungrigen Schwarzbären")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50705)
say_reward(" Ihr habt".." "..pc.getqf("collect_count").." derzeit abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50705)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 182.kill begin
if pc.count_item(50705)< 10 - pc.getqf("collect_count")then
pc.give_item2(50705, 1)
end
end
when 20084.chat."Flieder" with pc.count_item(50705) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Blüte in Ordnung ist ...")
say("")
pc.remove_item(50705, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=80
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Blüte ist in Ordnung")
say("Ihr habt bis jetzt ".." "..10-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 10 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say("")
say_reward("Du Erhälst Kupferarmband+3")
say_reward("Du Erhälst 15.000 Yang")
say_reward("Du Erhälst 95.000 Erfahrungspunkte")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(14023)
pc.change_money(15000)
pc.give_exp(95000)
set_quest_state("levelup","run")
return
else
say("Biologin:")
say("Diese Blüte ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
PHP Code:
quest make_herb_lv25 begin
state start begin
when login or levelup with pc.get_level() ==25 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Untersuchung des Biologen (Tue-Pilze)")
end
when button or info begin
say_title("Die Untersuchung des Biologen (Tue-Pilze)")
say("")
say("Die Biologin braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
end
when __TARGET__.target.click or
20084.chat."Tue-Pilze" begin
target.delete("__TARGET__")
say("Biologin:")
say("Oh!!! Du hilfst mir?")
say("Gut ...")
say("Ich bin übrigenz die Biologin")
say("ich studiere zahlreiches aus der Pflanzenwelt.")
say("Wenn du mir bei meinen Forschungen hilfst,")
say("werde ich dich Reich Belohnen")
wait()
say("Biologin:")
say("Ich habe vor kurzem wieder angefangen ...")
say("Ich Forsche an Blüten...")
say("Ich habe derzeit viel zu tun,")
say("es währe also nett wenn du mir hilfst...")
say("Sammel 10 Tue-Pilze und ich werde dich Belohnen")
say("Du bekommst die Blüten von Hungrigen Braunbären")
say("Nun Geht, Ich wünsche euch viel Glück")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Sammlung der Kräuter")
end
when button or info begin
say_title("Tue-Pilze")
say("")
say("Die Biologin gab euch den Auftrag")
say("10 Blüten zu sammeln!")
say("Sammelt sie von Hungrigen Braunbären")
say("und gebt sie der Biologin.")
say("")
say_item_vnum(50706)
say_reward("Ihr habt".." "..pc.getqf("collect_count").." derzeit abgegeben!")
say("")
end
when 71035.use begin
if pc.getqf("drink_drug")==1 then
say("")
say("")
say("")
return
end
if pc.count_item(50706)==0 then
say("Du hast keine!")
say("Du hast keine!")
say("Du sollst mir aber welche bringen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 183.kill begin
if pc.count_item(50706)<10 - pc.getqf("collect_count") then
pc.give_item2(50706, 1)
end
end
when 20084.chat."Tue-Pilze" with pc.count_item(50706) >0 begin
say("Einen Moment ...")
say("Vielen Dank,")
say("lasst es mich schnell überprüfen")
say("ob diese Blüte in Ordnung ist ...")
say("")
pc.remove_item(50706, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=70
else
pass_percent=100
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Biologin:")
say("Hervorragend diese Blüte ist in Ordnung")
say("Ihr habt bis jetzt ".." "..10-pc.getqf("collect_count").. " Abgegeben!")
say("Bringt mir noch welche!")
say("")
pc.setqf("drink_drug",0)
return
end
say("Biologin:")
say("Hervorragend du hast")
say("mir die 10 Stück gebracht...")
say("Dafür werde ich dich wie versprochen")
say("Belohnen.")
say(""))
say_reward("Du Erhälst Level21 Helm für deine Rasse +3")
say_reward("Du Erhälst 20.000 Yang")
say_reward("Du Erhälst 200.000 Erfahrungspunkte")
if pc.job==0 then
pc.give_item2(12222)
end
if pc.job==1 then
pc.give_item2(12362)
end
if pc.job==2 then
pc.give_item2(12502)
end
if pc.job==3 then
pc.give_item2(12642)
end
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.change_money(20000)
pc.give_exp(200000)
set_quest_state("levelup","run")
return
else
say("Biologin:")
say("Diese Blüte ist von schlechter Qualität!")
say("sie kann nicht verwendet werden")
say("bitte hole mir eine neue.")
say("")
pc.setqf("drink_drug",0)
return
end
end
end
state __complete begin
end
end
danke fürs helfen
11/07/2011 19:22
martin1994#4009
11/08/2011 12:43
torbi13#4010
in virtual box steht der fehler string start :26 unexpected symbol near "then"
11/08/2011 13:00
.Apfel#4011
@Vorposter:
Z: 26 -> elseif l == 1 then
Da muss aber elseif s == 1 then
Z: 26 -> elseif l == 1 then
Da muss aber elseif s == 1 then
11/08/2011 14:54
√→†Komplex†←√#4012
schaue mal in der db ob er anklickbar ist..Quote:
2. Problem:
Lehrer öffnet keine Shops.
Beim Anklicken kommt ein Fenster zum auswählen was man kaufen möchte, MBs oder Frisuren.
Egal was man anklickt es öffnet sich kein Shop.
Woran kann das liegen ?
Achso und an die anderen ''Fragenden'' von euch, ihr könnt denn Leuten ruhig mal ein Thanks geben wenn sie geholfen haben, damit sehen sie das ihre Arbeit anerkannt wird und nicht nur ausgenutzt.
Ist wohl nicht schwer ein mal drauf zuklicken.
Dafür ist dieser ''Knopf'' ja schließlich da.
11/08/2011 19:16
killa673#4013
Tag Leute , hab n kleines Problem... ich will das man 200 von den Items hier braucht aber weis nicht wie und wo ich den befehl setzen muss, die quest funktioniert einwandfrei so wie sie jetz is , könnte mir jemand helfen das man 200 Items braucht? Quest:
PHP Code:
----------------------------------------------------
--Made by SA Encore von BlackSourceMT2
----------------------------------------------------
quest Premiumitem begin
state start begin
when login or levelup with pc.get_level() >=150 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Premiumitem")
end
when button or info begin
say_title("Premiumitem")
say("")
say("Hallo mutiger Krieger,")
say("Uriel hat eine Aufgabe für dich")
say("durch diese Aufgabe kannst du dir")
say("ein Mystisches Item holen")
say("durch welches du zum Premium User")
say("aufsteigen wirst.")
say_reward("GEHE ZU URIEL!")
end
when __TARGET__.target.click or
20011.chat."Premiumitem" begin
target.delete("__TARGET__")
say("Uriel:")
--- l
say("Hallo mein Freund,")
say("Du kennst doch sicherlich")
say("den Dämonengott, oder?")
say("Dieser Kreatur besitzt")
say("1 Teil einer uralten Mystischen Rolle")
say("bring mir dieses Teil der Drachengottrolle")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Uriel")
end
when button or info begin
say_title("Teil der Rolle")
--- l
say("")
say("Uriel gab euch den Auftrag")
say("Das Teil der Drachengottrolle zu sammeln!")
say("Das Item bekommt ihr von Dämonengott.")
say("Viel Glueck!")
say("")
say_item_vnum(90863)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
end
end
when 20210.kill begin
if pc.count_item(90863)<200-pc.getqf("collect_count") then
pc.give_item2(90863, 1)
end
end
when 20011.chat."Quest" with pc.count_item(90863) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(90863, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90864
else
pass_percent=90864
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 199 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Uriel:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..200-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
end
end
say("Uriel:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Heilige Drachengottrolle!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.give_item2(90864)
clear_letter()
end
end
end
11/08/2011 19:43
Grand09#4014
€: Fehler gefunden^^
11/08/2011 21:38
Soulwear#4015
Code:
quest userpanelneu begin
state start begin
when 30160.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Teamler-Liste","Weiter","Beenden")
if main_set == 5 then
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung,")
say("was möchtest du tun?")
local b = select("Reiten","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Zurück")
if b == 6 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 3 then
say("Pferd wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Zurück")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp(55700, 157900)
end
end
end
if main_set == 3 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SA] :")
say("*****")
say_reward("Die GameAdmin´s [GA] :")
say("*****")
say_reward("Die GameMaster´s [GM] :")
say("*****")
say("*****")
say("*****")
say("")
say("Du kannst dir die Liste jederzeit erneut anschaun")
end
if main_set == 4 then
say_title("Hier ist das Kontrollzentrum")
say_title("Wie kann ich dir "..pc.get_name().." weiterhelfen?")
local aa = select("Einkaufen","Lager/Itemshop öffnen","Zurück")
if aa == 3 then
return
end
if aa == 1 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop per Item öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischtwarenhändlerin","Rüstungshändler","Waffenhändler","Zurück")
if dd == 4 then
return
end
if dd == 1 then
say("Möchtest du wirklich den Shop der Gemischtwarenhändlerin öffnen?")
local de = select("Ja","Nein")
if de == 2 then
return
end
if de == 1 then
say("Der Shop der Gemischtwarenhändlerin wird geöffnet")
npc.open_shop(9003)
end
end
if dd == 2 then
say("Möchtest du wirklich den Shop des Rüstungshändlers öffnen?")
local ee = select("Ja","Nein")
if ee == 2 then
return
end
if ee == 1 then
say("Der Shop des Rüstungshändlers wird geöffnet")
npc.open_shop(9002)
end
end
if dd == 3 then
say("Möchtest du echt den Shop des Waffenhändlers öffnen?")
local ef = select("Ja","Nein")
if ef == 2 then
return
end
if ef == 1 then
say("Der Shop des Waffenhändlers wird geöffnet")
npc.open_shop(9001)
end
end
end
if aa == 2 then
say_title("Bankangestellter:")
say("Hey, ich komme auch von weit weg")
say("Ich kann dein Lager/Itemshop öffnen..")
say("Willst du das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Zurück")
if gg == 3 then
say("Dann halt nicht, melde dich falls du doch möchtest!")
return
end
if gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen!")
game.open_safebox()
end
if gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
end
if gg == 3 then
return
end
end
end
end
end
end
Ich finde den Fehler einfach nicht..
Wäre nett wenn mir hier jemand weiterhelfen kann ;)
11/08/2011 22:36
killa673#4016
hab n dezentes problem 0.o und zwar geht die quest einwanfrei nur wenn ich mich in die map zum killn der mobs porte da paar umhau und mich dann wieder map1 porte beginnt die quest von ganz vorne das heißt muss wieder 2350 umklatschen >.< was muss da noch rein das es funktioniert?
Quest:
Quest:
PHP Code:
quest Galbator begin
state start begin
when login with pc.level >= 120 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Besorg dir 125er Eq")
end
when info or button begin
say("Moin Alter!")
say("")
say("Du hast erfolgreich das 120. Level erreicht! Du bist nun bereit dir 125er EQ zu holen.")
say("Zerleg 2350 Bossmumien um 125er EQ für deine Rasse zu bekommen!")
say("")
say("Dann hau rein Kollege.")
say_reward("Töte 2350 Bossmumien")
say("")
pc.setqf("state", 2350)
q.set_counter("Bossmumien", 2350)
end
when 20201.kill begin
local count = pc.getqf("state") - 1
if count <= 2350 then
pc.setqf("state", count)
q.set_counter("Bossmumien", count)
end
if count == 0 then
say_title("Besorg dir 125er EQ!")
say("Joo hasts geschafft ... Wurde auch Zeit!!")
say("Ja als Belohnung:")
say_reward("Als Belohnung gibts komplettes 125er EQ!")
if pc.job == 0 then
pc.give_item2(709)
pc.give_item2(51119)
pc.give_item2(41011)
elseif pc.job == 1 then
pc.give_item2(12319)
pc.give_item2(22219)
pc.give_item2(41021)
elseif pc.job == 2 then
pc.give_item2(499)
pc.give_item2(41031)
elseif pc.job == 3 then
pc.give_item2(52019)
pc.give_item2(41041)
end
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
11/09/2011 13:32
Sp0ngeb0b ist cool#4017
PHP Code:
quest Galbator begin
state start begin
when login with pc.level >= 120 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Besorg dir 125er Eq")
end
when info or button begin
say("Moin Alter!")
say("")
say("Du hast erfolgreich das 120. Level erreicht! Du bist nun bereit dir 125er EQ zu holen.")
say("Zerleg 2350 Bossmumien um 125er EQ für deine Rasse zu bekommen!")
say("")
say("Dann hau rein Kollege.")
say_reward("Töte 2350 Bossmumien")
say("")
pc.setqf("zähler", 2350)
q.set_counter("Bossmumien", 2350)
pc.setqf("gekillt", 0)
set_state(next)
clear_letter()
end
end
state next begin
when letter begin
send_letter("Besorg dir 125er Eq")
end
when button or info begin
say("Dein Auftrag:")
say("")
say_reward("Töte 2350 Bossmumien")
say("")
say("Du hast bisher "..pc.getqf("gekillt").." von 2350 Bossmumien getötet.")
say("")
say("Somit musst du noch "..pc.getqf("zähler").." Bossmumien töten.")
end
when 20201.kill begin
local count = pc.getqf("zähler") - 1
if count <= 2350 then
pc.setqf("gekillt", pc.getqf("gekillt")+1)
pc.setqf("zähler", count)
q.set_counter("Bossmumien", count)
end
if count == 0 then
say_title("Besorg dir 125er EQ!")
say("Joo hasts geschafft ... Wurde auch Zeit!!")
say("Ja als Belohnung:")
say_reward("Als Belohnung gibts komplettes 125er EQ!")
if pc.job == 0 then
pc.give_item2(709)
pc.give_item2(51119)
pc.give_item2(41011)
elseif pc.job == 1 then
pc.give_item2(12319)
pc.give_item2(22219)
pc.give_item2(41021)
elseif pc.job == 2 then
pc.give_item2(499)
pc.give_item2(41031)
elseif pc.job == 3 then
pc.give_item2(52019)
pc.give_item2(41041)
end
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
(hab die qfs umbenannt falls es bereits welche mit dem namen "state" gibt ; und ich hab noch ne state gesetzet...
außerdem hab ich nen 2. zähler eingebaut, der dir sagt, wie viele mumien du bereits getötet hast ; und der 1. zähler eben wie gewönlich sagt, wie viele noch gekillt werden müssen ;) )
Ps: findest du es nicht unfair, dass job 2 nur 2 statt 3 items bekommtn, wie die anderen? :D
@soul: strukturier deine quest richtig und sag mir den make.py fehler ;)
danke
11/09/2011 19:20
Arian09#4018
Quote:
quest training_grandmaster_skill begin
state start begin
when 50513.use begin
say_title("Großmeister")
local seelicount = pc.count_item(50513)
if pc.get_skill_group() == 0 then
say("Du hast keine Fertigkeiten "..pc.get_skill_group())
return
end
if get_time() < pc.getqf("next_time") then -- and not is_test_server() then
if pc.is_skill_book_no_delay() then
say("Du hast eine Exo-Rolle Gelesen!")
say("Nun kannst du einen weiteren")
say("Seelenstein lesen!")
say("")
wait()
say_title("Großmeister")
else
say("Du hast heute Bereits einen Seelenstein gelesen!")
return
end
end
local result = training_grandmaster_skill.BuildGrandMasterSkillLi st(pc.get_job(), pc.get_skill_group())
local vnum_list = result[1]
local name_list = result[2]
if table.getn(vnum_list) == 0 then
say("Du hast keine Fertigkeiten")
return
end
say("Fertigkeit Auswählen")
say("")
local menu_list = {}
table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)
table.insert(menu_list, "Abbrechen")
local s=select_table(menu_list)
if table.getn(menu_list) == s then
return
end
local skill_name=name_list[s]
local skill_vnum=vnum_list[s]
local skill_level = pc.get_skill_level(skill_vnum)
local cur_alignment = pc.get_real_alignment()
local need_alignment = 1000+500*(skill_level-30)
test_chat("Momentaner Rang: "..cur_alignment)
test_chat("Benötigter Rang: "..need_alignment)
local title=string.format("%s auf Großmeister %d lesen", skill_name, skill_level-30+1)
if pc.count_item(50513) != seelicount then
say("Stfu Buguser!")
return
end
item.remove()
say_title(title)
say("Das lesen eines Seelensteines")
say("kostet Rangpunke.")
say("")
if cur_alignment<-19000+need_alignment then
say_reward("Du hast zu wenig Rang!")
return
end
if cur_alignment<0 then
say_reward(string.format("Benötigter Rang: %d -> %d", need_alignment, need_alignment*2))
say_reward("Beim klappen des Seelensteins wird dir")
say_reward("das doppelte an Rangpunkten abgezoegn!")
need_alignment=need_alignment*2
elseif cur_alignment<need_alignment then
say_reward(string.format("Benötigter Rang: %d", need_alignment))
say_reward("Beim klappen des Seelensteins wird dir")
say_reward("das doppelte an Rangpunkten abgezoegn!")
else
say_reward(string.format("Benötigter Rang: %d", need_alignment))
end
say("")
local s=select("Lesen", "Abbrechen")
if s==2 then
return
end
if cur_alignment>=0 and cur_alignment<need_alignment then
say_title(string.format("%s -Bestätigen", title))
say("Das Lesen eines Seelensteines kostet Rang,")
say("wenn du diesen Seelenstein ließt,")
say("kommst du in -Rang")
say("Bitte Bestätige das du diesen Seelenstein")
say("wirklich lesen möchtest!")
say("")
say_reward("Bestätigen")
say("")
say("Bitte gebe 'Trainieren' ein!")
local s=input()
if s!="Trainieren" then
return
end
end
if get_time() < pc.getqf("next_time") then -- and not is_test_server() then
if pc.is_skill_book_no_delay() then
pc.remove_skill_book_no_delay()
else
say("Seelitest1")
return
end
end
pc.setqf("next_time", get_time()+time_hour_to_sec(number(8, 12)))
if need_alignment>0 then
if pc.learn_grand_master_skill(skill_vnum) then
pc.change_alignment(-need_alignment)
say_title(string.format("%s -Erfolgreich", title))
if 40 == pc.get_skill_level(skill_vnum) then
say(string.format("%s Seelitest2.", skill_name))
else
say(string.format("Dein Seelenstein war Erfolgreich!", skill_name, skill_level-30+1+1))
end
say("")
say_reward("Erfolgreich!")
say_reward(string.format("Kosten an Rang: %d ", need_alignment))
say("")
else
say_title(string.format("%s -Fehlgeschlagen", title))
say("Dein Seelenstein hat nicht geklappt.")
say("")
say_reward("Fehlgeschlagen!")
say("")
pc.change_alignment(-number(need_alignment/3, need_alignment/2))
end
end
end
function BuildGrandMasterSkillList(job, group)
GRAND_MASTER_SKILL_LEVEL = 30
PERFECT_MASTER_SKILL_LEVEL = 40
local skill_list = special.active_skill_list[job+1][group]
local ret_vnum_list = {}
local ret_name_list = {}
-- test_chat(string.format("job=%d, group=%d", job, group))
table.foreach(skill_list,
function(i, skill_vnum)
local skill_level = pc.get_skill_level(skill_vnum)
-- test_chat(string.format("[%d]=%d", skill_vnum, skill_level))
if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then
table.insert(ret_vnum_list, skill_vnum)
local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
if name == nil then name=skill_vnum end
table.insert(ret_name_list, name)
end
end)
return {ret_vnum_list, ret_name_list}
--return {ret_vnum_list, ret_name_list}
end
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
Was ist daran Fail ? Hauptsache ab Regenbogenstein
11/11/2011 15:32
xTheSoulutionxx3#4019
Fehler:
quest:
PHP Code:
expecting state
quest:
PHP Code:
quest subquest49 begin
state start begin
when login or levelup with pc.level>48 begin
set_state(talk_to_octavio)
end
end
state talk_to_octavio begin
when letter begin
local v = find_npc_by_vnum(20008)
if v != 0 then target.vid("__TARGET__", v, "Octavio")
end
send_letter("Octavio sucht dich")
end
when button or info begin
say_title("Octavio's Rezept - Besorgung der Spinnenaugen")
say("Octavio sucht dich um sein")
say("neues Rezept auszuprobiern.")
say("Geh zu ihm um näheres zu erfahren.")
say("")
say_reward("Sprich mit Octavio")
say("")
end
when __TARGET__.target.click or 20008.chat."Rezept" begin
target.delete("__TARGET__")
say("Octavio:")
say("")
say("Oh gut das du gekommen bist")
say("ok ich hab ein neues Rezept")
say("und wollte es gerne ausprobieren")
say("")
say("dazu benötige ich aber 100 Augen von Spinnen")
say("da ich keine Zeit habe kannst du sie mir")
say("besorgen.")
say("")
wait()
say("Octavio:")
say("Ich werde dich reich Behlonen.")
say("Du erhalst sie von denn Spinnen in der")
say("Yongbi-Wüste sei vorsichtig.")
say("")
say_item_vnum(30162)
say_reward("Geh in die Yongbi Wüste")
say_reward("und besorg Octavio 100 Augen")
say_reward("von denn Spinnen")
set_state(besorgung_octavio)
end
end
state besorgung_octavio begin
when letter begin
send_letter("Spinnenaugen Spezial")
end
when button or info begin
say_title("Augen der Spinnen")
say("")
say("Octavio hat dich beauftragt für ihn")
say("100 Augen der Spinnen zu besorgen")
say("du erhälst sie von spinne in der")
say("Yongbi-Wüste.")
set_state(killes)
end
end
state killes begin
when 2001.kill
or 2002.kill
or 2003.kill
or 2004.kill
or 2005.kill
or 2031.kill
or 2032.kill
or 2033.kill
or 2034.kill
or 2035.kill
or 2036.kill
or 2001.kill
or 2002.kill
or 2003.kill
or 2004.kill
or 2005.kill begin
if pc.count_item(30162)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30162, 1)
end
end
end
end
when letter begin
if pc.count_item(30162)>99 then
send_letter("Kehre zurück zu Octavio")
end
when button or info begin
say_title("Gehe zurück zu Octavio")
say("Kehre zu Octavio zurück um ihm")
say("die Spinnenaugen zu bringen.")
end
end
when 20008.chat."Augen der Spinnen" with pc.count_item(30162)>99 begin
say_title("Octavio:")
say("Oh du hast sie sehr gut")
say("ich wusste das du es schaffst")
say("nun kann ich endlich meine")
say("Spezialität herstellen.")
say("Vielen dank für deine Hilfe")
say("")
say_reward("Du erhälst 2.100.00 Erfahrungspunkte.")
say_reward("Du erhälst 20.000 Yang")
pc.give_exp2(210000)
pc.give_gold(20000)
pc.remove_item(30162,100)
end
end
end
11/11/2011 22:40
Brodan#4020