|
You last visited: Today at 19:53
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
11/17/2011, 08:00
|
#4051
|
elite*gold: 0 
Join Date: Apr 2011
Posts: 161
Received Thanks: 4
|
Ich wollte eine warp quest einfügen ging aber irgenwie nicht
da ist glaube ich ein fehler drin... kann sich das bitte mal jem. angucken
quest warpring begin
state start begin
when 70007.use."Reich Teleportieren" begin
local main_set = select("Map 1", "Map 2", "Abbrechen")
if main_set == 5 then
return
end
if main_set == 1 then
local g = select ("Rotes Reich" , "Gelbes Reich" , "Blaues Reich" , "Abbrechen")
if g == 1 then
pc.warp(474300,954800)
setskin(NOWINDOW)
return
end
if g == 2 then
pc.warp(63800,166400)
setskin(NOWINDOW)
return
end
if g == 3 then
pc.warp(959900,269200)
setskin(NOWINDOW)
return
end
if g == 4 then
return
end
end
if main_set == 2 then
local g = select("Rotes Reich", "Gelbes Reich", "Blaues Reich", "Abbrechen")
if g == 1 then
pc.warp(353100,882900)
setskin(NOWINDOW)
return
end
if g == 2 then
pc.warp(145500,240000)
setskin(NOWINDOW)
return
end
if g == 3 then
pc.warp(863900,246000)
setskin(NOWINDOW)
return
end
if g == 4 then
pc.mount(20121, 99999999)
setskin(NOWINDOW)
return
end
if g == 5 then
pc.mount(20123, 99999999)
setskin(NOWINDOW)
return
end
if g == 6 then
return
end
end
end
Fehler bei virtual ox nach make.py ausführung:
qc in malloc () error:allocatio failed
Error occured on compile warpring.quest
kann mir jemand helfen?
MFG DavidMatth
|
|
|
|
11/17/2011, 09:35
|
#4052
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
Code:
quest warpring begin
state start begin
when 70007.use begin
local g
local main_set = select("Map 1", "Map 2", "Abbrechen")
if main_set == 3 then
return
elseif main_set == 1 then
g = select ("Rotes Reich" , "Gelbes Reich" , "Blaues Reich" , "Abbrechen")
if g == 1 then
pc.warp(474300,954800)
elseif g == 2 then
pc.warp(63800,166400)
elseif g == 3 then
pc.warp(959900,269200)
elseif g == 4 then
return
end
elseif main_set == 2 then
g = select("Rotes Reich", "Gelbes Reich", "Blaues Reich", "Abbrechen")
if g == 1 then
pc.warp(353100,882900)
elseif g == 2 then
pc.warp(145500,240000)
elseif g == 3 then
pc.warp(863900,246000)
elseif g == 4 then
return
end
end
end
end
end
|
|
|
|
|
11/17/2011, 13:21
|
#4053
|
elite*gold: 0
Join Date: Sep 2010
Posts: 427
Received Thanks: 105
|
fehler:
PHP Code:
expecting state
quest:
PHP Code:
quest subquest_59 begin
state start begin
when login or levelup with pc.level>45 begin
set_state(go_to_lehrer_drache)
end
end
state go_to_lehrer_drache begin
when letter begin
local vnum=0
if pc.get_empire() == 1 then
vnum= 20307
elseif pc.get_empire() == 2 then
vnum= 20327
elseif pc.get_empire() == 3 then
vnum= 20347
end
end
end
local v=find_npc_by_vnum(vnum)
if 0!= v then
target.vid("__TARGET__",v,"")
end
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say_reward("text")
say("")
set_state(go_to_kill_stolzer_dunkler)
end
end
state go_to_kill_stolzer_dunkler begin
when letter begin
send_letter("Der Rest!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when 734.kill begin
local rand = number(0,99)
if rand<4 then pc.give_item2(30147, 1)
if rand 6 then pc.give_item2(30148, 1)
if pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 then
set_state(go_back_to_drachenmacht)
end
end
end
end
state go_back_to_drachenmacht begin
when letter begin
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" with pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say_reward("text")
say("")
pc.remove_item(30147, 1)
pc.remove_item(30148, 1)
pc.give_exp2(1700000)
pc.give_gold(30000)
pc.give_item2(50621, 3)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
|
|
|
|
11/17/2011, 13:30
|
#4054
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
PHP Code:
quest subquest_59 begin
state start begin
when login or levelup with pc.level>45 begin
set_state(go_to_lehrer_drache)
end
end
state go_to_lehrer_drache begin
when letter begin
local vnum
if pc.get_empire() == 1 then
vnum= 20307
elseif pc.get_empire() == 2 then
vnum= 20327
elseif pc.get_empire() == 3 then
vnum= 20347
end
local v=find_npc_by_vnum(vnum)
if v != 0 then
target.vid("__TARGET__",v,"")
end
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say_reward("text")
say("")
set_state(go_to_kill_stolzer_dunkler)
end
end
state go_to_kill_stolzer_dunkler begin
when letter begin
send_letter("Der Rest!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when 734.kill begin
local rand = number(0,99)
if rand < 4 then
pc.give_item2(30147, 1)
elseif rand >= 4 and rand < 7 then
pc.give_item2(30148, 1)
end
if pc.count_item(30147) >= 1 and pc.count_item(30148) >= 1 then
set_state(go_back_to_drachenmacht)
end
end
end
state go_back_to_drachenmacht begin
when letter begin
local vnum
if pc.get_empire() == 1 then
vnum= 20307
elseif pc.get_empire() == 2 then
vnum= 20327
elseif pc.get_empire() == 3 then
vnum= 20347
end
local v=find_npc_by_vnum(vnum)
if v != 0 then
target.vid("__TARGET__",v,"")
end
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" with pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say_reward("text")
say("")
pc.remove_item(30147, 1)
pc.remove_item(30148, 1)
pc.give_exp2(1700000)
pc.change_gold(30000)
pc.give_item2(50621, 3)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
|
|
|
|
11/17/2011, 14:43
|
#4055
|
elite*gold: 0
Join Date: Sep 2010
Posts: 427
Received Thanks: 105
|
PHP Code:
quest subquest_47 begin
state start begin
when login or levelup with pc.level>49 begin
set_state(go_to_kp1)
end
end
state go_to_kp1 begin
when letter begin
local v = find_npc_by_vnum(20020)
if v != 0 then target.vid("__TARGET__", v, "idontkonow")
end
send_letter("Hilf dem Hauptmann!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20020.chat."Mein Zustand" begin
target.delete("__TARGET__")
say_title("Hauptmann:")
say("text")
say("text")
say("text")
say("text")
local main_set = select("FeInDe Am Horzont GeSSichtet","feinde am horizont gesichtet","am horizont gesichtet feinde","Nochmal kucken")
if main_set == 1 then
say_title("text")
say("text")
say("text")
say("text")
return
end
if main_set == 3 then
say_title("text")
say("text")
say("text")
say("text")
return
end
if main_set == 4 then
return
end
if main_set == 2 then
say_title("text")
say("text")
say("text")
say("text")
pc.give_exp2(1300000)
pc.give_gold(20000)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
|
|
|
|
11/17/2011, 19:32
|
#4056
|
elite*gold: 1
Join Date: Nov 2010
Posts: 1,839
Received Thanks: 414
|
PHP Code:
quest perlentausch begin
state start begin
when 20018.take with item.vnum == 27992 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Drei weiße Perlen und 33kk = eine blaue Perle")
say("Neun weiße Perlen und 33kk = eine blutrote Perle")
say("")
local s = select ("Blaue Perlen", "Blutrote Perle", "Keine")
if s == 1 then
if pc.count_item(27992) >= 3 and pc.money>= 33000000 then
pc.removeitem("27992")
pc.change_gold(-33000000)
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27992) >= 9 and pc.money>= 33000000 then
pc.removeitem("27992")
pc.change_gold(-33000000)
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27993 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Eine blaue Perle und 33kk = drei weiße Perlen")
say("Drei blaue Perlen und 33kk = eine blutrote Perle")
say("")
local s = select ("Weiße Perle", "Blutrote Perle", "Keine")
if s == 1 then
if pc.count_item(27993) >= 1 and pc.money>= 33000000 then
pc.removeitem("27993")
pc.change_gold(-33000000)
pc.give_item2("27992, 3")
say("Danke dir!")
say("Du erhältst drei Weiße Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27993) >= 3 and pc.money>= 33000000 then
pc.removeitem("27993")
pc.change_gold(-33000000)
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27994 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Eine blutrote Perle und 33kk = neun weiße Perlen")
say("Eine blutrote Perle und 33kk = drei blaue Perlen")
say("")
local s = select ("Weiße Perle", "Blaue Perle", "Keine")
if s == 1 then
if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
pc.removeitem("27994")
pc.change_gold(-33000000)
pc.give_item2("27992, 9")
say("Danke dir!")
say("Du erhältst neun Weiße Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
pc.removeitem("27994")
pc.change_gold(-33000000)
pc.give_item2("27993, 3")
say("Danke dir!")
say("Du erhältst drei Blaue Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
|
|
|
|
|
11/17/2011, 20:02
|
#4057
|
elite*gold: 0
Join Date: Mar 2010
Posts: 296
Received Thanks: 86
|
Tag, hab mein Problem immernoch nicht gelöst bekommen -.- , man sollte 20 oder 30 Items brauchen, aber so wie die quest jetz ist funkt sie zwar aber man braucht nur 1 item -.-
Quest:
----------------------------------------------------
--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/18/2011, 02:22
|
#4058
|
elite*gold: 0
Join Date: Oct 2009
Posts: 1,064
Received Thanks: 905
|
subquest_59 von xTheSoulitionxx3
Quote:
Originally Posted by xTheSoulutionxx3
fehler:
PHP Code:
expecting state
quest:
PHP Code:
quest subquest_59 begin
state start begin
when login or levelup with pc.level>45 begin
set_state(go_to_lehrer_drache)
end
end
state go_to_lehrer_drache begin
when letter begin
local vnum=0
if pc.get_empire() == 1 then
vnum= 20307
elseif pc.get_empire() == 2 then
vnum= 20327
elseif pc.get_empire() == 3 then
vnum= 20347
end
end
end
local v=find_npc_by_vnum(vnum)
if 0!= v then
target.vid("__TARGET__",v,"")
end
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say_reward("text")
say("")
set_state(go_to_kill_stolzer_dunkler)
end
end
state go_to_kill_stolzer_dunkler begin
when letter begin
send_letter("Der Rest!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when 734.kill begin
local rand = number(0,99)
if rand<4 then pc.give_item2(30147, 1)
if rand 6 then pc.give_item2(30148, 1)
if pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 then
set_state(go_back_to_drachenmacht)
end
end
end
end
state go_back_to_drachenmacht begin
when letter begin
send_letter("Gehe zum Lehrer der Drachenmacht!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" with pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 begin
target.delete("__TARGET__")
say_title("Lehrer der Drachenmacht:")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say_reward("text")
say("")
pc.remove_item(30147, 1)
pc.remove_item(30148, 1)
pc.give_exp2(1700000)
pc.give_gold(30000)
pc.give_item2(50621, 3)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
PHP Code:
state go_to_lehrer_drache begin
when letter begin
local vnum=0
if pc.get_empire() == 1 then
vnum= 20307
elseif pc.get_empire() == 2 then
vnum= 20327
elseif pc.get_empire() == 3 then
vnum= 20347
end
end
end
local v=find_npc_by_vnum(vnum)
if 0!= v then
target.vid("__TARGET__",v,"")
end
end
Du beendest an der Stelle über dem local v=find... bereits die State, deshalb erwartet der Compiler bereits die nächste state als du den Targetpfeil setzen willst.
Empfehle dir besser einzurücken dann siehst du das direkt.
Premiumitemquest von killa673
Quote:
Originally Posted by killa673
Tag, hab mein Problem immernoch nicht gelöst bekommen -.- , man sollte 20 oder 30 Items brauchen, aber so wie die quest jetz ist funkt sie zwar aber man braucht nur 1 item -.-
Quest:
----------------------------------------------------
--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
|
In der Quest ist eine Menge falsch, wieso ist die Erfolgswahrscheinlichkeit 90864? bei s(1,100) wird der Erfolg immer getriggert dann, denke das ist nicht Sinn der Sache.
2. Wirst du wohl nur 1 brauchen, da der Code nach if pc.getqf("collect_count")< 199 then, end auch immer getriggert wird, es fehlt in der Kondition ein return;
PHP Code:
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¤Æ
return;
end
So sollte das funktionieren, sollten mehr Fehler auftauchen kannst du mir per PM bescheid geben da ich jetzt nur auf die zwei Dinge eingegangen bin.
Perlentauschquest von hippo
Quote:
Originally Posted by .HiPPo#'
PHP Code:
quest perlentausch begin
state start begin
when 20018.take with item.vnum == 27992 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Drei weiße Perlen und 33kk = eine blaue Perle")
say("Neun weiße Perlen und 33kk = eine blutrote Perle")
say("")
local s = select ("Blaue Perlen", "Blutrote Perle", "Keine")
if s == 1 then
if pc.count_item(27992) >= 3 and pc.money>= 33000000 then
pc.removeitem("27992")
pc.change_gold(-33000000)
pc.give_item2("27993")
say("Danke dir!")
say("Du erhältst eine Blaue Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27992) >= 9 and pc.money>= 33000000 then
pc.removeitem("27992")
pc.change_gold(-33000000)
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27993 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Eine blaue Perle und 33kk = drei weiße Perlen")
say("Drei blaue Perlen und 33kk = eine blutrote Perle")
say("")
local s = select ("Weiße Perle", "Blutrote Perle", "Keine")
if s == 1 then
if pc.count_item(27993) >= 1 and pc.money>= 33000000 then
pc.removeitem("27993")
pc.change_gold(-33000000)
pc.give_item2("27992, 3")
say("Danke dir!")
say("Du erhältst drei Weiße Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27993) >= 3 and pc.money>= 33000000 then
pc.removeitem("27993")
pc.change_gold(-33000000)
pc.give_item2("27994")
say("Danke dir!")
say("Du erhältst eine Blutrote Perle")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
when 20018.take with item.vnum == 27994 begin
say("Hey,")
say("Bist du etwa auf der Suche nach einer anderen Perle?")
say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
say("--------------------------------------------------------------------------")
say("Eine blutrote Perle und 33kk = neun weiße Perlen")
say("Eine blutrote Perle und 33kk = drei blaue Perlen")
say("")
local s = select ("Weiße Perle", "Blaue Perle", "Keine")
if s == 1 then
if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
pc.removeitem("27994")
pc.change_gold(-33000000)
pc.give_item2("27992, 9")
say("Danke dir!")
say("Du erhältst neun Weiße Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
pc.removeitem("27994")
pc.change_gold(-33000000)
pc.give_item2("27993, 3")
say("Danke dir!")
say("Du erhältst drei Blaue Perlen")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
|
1. Die Funktion heißt pc.remove_item nicht pc.removeitem
2. In diesen Funktionen haben strings nicht zu suchen, das heißt in den pc.remove_item und pc.give_item2 alle " wegmachen.
3. Sicher dass es die Funktion pc.money gibt? Versuchs mal mit pc.get_gold()
subquest 47 von TheSoulutionxx
Quote:
Originally Posted by xTheSoulutionxx3
PHP Code:
quest subquest_47 begin
state start begin
when login or levelup with pc.level>49 begin
set_state(go_to_kp1)
end
end
state go_to_kp1 begin
when letter begin
local v = find_npc_by_vnum(20020)
if v != 0 then target.vid("__TARGET__", v, "idontkonow")
end
send_letter("Hilf dem Hauptmann!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20020.chat."Mein Zustand" begin
target.delete("__TARGET__")
say_title("Hauptmann:")
say("text")
say("text")
say("text")
say("text")
local main_set = select("FeInDe Am Horzont GeSSichtet","feinde am horizont gesichtet","am horizont gesichtet feinde","Nochmal kucken")
if main_set == 1 then
say_title("text")
say("text")
say("text")
say("text")
return
end
if main_set == 3 then
say_title("text")
say("text")
say("text")
say("text")
return
end
if main_set == 4 then
return
end
if main_set == 2 then
say_title("text")
say("text")
say("text")
say("text")
pc.give_exp2(1300000)
pc.give_gold(20000)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
1. An die returns ein ; "return;"
2. Vergiss 1., mach alle returns weg denn solang du in der State bleibst sind sie absolut überflüssig.
3. Glieder es so:
if main_set == 1
bla
elseif main_set == 2
bla
elseif main_set == 3
bla
elseif main_set == 4
bla
end
4. Willst du die quest wirklich multiple-choice machen? Mach lieber offene eingabe alá:
local antwort=input() -- Code für ein Eingabefenster
if antwort == "feinde am horizont gesichtet" or antwort == "FEINDE AM HORIZONT GESICHTET"
blablahastgewonnen
elseif antwort == ""
say_title("Blablaquest")
say("")
say("Du hast keine Antwort eingegeben.")
else
blablayoufailedistfalsch
end
Kommt weniger billig rüber.
Nehme für Fehler keine Haftung, man beachte die Uhrzeit zu der ich das hier mache.
@ .Delta kleiner nett gemeinter Vorschlag, sag bei deinen Korrekturen auch was sie falsch machen damit sie schließlich was draus lernen.
|
|
|
|
|
11/18/2011, 08:51
|
#4059
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
Quote:
Originally Posted by Synfonia
@ .Delta kleiner nett gemeinter Vorschlag, sag bei deinen Korrekturen auch was sie falsch machen damit sie schließlich was draus lernen.
|
Sollen sie sich halt durch die Quest arbeiten und sich die Unterschiede anschaun :P
Aber nagut, ich werde demnächst Kommentare in die Quest einbauen
|
|
|
|
|
11/18/2011, 13:51
|
#4060
|
elite*gold: 0
Join Date: Sep 2010
Posts: 427
Received Thanks: 105
|
PHP Code:
Fehler:die quest startet nicht!
PHP Code:
quest subquest_48 begin
state start begin
when login or levelup with pc.level>43 begin
set_state(go_to_soonse)
end
end
state go_to_soonse begin
when letter begin
local v = find_npc_by_vnum(20023)
if v != 0 then target.vid("__TARGET__", v, "sesesese")
end
send_letter("Begebe dich zu Soon!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20023.chat."Mein Schatz!" begin
target.delete("__TARGET__")
say_title("Soon:")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say_reward("text")
say("")
set_state(go_to_kill_tier_gott)
end
end
state go_to_kill_tier_gott begin
when letter begin
send_letter("Der Schatz von Soon!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when 191.kill or 192.kill or 193.kill or 194.kill begin
local rand = number(0,99)
if rand<4 then pc.give_item2(27988, 1)
if pc.count_item(27988) >= 4 then
set_state(go_back_to_soont)
end
end
end
end
state go_back_to_soont begin
when letter begin
send_letter("Kehre zurück zu Soon!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20023.chat."Die Schatzkarten!" with pc.count_item(27988) >= 4 begin
target.delete("__TARGET__")
say_title("Soon:")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say_reward("text")
say("")
pc.remove_item(27988, 4)
set_state(go_to_alter_mann)
end
end
state go_to_alter_mann begin
when letter begin
send_letter("Begebe dich nun zum Alten Mann!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20009.chat."Soon schickt mich!" begin
target.delete("__TARGET__")
say_title("Alter Mann:")
say("text")
say("text")
say("text")
say("text")
say("text")
say("")
say_reward("text")
say_reward("text")
say("")
set_state(go_back_to_soones)
pc.give_item2(70009, 1)
end
end
state go_back_to_soones begin
when letter begin
send_letter("Bringe Soon die Schatztruhe!")
end
when button or info begin
say_title("text")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say("")
end
when __TARGET__.target.click or 20023.chat."Ich habe die Schatztruhe!" with pc.count_item(70009) >= 1 begin
target.delete("__TARGET__")
say_title("Soon:")
say("text")
say("text")
say("text")
say("text")
say("text")
say_reward("text")
say_reward("text")
say("")
pc.remove_item(70009, 1)
pc.give_exp2(1400000)
pc.give_gold(25000)
local items = {12240,12380,12520,12660}
local item = items[number( 1 ,4)];
pc.give_item2(item)
set_state(_complete_)
end
end
state _complete_ begin
end
end
|
|
|
|
|
11/18/2011, 16:03
|
#4061
|
elite*gold: 0
Join Date: Jan 2010
Posts: 150
Received Thanks: 56
|
NPC nicht mehr ansprechbar
Hier die quest:
PHP Code:
----------------------------------------------------
--Tempel des Drachen
----------------------------------------------------
quest dragontemple begin
state start begin
when 30121.chat."Tempel des Drachen" begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30121).."")
say("")
say("Hallo Gamemaster, "..pc.get_name().."")
say("Ich lasse dich auch ohne die Schlüssel und")
say("das Passwort passieren.")
wait()
pc.warp(843200, 1066900)
return
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30121).."")
say("")
say("Dir fehlen "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 Gewundene Schlüssel besitzt.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30121).."")
say("")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Du hast bereits 3 Schlüssel abgeben.")
say("Ich lasse dich passieren.")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
return
end
say("Tut mir Leid, der Raum ist reseviert.")
say("Wenn du das Kennwort hast für den Zugang,")
say("gebe es jetzt bitte ein.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30121).."")
say("")
say("Das Kennwort stimmt überein.")
if pc.count_item(30179) < 3 then
say("Ich kann dir den Zutritt nicht gewähren")
say("Dir fehlt "..item_name(30179).."")
say_item_vnum(30179)
say("Komme wieder wenn du 3 Schlüssel besitzt.")
return
end
say("Ich gewähre dir den Zutritt!")
pc.setqf("erlaubt",1)
wait()
if pc.can_warp() then pc.remove_item("30179",3) end
pc.warp(843200, 1066900)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30121).."")
say("")
say("Das Kennwort ist leider falsch.")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30121).."")
say("")
say("Du bist der erste der den Eintritt in den Tempel")
say("des Drachens verlangt. Ich werde dich passieren")
say("lassen, sofern du drei gewundene Schlüssel")
say("besitzt. Bevor du den Raum betreten darfst")
say("musst du eine geheime Zahl eingeben.")
say("Diese kannst du innerhalb von 5 Minuten an")
say("deine Mitstreiter weitergeben, so das auch")
say("sie den Raum betreten können. ")
say("")
local i = select("Ich bin Bereit!", "Abbrechen.")
if 1 == i then
say_title(""..mob_name(30121).."")
say("Dann Lege jetzt die kennzahl fest.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
say_title(""..mob_name(30121).."")
pc.setqf("abgabe",1)
say("")
say("Das Kennwort lautet:")
chat("Das Kennwort für den Eintritt lautet: "..passwort.."")
say_reward(""..passwort.."")
say("Gib das Kennwort deinen Mitstreitern weiter!")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30121).."")
say("")
say("Beim Kennwort setzen ist ein Fehler aufgetreten, versuche es erneut.")
say("Bitte gebe nur Zahlen ein.")
end
end
end
end
when login with pc.get_map_index() == 408 begin
timer("skipia_boss_end1", 2)
end
when skipia_boss_end1.timer begin
d.notice("Willkommen im Drachenraum!")
d.notice("")
d.notice("Ihr habt nun 30 Minuten Zeit den Wasserdrachen zu besiegen!")
d.notice("Nur zusammen könnt ihr ihn bewältigen!")
d.notice("Doch bevor ihr anfangt, zerstört den Metin des Kummers!")
d.notice("Tötet den Drachen")
d.notice("Zeitlimit: 30 Minuten")
d.notice("Viel Erfolg!")
d.notice("")
timer(5*60)
d.notice("Ihr habt noch 25 Minuten Zeit.")
timer(5*60)
d.notice("Ihr habt noch 20 Minuten Zeit.")
timer(5*60)
d.notice("Ihr habt noch 15 Minuten Zeit.")
timer(5*60)
d.notice("Ihr habt noch 10 Minuten Zeit.")
timer(5*60)
d.notice("Ihr habt noch 5 Minuten Zeit.")
timer(5*60)
d.notice("Die Zeit ist abgelaufen, ihr werdet in wenigen Sekunden in eure Städte teleportiert!")
warp_all_to_village( pc.get_map_index() , 5 )
end
when 8001.kill with pc.get_map_index() == 408 begin
notice_in_map("Der Zugang zum Drachenraum wurde soeben mit einem Passwort versehen!")
notice_in_map("Jetzt können nur noch Spieler den Drachenraum betreten, die das Passwort kennen!")
notice_in_map("Bitte beachtet, dass die anderen Metinsteine den Wasserdrachen verstärken!")
notice_in_map("Je mehr Metinsteine sich im Raum befinden, desto stärker ist der Wasserdrache!")
timer("skipia_boss_end", 2)
end
when skipia_boss_end.timer begin
game.set_event_flag("Grotte_zugang",1)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.get_map_index() == 408 begin
notice_in_map("Ihr habt einen Metinstein zerstört! Der Drache wird immer schwächer!")
end
when 2493.kill with pc.get_map_index() == 408 begin
notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.")
timer("skipia_boss_ende", 30)
notice_in_map("Beeindruckend, ihr habt ihn tatsächlich besiegt.")
notice_in_map("Ihr werdet in 30 Sekunden zurück in die Stadt gebracht.")
warp_all_to_village( pc.get_map_index() , 30 )
end
when skipia_boss_ende.timer begin
game.set_event_flag("Grotte_zugang",0)
end
end
end
Bitte um schnelle hilfe.. ich weiß nicht wo ich nen fehler finden sollte..
|
|
|
|
|
11/18/2011, 16:12
|
#4062
|
elite*gold: 0
Join Date: Sep 2010
Posts: 39
Received Thanks: 1
|
Hey,
hab ein Problem mit der Warpring.quest.
PHP Code:
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Ring:")
say("Möchtest du teleportiert werden?")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if pc.get_level() < 10 then
say_title("Ring:")
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 sub_set = select("Rotes Reich", "Blaues Reich", "Gelbes Reich", "MetinMap", "HighLvlMap 1", "HighLvlMap 2", "Abbrechen") + 5
if sub_set == 7 then
return
elseif sub_set == 1 then
pc.warp(474120, 954400)
elseif sub_set == 2 then
pc.warp(352900, 882500)
elseif sub_set == 3 then
pc.warp(63200, 166100)
elseif sub_set == 4 then
pc.warp(999900, 999900)
elseif sub_set == 5 then
pc.warp(83200, 0)
elseif sub_set == 6 then
pc.warp(940000, 897200)
end
end
end
end
Wenn ich auf "Rotes Reich" klicke, dann portet er in die HighLvlMap 2 und bei den anderen passiert gar nichts.
Hätte da noch eine "Autorates" quest die nicht funktioniert, hoffe mir kann auch da jemand helfen.
PHP Code:
quest rates begin
state start begin
when login with pc.is_gm() begin
timer("rates_1", 1)
end
when rates_1.timer begin
local day = os.date("%A")
if get_time() > game.get_event_flag("autorates") then
if day == "Friday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Saturday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Sunday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
else
__give_empire_priv("0", "4", "500", "96")
__give_empire_priv("0", "1", "500", "96")
__give_empire_priv("0", "2", "500", "96")
game.set_event_flag("autorates", get_time()+60*60*96)
end
end
timer("rates_2", 1)
end
when rates_2.timer begin
if get_time() > game.get_event_flag("autorates") then
if day == "Friday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Saturday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Sunday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
else
__give_empire_priv("0", "4", "500", "96")
__give_empire_priv("0", "1", "500", "96")
__give_empire_priv("0", "2", "500", "96")
game.set_event_flag("autorates", get_time()+60*60*96)
end
end
timer("rates_1", 1)
end
end
end
Es komm irgendso ein Fehler " have to start with "quest", oder so was ähnliches.
|
|
|
|
|
11/18/2011, 17:53
|
#4063
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
PHP Code:
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Ring:")
say("Möchtest du teleportiert werden?")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if pc.get_level() < 10 then
say_title("Ring:")
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 sub_set = select("Rotes Reich", "Blaues Reich", "Gelbes Reich", "MetinMap", "HighLvlMap 1", "HighLvlMap 2", "Abbrechen")
if sub_set == 7 then
return
elseif sub_set == 1 then
pc.warp(474120, 954400)
elseif sub_set == 2 then
pc.warp(352900, 882500)
elseif sub_set == 3 then
pc.warp(63200, 166100)
elseif sub_set == 4 then
pc.warp(999900, 999900)
elseif sub_set == 5 then
pc.warp(83200, 0)
elseif sub_set == 6 then
pc.warp(940000, 897200)
end
end
end
end
PHP Code:
quest rates begin
state start begin
when login with pc.is_gm() begin
timer("rates", 1)
end
when rates.timer begin
timer("rates", 1)
local day = os.date("%A")
if get_time() > game.get_event_flag("autorates") then
if day == "Friday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Saturday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
elseif day == "Sunday" then
__give_empire_priv("0", "4", "1000", "24")
__give_empire_priv("0", "1", "1000", "24")
__give_empire_priv("0", "2", "1000", "24")
game.set_event_flag("autorates", get_time()+60*60*24)
else
__give_empire_priv("0", "4", "500", "96")
__give_empire_priv("0", "1", "500", "96")
__give_empire_priv("0", "2", "500", "96")
game.set_event_flag("autorates", get_time()+60*60*96)
end
end
end
end
end
bei der 2. hab ich nichts auffälliges gesehen...allerdings bin ich nicht zuhause und habe somit kein notepad++ bzw. einen editor 
falls es nicht klappt, schau ich mir das später, wenn ich zuhause bin an :P
zur port quest: "+5" hatte da nichts zu suchen ; hättest nur mal mit der 5 rechnen sollen, dann hätte das alles erklärt
|
|
|
|
|
11/18/2011, 18:02
|
#4064
|
elite*gold: 0
Join Date: Jan 2010
Posts: 150
Received Thanks: 56
|
pls mir auch helfen 
|
|
|
|
|
11/18/2011, 19:06
|
#4065
|
elite*gold: 60
Join Date: Jul 2010
Posts: 771
Received Thanks: 439
|
Moin moin ihr leute,
Ich habe mich mal nach länger Zeit, habe ich mich entschieden mal wieder paar questen zu schreiben mit einen guten Kumpel 
Da ich momentan bei ihn bin, kann ich leider nicht auf meinen Server zugreifen 
somit kann ich die Quest nicht testen.
Jetzt wollte ich fragen, ob ihr mal die Quest kontrolieren könntet, ob sie gehen könnte.
Hier die Quest:
HTML Code:
quest item_for_rang begin
state start begin
when 20355.chat."Der Handel mit Erzen" begin
local 2000_RANG_BELOHNUNG = 19
local 4000_RANG_BELOHNUNG = 70024
local 8000_RANG_BELOHNUNG = 20355
local 12000_RANG_BELOHNUNG = 28537
local 20000_RANG_BELOHNUNG = 71122
local 30000_RANG_BELOHNUNG = 71196
say_title(""..mob_name(20355).."")
say("")
say("Du hast doch bestimmt von den Rangpunkte")
say("gehört, die dein Charakter sammeln kann oder?")
say("")
say("Wenn du eine gewisse Anzahl Rangpunkte")
say("erreicht hast, kann ich dir eine")
say("Belohnung überreichen.")
say("")
local p = select("Mehr Informationen.", "Belohnung abholen.", "Abbrechen.")
if p == 1 then
say_title(""..mob_name(20355).."")
say("")
say("2000 Rang (Freundlich):")
say("1x - "..item_name(2000_RANG_BELOHNUNG).."")
say_item_vnum(2000_RANG_BELOHNUNG)
say("")
wait()
say_title(""..mob_name(20355).."")
say("")
say("4000 Rang (Gut):")
say("1x - "..item_name(4000_RANG_BELOHNUNG).."")
say_item_vnum(4000_RANG_BELOHNUNG)
say("")
wait()
say_title(""..mob_name(20355).."")
say("")
say("8000 Rang (Edel):")
say("1x - "..item_name(8000_RANG_BELOHNUNG).."")
say_item_vnum(8000_RANG_BELOHNUNG)
say("")
wait()
say_title(""..mob_name(20355).."")
say("")
say("12000 Rang (Ritterlich):")
say("1x - "..item_name(12000_RANG_BELOHNUNG).."")
say_item_vnum(12000_RANG_BELOHNUNG)
say("")
wait()
say_title(""..mob_name(20355).."")
say("")
say("20000 Rang (Barmherzig):")
say("1x - "..item_name(20000_RANG_BELOHNUNG).." (Schneelöwe)")
say_item_vnum(20000_RANG_BELOHNUNG)
say("")
wait()
say_title(""..mob_name(20355).."")
say("")
say("Und die letzte Stufe!")
say("30000 Rang (Lägendär):")
say("1x - "..item_name(30000_RANG_BELOHNUNG).." (200 Angriffswert)")
say_item_vnum(30000_RANG_BELOHNUNG)
say("")
elseif p == 2 then
if pc.setqf("rangpoint",0) and cur_alignment <= 1999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",0) and cur_alignment >= 2000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 2000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(2000_RANG_BELOHNUNG).." zu bekommen.")
say("")
say_reward("Fortfahren?")
local w = select("Ja, fortfahren.", "Nein, doch nicht.")
if w == 1 then
pc.change_alignment(-2000)
pc.give_item2("2000_RANG_BELOHNUNG", 1)
return
elseif w == 2 then
return
elseif pc.setqf("rangpoint",1) and cur_alignment <= 3999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",1) and cur_alignment >= 4000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 4000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(4000_RANG_BELOHNUNG).." zu bekommen.")
say("")
say_reward("Fortfahren?")
local s = select("Ja, fortfahren.", "Nein, doch nicht.")
if s == 1 then
pc.change_alignment(-4000)
pc.give_item2("4000_RANG_BELOHNUNG", 1)
return
elseif s == 2 then
return
elseif pc.setqf("rangpoint",2) and cur_alignment <= 7999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",2) and cur_alignment >= 8000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 8000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(8000_RANG_BELOHNUNG).." zu bekommen.")
say("")
say_reward("Fortfahren?")
local m = select("Ja, fortfahren.", "Nein, doch nicht.")
if m == 1 then
pc.change_alignment(-8000)
pc.give_item2("8000_RANG_BELOHNUNG", 1)
return
elseif m == 2 then
return
elseif pc.setqf("rangpoint",3) and cur_alignment <= 11999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",3) and cur_alignment >= 12000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 12000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(12000_RANG_BELOHNUNG).." zu bekommen.")
say("")
say_reward("Fortfahren?")
local g = select("Ja, fortfahren.", "Nein, doch nicht.")
if g == 1 then
pc.change_alignment(-12000)
pc.give_item2("12000_RANG_BELOHNUNG", 1)
return
elseif g == 2 then
return
elseif pc.setqf("rangpoint",4) and cur_alignment <= 19999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",4) and cur_alignment >= 20000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 20000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(20000_RANG_BELOHNUNG).." (Schneelöwe) zu bekommen.")
say("")
say_reward("Fortfahren?")
local e = select("Ja, fortfahren.", "Nein, doch nicht.")
if e == 1 then
pc.change_alignment(-20000)
pc.give_item2("20000_RANG_BELOHNUNG", 1)
return
elseif e == 2 then
return
elseif pc.setqf("rangpoint",5) and cur_alignment <= 29999 then
say_title(""..mob_name(20355).."")
say("")
say("Es steht zur Zeit keine Belohnung zur Verfügung.")
say_reward("Du hast zu wenig Rangpunkte!")
elseif pc.setqf("rangpoint",5) and cur_alignment >= 30000 then
say_title(""..mob_name(20355).."")
say("")
say("Du wirst 30000 Rangpunkte verlieren dafür,")
say("um 1x - "..item_name(30000_RANG_BELOHNUNG).." (200 AW) zu bekommen.")
say("")
say_reward("Fortfahren?")
local l = select("Ja, fortfahren.", "Nein, doch nicht.")
if l == 1 then
pc.change_alignment(-30000)
pc.give_item2("30000_RANG_BELOHNUNG", 1)
return
elseif l == 2 then
return
elseif p == 3 then
return
end
end
end
end
Wir waren uns nicht ganz sicher ob alles mit diesen local funktionen richtig ist, sowie waren wir unsicher wegen den Rang überpüfen und abziehen.
Es wär echt nett, wen ihr uns Helfen könntet 
MfG
Kriegergeist^^ und Kumpel
|
|
|
|
All times are GMT +1. The time now is 19:54.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
