[SERVICE] Die Questkontrolle

09/28/2011 18:20 nostradame37#3586
hallo com habe da ein problem und zwar diese quest

PHP Code:
----------------------------------
--    
Teil einer Karte , ItemID 30120
--       Vergibt King-, Kφnigsrόstungen
----------------------------------
quest give_king begin
    state start begin
        when 30120.
use begin
            
            say_title
("Die Kφnige 2")
            
say("")
            
say("Dieser Teil der Karte wird dich zu den")
            
say("Kφnigsrόstung fόhren, die schon vor vielen")
            
say("Jahren von Kaiser Seon-Hwang versteckt wurden.")
            
say("Nicht viele kennen den Ort dieser Rόstungen.")
            
say("Behalten ihn deshalb besser fόr dich!")
            
local w=select("Weiter","Abbrechen")
                if 
w == 1 then
                    say_title
("Die Kφnige 2")
                    
say("")
                    
say_reward("Obwohl die Karte schon sehr alt und zerrissen ist,")
                    
say_reward("konntest du sie noch lesen. Wδhle nun deine Klasse.")
                    
say("")
                        
local c=select("Krieger", "Sura", "Ninja", "Schamane", "Abbrechen")
                            if 
c == 1 then
                                say_title
("Die Kφnige 2")
                                
say("")
                                
say("Bist du dir sicher dass du die Kφnigsrόstung")
                                
say("fόr Krieger haben mφchtest?")
                                
say_item("Jinhon-Rόstung", 11979, "")
                                
say("")
                                    
local sub1=select("Ja","Nein") 
                                    if 
sub1 == 1 then
                                        say_title
("Die Kφnige")
                                        
say("")
                                        
say("Beim aufheben der Kφnigsrόstung ist die Karte")
                                        
say("leider zerissen und ist nun nichtmehr brauchbar.")
                                        
say("")
                                        
say_reward("Kφnigsrόstung fόr Krieger erhalten.")
                                        
pc.give_item2("11979", 1)
                                        
pc.removeitem("30120", 1)
                                    elseif 
sub1 == 2 then
                                        
return
                                    
end
                            
elseif c == 2 then
                                say_title
("Die Kφnige 2")
                                
say("")
                                
say("Bist du dir sicher dass du die Kφnigsrόstung")
                                
say("fόr Sura haben mφchtest?")
                                
say_item("Chung-Rόstung", 11981, "")
                                
say("")
                                    
local sub2=select("Ja","Nein") 
                                    if 
sub2 == 1 then
                                        say_title
("Die Kφnige 2")
                                        
say("")
                                        
say("Beim aufheben der Kφnigsrόstung ist die Karte")
                                        
say("leider zerissen und ist nun nichtmehr brauchbar.")
                                        
say("")
                                        
say_reward("Kφnigsrόstung fόr Sura erhalten.")
                                        
pc.give_item2("11981", 1)
                                        
pc.removeitem("30120", 1)
                                    elseif 
sub2 == 2 then
                                        
return
                                    
end
                            
elseif c == 3 then
                                say_title
("Die Kφnige 2")
                                
say("")
                                
say("Bist du dir sicher dass du die Kφnigsrόstung")
                                
say("fόr Ninja haben mφchtest?")
                                
say_item("Tanma-Rόstung", 11980, "")
                                
say("")
                                    
local sub3=select("Ja","Nein") 
                                    if 
sub3 == 1 then
                                        say_title
("Die Kφnige 2")
                                        
say("")
                                        
say("Beim aufheben der Kφnigsrόstung ist die Karte")
                                        
say("leider zerissen und ist nun nichtmehr brauchbar.")
                                        
say("")
                                        
say_reward("Kφnigsrόstung fόr Ninja erhalten.")
                                        
pc.give_item2("11980", 1)
                                        
pc.removeitem("30120", 1)
                                    elseif 
sub3 == 2 then
                                        
return
                                    
end
                            
elseif c == 4 then
                                say_title
("Die Kφnige 2")
                                
say("")
                                
say("Bist du dir sicher dass du die Kφnigsrόstung")
                                
say("fόr Schamanen haben mφchtest?")
                                
say_item("Nahan-Rόstung", 11982, "")
                                
say("")
                                    
local sub4=select("Ja","Nein") 
                                    if 
sub4 == 1 then
                                        say_title
("Die Kφnige 2")
                                        
say("")
                                        
say("Beim aufheben der Kφnigsrόstung ist die Karte")
                                        
say("leider zerissen und ist nun nichtmehr brauchbar.")
                                        
say("")
                                        
say_reward("Kφnigsrόstung fόr Schamanen erhalten.")
                                        
pc.give_item2("11982", 1)
                                        
pc.removeitem("30120", 1)
                                    elseif 
sub4 == 2 then
                                        
return
                                    
end
                            
elseif c == 5 then
                                
return
                            
end
                            
                            
                
elseif w==2 then
                    
return
                
end
            
            
    
        
        end
    end
end 

eigentlich kann ich das item nicht anklicken silte ich bei type 18 eingeben??
und ist diese quest ok??

danke im voraus
09/28/2011 18:25 £αšεℜ™#3587
type 18 und dann müsste es gehen
09/28/2011 19:00 .Kay331#3588
Guten Tag epvp com.

Hab mal wieder ne Quest die etwas muckt ;D

Also hier die Quest:

PHP Code:
quest exp_verdopp begin
    state start begin
        when 20011.chat
."Erfahrungspunkte verdoppeln" begin
            local ep 
= pc.get_exp() -- Exp Abfrage
            local kosten 
= 50000000 -- Die Kosten für die Verdoppelung 
            local maxlvl 
= 120 -- Euer Max Level
            local wartezeit 
= 60 -- Wartezeit um wieder verdoppeln zu können//Sekunden*Minuten*Stunden*Tage*Jahre
            
            
say_title("Hallo "..pc.get_name().."!")
            
say("")
            
say("Bei mir kannst du deine Erfahrungspunkte verdoppeln.")
            
say("Achtung: Es kostet dich 50.000.000 Yang,")
            
say("und wenn du verlierst sind deine Erfahrungspunkte auch weg.")
            
say("Du kannst es nur jede 24 Stunden versuchen!")
            
say("")
            
say_reward("Möchtest du es versuchen?")
            
say_reward("Derzeitige Erfahrungspunkte: "..ep)
            
say("")
            
local expauswahl = select("Ja", "Nein")
            if 
expauswahl == 2 then
                say
("Das war eine vernünftige Entscheidung!")
                return
            
end
            
if pc.get_level() >= maxlvl then
                say
("Du hast das Maximal Level bereits erreicht!")
                
say_reward("Du kannst deine Erfahrungspunkte nicht verdoppeln.")
            elseif 
get_time() < pc.getqf("zeit") then
                say_reward
("Du musst leider noch warten!")
            elseif 
pc.get_money() < kosten then
                say_reward
("Du hast leider zu wenig Yang!")
            elseif 
pc.get_exp() == 0 then
                say_reward
("Du hast derzeit keine Erfahrungspunkte!")
            else
                
say_reward("Möchtest du alle Erfahrungspunkte ("..ep..") einsetzen")
                
say_reward("oder selbst die Erfahrungspunkte auswählen?")
                
local main = select("Alle", "Auswählen", "Abbrechen")
                if 
main == 3 then
                    say
("Das war eine vernünftige Entscheidung!")
                    return
                elseif 
main == 2 then
                    say_reward
("Wie viele Erfahrungspunkte möchtest du setzen?")
                    
say_reward("Derzeitige Erfahrungspunkte: "..ep)
                    
local einsatz = tonumber(input(""))
                else
                    
local einsatz = ep
                end
                
if pc.get_exp() < einsatz then
                    say_reward
("Du hast nicht genug Erfahrungspunkte!")
                    return
                elseif 
pc.get_exp() + einsatz >= 1500000000 then
                    say_reward
("Es ist leider nicht möglich")
                    
say_reward("Deine EXP zu verdoppeln")
                    if 
einsatz <= 0 then
                        say_reward
("Mogeln gilt nicht!")
                        return
                    
end
                    say_reward
("Bist du dir sicher das du")
                    
say_reward(einsatz.." Erfahrungspunkte einsetzen willst?")
                    
say_reward("Vergiss die 50.000.000 Yang nicht!")
                    
local sicher2 = select("Na Los", "Nein")
                    if 
sicher2 == 2 then
                        say
("Das war eine vernünftige Entscheidung!")
                        return
                    
end
                    local doppel2 
= number(1,6)
                    if 
doppel2 == 1 or doppel2 == 5 then
                        say
("Ich werde es nun versuchen..")
                        
say("Die Verdoppelung deiner Erfahrungspunkte hat:")
                        
say_reward("[DELAY value;340]Geklappt![/DELAY]")
                        
pc.give_exp2(einsatz)
                        
pc.change_money(-kosten)
                        
pc.setqf("zeit",get_time()+wartezeit)
                    else
                        
say("Ich werde es nun versuchen..")
                        
say("Die Verdoppelung deiner Erfahrungspunkte hat:")
                        
say_reward("[DELAY value;340]Nicht geklappt![/DELAY]")
                        
say_reward("Du hast nun "..einsatz.." Erfahrungspunkte")
                        
say_reward("und 50.000.000 Yang verloren!")
                        
pc.give_exp2(-einsatz)
                        
pc.change_money(-kosten)
                        
pc.setqf("zeit",get_time()+wartezeit)
                    
end
                end
            end
        end
    end
end 
Ein Fehler kommt nach dem Exp Angabe wie viel man wetten will und der sieht so aus:
[Only registered and activated users can see links. Click Here To Register...]

bei der zweiten hier kommt nur core dumped -.-:

PHP Code:
quest gt begin
    state start begin
        when 50133.
use begin
            chat
("Du hast die Truhe geöffnet!") 
        
            
local r=number(1, 43)
            
            if 
1==r then
                pc
.give_item2(42000, 1)
                
item.remove()
            
end
            
if 2==r then
                pc
.give_item2(42010, 1)
                
item.remove()
            
end
            
if 3==r then
                pc
.give_item2(42020, 1)
                
item.remove()
            
end
            
if 4==r then
                pc
.give_item2(27002, 50)
                
item.remove()
            
end
            
if 5==r then
                pc
.give_item2(27003, 50)
                
item.remove()
            
end
            
if 6==r then
                pc
.give_item2(27005, 50)
                
item.remove()
            
end
            
if 7==r then
                pc
.give_item2(27006, 50)
                
item.remove()
            
end
            
if 8==r then
                pc
.give_item2(27002, 50)
                
item.remove()
            
end
            
if 9==r then
                pc
.give_item2(27003, 50)
                
item.remove()
            
end
            
if 10==r then
                pc
.give_item2(27005, 50)
                
item.remove()
            
end
            
if 11==r then
                pc
.give_item2(27006, 50)
                
item.remove()
            
end
            
if 12==r then
                pc
.give_item2(71052, 1)
                
item.remove()
            
end
            
if 13==r then
                pc
.give_item2(71052, 1)
                
item.remove()
            
end
            
if 14==r then
                pc
.give_item2(27987, 1)
                
item.remove()
            
end
            
if 15==r then
                pc
.give_item2(27992, 1)
                
item.remove()
            
end
            
if 16==r then
                pc
.give_item2(27993, 1)
                
item.remove()
            
end
            
if 17==r then
                pc
.give_item2(27994, 1)
                
item.remove()
            
end
            
if 18==r then
                pc
.give_item2(27799, 1)
                
item.remove()
            
end
            
if 19==r then
                pc
.give_item2(71082, 20)
                
item.remove()
            
end
            
if 20==r then
                pc
.give_item2(8009, 1)
                
item.remove()
            
end
            
if 21==r then
                pc
.give_item2(50100, 100)
                
item.remove()
            
end
            
if 22==r then
                pc
.give_item2(50101, 100)
                
item.remove()
            
end
            
if 23==r then
                pc
.give_item2(50102, 100)
                
item.remove()
            
end
            
if 24==r then
                pc
.give_item2(50103, 100)
                
item.remove()
            
end
            
if 25==r then
                pc
.give_item2(50104, 100)
                
item.remove()
            
end
            
if 26==r then
                pc
.give_item2(50105, 100)
                
item.remove()
            
end
            
if 27==r then
                pc
.give_item2(50107, 100)
                
item.remove()
            
end
            
if 28==r then
                pc
.give_item2(50108, 100)
                
item.remove()
            
end
            
if 29==r then
                pc
.give_item2(71036, 1)
                
item.remove()
            
end
            
if 30==r then
                pc
.give_item2(71037, 1)
                
item.remove()
            
end
            
if 31==r then
                pc
.give_item2(71038, 1)
                
item.remove()
            
end
            
if 32==r then
                pc
.give_item2(71039, 1)
                
item.remove()
            
end
            
if 33==r then
                pc
.give_item2(71040, 1)
                
item.remove()
            
end
            
if 34==r then
                pc
.give_item2(71041, 1)
                
item.remove()
            
end
            
if 35==r then
                pc
.give_item2(71042, 1)
                
item.remove()
            
end
            
if 36==r then
                pc
.give_item2(71043, 1)
                
item.remove()
            
end
            
if 37==r then
                pc
.give_item2(71052, 1)
                
item.remove()
            
end
            
if 38==r then
                pc
.give_item2(15260, 1)
                
item.remove()
            
end
            
if 39==r then
                pc
.give_item2(15240, 1)
                
item.remove()
            
end
            
if 40==r then
                pc
.give_item2(50512, 1)
                
item.remove()
            
end
            
if 41==r then
                pc
.give_item2(50513, 20)
                
item.remove()
            
end
            
if 42==r then
                pc
.give_item2(50512, 1)
                
item.remove()
            
end
            
if 43==r then
                pc
.give_item2(50513, 20)
                
item.remove()
            
end
        end
    end
end 
Ich hoffe mir kann da jemand schnell helfen

Mit freundlichen Grüßen
09/28/2011 19:41 Sp0ngeb0b ist cool#3589
Hab da nichts auffälliges gesehen aber ich hab die einfach mal etwas geändert...mag ja sein dass der ein oder andere befehl einfach verbuggt ist oder so :D
hier: ;)
09/28/2011 19:52 .Kay331#3590
Danke ;) Also die 2te quest geht nun, aber die mit der exp da kommt immer noch der gleiche fehler :(
09/28/2011 20:13 £αšεℜ™#3591
ich denk mal das ligt an der .LUA in filezilla( ich weis es nicht schau einfach mal)
09/28/2011 22:30 .Kay331#3592
Wenn ich wüsste in welcher von den 2 und nach was ;D
09/29/2011 15:45 NightCrash#3593
Quote:
quest guildleader_map begin
state start begin

when not pc.is_guild_master() beginn
local map = pc.get_map_index()
if map == 201 then
pc.warp(466519,454424)
end
end

end
end
Fehler:
Quote:
guildleader_map.quest:4:Abort trap (core dumped)
Hoffe ihr könnt mir helfen.

Lg. Nighti
09/29/2011 17:17 .αpeх'#3594
Heyho, hab ne kleinen Panel-Quest geschrieben, habe jedoch keine Ahnung, ob die so funktiert, da ich zurzeit keinen Testserver habe.


Für DeineItemVnum muss natürlich eine passende Vnum eingesetzt werden..

PS: Bin völliger Nuub im Questschreiben, daher sind bestimmt fehler drin.

Hoffe das ihr mir soweit helfen könnte,

mfg,

WhiT3
09/30/2011 20:20 Kriegergeist^^#3595
Moin moin,

Ich habe ein kleinen Teil aus meiner neues Quest, der nicht geht:
PHP Code:
            when 8020.kill with pc.get_map_index()== 61 or pc.get_map_index() == 62 or pc.get_map_index() == 63 or pc.get_map_index() == 64 begin
            
if game.get_event_flag("defend_and_destroy_red") == 5 then
            game
.set_event_flag("defend_and_destroy_red", 4 )
            
notice_all("Das Rote Reich hat einen Ihrer Metins verloren.")
            
notice_all("Sie besitzen jetzt nur noch 4 Metins.")
            
notice_all("Gibt jetzt bloß nicht auf!")
            else
        
end
    end 
defend_and_destroy_red ist auf 5, das habe ich schon getestet. Bei VBox wird klein Fehler angezeit wen ich make.py ausführe.

Wär nett wen ihr mir sagen könntet wo hier der wurm liegt :handsdown:

MfG
Kriegergeist^^
10/01/2011 10:46 Koala™#3596
Hei die Quest wird von VPC usw überall angenommen es zeigt keinen fehler nichts... aber normaler weise sollte eine Questrolle kommen sobald man Level 100 ist tut es aber nicht dir Quests cheint nirgends:

Quote:
----------------------------------------------------
--COLLECT QUEST_lv100
--METIN2 collect quest
--By Koala™
----------------------------------------------------
quest collect_lv100 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 100 begin
set_state(information)
end
end

state information begin
when letter begin
local v = find_npc_by_vnum(20091)
if v != 0 then
target.vid("__TARGET__". v, "Bioguest"
end
send_letter("Die Forschung von Seon Pyeong")
end

when button or info begin
say_title("Die Forschung von Seon Pyeong")
say("")
say("Seon Pyeong sucht nach dir")
say("Gehe zu ihm und schaue was los ist")
say("")
end

when __TARGET__.target.click or
20091.chat."Diamanten der Weisheit" begin
target.delete("__TARGET__")
say("Seon Pyeong:")
---
say("Hallo, ich freue mich das du da bist!")
say("Ich habe eine Aufgabe für dich!")
say("Ich führe dich zu großen Gegnern!")
say("Nicht so klein wie die "Riesen"")
say("Die Aufgabe ist sehr schwer..")
say("Sei vorsichtig..")
wait()
say("Seon Pyeong:")
say("Um die Diamanten der Wiesheit zu holen,")
say("die ich brauche musst du die Eishexe in der Grotte")
say("Töten!")
say("Viel Erfolg.")
say("Sei vorsichtig..")
wait()
say("Wenn du mir hilfst diese Item`s zu bekommen,")
say("werde ich dich reich belohnen")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end

state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Diamanten")

end
when button or info begin
say_title("Diamanten der Weisheit")
---
say("")
say("Seon Pyeong hat mich beauftragt die Eishexe,")
say("zu töten")
say("")
end

when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(1000000)==0 then
say("Biologin:")
say("Du musst mir schon einen Diamanten brinen,")
say("Sonst kann ich nichts machen!")
say("")
return
end

item.remove()
pc.setgf("dring_bug",1)
end

when 1192.kill begin
local s = number(1.100)
if s >= 5 and pc.count_item(1000000)==o then
pc.give_item2(1000000, 1)
end
end


when 20091.chat."Diamanten der Weisheit" with pc.count_item(1000000) >0 begin
if get_time() > pc.getgf("duration") then
say("Seon Pyeong:")
---
say("Danke für den Diamanten!")
say("Warte kurz einen Moment.")
say("")
pc.remove_item(1000000, 1)
pc.setgf("duration",get_time()+60*60*22)--------------22¤p®É
wait()

local pass_pervent
if pc.getgf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
if pc.getgf("collect_count")< 39 then --10-Diamanten der Weisheit
local index =pcgetgf("collect_count")+1
pc.setgf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Seon Pyeong:")
say("Perfeckt der Diamant ist wunderbar.")
say"Du hast bis jetzt".." "..10-pc.getgf(collect_count").. "abgegeben!")
say("Bitte bring mir noch die restlichen!")
say("")
pc.setgf(drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Seon Pyeong:")
say("Du hast mir alle 10 gebracht!")
say("Ich habe meine Untersuchungen")
say("Dieser Diamanten erfolgreich beendet.")
say("Nun benötige ich allerdings noch")
say("Einen Seelenstein... Es wäre sehr")
say("nett, wenn du ihn mir bringst!")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration"),0)
set_state(key_item)
return
else
say("Seon Pyeong:")
say("Tut mir leid, aber")
say("dieser Diamant ist echt")
say("Kacke xD! Hol mir ein neuen")
say("")
pc.setgf(drink_drug",0) --ÃĤôªì©l¤Æ
return
end

end
else
say("Seon Pyeong:")
say("Die Untersuchungen der letzten")
say("Diamanten sind noch nicht fertig!")
say("Bitte komme später wieder!")
say("Nun geh schon!")
return
end
end
end


state key_item begin
when letter begin
send_letter("Seelenstein des Anführers")

if pc_countItem(30227)>0 then
locale v = find_npc_by_vnum(20091)
if v != o then
target.vid("__TARGET__", v, "Bioquest")
end
end

end
when button of info begin
if pc.count_item(30227) >0 then
say_tile("Seelenstein des Anführers")
say("")
---
say("Seon Pyeong hat eine weitere")
say("Aufgabe für dich gehe zu ihm")
say("")
return
end

say_title("Seelenstein des Anführers")
say("")
---
say("Du hast mir alle 10 Diamanten der Weisheit")
say("Gebracht, vielen dank dafür!")
say("Ich brauche aber einen Seelenstein.")
say_item_vnum(30227)---------- Seelenstein des Anführes
say("Ein legendärer Stein,")
say("Der die Seele des Anführers enthält!")
say("")
end


when 1192.kill begin
local s = number(1, 200)
if s == 1 and pc.count_item(30227)==0 then
pc.give_item2(30227, 1)
send_letter("Seelenstein des Anführers")
end
end




when __TARGET__.target.click or
20091.chat."Diamanten der Weisheit" with pc.count_item(30227)
target.delete("__TARGET__")
say("Seon Pyeong:")
say("Du hast mir den letzten Seelenstein gebracht")
say("Nun, ich habe etwas wichtiges herausgefunden!")
say("Ich weiss, wie ich dir die")
say("Unbesiegbare Kraft geben kann!")
say("Nun, nimm das hier mit zu Baek-Go!")
say("Nun geh und hol die Belohnung ab!")
say("")
pc.remove_item(30227,1)
set_state(__reward)
end
end

state __reward begin
when letter begin
send_letter("Info von Seon Pyeong")

local v = find_npc_by_vnum(20091)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Seon Pyeong sagte, dass")
say("Sie herausgefunden hat, wie")
say("Das mit den Kräften geht..")
say("Ich hoffe, dass Baek-Go")
say("Weiss, wie das geht!")
say("")
end

when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du bist also der, der")
say("Die schweren Aufgaben von")
say("Der Biologin geschafft hat?")
say("Beachtlich.. hier deine Belohnung.")
say("")
say_reward("Auftrag beendet!")
say_reward("Du erählst deine Belohnungen!")
say_reward("Bewegungsgeschwindigkeit +50%")
say_reward("Angriffsgeschwindigkeit +30%")
say_reward("Schadensreduzierung +5%")
say_reward("Angriffswert + 125")

affect.add_collect(apply.MOV_SPEED, 50, 60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,125, 60*60*24*365*60)--¡X60¦~
affect.add_collect(apply.DEF_GRADE_BONUS,5, 60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_SPEED, 30, 60*60*24*365*60) --60¦~
clear_letter()
set_state(__complete)
end

end


state __complete begin
end
end
10/01/2011 13:00 Hacken4Ever#3597
Die Quest funktioniert nicht :O


Fehlermeldung :

Quote:
Bla bla bla Fehler in zeile 40
10/01/2011 14:00 Sp0ngeb0b ist cool#3598
PHP Code:
quest horse_guard begin
    state start begin
        when 20349.chat
."Pferd steigern" with horse.get_level() < 30 begin
            say_title
("Stallbursche:")
            
say("")
            
say("Hallo!")
            
say("Bei mir kannst du dein Pferd steigern.")
            
say("Das Pferd zu steigern kostet dich 4kk pro Level.")
            
say("")
            
say_reward("Möchtest du dein Pferd steigern?")
            
say("")
                
            
local s = select("Ja", "Nein")
                
            if 
s == 1 then
                say_title
("Stallbursche:")
                
say("")
                if 
pc.money>=4000000 then
                    pc
.changemoney(-4000000)
                    
horse.unride()
                    
horse.advance()
                    
horse.ride()
                    
say("Dein Pferd hat nun Level "..(horse.get_level()).." erreicht.")
                    
say("")
                elseif 
pc.money < 4000000 then
                    say
("Du hast nicht genug Yang um dein Pferd zu steigern.")
                    
say("")
                
end
            
elseif s == 2 then
                
return
            
end
        end
        when 20349.chat
."Reitshop" begin
            npc
.open_shop(shop_vnum)
            
say("Hier findest du alle Items für ein Pferd.")
        
end
        when 20349.chat
."Information" begin
            local s
=number(1, 7)
            if 
1>=s then -- 14.29% (1/7)
                
say("Füttere dein Pferd")
                
say("regelmässig sonst")
                
say("stirbt es.")
            elseif 
2>=s then -- 14.29% (1/7)
                
say("Das Anfängerpferd")
                
say("ist sehr schnell erschöpft.")
                
say("Bleibe nicht auf seinem Rücken stehen.")
            elseif 
3>=s then -- 14.29% (1/7)
                
say("Um dein Pferd zu verbessern")
                
say("benötigst du 1kk Yang.")
                
say("Bringe das Yang zu mir")
                
say("und ich werde dein Pferd steigern.")
            elseif 
4>=s then -- 14.29% (1/7)
                
say("Wenn dein Pferd gestorben")
                
say("ist gibt es mehrere")
                
say("Kräuter von den")
                
say("Affenkönigen um")
                
say("sie Wiederzubeleben.")
            elseif 
5>=s then -- 14.29% (1/7)
                
say("Es gibt 9 verschiedene")
                
say("Pferde Aussehen.")
                
say("Ohne Gilde, mit Gilde und als Leader.")
            elseif 
6>=s then -- 14.29% (1/7)
                
say("Das Anfängerpferd")
                
say("isst gerne Heu.")
                
say("Das Kampfpferd")
                
say("isst gerne Karotten.")
                
say("Das Militärpferd")
                
say("isst gerne Roten Ginseng.")
            elseif 
7>=s then -- 14.29% (1/7)
                
say("Lese Handbuch Pferde Zähmen")
                
say("um dein Pferd schneller zu rufen.")
            
end
        end
    end
    state __COMPLETE__ begin
        when enter begin
            q
.done()
        
end
    end
end 
shop vnum eintragen, nicht vergessen ;)
10/01/2011 15:50 miguelmig#3599
Quote:
Originally Posted by Sp0ngeb0b ist cool View Post
PHP Code:
quest horse_guard begin
    state start begin
        when 20349.chat
."Pferd steigern" with horse.get_level() < 30 begin
        say
("Dein Pferd hat nun Level "..(horse.get_level()).." erreicht.")

    
state __COMPLETE__ begin
        when enter begin
            q
.done()
        
end
    end
end 
Those are the 2 errors.

First : "..(horse.get_level()).." , you should remove the '(' on the beggining and the ')' on the end.

Second : you should remove this:
state __COMPLETE__ begin
when enter begin
q.done()
end
end

Because that's useless , and I think that qc won't allow it.

I think that's all.
10/01/2011 17:12 zokker47#3600
Ich wollte frage wie man die Quest umschreibt damit man wenn man auf ein Reitsiegel drückt, das Reitsiegel wiederbekommt und ein countdown abläuft:rtfm:

Das ist die standartquest
PHP Code:
quest reittierloewe begin
    state start begin
        when 69010.
use begin   ---ID des Item eurer Wahl womit das Tier gerufen wird.---
            
chat("Du hast dein Reittier gerufen!")
            
pc.mount(39912)  ---ID des Reittieres das gerufen wird.---
            
pc.remove_item(69010, 1)  ---Item wird entfernt.---
        
end
    end
end