Aber da ich schon ewig darauf warte das sich das da mal einer anguckt und es irgendwie trotzdem keinen interessiert.
Mach ich mal nen neuen Thread. Würde sich jemand bitte bereit erklären mir zu sagen warum och nen occured on compile error bekomme?
jeder nicht negative Beitrag 1x Thanks
Code:
quest abendessen begin
state start begin
when login or levelup with pc.get_level()>= 7 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Abendessen")
local v = find_npc_by_vnum(9003)
if v != 0 then
target.vid("target1", v, "Gemischtwarenhändlerin")
end
end
when button or info begin
say_title("Abendessen")
say("Geh zur Gemischtwarenhändlerin!")
say("Sie benötigt deine Hilfe!")
end
when target1.target.click or 9003.chat."Abendessen" begin
target.delete("target1")
say_title("Gemischtwarenhändlerin")
say("Hallo "..pc.get_name())
say("")
say("würdest du mir bitte kurz helfen?")
say("Ich möchte das Abendessen für mich und meinen Vater zubereiten,")
say("frag ihn bitte ob er auch:")
say("Gekochte Wildhundeingeweide mit")
say("Blutpudding und gedämpften Kartoffeln,")
say("in Vanille Soße")
say("essen möchte!)
local main_set = select("Wüüürrrgg, ich glaube ich mus kotzen","Ok, mache ich!")
if main_set == 1 then
return
end
if main_set == 2 then
say_title("Abendessen")
say("Sehr gut!")
say("Dann geh zu meinem Vater dem Rüstungshändler.")
Say("Komm danach wieder zu mir!")
clear_letter()
set_state(befragung)
local s = select(weiter)
if s == 1
return
end
end
end
end
state befragung begin
when letter begin
send_letter("Abendessen")
local v = find_npc_by_vnum(9002)
if v != 0 then
target.vid("target2", v, "Rüstungshändler")
end
end
when button or befragung begin
say_title("Abendessen")
say("Geh zum Rüstungshändler und befrage Ihn!"
end
when target2.target.click or 9002.chat."Abendessen" begin
target.delete("target2")
say_title("Rüstungshändler")
say("Hey"..pc.get_name())
say("")
say("was ist den los, du siehst so grün aus?")
local main_set = select("Ich glaube, Ihre Tochter will sie umbringen!","Lieber nicht!")
if main_set == 2 then
return
end
if main_set == 1 then
say_title("Rüstungshändler")
say("Igitt!!!")
say("Ich glaube meine Tochter verbringt zuviel")
say("Zeit mit dem Schmied!")
say("Richte ihr aus: Sie kann sich Ihre Giftbrühe")
say("in die Haare schmieren!")
say("Ich möchte einen Schweinebraten!")
local main_set = select("wird gemacht, Cheff!","Ich bin doch kein Laufbursche!")
if main_set == 2 then
return
end
if main_set == 1 then
clear_letter()
set_state(bericht)
return
end
end
end
end
state bericht begin
when letter begin
send_letter("Abendessen")
local v = find_npc_by_vnum(9003)
if v != 0 then
target.vid("target3", v, "Gemischtwarenhändlerin")
end
end
end
when button or bericht begin
say_title("Abendessen")
say("Geh zur Gemischtwarenhändlerin"
say("und erstatte ihr Bericht!")
end
when target3.target.click or 9003.chat."Abendessen" begin
target.delete("target3")
say_title("Gemischtwarenhändlerin")
say("Hallo "..pc.get_name())
say("")
say("und wie sieht es aus?")
local main_set = select("Ich soll Ihnen ausrichten...","Ich sags Ihr besser nicht.")
if main_set == 2 then
return
end
if main_set == 1 then
say_title("Gemischtwarenhändlerin")
say("Das war ja soo klar!")
say("Der Mann hat einfach keinen Geschmack!")
local main_set = select("Ja genau... das wird es sein..","Würrrgg")
if main_set == 1 or 2 then
say_title("Gemischwarenhändlerin")
say("Stell dich mal nicht so an!")
say("Trotzdem danke für deine Hilfe")
say("du darfst gehen?")
local main_set = select("WAS!?","Nix da! Was ist mit meiner Belohnung?")
if main_set == 1 or 2 then
say_title("Gemischtwarenhändlerin")
say(" Oh, du erwartest eine belohnung...")
say("Nagut hier!")
local s = select(weiter)
if s == 1 then
local item_vnum = 59
local item_vnum2 = 11229
if pc.get_job() == 1 then
item_vnum = 1029
item_vnum2 = 11419
elseif pc.get_job() == 2
item_vnum = 59
item_vnum2 = 11619
elseif pc.get_job() == 3
item_vnum = 5029
item_vnum2 = 11819
pc.give_exp(2000)
pc.give_money(10000)
pc.give_item2(item_vnum)
pc.gibe_item2(item_vnum2)
clear_letter()
set_state(complete)
return
end
end
end
end
end
end
end
state complete begin
end
end
