|
You last visited: Today at 09:57
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
08/30/2011, 14:46
|
#3301
|
elite*gold: 39 
Join Date: Jun 2009
Posts: 500
Received Thanks: 212
|
So nachdem ich die quest noch bissl geändert hatte ging sie 
Danke für den entscheidenen Tipp 
Du kannst übrigens in einem state keinen neuen state machen^^
MFG
|
|
|
|
08/30/2011, 15:23
|
#3302
|
elite*gold: 0
Join Date: Jan 2011
Posts: 2,903
Received Thanks: 1,262
|
@coolmerto
PHP Code:
quest player_kill begin
state start begin
when login with pc.level >= 50 begin
set_state(player_kill)
end
end
state player_kill begin
when letter begin
send_letter("Duelle beweisen die Stärke")
end
when button or info begin
say("Es wird Zeit dass du zeigst")
say("was in dir steckt!")
say("Zeige es uns indem du 100")
say("andere Spieler in Duellen tötest!")
say_reward("Töte 100 andere Spieler in Duellen!")
say("")
pc.setqf("state", 100)
q.set_counter("Restliche Spieler", 100)
end
when kill begin
if npc.is_pc() then
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("Restliche Spieler", count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("Du 100 Spieler in Duellen getötet!")
say("Du erhälst für deine Mühen:")
say_reward("10 Muscheln")
say_reward("5.000.000 Yang")
pc.change_money(5000000)
pc.give_item2(27987, 10)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("er hat 100 Spieler in Duellen getötet!")
clear_letter()
set_state(__COMPLETE__)
end
end
end
end
state __COMPLETE__ begin
end
end
müsste gehen ist ab lv 50 kannst du ändern gerade tested auf mein test server funzt
|
|
|
|
|
08/30/2011, 17:53
|
#3303
|
elite*gold: 0
Join Date: May 2010
Posts: 44
Received Thanks: 8
|
PHP Code:
quest gmlogin begin
state start begin
when login with pc.is_gm() begin
say("")
say("Du bist mit einem Gamemaster-Account eingelogt.")
say("gebe bitte das Passwort ein")
local s=input()
if s!="Passwort" then
end
else
command("dc "..Name.."")
end
end
end
Was kann man draus machen? ^^
|
|
|
|
|
08/30/2011, 18:17
|
#3304
|
elite*gold: 0
Join Date: Jan 2011
Posts: 2,903
Received Thanks: 1,262
|
@Denusa01
da kannst du spieler kicken
siehe "command("dc "..name.."") " so das dc steht ja üblich fürs kicken
|
|
|
|
|
08/30/2011, 18:28
|
#3305
|
elite*gold: 435
Join Date: Nov 2009
Posts: 602
Received Thanks: 194
|
Was ist den an der quest falsch ??????
PHP Code:
when 1093.kill begin
local drop = number(1, 2)
if drop == 1 then
game.drop_item_with_ownership("11299", 1)
elseif drop == 2 then
game.drop_item_with_ownership("189", 1)
end
kommt immer :
qc in malloc(): error: allocation failed
Abort trap (core dumped)
|
|
|
|
|
08/30/2011, 22:36
|
#3306
|
elite*gold: 0
Join Date: Jan 2011
Posts: 593
Received Thanks: 204
|
PHP Code:
quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("basic_weapon") != 0 then -- old version support
return
end
local item_vnum = 11209
if pc.job == 3 then -- shaman
item_vnum = 11809
elseif pc.job == 1 then -- assassin
item_vnum = 11409
elseif pc.job == 2 then
item_vnum = 11609
end
local item_count = pc.countitem(item_vnum)
local equip_armor = pc.armor
if item_count == 0 and equip_armor != item_vnum then
pc.give_item2(item_vnum)
local item_vnum = 19
if pc.job == 3 then -- shaman
item_vnum = 7009
elseif pc.job == 1 then -- assassin
item_vnum = 1009
end
local item_count = pc.countitem(item_vnum)
local equip_weapon = pc.weapon
if item_count == 0 and equip_weapon != item_vnum then
pc.give_item2(item_vnum) -- jobtype weapon
pc.give_item2(27001, 5) -- red potions
pc.give_item2(13009, 1)
pc.give_item2(17009, 1)
pc.give_item2(14009, 1)
pc.give_item2(15009, 1)
pc.give_item2(16009, 1)
pc.give_item2(70038, 200)
pc.give_item2(27115, 20)
pc.give_item2(27112, 20)
pc.give_item2(72017, 1)
set_state(__COMPLETE__)
-- else
-- test_chat(string.format("job[%d],item_vnum[%d].count = %d, equip_weapon[%d]",
-- pc.job, item_vnum, item_count, equip_weapon))
end
end
end
state __COMPLETE__ begin
end
end
Joa, core dumped ;D
LG
|
|
|
|
|
08/31/2011, 01:33
|
#3307
|
elite*gold: 0
Join Date: Mar 2010
Posts: 296
Received Thanks: 86
|
EXP BUG QUEST
Hallo Leute sll für jemanden eine EXP Quest schreiben die den Spielern nach 100 gekilltenMobs die maximale EXP anzahl gibt , was ist an der falsch? (2604 ist die Mobvalue)
quest expbug begin
state start begin
when login or levelup or enter begin
if pc.get_level() >= 100 then
setstate( Mobkill4EXP )
end
end
end
state Mobkill4EXP begin
when letter begin
send_letter("Um den EXP Bug zu beheben")
end
when info or button begin
say("Um den EXP Bug zu beheben musst du folgendes tun")
say("Deine Aufgabe:")
say_reward("Töte 100 Mobs der Neuen map Weasterland")
pc.setqf("state", 100)
q.set_counter("2604", 100)
end
when 2604.kill begin
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("Minotaurus", count)
end
if count == 0 then
say_title("Der EXPBug")
say("Du hast die Quest erfolgreich abgeschlossen!")
say_reward("maximale EXP für dein Level"))
pc.give_exp2(2000000000)
clear_letter()
set_state(__COMPLETE__)
end
end
end
|
|
|
|
|
08/31/2011, 05:50
|
#3308
|
elite*gold: 0
Join Date: Jan 2011
Posts: 284
Received Thanks: 87
|
PHP Code:
quest exp begin
state start begin
when login or levelup with pc.level() == 100 begin
set_state(monster)
end
end
state monster begin
when letter begin
send_letter("Um den EXP bug zu beheben")
end
when button or info begin
say("Um den EXP Bug zu beheben musst du folgendes tun")
say("Deine Aufgabe:")
say_reward("Töte 100 Mobs der Neuen map Weasterland")
pc.setqf("state", 100)
q.set_counter("mob", 100)
set_state(monster1)
end
end
state monster1 begin
when letter begin
send_letter(Infos zur Quest)
end
when button or info begin
say_title("Monster:")
say_reward( "Du musst noch ".." "..pc.getqf("state").."von 100 töten")
end
when 2604.kill begin
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("mob", count)
if count == 0 then
say_title("Der EXPBug")
say("Du hast die Quest erfolgreich abgeschlossen!")
say_reward("maximale EXP für dein Level"))
pc.give_exp2(2000000000)
clear_letter()
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
|
|
|
|
|
08/31/2011, 13:24
|
#3309
|
elite*gold: 0
Join Date: Jul 2009
Posts: 195
Received Thanks: 3
|
Questitem 1 :
quest wegdesninja begin
state start begin
when 50512.use begin
say_title("Weg des Ninja")
say("Du hast deine Wahl getroffen.")
say("gehe nun zum Kage deines Dorfes.")
say("")
local oldempire = pc.get_empire()
local v = find_npc_by_vnum(20088)
if oldempire == a then
if 0 = v then
else
target.vid("__TARGET__", v, "Gehe zum Kazekage")
say_reward("Dein Kage ist der Kazekage")
say_reward("aus Suna-Gakure. Beeile dich !")
say("")
elseif oldempire = b then
local v=find_npc_by_vnum(20089)
if oldempire == b then
if 0==v then
else
target.vid("__TARGET__", v, "Gehe zum Kazekage")
say_reward("Dein Kage ist der Iwakage")
say_reward("aus Iwa-Gakure. Beeile dich !")
say("")
elseif oldempire = c then
local v=find_npc_by_vnum(20355)
if oldempire == c then
if 0==v then
else
target.vid("__TARGET__", v, "Gehe zum Kazekage")
say_reward("Dein Kage ist der Hokage")
say_reward("aus Iwa-Gakure. Beeile dich !")
say("")
end
end
end
end
end
Questitem 2:
quest missions begin
state start begin
when 50321.use begin
set_state(player_kill)
end
end
state player_kill begin
when letter begin
send_letter("Mission Rang S")
end
when button or info begin
say("Es wird Zeit dass du zeigst")
say("was in dir steckt!")
say("Zeige es uns indem du 100")
say("andere Spieler tötest!")
say_reward("Töte 100 andere Spieler!")
say("")
pc.setqf("state", 100)
q.set_counter("Restliche Spieler: ", 100)
end
when kill begin
if npc.is_pc() then
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("Restliche Spieler: ", count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("Du 100 Spieler getötet!")
say("Du erhälst für deine Mühen:")
say_reward("10 Muscheln")
say_reward("5.000.000 Yang")
say_reward("Den Titel 'Sannin'")
pc.change_money(5000000)
pc.give_item2(27987, 10)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("er hat 100 Spieler getötet und trägt von nun an den Titel ' Sannin '.")
clear_letter()
set_state(__COMPLETE__)
end
end
end
end
state __COMPLETE__ begin
end
end
Ist soweit fertig, weiß aber das sie so nicht funktioniert.
Ich bitte einen von euch nachzuschauen, was dort Falsch ist und wie ich es berichtigen kann.
Vielen Dank schonmal 
|
|
|
|
|
08/31/2011, 18:03
|
#3310
|
elite*gold: 9
Join Date: Aug 2011
Posts: 147
Received Thanks: 12
|
PHP Code:
quest basic begin
state start begin
when login or levelup with pc.get_level() == 1 begin
say_title ( "Willkommen auf SteakHouse2" )
say_red( "Unsere Teamspeakadresse ist 195.82.158.240:21400" )
say_yellow( "Viel Spaß!" )
say_yellow( "" )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "27112" , 50 )
pc . give_item2 ( "71050" , 50 )
pc . give_item2 ( "72701" , 1 )
pc . give_item2 ( "70038" , 200 )
horse . summon(10)
pc.change_alignment(2000)
clear_letter ( )
if pc . job == 0 then
pc . give_item2 ( "11209" , 1 )
pc . give_item2 ( "12209" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "19" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 1 then
pc . give_item2 ( "11409" , 1 )
pc . give_item2 ( "12349" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "1009" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 2 then
pc . give_item2 ( "11609" , 1 )
pc . give_item2 ( "12489" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "19" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 3 then
pc . give_item2 ( "11809" , 1 )
pc . give_item2 ( "12629" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "7009" , 1 )
say_gold ( "Viel Spaß!" )
end
end
end
end
Kann man die quest so schreiben das wen ich mich mit Level 1 wieder aus logge und dan wieder einlogge dan nicht wieder das Startset bekomme?
|
|
|
|
|
08/31/2011, 19:05
|
#3311
|
elite*gold: 6
Join Date: Aug 2011
Posts: 528
Received Thanks: 252
|
Leider funktioniert diese Quest nicht.
PHP Code:
quest player_kill1 begin
state start begin
when login with pc.level >= 90 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 100")
say("Spieler aus anderen Reichen tötest!")
say_reward("Töte 100 andere Spieler aus anderen Reichen!")
say("")
pc.setqf("state", 100)
q.set_counter("kills", 100)
set_state (kill)
end
end
state kill begin
when letter begin
send_letter("Töte Spieler")
end
when button or info begin
say_title("Spieler:")
say_reward( "Du musst noch ".." "..pc.getqf("state").."von 100 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 <= 100 then
pc.setqf("state", count)
q.set_counter("kills", -count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("100 Spieler aus anderen Reichen zu töten!")
say("Du erhälst für deine Mühen:")
say_reward("80.000.000 Yang")
say_reward("80.000.000 EXP")
pc.change_money(80000000)
pc.give_exp2(80000000)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("er/sie hat 100 Spieler getötet, Glückwunsch!")
clear_letter()
set_state(__COMPLETE__)
end
end
end
end
state __COMPLETE__ begin
end
end
Fehlermeldung :
Quote:
okayer_kill1.quest : 1 : Abort trap ( core dumped )
Error occured on compile player_kill1.quest
|
|
|
|
|
|
08/31/2011, 19:49
|
#3312
|
elite*gold: 32
Join Date: Dec 2010
Posts: 1,294
Received Thanks: 862
|
@VP, häng nochn end in die 7. letzte Zeile
|
|
|
|
|
08/31/2011, 19:58
|
#3313
|
elite*gold: 5
Join Date: Nov 2009
Posts: 1,863
Received Thanks: 2,778
|
Sow, habe mal 'wieder' ein problem bei ner Quest und ich bin mit meinen Wissen am ende wie ich es lösen kann. Deswegen hoffe ich mal das mir hier jemand helfen kann
Quest:
PHP Code:
quest reittiere begin
state start begin
when 71114.use begin
say_title("Reittiere")
say("Du möchtest wohl mit einen der neuen")
say("Reittiere reiten. Suche dir ein Tier aus mit")
say("dem du reiten möchtest.")
local s = select("Keiler", "Wolf", "Feuer Tiger", "Löwe", "Streitwolf", "Weiter", "Abbrechen")
if s == 1 and pc.get_level() >= 75 then
chat("Du hast nun für 30min einen Keiler als Reittier!")
chat("Es verleiht dir 75 Verteidung extra")
affect.remove_collect()
pc.mount(20110, 1800)
affect.add_collect(apply.DEF_GRADE_BONUS,75,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 75 then
say_title("Keiler")
say("Du bist noch zu jung! Versuch es mit lvl 80 wieder!")
end
if s == 2 and pc.get_level() >= 80 then
chat("Du hast nun für 30min einen Wolf als Reittier!")
chat("Es verleiht dir 100 Verteidigung extra")
affect.remove_collect()
pc.mount(20111, 1800)
affect.add_collect(apply.DEF_GRADE_BONUS,100,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 80 then
say_title("Wolf")
say("Du bist noch zu jung! Versuch es mit lvl 80 wieder!")
end
if s == 3 and pc.get_level() >= 85 then
chat("Du hast nun für 30min einen Feuer Tiger als Reittier!")
chat("Es verlieht dir 125 Verteidigung extra")
affect.remove_collect()
pc.mount(20112, 1800)
affect.add_collect(apply.DEF_GRADE_BONUS,125,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 85 then
say_title("Feuer Tiger")
say("Du bist noch zu jung! Versuch es mit lvl 85 wieder!")
end
if s == 4 and pc.get_level() >= 90 then
chat("Du hast nun für 30min einen Loewen als Reittier!")
chat("Es verleiht dir 200 Verteidigung extra")
affect.remove_collect()
pc.mount(20113, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,200,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 90 then
say_title("Löwe")
say("Du bist noch zu jung! Versuch es mit lvl 90 wieder!")
end
if s == 5 and pc.get_level() >= 95 then
chat("Du hast nun für 30min einen Streitwolf als Reittier!")
chat("Es verlieht dir 230 Verteidigung extra")
affect.remove_collect()
pc.mount(20116, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,230,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 95 then
say_title("Streitwolf")
say("Du bist noch zu jung! Versuch es mit lvl 95 wieder!")
end
if s == 6 then
say_title("Reittiere")
local s = select("Kriegskeiler", "Wießer Löwen", "Sturmtiger", "Schlachtenlöwe", "Abbrechen")
if s == 1 and pc.get_level() >= 100 then
chat("Du hast nun für 30min einen Kriegskeiler als Reittier!")
chat("Es verleiht dir 250 Verteidigung extra")
affect.remove_collect()
pc.mount(20115, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,250,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 100 then
say_title("Kriegskeiler")
say("Du bist noch zu jung! Versuch es mit lvl 100 wieder!")
end
if s == 2 and pc.get_level() >= 105 then
chat("Du hast nun für 30min einen Weißen Löwen als Reittier!")
chat("Es verleiht dir 280 Verteidigung extra")
affect.remove_collect()
pc.mount(20114, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,280,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 105 then
say_title("Weißer Löwe")
say("Du bist noch zu jung!Versuch es mit lvl 105 wieder!")
end
if s == 3 and pc.get_level() >= 110 then
chat("Du hast nun für 30min einen Sturmtiger als Reittier!")
chat("Es verleiht dir 320 Verteidugung extra")
affect.remove_collect()
pc.mount(20117, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,320,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 110 then
say_title("Sturmtiger")
say("Du bist noch zu jung! Versuch es mit lvl 110 wieder!")
end
if s == 4 and pc.get_level() >= 115 then
chat("Du hast nun für 30min einen Schlachtenlöwe als Reittier!")
chat("Es verleiht dir 400 Verteidigung extra")
affect.remove_collect()
pc.mount(20118, 1800)
affect.add_collect(apply.ATT_GRADE_BONUS,400,1800)
pc.removeitem(71114, 1)
end
if pc.get_level() <= 115 then
say_title("Schlachtenlöwe")
say("Du bist noch zu jung! Versuch es mit lvl 115 wieder!")
end
if s == 5 then
end
end
end
end
end
Problem: Also wenn man halt noch nicht das passende level hat für das reittier, kommen immer alle say's also nicht nur das vom z. B. Löwen sondern auch das vom weißen Löwen, Feuer Tiger usw:
Danke im Voraus
|
|
|
|
|
08/31/2011, 21:20
|
#3314
|
elite*gold: 9
Join Date: Aug 2011
Posts: 147
Received Thanks: 12
|
Die quest geht iwie nicht ...
Also es ist die DE KG quest.. ich kriege es nicht hin das die quest
ab level 1 angezeigt wird
::
Wünsche
Die Quest soll ohne Warte zeiten sein
bzw. du must 1 Tag warten bis du das Pferdebild abholen kannst etc...
DICKES DANKE IM VORRAUS
PHP Code:
quest horse_upgrade begin
state start begin
when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
if horse.is_dead() then
say("Dein Pferd ist Tod!")
say("Belebe es erst wieder.")
say("")
elseif pc.level<=1 then
say("Dein Level ist zu gering.")
say("")
elseif horse.get_level()<=9 then
say("Dein Pferd ist zu klein!")
say("Bitte Trainiere dein Pferd erst.")
say("")
elseif pc.countitem("50050")<1 then
say("Du hast keine Pferdemedaille!")
say("Bitte hole erst eine.")
say("")
setstate(need_item50050)
elseif pc.countitem("50051")<1 then
say("Du hast kein Pferdebild !")
say("")
elseif horse.get_level()==1 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=1 then
say("Du musst 20 Wüstenhunde Töten")
say("in 30 Minuten töten.")
say("Nur so kann ich sicher gehen")
say("Das du wirklich Qualifiziert")
say("genug bist für ein Kampfpferd.")
say("Möchtest du den Test beginnen?")
say("")
local b=select("Ja", "Öhm, ne du lass mal.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Komm wieder wenn du soweit bist.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("")
say("Viel Erfolg.")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
end
when 2101.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
end
end
when 2101.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Wüstenhunde")
q.set_title("Töte Wüstenhunde")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("20 Wüstenhunde zu töten. ")
say("")
say(" ( Deine Gruppenmitglieder können dir helfen.) ")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("20 Wüstenhunde zu töten. ")
say("")
say("Deine Gruppenmitglieder können dir helfen.")
end
when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."Kampfpferd" begin
say("Du musst in 30 Minuten")
say("20 Wüstenhunde")
say("")
say("Deine Gruppe kann dir helfen.")
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Geschafft")
q.set_title("Geschafft")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallbursche.")
end
when info begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallbursche.")
end
when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
say("Herzlichen Glückwunsch")
say("Nun muss ich dir ein ")
say("Waffenpferdebuch erstellen.")
say("Das kostet dich 500k.")
if is_test_server() then
pc.setqf("make_time", get_time()
else
end
setstate(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Warten auf das Pferdebild")
q.set_title("Warten auf das Pferdebild")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when info begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when login with get_time()>=pc.getqf("make_time") begin
setstate(buy)
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
say("Ich habe dein Pferdebild")
say("Leider noch nicht fertig.")
say("Komm Morgen wieder.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Dein Pferdebild ist Fertig!")
q.set_title("Dein Pferdebild ist Fertig!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when info begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
setstate(start)
q.done()
end
when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
say("Dein Pferdebild ist Fertig.")
say("Es kostet dich 500.000 Yang.")
local b=select("Kaufen", "Später", "Beenden")
if 1==b then
if pc.money>=500000 then
if pc.countitem("50051")>=1 then
char_log(0, "HORSE_UPGRADE", "BEGIN")
pc.changemoney(-500000)
char_log(0, "HORSE_UPGRADE", "DEC money 500000")
pc.removeitem("50051", 1)
char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
pc.give_item2("50052", 1)
char_log(0, "HORSE_UPGRADE", "INC 50052 1")
char_log(0, "HORSE_UPGRADE", "END")
say("Herzlichen Glückwunsch")
say("Du hast nun ein Kampfpferd.")
say("Fütter es regelmässig.")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Ok bis später.")
elseif 3==b then
say("Quest wirklich beenden?")
local b=select("Ja", "Nein")
if 1==b then
setstate(start)
q.done()
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Prüfung misslungen")
q.set_title("Prüfung misslungen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
|
|
|
|
|
08/31/2011, 21:30
|
#3315
|
elite*gold: 1
Join Date: Mar 2011
Posts: 1,473
Received Thanks: 1,382
|
Quote:
Originally Posted by Permisson
Die quest geht iwie nicht ...
Also es ist die DE KG quest.. ich kriege es nicht hin das die quest
ab level 1 angezeigt wird
::
Wünsche
Die Quest soll ohne Warte zeiten sein
bzw. du must 1 Tag warten bis du das Pferdebild abholen kannst etc...
DICKES DANKE IM VORRAUS
PHP Code:
quest horse_upgrade begin
state start begin
when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
if horse.is_dead() then
say("Dein Pferd ist Tod!")
say("Belebe es erst wieder.")
say("")
elseif pc.level<=1 then
say("Dein Level ist zu gering.")
say("")
elseif horse.get_level()<=9 then
say("Dein Pferd ist zu klein!")
say("Bitte Trainiere dein Pferd erst.")
say("")
elseif pc.countitem("50050")<1 then
say("Du hast keine Pferdemedaille!")
say("Bitte hole erst eine.")
say("")
setstate(need_item50050)
elseif pc.countitem("50051")<1 then
say("Du hast kein Pferdebild !")
say("")
elseif horse.get_level()==1 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=1 then
say("Du musst 20 Wüstenhunde Töten")
say("in 30 Minuten töten.")
say("Nur so kann ich sicher gehen")
say("Das du wirklich Qualifiziert")
say("genug bist für ein Kampfpferd.")
say("Möchtest du den Test beginnen?")
say("")
local b=select("Ja", "Öhm, ne du lass mal.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Komm wieder wenn du soweit bist.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("")
say("Viel Erfolg.")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
end
when 2101.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
end
end
when 2101.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Wüstenhunde")
q.set_title("Töte Wüstenhunde")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("20 Wüstenhunde zu töten. ")
say("")
say(" ( Deine Gruppenmitglieder können dir helfen.) ")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("20 Wüstenhunde zu töten. ")
say("")
say("Deine Gruppenmitglieder können dir helfen.")
end
when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."Kampfpferd" begin
say("Du musst in 30 Minuten")
say("20 Wüstenhunde")
say("")
say("Deine Gruppe kann dir helfen.")
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Geschafft")
q.set_title("Geschafft")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallbursche.")
end
when info begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallbursche.")
end
when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
say("Herzlichen Glückwunsch")
say("Nun muss ich dir ein ")
say("Waffenpferdebuch erstellen.")
say("Das kostet dich 500k.")
if is_test_server() then
pc.setqf("make_time", get_time()
else
end
setstate(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Warten auf das Pferdebild")
q.set_title("Warten auf das Pferdebild")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when info begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when login with get_time()>=pc.getqf("make_time") begin
setstate(buy)
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
say("Ich habe dein Pferdebild")
say("Leider noch nicht fertig.")
say("Komm Morgen wieder.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Dein Pferdebild ist Fertig!")
q.set_title("Dein Pferdebild ist Fertig!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when info begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
setstate(start)
q.done()
end
when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
say("Dein Pferdebild ist Fertig.")
say("Es kostet dich 500.000 Yang.")
local b=select("Kaufen", "Später", "Beenden")
if 1==b then
if pc.money>=500000 then
if pc.countitem("50051")>=1 then
char_log(0, "HORSE_UPGRADE", "BEGIN")
pc.changemoney(-500000)
char_log(0, "HORSE_UPGRADE", "DEC money 500000")
pc.removeitem("50051", 1)
char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
pc.give_item2("50052", 1)
char_log(0, "HORSE_UPGRADE", "INC 50052 1")
char_log(0, "HORSE_UPGRADE", "END")
say("Herzlichen Glückwunsch")
say("Du hast nun ein Kampfpferd.")
say("Fütter es regelmässig.")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Ok bis später.")
elseif 3==b then
say("Quest wirklich beenden?")
local b=select("Ja", "Nein")
if 1==b then
setstate(start)
q.done()
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Prüfung misslungen")
q.set_title("Prüfung misslungen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
|
Ich denke mal, dass sie dir nicht zu 100 % entspricht, aber es ist so die originale DE Quest:
PHP Code:
quest horse_upgrade begin
state start begin
when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
if horse.is_dead() then
say("Dein Pferd ist Tod!")
say("Belebe es erst wieder.")
say("")
elseif pc.level<=34 then
say("Dein Level ist zu gering.")
say("")
elseif horse.get_level()<=9 then
say("Dein Pferd ist zu klein!")
say("Bitte Trainiere dein Pferd erst.")
say("")
elseif pc.countitem("50050")<1 then
say("Du hast keine Pferdemedaille!")
say("Bitte hole erst eine.")
say("")
setstate(need_item50050)
elseif pc.countitem("50051")<1 then
say("Du hast kein Pferdebild !")
say("")
elseif horse.get_level()==10 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=35 then
say("Du musst 100 Schlangenbogensch?zen")
say("in 30 Minuten t?en.")
say("Nur so kann ich sicher gehen")
say("Das du wirklich Qualifiziert")
say("genug bist f? ein Kampfpferd.")
say("M?htest du den Test beginnen?")
say("")
local b=select("Ja", "?m, ne du lass mal.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Komm wieder wenn du soweit bist.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("")
say("Viel Erfolg.")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
end
when 2105.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
end
end
when 2107.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("T?e Bogensch?zen")
q.set_title("T?e Bogensch?zen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."T?e Bogensch?zen"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("100 Skorpion oder Schlangen ")
say("Bogensch?zen zu t?en.")
say("Deine Gruppenmitglieder k?nen dir helfen.")
end
when info begin
say(locale.NOTICE_COLOR.."T?e Bogensch?zen"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("100 Skorpion oder Schlangen ")
say("Bogensch?zen zu t?en.")
say("Deine Gruppenmitglieder k?nen dir helfen.")
end
when 2105.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 2107.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."Kampfpferd" begin
say("Du musst in 30 Minuten")
say("100 Skorpionbogensch?zen oder")
say("100 Schlangenbogensch?zen t?en.")
say("Deine Gruppe kann dir helfen.")
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Geschafft")
q.set_title("Geschafft")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallw?hter.")
end
when info begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallw?hter.")
end
when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
say("Herzlichen Gl?kwunsch")
say("Nun muss ich dir ein ")
say("Waffenpferdebuch erstellen.")
say("Das dauert einen Tag.")
say("Komm morgen wieder")
say("Vergiss nicht er kostet 500.000 Yang.")
if is_test_server() then
pc.setqf("make_time", get_time()+10)
else
pc.setqf("make_time", get_time()+number(8, 16)*60*60)
end
setstate(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Warten auf das Pferdebild")
q.set_title("Warten auf das Pferdebild")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung l?ft.")
say("Du musst noch warten.")
end
when info begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung l?ft.")
say("Du musst noch warten.")
end
when login with get_time()>=pc.getqf("make_time") begin
setstate(buy)
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
say("Ich habe dein Pferdebild")
say("Leider noch nicht fertig.")
say("Komm Morgen wieder.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Dein Pferdebild ist Fertig!")
q.set_title("Dein Pferdebild ist Fertig!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallw?hter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when info begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallw?hter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
setstate(start)
q.done()
end
when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
say("Dein Pferdebild ist Fertig.")
say("Es kostet dich 500.000 Yang.")
local b=select("Kaufen", "Sp?er", "Beenden")
if 1==b then
if pc.money>=500000 then
if pc.countitem("50051")>=1 then
char_log(0, "HORSE_UPGRADE", "BEGIN")
pc.changemoney(-500000)
char_log(0, "HORSE_UPGRADE", "DEC money 500000")
pc.removeitem("50051", 1)
char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
pc.give_item2("50052", 1)
char_log(0, "HORSE_UPGRADE", "INC 50052 1")
char_log(0, "HORSE_UPGRADE", "END")
say("Herzlichen Gl?kwunsch")
say("Du hast nun ein Kampfpferd.")
say("F?ter es regelm?sig.")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Ok bis sp?er.")
elseif 3==b then
say("Quest wirklich beenden?")
local b=select("Ja", "Nein")
if 1==b then
setstate(start)
q.done()
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pr?ung misslungen")
q.set_title("Pr?ung misslungen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pr?ung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Pr?ung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pr?ung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Pr?ung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
|
|
|
|
All times are GMT +1. The time now is 09:58.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
