|
You last visited: Today at 09:42
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
08/01/2011, 17:19
|
#2926
|
elite*gold: 12 
Join Date: Jun 2010
Posts: 913
Received Thanks: 158
|
PHP Code:
quest Zweineueitems begin
state start begin
when login with pc.level >= 100 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Zwei Neue Items")
end
when info or button begin
say("Zwei Neue Items")
say("Gute Arbeit, lieber Spieler")
say("Da du nun soweit bist, kannst du von mir rare Items erhalten!")
say_reward("Töte 30x den Sensenmann")
say("")
pc.setqf("state", 30)
q.set_counter("Sensenmann", 30)
end
when 1093.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Sensenmann", count)
end
if count == 0 then
say_title("Zwei Neue Items")
say("Du hast die Quest erfolgreich abgeschlossen!")
say("Du erhälst:")
say_reward("Pferdezucker")
say_reward("und")
say_reward("Ring der Nachfolge")
pc.give_item2(71110, 1)
pc.give_item2(71099, 1)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Werden keine kills abgezogen.
|
|
|
|
08/01/2011, 17:21
|
#2927
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
Quote:
Originally Posted by körper7
PHP Code:
quest Zweineueitems begin
state start begin
when login with pc.level >= 100 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Zwei Neue Items")
end
when info or button begin
say("Zwei Neue Items")
say("Gute Arbeit, lieber Spieler")
say("Da du nun soweit bist, kannst du von mir rare Items erhalten!")
say_reward("Töte 30x den Sensenmann")
say("")
pc.setqf("state", 30)
q.set_counter("Sensenmann", 30)
end
when 1093.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Sensenmann", count)
end
if count == 0 then
say_title("Zwei Neue Items")
say("Du hast die Quest erfolgreich abgeschlossen!")
say("Du erhälst:")
say_reward("Pferdezucker")
say_reward("und")
say_reward("Ring der Nachfolge")
pc.give_item2(71110, 1)
pc.give_item2(71099, 1)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Werden keine kills abgezogen. |
Liegt ganz einfach daran, dass du den Sensenmann schon im DT killen musst, und die Quests ist dauerhaft aktiv.
Such dir einen anderen MOB aus, der nicht schon in einer anderen Quest in Gebrauch ist, dann sollte das auch funktionieren.
|
|
|
|
|
08/01/2011, 17:46
|
#2928
|
elite*gold: 0
Join Date: Jul 2011
Posts: 457
Received Thanks: 119
|
Meine Quest funkioniert nicht =D bitte brauche mal hilfe .. ;D
PHP Code:
quest Berg_Run_quest begin
state start begin
when 20092.chat."Berg Run betretten" begin
say_title("Wächter vom Berg Run")
say("Möchtes du am Berg Run teil nehmen ?")
say("")
local s=select("Klar!","Ne, kein bock")
if s==1 then
pc.warp (4444, 4444)
elseif s==2 then
say("Dachte ich mir schon!")
say("Bis später!")
return
end
d.jump_all(54, 213)
when 8025.kill with pc.get_map_index()>= 6 and pc.get_map_index() < 6 begin
d.notice("Du hast den Heiligen Metin-Gekillt")
d.notice("Du Kommst nun auf die Zweite Insel")
d.jump_all(7896, 7855)
when 8023.kill with pc.get_map_index()>= 6 and pc.get_map_index() < 6 begin
d.notice("Du hast den zweiten Metin besiegt")
d.notice("Du Kommst nun auf die Boss Insel")
d.notice("Aber Vorschit dort sind starke Monster ...")
end
d.jump_all(131, 134)
when 1093.kill with pc.get_map_index()>= 6 and pc.get_map_index() < 6 begin
d.notice("Du hast den Berg-Run erfolgreich gemeistert")
d.notice("Dein Reicht erhält nun 200% Rates")
local empire = pc.get_empire()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
end
end
end
|
|
|
|
|
08/01/2011, 18:38
|
#2929
|
elite*gold: 0
Join Date: Nov 2010
Posts: 544
Received Thanks: 190
|
Quote:
Originally Posted by .Metz
Ich habe ne Frage könntet ihr mir sagen ob das geht?
Also ich habe folgende Quest:
quest boar begin
state start begin
when 71114.use begin
chat("Du hast dein Keiler gerufen!")
pc.mount(20110)
affect.add_collect(apply.DEF_GRADE_BONUS,50,1800)
affect.add_collect(apply.ATT_GRADE_BONUS,50,1800)
affect.add_collect(apply.EXP_GRADE_BONUS,50,1800)
end
end
end
Kann man irgendwie machen wenn man absteigt das die Bonis automatisch verschwinden? Ich will kein zusätzliches Item benutzten!
|
Bitte mal nach gucken
|
|
|
|
|
08/01/2011, 20:30
|
#2930
|
elite*gold: 0
Join Date: Jan 2010
Posts: 36
Received Thanks: 0
|
Quote:
Originally Posted by .Delta
PHP Code:
quest horse_menu begin
state start begin
function horse_menu()
if horse.is_mine() then
say_title("Pferdehandbuch")
say("Das Handbuch für das Pferd")
say("")
local s = 7
if horse.is_dead() then
s = select( "Zurückholen des Pferde", "Das Pferd zurück geben", "Schließen")
if s == 1 then s = 0
elseif s == 2 then s = 3
elseif s == 3 then return
end
else
s = select(
"Pferd füttern", "Pferd reiten", "Das Pferd zurückgeben", "Status des Pferdes anzeigen",
"Pferd einen Namen geben", "Reichsteleporter", "Schließen")
end
if s == 0 then
horse.revive()
elseif s == 1 then
local food = horse.get_grade() + 50054 - 1
if pc.countitem(food) > 0 then
pc.removeitem(food, 1)
horse.feed()
else
say("Das Item "..item_name(food).." wird benötiogt.")
say("")
end
elseif s == 2 then
horse.ride()
elseif s == 3 then
horse.unsummon()
elseif s == 4 then
say_title("Pferdestatus")
say("Momentane Lebenspunkte des Pferdes: "..horse.get_health_pct().."%")
say("Momentane Ausdauer des Pferdes: "..horse.get_stamina_pct().."%")
say("")
elseif s == 5 then
if pc.countitem("71110") <= 0 then
say("Das Item "..item_name("71110").." wird benötigt.")
say("")
return
end
local old_horse_name = horse.get_name() ;
say_title("Pferdename")
say("Hier kannst du deinem Pferd einen neuen")
say("Namen geben. Damit kannst du dein Pferd")
say("über alle anderen hervorheben.")
say("")
if string.len(old_horse_name) == 0 then
say_reward("Das Pferd besitzt bis jetzt keinen Namen.")
else
say_reward("Der momentane Name des Pferdes lautet "..old_horse_name..".")
end
say("")
say("Wähle einen neuen Pferdenamen:")
say("")
local horse_name = input()
if string.len(horse_name) < 2 then
say_title("Pferdename")
say("Der Name ist zu kurz.")
say("")
return
elseif string.len(horse_name) > 12 then
say_title("Pferdename")
say("Der Name ist zu lang.")
say("")
return
end
local ret = horse.set_name(horse_name)
say_title("Pferdename")
if ret == 0 then
say_reward("Du hast momentan kein Pferd!")
say("")
elseif ret == 1 then
say_reward("Du kannst diesen Namen nicht benutzen!")
say("")
elseif ret == 2 then
pc.remove_item("71110")
say("Du hast deinem Pferd einen neuen Namen gegeben!")
say("")
end
elseif s == 6 then
local map=pc.get_map_index()
local warp=0
local s=0
local check=0
say("Wohin möchtest du?")
if map!=1 and map!=21 and map!=41 then
check=1
s=select("Rotes Reich", "Gelbs Reich", "Blaus Reich", "Abbrechen")
warp=s
if s==4 then
return
end
end
if map==1 then
s=select("Gelbs Reich", "Blaus Reich", "Abbrechen")
if s==1 then
warp=2
elseif s==2 then
warp=3
end
elseif map==21 then
s=select("Rotes Reich", "Blaues Reich", "Abbrechen")
if s==1 then
warp=1
elseif s==2 then
warp=3
end
elseif map==41 then
s=select("Rotes Reich", "Gelbes Reich", "Abbrechen")
warp=s
end
if s==3 and check==0 then
return
end
if warp==1 then
pc.warp(474200, 954400)
elseif warp==2 then
pc.warp(63200, 166100)
elseif warp==3 then
pc.warp(960100, 268700)
end
else
return
end
end
end
when 20030.click begin horse_menu.horse_menu() end
when 20101.click begin horse_menu.horse_menu() end
when 20102.click begin horse_menu.horse_menu() end
when 20103.click begin horse_menu.horse_menu() end
when 20104.click begin horse_menu.horse_menu() end
when 20105.click begin horse_menu.horse_menu() end
when 20106.click begin horse_menu.horse_menu() end
when 20107.click begin horse_menu.horse_menu() end
when 20108.click begin horse_menu.horse_menu() end
when 20109.click begin horse_menu.horse_menu() end
end
end
€:
PHP Code:
----------------------------------
--Uživatelský prsten by Demoro
----------------------------------
quest uzivatelskyprsten begin
state start begin
when 9007.chat begin
say("Ahoj!")
say("Co potrebujes?")
local main = select("Zakoupit BZK","Teleport do risi","Promena")
if main == 1 then
----------------------------------
--Zakoupeni expu
----------------------------------
local zakoupeniexpu = select("10.000.000 BZK - 10kk Yang","20.000.000 BZK - 20kk Yang","50.000.000 BZK - 50kk Yang","100.000.000 BZK - 100kk Yang","Zpet")
if zakoupeniexpu == 1 then
if pc.money<10000000 then
say("Bohuzel nemas 10kk Yang!")
else
pc.changemoney(-10000000)
pc.give_exp2(10000000)
notice_all(pc.get_name().." si zakoupil 10.000.000 BZK!")
end
elseif zakoupeniexpu == 2 then
if pc.money<20000000 then
say("Bohuzel nemas 20kk Yang!")
else
pc.changemoney(-20000000)
pc.give_exp2(20000000)
notice_all(pc.get_name().." si zakoupil 20.000.000 BZK!")
end
elseif zakoupeniexpu == 3 then
if pc.money<50000000 then
say("Bohuzel nemas 50kk Yang!")
else
pc.changemoney(-50000000)
pc.give_exp2(50000000)
notice_all(pc.get_name() .." si zakoupil 50.000.000 BZK!")
end
elseif zakoupeniexpu == 4 then
if pc.money<100000000 then
say("Bohuzel nemas 100kk Yang!")
else
pc.changemoney(-100000000)
pc.give_exp2(100000000)
notice_all(pc.get_name() .." si zakoupil 100.000.000 BZK!")
end
elseif zakoupeniexpu == 5 then
return
end
-----------------------------
--Teleport do risi
-----------------------------
elseif main == 2 then
say_title("Teleportujici prsten")
say("")
say("Tento prsten te muze teleportovat ")
say("do trech zakladnich mest.")
say("")
say("Kam chces tedy teleportovat? ")
say("")
local port=select("Yongan", "Joan", "Pyungmoo", "Zpet")
if port==1 then
pc.warp(474300,954800)
elseif port==2 then
pc.warp(63800,166400)
elseif port==3 then
pc.warp(959900,269200)
elseif port ==4
return
end
----------------------------
--Promena
----------------------------
elseif main == 3 then
say("Chces se v nekoho promenit?")
say("Promena trva 10 minut!")
say_reward("Sluzba je zdarma!")
local s=select("Divoky poddany" , "Pavoucek" , "Tmavy fanatik" , "Duch mistra mece" , "Zpet v sebe" , "Zpet")
if s==1 then
pc.polymorph(502, 600)
elseif s==2 then
pc.polymorph(2001, 600)
elseif s==3 then
pc.polymorph(701, 600)
elseif s==4 then
pc.polymorph(1068, 600)
elseif s==5 then
pc.polymorph(1)
elseif s==6 then
return
end
end
end
end
end
|
Syntax error:
And this quest please (sorry to my EN,DE)
PHP Code:
--------------------------------------------------------------------------------------------
------------------------------------ quest by xDeStRuCtx -----------------------------------
-------------------------------------- Edited by ziuto -------------------------------------
---------------------------------------- lotek quest ---------------------------------------
--------------------------------------------------------------------------------------------
quest lotek begin
state start begin
when 20093.chat."Loterie" begin
if get_time() >= pc.getqf("tajm") then
say_title("Vitam " .. pc . name .. "")
say("[ENTER]Chces si vsadit v lotto ?[ENTER]")
local s=select("Ano", "Ne")
if s==1 then
say_title("Krupier:")
say("[ENTER]Aby jsi si mohl vsadit ,[ENTER]je treba zaplatit 2000000 Yang.")
say("Vsadit si muzes kazdy 2 hodiny.")
say("Cisla musi byt od 1 do 36.")
say("Aby jsi vyhral, je treba trefit alespon 3 cisla.")
say("Muzete vyhrat spoustu Yangu.")
say("[ENTER]Chces si vsadit ?[ENTER]")
local s=select("Ano", "Nebudu riskovat")
if s==1 then
if pc.money<20000000 then
say_title("Krupier:")
say("[ENTER]Nemas 20000000 Yang.[ENTER]")
else
pc.setqf("juz", 1)
pc.changemoney(-20000000)
say_title("Krupier:")
say("[ENTER]A nyni ,[ENTER]napis cisla, na ktere si chces vsadit,[ENTER] ale musi byt v rozmezi 1 - 36.[ENTER]")
wait()
say_title("Napis")
say("[ENTER]Cislo 1 :[ENTER]")
local jeden = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 2 :[ENTER]")
local dwa = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 3 :[ENTER]")
local trzy = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 4 :[ENTER]")
local cztery = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 5 :[ENTER]")
local piec = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 6 :[ENTER]")
local szesc = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 7 :[ENTER]")
local sedm = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 8 :[ENTER]")
local osm = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 9 :[ENTER]")
local devet = tonumber(input(""))
say_title("Napis")
say("[ENTER]Cislo 10 :[ENTER]")
local deset = tonumber(input(""))
local jeeden = number(1, 36)
local dwaa = number(1, 36)
local trzyy = number(1, 36)
local czteryy = number(1, 36)
local pieec = number(1, 36)
local szescc = number(1, 36)
local sedmm = number(1, 36)
local osmm = number(1, 36)
local devett = number(1, 36)
local desett = number(1, 36)
say_title("Krupier:")
say("[ENTER]Tvoje cisla:[ENTER]")
say_reward(jeden.." , "..dwa.." , "..trzy.." , "..cztery.." , "..piec.." , "..szesc.." , "..sedm.." , "..osm.." , "..devet.." , "..deset..")
say("[ENTER]Vylosovane cisla :[ENTER]")
say_reward(jeeden.." , "..dwaa.." , "..trzyy.." , "..czteryy.." , "..pieec.." , "..szescc.." , "..sedmm.." , "..osmm.." , "..devett.." , "..desett.."[ENTER]")
if jeden == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if jeden == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if dwa == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if trzy == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if cztery == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if piec == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if szesc == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if edm == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if sedm == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if osm == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if devet == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == jeeden then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == dwaa then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == trzyy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == czteryy then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == pieec then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == szescc then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == sedmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == osmm then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == devett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
if deset == desett then
pc.setqf("ilosc", pc.getqf("ilosc")+1)
end
wait()
say_title("Krupier:")
local aaa = number(10000000, 20000000)
local bbb = number(50000000, 100000000)
local ccc = number(200000000, 500000000)
local ddd = number(1000000000, 1999999999)
if pc.getqf("ilosc")==0 then
say("[ENTER]Bohuzel jsi netrefil ani 1 cislo ![ENTER]")
end
if pc.getqf("ilosc")==1 then
say("[ENTER]Trefil jsi 1 cislo.[ENTER]")
end
if pc.getqf("ilosc")==2 then
say("[ENTER]Trefil jsi 2 čísla.[ENTER]")
end
if pc.getqf("ilosc")==3 then
say("[ENTER]Trefil(a) jsi 3 cisla.[ENTER]")
say_reward("Vyhráváš "..aaa.." Yang.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 3 cisla a vyhral(a) "..aaa.." Yang!")
notice_all("Gratulujeme!")
pc . change_money(aaa)
end
if pc.getqf("ilosc")==4 then
say("[ENTER]Trefil(a) jsi 4 cisla.[ENTER]")
say_reward("Vyhravas "..bbb.." Yang.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 4 cisla a vyhral(a) "..bbb.." Yang!")
notice_all("Gratulujeme!")
pc . change_money(bbb)
end
if pc.getqf("ilosc")==5 then
say("[ENTER]Trefil(a) jsi 5 cisel.[ENTER]")
say_reward("Vyhravas "..ccc.." Yang.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 5 cisel a vyhral(a) "..ccc.." Yang!")
notice_all("Gratulujeme!")
pc . change_money(ccc)
end
if pc.getqf("ilosc")==6 then
say("[ENTER]Trefil(a) jsi 6 cisel.[ENTER]")
say_reward("Vyhravas "..ddd.." Yang.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) vsechny cisla a vyhral(a) "..ddd.." BZK!")
notice_all("Gratulujeme!")
pc . change_money(ddd)
if pc.getqf("ilosc")==7 then
say("[ENTER]Trefil(a) jsi 7 cisel.[ENTER]")
say_reward("Vyhráváš "..aaa.." BZK.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 3 cisla a vyhral(a) "..aaa.." BZK!")
notice_all("Gratulujeme!")
pc . give_exp2(aaa)
end
if pc.getqf("ilosc")==8 then
say("[ENTER]Trefil(a) jsi 8 cisel.[ENTER]")
say_reward("Vyhravas "..bbb.." BZK.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 4 cisla a vyhral(a) "..bbb.." BZK!")
notice_all("Gratulujeme!")
pc . give_exp2(bbb)
end
if pc.getqf("ilosc")==9 then
say("[ENTER]Trefil(a) jsi 9 cisel.[ENTER]")
say_reward("Vyhravas "..ccc.." BZK.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) 5 cisel a vyhral(a) "..ccc.." BZK!")
notice_all("Gratulujeme!")
pc . give_exp2(ccc)
end
if pc.getqf("ilosc")==10 then
say("[ENTER]Trefil(a) jsi vsechny cisla![ENTER]")
say("Gratulujeme.[ENTER]")
say_reward("Vyhravas "..ddd.." BZK.[ENTER]")
notice_all(" ".. pc.get_name() .." trefil(a) vsechny cisla a vyhral(a) "..ddd.." BZK!")
notice_all("Gratulujeme!")
pc . give_exp2(ddd)
end
end
pc.setqf("ilosc", 0)
pc.setqf("tajm", get_time()+300)
elseif 2==s then
say_title("Krupier:")
say("[ENTER]Tak ok mno....[ENTER]")
end
elseif 2==s then
say_title("Krupier:")
say("[ENTER]Ne to ne.[ENTER]")
end
else
say_title("Krupier:")
say("[ENTER]Muzes si vsadit kazdych 5 minut![ENTER]")
end
end
end
end
|
|
|
|
|
08/01/2011, 23:26
|
#2931
|
elite*gold: 156
Join Date: Dec 2009
Posts: 1,469
Received Thanks: 464
|
PHP Code:
quest handelsmap begin
state start begin
when 50027.use begin
say("Wohin möchtest du reisen? ")
local s = select("Pyungmoo", "Yongan", "Joan","Abbrechen")
if s == 1 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(383,640)
elseif s == 2 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(647,582)
elseif s == 3 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(633,640)
else s == 4 then
say("Du wirst nicht teleportiert.")
say("Auf wiedersehen Noob.")
wait()
end
return
end
end
end
Auf Richtigkeit prüfen, posted for SoLow :>
Frage am Rande, wie gebe ich jetzt einen Item in der db die Funktion dazu?
Den wenn ich Rechtsklick aufs Item mache passiert nichts kein Fenster erscheint.
|
|
|
|
|
08/02/2011, 00:34
|
#2932
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
Hier(bin mir zwar nicht sicher aber sollte gehen):
PHP Code:
quest handelsmap begin
state start begin
when 50027.use begin
say("Wohin möchtest du reisen?")
local s = select("Pyungmoo", "Yongan", "Joan","Abbrechen")
if s == 1 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(383,640)
elseif s == 2 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(647,582)
elseif s == 3 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(633,640)
end
if s == 4 then
say("Du wirst nicht teleportiert.")
say("Auf wiedersehen Noob.")
wait()
return
end
end
end
end
Ehm..player-->item_proto-->gewünschtes Item suchen-->type auf 18 stellen
|
|
|
|
|
08/02/2011, 11:29
|
#2933
|
elite*gold: 0
Join Date: May 2011
Posts: 234
Received Thanks: 28
|
Warpring geht nach 1x benutzen weg.
Der Warpring geht nach 1x benutzen weg >.< der soll für immer bleiben.
Quest
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
if pc.countitem("70007")>=1 then
pc.removeitem("70007", 1)
end
say_title("Ring:")
say("Dies ist eine faszinierende Gegend. Aber")
say("passiert hier denn auch mal etwas")
say("Außergewöhnliches? Eher wohl nicht. In anderen")
say("Teilen des Landes sieht es mitunter ganz anders.")
say("aus! Es gibt daher sicher einen intressanten")
say("Ort, an den ich dich teleportieren könnte. Da")
say("jedoch die Kräfte des Bösen wieder stärker")
say("geworden sind, wurden Raum und Zeit ins Chaos")
say("gestürzt. Dadurch kann es passieren, dass deine")
say("Rückkehr nicht immer augenblicklich funktioniert.")
say("Möchtest du dennoch 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 map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
say_title("Ring:")
say("Wohin möchtest du teleportiert werden?")
-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Gildenzone",
"Gildenzone",
"Gildenzone",
}
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,"Andere Gebiete")
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")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5
if sub_set == 9 then -- ??
return
end
if sub_set == 8 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5
if sub_set == 8 then -- ??
return
end
end
end
end
end
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 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Ring:")
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 sub_set2 == 1 then
say_title("Ring:")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
elseif sub_set2 == 2 then
say_title("Ring:")
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 -- end sub set check2 if
end -- end sub set check1 if
end -- end map check if
end -- end when use item
end -- end state start
end -- end quest warpring
Danke
|
|
|
|
|
08/02/2011, 11:44
|
#2934
|
elite*gold: 156
Join Date: Dec 2009
Posts: 1,469
Received Thanks: 464
|
PHP Code:
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Ring:")
say("Dies ist eine faszinierende Gegend. Aber")
say("passiert hier denn auch mal etwas")
say("Außergewöhnliches? Eher wohl nicht. In anderen")
say("Teilen des Landes sieht es mitunter ganz anders.")
say("aus! Es gibt daher sicher einen intressanten")
say("Ort, an den ich dich teleportieren könnte. Da")
say("jedoch die Kräfte des Bösen wieder stärker")
say("geworden sind, wurden Raum und Zeit ins Chaos")
say("gestürzt. Dadurch kann es passieren, dass deine")
say("Rückkehr nicht immer augenblicklich funktioniert.")
say("Möchtest du dennoch 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 map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
say_title("Ring:")
say("Wohin möchtest du teleportiert werden?")
-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Gildenzone",
"Gildenzone",
"Gildenzone",
}
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,"Andere Gebiete")
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")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "Dämonenturm", "Zurück", "Abbrechen") + 5
if sub_set == 9 then -- ??
return
end
if sub_set == 8 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "Dämonenturm", "Abbrechen") + 5
if sub_set == 8 then -- ??
return
end
end
end
end
end
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 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Ring:")
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 sub_set2 == 1 then
say_title("Ring:")
say("Ich teleportiere dich dorthin.")
wait()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
elseif sub_set2 == 2 then
say_title("Ring:")
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 -- end sub set check2 if
end -- end sub set check1 if
end -- end map check if
end -- end when use item
end -- end state start
end -- end quest warpring
Müsste so gehn denke ich ma :>
|
|
|
|
|
08/02/2011, 12:06
|
#2935
|
elite*gold: 0
Join Date: May 2011
Posts: 234
Received Thanks: 28
|
es geht habs selber gelöst.
|
|
|
|
|
08/02/2011, 14:41
|
#2936
|
elite*gold: 156
Join Date: Dec 2009
Posts: 1,469
Received Thanks: 464
|
Quote:
Originally Posted by Sp0ngeb0b ist cool
Hier(bin mir zwar nicht sicher aber sollte gehen):
PHP Code:
quest handelsmap begin
state start begin
when 50027.use begin
say("Wohin möchtest du reisen?")
local s = select("Pyungmoo", "Yongan", "Joan","Abbrechen")
if s == 1 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(383,640)
elseif s == 2 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(647,582)
elseif s == 3 then
say("Achtung, du wirst teleportiert.")
wait()
pc.warp(633,640)
end
if s == 4 then
say("Du wirst nicht teleportiert.")
say("Auf wiedersehen Noob.")
wait()
return
end
end
end
end
Ehm..player-->item_proto-->gewünschtes Item suchen-->type auf 18 stellen |
Funktioniert immernoch nicht :>
|
|
|
|
|
08/02/2011, 15:43
|
#2937
|
elite*gold: 99
Join Date: Aug 2009
Posts: 4,295
Received Thanks: 5,091
|
Quote:
Originally Posted by körper7
PHP Code:
quest Zweineueitems begin
state start begin
when login with pc.level >= 100 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Zwei Neue Items")
end
when info or button begin
say("Zwei Neue Items")
say("Gute Arbeit, lieber Spieler")
say("Da du nun soweit bist, kannst du von mir rare Items erhalten!")
say_reward("Töte 30x den Sensenmann")
say("")
pc.setqf("state", 30)
q.set_counter("Sensenmann", 30)
end
when 1093.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Sensenmann", count)
end
if count == 0 then
say_title("Zwei Neue Items")
say("Du hast die Quest erfolgreich abgeschlossen!")
say("Du erhälst:")
say_reward("Pferdezucker")
say_reward("und")
say_reward("Ring der Nachfolge")
pc.give_item2(71110, 1)
pc.give_item2(71099, 1)
clear_letter()
set_state(__COMPLETE__)
end
end
end
state __COMPLETE__ begin
end
end
Werden keine kills abgezogen. |
Eine "KILL" Funktion, kann nur einmal einem Monster zugewiesen werden. Da es schon im Dämonenturm zugewiesen wird, wird der jeweilige Quellcode-Abschnitt von dir einfach ignoriert.
|
|
|
|
|
08/02/2011, 16:54
|
#2938
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
@.nguyen: kommt in vpc ne fehlermeldung?
mfg sp0nge
|
|
|
|
|
08/02/2011, 19:12
|
#2939
|
elite*gold: 0
Join Date: Oct 2010
Posts: 385
Received Thanks: 175
|
PHP Code:
quest player_kill1 begin
state start begin
when login with pc.level >= 100 begin
set_state(player_kill1)
end
end
state player_kill1 begin
when letter begin
send_letter("Töte Gegner aus anderen Reichen")
end
when button or info begin
say("Es wird Zeit dass du zeigst")
say("was in dir steckt!")
say("Zeige es uns indem du 500")
say("Spieler aus anderen Reichen tötest!")
say_reward("Töte 500 andere Spieler aus anderen Reichen!")
say("")
pc.setqf("state", 0)
q.set_counter("kills", 500)
set_state (kill1)
end
end
state kill1 begin
when letter begin
send_letter("Elite Rang 1")
end
when button or info begin
say_title("Spieler:")
say_reward( "Du musst noch ".." "..pc.getqf("state").."von 500 töten")
say("")
end
when kill begin
if npc.is_pc() and npc.empire != pc.empire then
local count = pc.getqf("state") - 1
if count <= 500 then
pc.setqf("state", count)
q.set_counter("kills", -count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("500 Spieler aus anderen Reichen zu töten!")
say("Du erhälst für deine Mühen:")
say_reward("5.000.000 Yang")
say_reward("5.000.000 EXP")
pc.change_money(5000000)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71052, 1)
pc.give_item2(25041, 1)
pc.give_item2(25041, 1)
pc.give_item2(25041, 1)
pc.give_exp2(5000000)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("Sie haben Elite Rang 1 erhalten, Glückwunsch!")
clear_letter()
set_state(playerkill2)
end
end
end
end
state playerkill2 begin
when letter begin
send_letter("Töte Gegner aus anderen Reichen")
end
when button or info begin
say("Es wird Zeit dass du zeigst")
say("was in dir steckt!")
say("Zeige es uns indem du 1000")
say("Spieler aus anderen Reichen tötest!")
say_reward("Töte 1000 andere Spieler aus anderen Reichen!")
say("")
pc.setqf("state", 1000)
q.set_counter("kills", 1000)
set_state (kill2)
end
end
state kill2 begin
when letter begin
send_letter("Elite Rang 2")
end
when button or info begin
say_title("Spieler:")
say_reward( "Du musst noch ".." "..pc.getqf("state").."von 1000 töten")
say("")
end
when kill begin
if npc.is_pc() and npc.empire != pc.empire then
local count = pc.getqf("state") - 1
if count <= 1000 then
pc.setqf("state", count)
q.set_counter("kills", -count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("1000 Spieler aus anderen Reichen zu töten!")
say("Du erhälst für deine Mühen:")
say_reward("5.000.000 Yang")
say_reward("5.000.000 EXP")
pc.change_money(5000000)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71052, 1)
pc.give_item2(25041, 1)
pc.give_item2(25041, 1)
pc.give_item2(25041, 1)
pc.give_exp2(5000000)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("Sie haben Elite Rang 2 erhalten, Glückwunsch!")
clear_letter()
set_state(playerkill3)
end
end
end
end
state playerkill3 begin
when letter begin
send_letter("Töte Gegner aus anderen Reichen")
end
when button or info begin
say("Es wird Zeit dass du zeigst")
say("was in dir steckt!")
say("Zeige es uns indem du 2000")
say("Spieler aus anderen Reichen tötest!")
say_reward("Töte 2000 andere Spieler aus anderen Reichen!")
say("")
pc.setqf("state", 2000)
q.set_counter("kills", 2000)
set_state (kill3)
end
end
state kill3 begin
when letter begin
send_letter("Elite Rang 3")
end
when button or info begin
say_title("Spieler:")
say_reward( "Du musst noch ".." "..pc.getqf("state").."von 2000 töten")
say("")
end
when kill begin
if npc.is_pc() and npc.empire != pc.empire then
local count = pc.getqf("state") - 1
if count <= 2000 then
pc.setqf("state", count)
q.set_counter("kills", -count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("2000 Spieler aus anderen Reichen zu töten!")
say("Du erhälst für deine Mühen:")
say_reward("6.000.000 Yang")
say_reward("6.000.000 EXP")
pc.change_money(6000000)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71051, 1)
pc.give_item2(71052, 1)
pc.give_item2(25041, 2)
pc.give_item2(25041, 2)
pc.give_item2(25041, 2)
pc.give_exp2(6000000)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("Sie haben Elite Rang 3 erhalten, Glückwunsch!")
clear_letter()
end
end
end
end
state __COMPLETE__ begin
end
end
Delta hatte mir die Quest schonmal entbuggt.
Aber mir ist sie leider durch nen fehler abhanden gekommen.
Delta fals du das liest wärst du nochmal so nett? 
|
|
|
|
|
08/02/2011, 20:00
|
#2940
|
elite*gold: 0
Join Date: Sep 2009
Posts: 154
Received Thanks: 8
|
"GM-Klammern" werden nicht angezeigt.
Nabend,
habe mir eben ne Quest geschrieben, funktioniert auch einwandfrei, bis auf die Funktion "Team Anzeigen".
In der Quest steht nun z.B: Say("[SA]Reload") Ingame steht allerdings nur "Reload" in der Quest.
Hier die Quest:
PHP Code:
quest Mtool begin
state start begin
when 30285.use begin
say_title("Multi-Tool")
say("")
say("Oh Hallo, "..pc.get_name() .."!")
say("Was möchtest du machen?")
say_title("Bitte Funktion Wählen")
local s = select("Rotes Reich","Gelbes Reich","Blaues Reich","Lager","Team Anzeigen","Schließen")
if s == 1 then
pc.warp(474300,954800)
elseif s == 2 then
pc.warp(63800,166400)
elseif s == 3 then
pc.warp(959900,269200)
elseif s == 4 then
game.open_safebox()
elseif s == 5 then
say_title("Unser Team besteht aus:")
say("[SA]Reload")
say("[GA]SoXx")
say("[FA]SuNii")
say("[SGM]Fanx")
say("[GM]ReYzZa")
say("[GM]Nidoquee")
say("[TEC]Showtek")
say("[TEC]BoB")
say("")
say("")
say("")
say_title("Das komplette UnrealGalaxy Team wünscht viel Spaß!")
return
elseif s == 6 then
return
end
end
end
end
Kann der Fehler irgendwie behoben werden?
Denn so kennt sich niemand aus wer was is...
Danke im Vorraus.
|
|
|
|
All times are GMT +1. The time now is 09:44.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
