|
You last visited: Today at 02:28
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
11/22/2011, 19:03
|
#4096
|
elite*gold: 0 
Join Date: Sep 2010
Posts: 427
Received Thanks: 105
|
PHP Code:
quest perlen_tausch begin
state start begin
when 20095.chat."Perlen Tausch" begin
say_title("Perlen Tausch")
say("Hey willst du deine Diamanten")
say("gegen Perlen tauschen du brauchst")
say("aber eine bestimmte anzahl von ihnen")
say("nun gut wähle bitte aus welche du willst")
say_reward("Welche Perle willst du?")
local main_set = select("Weiße Perle (10stk)","Blaue Perle (20stk)","Rote Perle (30stk)","abbrechen")
if main_set 4 == then
return
end
if main_set 3 == then
say_title("Rote Perle")
say("ohhh du willst also eine Rote")
say("Perle nun gut bist du dir auch sicher?")
local main_set = select("Ja bin ich mir!","Nein lieber nicht!")
if main_set 1 then
if pc.count_item(diamant) >= 30 then
pc.give_item2(27993, 1)
pc.remove_item(diaman, 30)
end
end
else
say("Du hast nicht genug hole bitte")
say("noch welche und komm dann wieder!")
end
if main_set 2 then
return
end
if main_set 2 then
say_title("Blaue Perle")
say("ohhh du willst also eine Blaue")
say("Perle nun gut bist du dir auch sicher?")
local main_set = select("ja bin ich mir!","Nein lieber nicht!")
if main_set 1 then
if pc.count_item(diaman) >= 20 then
pc.give_item2(27992, 1)
pc.remove_item(diamant, 20)
end
end
else
say("Du hast nicht genug hole bitte")
say("noch welche und komm dann wieder!")
if main_set 2 then
return
end
if main_set 1 then
say_title("Weiße Perle")
say("ohhh du willst also eine Weiße")
say("Perle nun gut bist du dir auch sicher?")
local main_set = select("ja bin ich mir!","Nein lieber nicht!")
if main_set 1 then
if pc.count_item(diamn) >= 10 then
pc.give_item2(27991, 1)
pc.remove_item(diamant, 10)
end
end
else
say("Du hast nicht genug hole bitte")
say("noch welche und komm dann wieder!")
if main_set 2 then
return
end
end
end
end
|
|
|
|
11/22/2011, 20:50
|
#4097
|
elite*gold: 0
Join Date: Sep 2009
Posts: 101
Received Thanks: 30
|
[Spoiler]quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Kill")
end
when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end
when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
[Spoiler]
quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Kill")
end
when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end
when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Meine Quest geht irgendwie nicht könnt ihr mir pls helfen?
[Spoiler]quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Kill")
end
when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end
when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
[Spoiler]
quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Kill")
end
when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end
when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Meine Quest geht irgendwie nicht könnt ihr mir pls helfen?
quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Kill")
end
when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end
when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Habs gedunden hab bei when login with pc.level >= begin 1 vergessen also when login with pc.level >= 1 begin
|
|
|
|
|
11/22/2011, 21:13
|
#4098
|
elite*gold: 0
Join Date: Apr 2011
Posts: 161
Received Thanks: 4
|
Hallo zusammen
kann mir vill einer eine Teleporter quest schreiben, womit man nur in eine map kommt
also:
-ab level 80
-in 8888 8888
-für 10kk yang
-beim npc 20095
und vill eine:
-ab level 80
-in 8888 8888
-für 0 yang
-beim npc 20095
-wenn man item *** hat
also insgesammt 2 quests!
jetzt schon mal danke und wenn es so einen service noch gibt, der quests schreibt, dann sorry das ich das hier poste
MFG DavidMatth
|
|
|
|
|
11/22/2011, 21:55
|
#4099
|
elite*gold: 0
Join Date: Sep 2009
Posts: 101
Received Thanks: 30
|
@DavidMatth
also ich weis nicht obs 100 % mit dem lvl da klappt aber ansonsten soll der quest richtig geschrieben sein. Wenn nicht dann Entschuldigung Lerne grad
also die quest
HTML Code:
quest Name begin
state start begin
when login with pc.level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
else
return
end
end
end
end
Wenn es falsch ist soll ein Experte Ändern pls Danke
Mfg.
|
|
|
|
|
11/22/2011, 22:02
|
#4100
|
elite*gold: 0
Join Date: Apr 2011
Posts: 161
Received Thanks: 4
|
danke erstmal, ander wie ich das sehe, ist da nicht für 10kk drin oder? und zudem habe ich es gerade getestet und wenn ich die quest mit der make.py draufspiele, dann kommt ein fehler, aber danke, dass du es versucht hast
|
|
|
|
|
11/22/2011, 22:03
|
#4101
|
elite*gold: 0
Join Date: Sep 2009
Posts: 101
Received Thanks: 30
|
Und gings DavidMatth
also das mit der 10kk hab ich nicht drauf gemacht aber was für fehler ist das
bei mmir kams auch bei einer anderen kanns villeicht da auch weg machen hab schon 2 quests geschrieben und sie gingen
Mfg.
|
|
|
|
|
11/22/2011, 22:19
|
#4102
|
elite*gold: 0
Join Date: Apr 2011
Posts: 161
Received Thanks: 4
|
syntax error : [string "startpc . level <= 80"]1: unexpected symbol near 'when'
releport.quest:18:Error occured on compile teleport.quest
oder so 
|
|
|
|
|
11/23/2011, 08:49
|
#4103
|
elite*gold: 0
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
|
Quote:
Originally Posted by hut
@DavidMatth
also ich weis nicht obs 100 % mit dem lvl da klappt aber ansonsten soll der quest richtig geschrieben sein. Wenn nicht dann Entschuldigung Lerne grad
also die quest
HTML Code:
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
else
return
end
end
end
end
Wenn es falsch ist soll ein Experte Ändern pls Danke
Mfg. |
so solte es stimmen
|
|
|
|
|
11/23/2011, 16:27
|
#4104
|
elite*gold: 0
Join Date: Sep 2009
Posts: 101
Received Thanks: 30
|
Ok, danke war nicht für mich aber nicht schlimm
|
|
|
|
|
11/23/2011, 18:08
|
#4105
|
elite*gold: 0
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
|
aso stimmt habe ich nicht gemerkt aber er wird es ja lesen
|
|
|
|
|
11/23/2011, 18:13
|
#4106
|
elite*gold: 0
Join Date: Apr 2011
Posts: 161
Received Thanks: 4
|
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
else
return
end
end
end
end
kann da noch einer ein yang - 10kk rein machen?
danke
|
|
|
|
|
11/23/2011, 18:49
|
#4107
|
elite*gold: 0
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
|
Quote:
Originally Posted by DavidMatth
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
else
return
end
end
end
end
kann da noch einer ein yang - 10kk rein machen?
danke |
PHP Code:
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
pc.changegold(-10000000)
else
return
end
end
end
end
sollte passen bin mir aber nicht sicher 
|
|
|
|
|
11/23/2011, 20:09
|
#4108
|
elite*gold: 10
Join Date: Sep 2011
Posts: 675
Received Thanks: 312
|
Quote:
Originally Posted by .Sippel
PHP Code:
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s then
pc.warp(8888, 8888)
pc.changegold(-10000000)
else
return
end
end
end
end
sollte passen bin mir aber nicht sicher |
Eine Abfrage, ob man überhaupt 10kk hat, wäre auch nicht verkehrt.
PHP Code:
quest Name begin
state start begin
when pc.get_level<= 80 begin
when 20095.use begin
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if 1 == s with pc.getmoney >=10000000
pc.warp(8888, 8888)
pc.changegold(-10000000)
else
say("Du hast nicht genug Yang")
return
end
end
end
end
|
|
|
|
|
11/23/2011, 20:58
|
#4109
|
elite*gold: 0
Join Date: Feb 2011
Posts: 27
Received Thanks: 8
|
 schlimm mit euch
PHP Code:
quest Name begin
state start begin
when pc.level >= 80 begin -----heist soviel wie bis lvl 80dan gehts nimmer wen ab lvl 80 sein sollte dan so (>= 80)
set_state(port)
end
state port begin
when 20095.chat."Telepotieren1" begin ---mit yang
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if s == 1 with pc.get_gold >=10000000 then
pc.warp(8888, 8888)
pc.changegold(-10000000)
end
if s == 2 then
say("Dein Text")
end
end
when 20095.chat."telepotieren2" begin ---mit item
say_title("Teleportieren")
say("Dein Text")
say("Dein Text")
say("Dein Text")
say_reward("Dein Text")
local s = select("Ja", "Nein")
if s == 1 with pc.count_item(xxxxx) then ---bitte stat xx die itemvenum eintragen
pc.warp(8888, 8888)
pc.remove_item (xxxxx, 1) ---- stat xxx wieder die venum
end
if s == 2 then
say("Dein Text")
end
end
end
end
fertig
|
|
|
|
|
11/23/2011, 22:41
|
#4110
|
elite*gold: 0
Join Date: Mar 2010
Posts: 296
Received Thanks: 86
|
Taag , hätte da ein problemchen mit ner quest und zwar: man sollte ja eigentlich 200 von den rollen brauchen aber man braucht nur eine .. hab den text zwar abgeändert das man nur eine braucht weil ich nimmer weiter weis .. deswegen brauch ich eure hilfe , das man 200 von den drachengottrollen da 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
|
|
|
|
All times are GMT +1. The time now is 02:28.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
