[SERVICE] Die Questkontrolle

05/24/2011 22:35 xAlbStaR™#2416
PHP Code:
quest shop begin  
    state start begin  
        when 50200.
use begin   
                pc
.polymorph(30000,100000)   
                
chat("Good luck...")     
            
end  
        end  
    end  
end 
Wenn man Bündel benuzzt wird man sofort verwandelt in Shop tisch.
Ich will aber noch was in shop reinstellen >.<
Wie bei .DE!
05/24/2011 23:09 ProtoX>#2417
wieso wird bei der quest jedes mal und bei jedem login level 99 angezeigt? könnte sie mir jemand umändern?

PHP Code:
quest lvl99 begin
    state start begin
        when login 
or levelup with pc.level >= 99 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 99 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
        
end
    end
end
quest lvl120 begin
    state start begin
        when login 
or levelup with pc.level >= 120 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 120 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
        
end
    end
end
quest lvl150 begin
    state start begin
        when login 
or levelup with pc.level >= 150 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 150 erreicht!")
            
notice_all("")
            
notice_all("Herzlichen Glückwunsch!!!")
        
end
    end
end 
05/25/2011 08:59 RealFreak#2418
probiers mal so:
PHP Code:
quest lvl99 begin
    state start begin
        when login 
or levelup with pc.level >= 99 with pc.getqf("lvl99done") < 1 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 99 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
            
pc.setqf("lvl99done", 1)
        
end
    end
end
quest lvl120 begin
    state start begin
        when login 
or levelup with pc.level >= 120 with pc.getqf("lvl120done") < 1 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 120 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
             
pc.setqf("lvl120done", 1)
       
end
    end
end
quest lvl150 begin
    state start begin
        when login 
or levelup with pc.level >= 150 with pc.getqf("lvl150done") < 1 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 150 erreicht!")
            
notice_all("")
            
notice_all("Herzlichen Glückwunsch!!!")
            
pc.setqf("lvl150done", 1)
        
end
    end
end 
05/25/2011 11:03 ProtoX>#2419
nun kommt core fehler 1x bei der quest beim ausführen der make.py
05/25/2011 11:08 .Delta#2420
dann probiers doch mal so :)
PHP Code:
quest lvl99 begin
    state start begin
        when login 
or levelup with pc.level >= 99 and pc.getqf("lvl99done") < 1 begin
            notice_all
(pc.get_name().." hat gerade das")
            
notice_all("Level 99 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
            
pc.setqf("lvl99done", 1)
        
end
        when login 
or levelup with pc.level >= 120 and pc.getqf("lvl120done") < 1 begin
            notice_all
(pc.get_name().." hat gerade das")
            
notice_all("Level 120 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
            
pc.setqf("lvl120done", 1)
        
end
        when login 
or levelup with pc.level >= 150 and pc.getqf("lvl150done") < 1 begin
            notice_all
(pc.get_name().." hat gerade das")
            
notice_all("Level 150 erreicht!")
            
notice_all("")
            
notice_all("Herzlichen Glückwunsch!!!")
            
pc.setqf("lvl150done", 1)
        
end
    end
end 
there you got it
05/25/2011 14:22 Retrograd#2421
kann man die nicht auch so schreiben?

PHP Code:
quest max_level begin
    state start begin
        when login 
or levelup with pc.level >= 99 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 99 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
        
            
set_state(lvl120)
        
end
    end

    state lvl120 begin
        when login 
or levelup with pc.level >= 120 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 120 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
            
            
set_state(lvl150)
        
end    
    end
    
    state lvl150 begin
        when login 
or levelup with pc.level >= 150 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 150 erreicht!")
            
notice_all("")
            
notice_all("Herzlichen Glückwunsch!!!")
            
            
set_state(__COMPLETE__)
        
end
    end
    state __COMPLETE__ begin
    end
end 
05/25/2011 14:27 .Delta#2422
Quote:
Originally Posted by Retrograd View Post
kann man die nicht auch so schreiben?

PHP Code:
quest max_level begin
    state start begin
        when login 
or levelup with pc.level >= 99 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 99 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
        
            
set_state(lvl120)
        
end
    end

    state lvl120 begin
        when login 
or levelup with pc.level >= 120 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 120 erreicht!")
            
notice_all("")
            
notice_all("Weiter so!")
            
            
set_state(lvl150)
        
end    
    end
    
    state lvl150 begin
        when login 
or levelup with pc.level >= 150 begin
            notice_all
("".. pc.get_name() .." hat gerade das")
            
notice_all("Level 150 erreicht!")
            
notice_all("")
            
notice_all("Herzlichen Glückwunsch!!!")
            
            
set_state(__COMPLETE__)
        
end
    end
    state __COMPLETE__ begin
    end
end 
Ist eine weitere Möglichkeit, da hast du Recht.
05/25/2011 14:41 Retrograd#2423
ich hab sie grad getestet aba irgendwie will der nicht so machen weil wenn ich mit meinem char lvl 99 erreicht habe klappt alles aber dann wenn ich 120 und 150 erreich klappt das nicht mehr

wo wir grad dabei sind kannst du mir bei der quest helfen
PHP Code:
quest forschung2 begin
    state start begin
        when login 
or levelup with pc.get_level() >= 94 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, "Seon-Pyeongs Forschung 2")
            
end
            send_letter
("Seon-Pyeongs Forschung 2")
        
end
        when button 
or info begin
            say_title
("Seon-Pyeongs Forschung 2")
            
say("")
            
say("Seon-Pyeong sucht dich!")
            
say("Gehe zu ihm.")
            
say("Er sagte, er hat eine weitere Aufgabe für dich.")
            
say("")
        
end
        
        when __TARGET__
.target.click or
            
20091.chat."Juwel der Weisheit" begin
            target
.delete("__TARGET__")
            
say(""..mob_name(20091)..":")
            ---
            
say("Schön das duch gekommen bist. Dass du")
            
say("mir helfen willst freut micht. Diese")
            
say("Aufgabe wird schwieriger als die")
            
say("vorherige. Ich bin auf etwas gestoßen.")
            
say("Du hast doch bestimmt schon von der")
            
say("Grotte der Verbannung gehört, oder?")
            
wait()
            
say(""..mob_name(20091)..":")
            
say("Naja wenn nicht ist es auch nicht schlimm.")
            
say("Du wirst den Weg schon finden. Naja zurück")
            
say("zu deiner Aufgabe. Ich habe in meinen alten")
            
say("Büchern gelesen und etwas über ein Juwel ")
            
say("herausgefunden. Du kannst es von den")
            
say("Seatou-Bogenschützen und Kommandanten bekommen.")
            
say("")
            
wait()
            
say(""..mob_name(20091)..":")
            
say("Ich benötige 20 dieser Juwele um genauere Forschungen.")
            
say("anstellen zu können. Du hilfst mir wieder, oder?")
            
say("")
            
say("Ja! Das ist nett von dir, danke!")
            
say("")
            
set_state(go_to_gdv)
            
pc.setqf("duration",0)
            
pc.setqf("collect_count",0)
            
pc.setqf("drink_drug",0)
        
end
    end
    state go_to_gdv begin
        when letter begin
            send_letter
("Sammle die Juwelen")
        
end
        when button 
or info begin
            say_title
("Juwel der Weisheit")
            ---
            
say("")
            
say("Seon-Pyeong schickt mich die Juwelen aus der")
            
say("Grotte der Verbannung zu holen. Ich muss ihm")
            
say("20 dieser Juwelen besorgen.")
            
say("")
            
say_item_vnum(30252)
            
say_reward("Du hast".." "..pc.getqf("collect_count").." abgegeben")
            
say("")
        
end
        when 71035.
use begin
            
if get_time() < pc.getqf("duration") then
                say
("BLA BLA BLA")
                
retun
            end
            
if pc.getqf("drin_drug") == 1 then
                say
("BLUBB BLUBB")
                return
            
end
            
if pc.count_item(30252) == 0 then
                say
(""..mob_name(20091)..":")
                
say("Du musst mir schon ein Juwel mitbringen")
                
say("sonst kann ich es nicht untersuchen.")
                return
            
end
            
            item
.remove()
            
pc.setqf("drink_drug",1)
        
end
        
        when 2414.kill 
or
             
2412.kill begin
            local s 
= number(1, 100)
            if 
s <= 5 and pc.count_item(30252) == 0 begin
                pc
.give_item2(30252, 1)
            
end
        end
        
        when 20091.chat
."Juwel der Weisheit" with pc.count_item(30252) > 0 begin
            
if get_time() > pc.getqf("duration") then
            say
(""..mob_name(20091)..":")
            ---
            
say("Vielen Dank, danns du mir dieses")
            
say("Juwel mitgebracht hast. Ich werde mich jetzt")
            
say("hinsetzen und es untersuchen.")
            
say("")
            
pc.remove_item(30252, 1)
            
pc.setqf("duration",get_time()+60*60*22)
            
wait()
            
            
local pass_percent
            
if pc.getqf("drink_drug")==0 then
                pass_percent
=60
            
else
                
pass_percent=90
            end
            
            local s 
= number(1, 100)
            if 
s <= pass_percent then
                
if pc.getqf("collect_count") < 19 then
                    locale index 
= pc.getqf("collet_count")+1
                    pc
.setqf("collect_count",index)
                    
say(""..mob_name(20091)..":")
                    
say("Ich muss sagen, dass ist ein sehr schönes Juwel.")
                    
say("Du hast bis jetzt".." "..20-pc.getqf("collect_count").. "abgegeben.")
                    
say("Ich brauche noch ein paar mehr um meine Forschung zu beenden.")
                    
say("")
                    
pc.setqf("drink_drug",0)
                    return
                
end
                say
(""..mob_name(20091)..":")
                
say("Super! Du hast mir alle Juwelen gebracht, die ich")
                
say("für meine Forschungen benötigt habe. Du kannst dir")
                
say("bestimmt denken, was ich jetzt benötige.")
                
say("")
                
say("Nein kannst du nicht? Achso ja stimmt ich habe ja noch nie einen Seelenstein")
                
say("von dir verlangt. Ich brauche den Seelenstein des Drachen.")
                
say("")
                
pc.setqf("collect_count",0)
                
pc.setqf("drink_drug",0)
                
pc.setqf("duration",0)
                
set_state(key_item)
                return
            else
                
say(""..mob_name(20091)..":")
                
say("Es tut mir Leid, aber dieses Juwel ist")
                
say("nicht gut genug damit ich es untersuchen kann.")
                
say("")
                
pc.setqf("drink_drug",0)
                
retrun
            end
        
else
            
say(""..mob_name(20091)..":")
            
say("Die Untersuchungen des letzten Juwels sind noch nicht")
            
say("fertig. Konne später noch einmal vorbei.")
            
say("")
            return
        
end
    end
end
    state key_item begin
        when letter begin
            send_letter
("Seelenstein des Drachen")
            
            if 
pc.count_item(30228) > 0 then
                local v 
= find_npc_by_vnum(20091)
                if 
v != 0 then
                    target
.viid("__TARGET__", v, "Seon-Pyeongs Forschung 2")
                
end
            end
        end
        when button 
or info begin
            
if pc.count_item(30228) > 0 then
                say_title
("Juwel der Weißheit")
                
say("")
                ---
                
say("Seon-Pyeong hat eine Aufgabe ..")
                
say("Gehe zu ihm")
                
say("")
                return
            
end
            
            say_title
("Seelenstein des Drachen")
            
say("")
            ---
            
say("Nun, da du mir alle 20 Juwele der Weisheit")
            
say("gebracht hast benötige ich noch den Seelenstein")
            
say("des Drachen.")
            
say_item_vnum(30228)
            
say("Ein legendärer Stin der Armee von Beran-Setaou.")
            
say("")
        
end
        
        when 2493.kill 
or
             
2492.kill or
             
2491.kill begin
            local s 
= number(1, 200)
            if 
s == 1 and pc.count_item(30228) == 0 then
                pc
.give_item(30228, 1)
                
send_letter("Seelenstein des Drachen")
            
end
        end
        
        
        when __TARGET__
.target.click or
            
20091.chat."Seelenstein des Drachen" with pc.count_item(30228) > 0 begin
            target
.delete("__TARGET__")
            
say(""..mob_name(20091)..":")
            
say("Du hast die Aufgabe gut bemeistert. Ich gratuliere")
            
say("dir dazu. Um deine Belohnung zu bekommen musst du zu")
            
say("Baek-Go gehen.")
            
say("")
            
pc.remove_item(30228, 1)
            
set_state(__reward)
        
end
    end
    
    state __reward begin
        when letter begin
            send_letter
("Gehe zu Baek-Go")
            
            
local v = find_npc_by_vnum(20018)
            if 
v != 0 then
                target
.vid("__TARGET__", v, "Baek-Go")
            
end
        end
        
        when button 
or info begin
            say_title
("Der Weg zu der Belohnung")
            ---
            
say("Die Quest von Seon-Pyeong ist beendet. Du hast")
            
say("alle Juwelen zu ihm gebracht. Nun musst du nur noch")
            
say("zu Baek-Go gehen.")
            
say("")
        
end
        
        when __TARGET__
.target.click or
            
20018.chat."Belohnung" begin
            target
.delete("__TARGET__")
            
say(""..mob_name(20018)..":")
            
say("Nun ich habe gehört, dass du Seon-Pyeong")
            
say("bei seiner letzten Forschung geholfen hast.")
            
say("")
            
say("Das heißt, dass wir uns nicht mehr so schnell wieder sehen.")
            
say("")
            
say_reward("Auftrag erfolgreich beendet.")
            
say_reward("Du kannst nun zwischen den Belohnungen wählen")
            
            
local f = select ("1100 TP", "140 Verteidigung", "60 Angriffswert")
            
            if 
f = 3 then
                say_reward
("Du erhälst 60 Angriffswert.")
                
affect.add_collect_point(POINT_ATT_BONUS,60,60*60*24*365*60)
            elseif 
f = 2 then
                say_reward
("Du erhälst 140 Verteidigung.")
                
affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60)
            elseif 
f = 1 then
                say_reward
("Du erhälst 1100 TP.")
                
affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60)
            
end
            
            clear_letter
()
            
set_state(__complete)
        
end
    end
    
    state __complete begin
    end
end 
05/26/2011 21:34 .Temperies#2424
Joa es kommt i-wie core dumped und die Quest wird auch nicht geladen.

Code:
quest mobkill begin
    state start begin
            when 2598.kill begin
            notice_all (pc.get_name().." hat den Tot besiegt!")
            notice_all ("Er ist ein Held!")
            end
            when 2291.kill begin
            notice_all (pc.get_name().." hat den Roten Drachen besiegt!")
            notice_all ("Herzlichen Glückwunsch.")
            end
            when 591.kill begin
            notice_all (pc.get_name().." hat den Brutalen Hauptmann besiegt!")
            end
            when 1095.kill begin
            notice_all (pc.get_name().." hat den Blauen Tot besiegt!")
            end
            when 1091.kill begin
            notice_all (pc.get_name().." hat den Dämonenkönig besiegt!")
            end
            when 1092.kill begin
            notice_all (pc.get_name().." hat den Stolzen Dämonenkönig besiegt!")
            end
            when 1093.kill begin
            notice_all (pc.get_name().." hat den Sensenmann besiegt!")
            end
            when 1094.kill begin
            notice_all (pc.get_name().." hat den Gemeinen Dämonenkönig besiegt!")
            end
            when 2091.kill begin
            notice_all (pc.get_name().." hat die Königinnenspinne besiegt!")
            end
            when 2092.kill begin
            notice_all (pc.get_name().." hat die Königsspinne besiegt!")
            end
            when 2093.kill begin
            notice_all (pc.get_name().." hat die Dunkle Königinnenspinne besiegt!")
            end
            when 2191.kill begin
            notice_all (pc.get_name().." hat die Große Wüstenschildkröte besiegt!")
            end
            when 2192.kill begin
            notice_all (pc.get_name().." hat die Dunkle Wüstenschildkröte besiegt!")
            end
            when 2307.kill begin
            notice_all (pc.get_name().." hat den Geisterbaum-Lord besiegt!")
            end
            when 2493.kill begin
            notice_all (pc.get_name().." hat den Wasserdrachen besiegt!")
            notice_all ("Er ist ein Drachenmörder !")
            end
            when 11505.kill begin
            notice_all (pc.get_name().." hat den Goldenen Frosch besiegt!")
            end
            when 11506.kill begin
            notice_all (pc.get_name().." hat das Feuer der Macht besiegt!")
            end
            when 11507.kill begin
            notice_all (pc.get_name().." hat das Feuer der Macht besiegt!")
            end
            when 11508.kill begin
            notice_all (pc.get_name().." hat das Feuer der Macht besiegt!")
            end
            when 11509.kill begin
            notice_all (pc.get_name().." hat das Feuer der Macht besiegt!")
            end
            when 11510.kill begin
            notice_all (pc.get_name().." hat das Feuer der Macht besiegt!")
            end
        end
    end
end
05/26/2011 21:40 .Delta#2425
auf den ersten Blick:
Ein end zuviel unten dran, mach eins weg ;)
05/27/2011 10:13 xAlbStaR™#2426
PHP Code:
quest qive_yang begin
state start begin
when 50512.
use
pc.removeitem("50512, 1")
say_tile("Yang-Stein")
say("")
say("Du möchtest also etwas mit deinem")
say("Yang anstellen?")
locale s=select ("Yang erstellen","Yang Löschen","Abbrechen")
if 
s == 1 then
say_title
("Ersteller:")
say("Du hättest gerne Yang aufgeladen?")
say("")
say_title(pc.get_name()..":")
say("Ja , Sehr Gerne !")
say("")
wait()
say_title("Ersteller:")
say("Kein Problem")
say("Ich kann dir Soviel Yang machen wie du willst")
say("")
say("")
say_title("Information")
say_reward("Achtung!!")
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
 
say("eingeben")
say("Gib die Anzahl an :")
local y=input()
if 
y == "" then
say
("Es hat leider nicht geklappt!")
return
else
pc . change_money(y)
say_reward("Du hast dein Yang erfolgreich aufgeladen ! Viel Spaß damit.")
end
elseif s == 2 then
say_title
("Löscher:")
say("Du hättest gerne weniger Yang?")
say("")
say_title(pc.get_name()..":")
say("Ja , ich finde einfach viel zu Viel .")
say("")
wait()
say_title("Löscher:")
say("Kein Problem")
say("Ich kann dir Soviel Yang loeschen, wie du willst.")
say("")
say("")
say_title("Information")
say_reward("Achtung!!")
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
say("eingeben")
say("Gib die Anzahl an :")
local y=input()
if 
y == "" then
say
("Es hat leider nicht geklappt!")
return
else
pc . change_money(-y)
say_reward("Du hast dein Yang erfolgreich geloescht.Bis zum Naechsten mal!)
end
elseif s == 3 then
say("
Dann nicht")
end
end
end
end 
Core dumped + "when doesn't have begin-end clause (pc) ?
05/27/2011 10:20 .Delta#2427
PHP Code:
quest qive_yang begin
    state start begin
        when 50512.
use begin    -- begin hat gefehlt
            pc
.removeitem("50512, 1")
            
say_tile("Yang-Stein")
            
say("")
            
say("Du möchtest also etwas mit deinem")
            
say("Yang anstellen?")
            
local s=select ("Yang erstellen","Yang Löschen","Abbrechen") -- es heißt immer local. NICHT locale
            
if s == 1 then
                say_title
("Ersteller:")
                
say("Du hättest gerne Yang aufgeladen?")
                
say("")
                
say_title(pc.get_name()..":")
                
say("Ja , Sehr Gerne !")
                
say("")
                
wait()
                
say_title("Ersteller:")
                
say("Kein Problem")
                
say("Ich kann dir Soviel Yang machen wie du willst")
                
say("")
                
say("")
                
say_title("Information")
                
say_reward("Achtung!!")
                
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
                
say("eingeben")
                
say("Gib die Anzahl an :")
                
local y=input()
                if 
y == "" then
                    say
("Es hat leider nicht geklappt!")
                    return
                else
                    
pc.change_money(y)
                    
say_reward("Du hast dein Yang erfolgreich aufgeladen ! Viel Spaß damit.")
                
end
            
elseif s == 2 then
                say_title
("Löscher:")
                
say("Du hättest gerne weniger Yang?")
                
say("")
                
say_title(pc.get_name()..":")
                
say("Ja , ich finde einfach viel zu Viel .")
                
say("")
                
wait()
                
say_title("Löscher:")
                
say("Kein Problem")
                
say("Ich kann dir Soviel Yang loeschen, wie du willst.")
                
say("")
                
say("")
                
say_title("Information")
                
say_reward("Achtung!!")
                
say_reward("Du darfst nicht mehr als 2.000.000.000 Yang")
                
say("eingeben")
                
say("Gib die Anzahl an :")
                
local y = input()
                if 
y == "" then
                    say
("Es hat leider nicht geklappt!")
                    return
                else
                    
pc.change_money(-y)
                    
say_reward("Du hast dein Yang erfolgreich geloescht.Bis zum Naechsten mal!")
                
end
            
elseif s == 3 then
                say
("Dann nicht")
            
end
        end
    end
end
-- MFG  .Delta 
05/27/2011 12:45 xAlbStaR™#2428
Thanks , .Delta funktioniert !
05/27/2011 13:35 'oShet#2429
Hab auch mit diesen Quests probs.
Funktionieren teils nicht (also geben keine items usw)

Q1
Quote:
Code:
quest subquest_21 begin
	state start begin
		when login or levelup with pc.level >= 60 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			local v=find_npc_by_vnum(20020)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Verraeter Balso")
			end
		end

		when __TARGET__.target.click or
			20020.chat."Hilf mir"  begin
			target.delete("__TARGET__")
			say("Balso:")
			say("Hallo Fremder")
			say("Alle hier im Dorf haben")
			say("mich verstoßen.")
			say("Sie glauben das ich einmal")
			say("was mit Ariyoung hatte.")
			say("Doch das stimmt nicht.")
			say("")
			say("")
			wait()
			say("Balso:")
			say("Ich bin leider sehr Krank")
			say("und keiner möchte mir helfen.")
			say("Ich war neulich auf ")
			say("Berg Sohan und habe mich")
			say("Infiziert.")
			say("¦Aber ich habe von einem")
			say("Gegenmittel gehört.")
			say("Töte "..mob_name(933).." nur sie besitzten")
			say("das Heilmittel.")
			say("") 
			say("")
			local s=select("Ja, ich mach es.","Geh selber!!!")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if 2==a then
					say("Balso:")
					say("Danke.")
					say("Komm wieder sobald")
					say("du Zeit hast für mich.")
					say("")
					return
				end
				say("Balso:")
				say("Du bist so ein NOOB")
				set_state(__GIVEUP__)
				return
			end
			say("Balso:")
			say("Danke.")
			say("")
			say("")
			set_state(accept_request)


			end

		end


	state accept_request begin

		when letter begin
			send_letter("Heilmittel für Balso")
			
			if pc.count_item(30114)>0 then
				local v=find_npc_by_vnum(20020)
				if 0!= v then
					target.vid("__TARGET__",v,"Verraeter Balso")
				end 
			end

		end		
			
	
		when info or  button begin
			if pc.count_item(30114) >=1 then
				say(locale.NOTICE_COLOR..  "Du hast das Heilmittel" ..locale.NORMAL_COLOR)
				say("")
				say("Blaso hatte Recht.")
				say("Die "..mob_name(933).."")
				say("Hatten wirklich ein Heilmittel.")
				say("Bring es Balso.")
				say("")
				return
			end
				
			say(locale.NOTICE_COLOR..  "Töte "..mob_name(933).."" ..locale.NORMAL_COLOR)
			say("")
			say("Balso vermutet ein Heilmittel bei")
			say(""..mob_name(933)..".")
			say("Töte solang "..mob_name(933).." bis")
			say("du ein Heilmittel hast.")
			say("")

		end


					
		when 933.kill  begin
			
			local s = number(1, 100)
			if s <= 5 and  pc.count_item(30114) ==0  then
				pc.give_item2(30114, 1)

			end
		end

	
		
		when  __TARGET__.target.click or
			20020.chat."Das Heilmittel" with pc.count_item(30114) >=1  begin
			target.delete("__TARGET__")
			say("Balso:")
			say("Danke.")
			say("Ich dachte du glaubst mir")
			say("auch nicht oder lässt mich")
			say("im Stich...")
			say("Wenigstens einer der mir Hilft.")
			say("")
			pc.remove_item(30114, 1)
			
		   say_reward("Du erhältst 19.000.000 Ehrfahrung.")
		   say_reward("Du erhältst 50.000.000 Yang")
		   pc.change_money(50000000)
		   pc.give_exp2(19000000)	
			 set_quest_state("levelup","run")
		
			pc.give_item2(50050, 1)
			say_reward("Du erhältst eine Pferdemedaille.")
			
			clear_letter()
			set_state(COMPLETE)

		end

end

	state __GIVEUP__ begin
	end

	state COMPLETE begin
	end


end
Q2
Quote:
Code:
quest subquest_22 begin
	state start begin
		when login or levelup with pc.level >= 50 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			local v=find_npc_by_vnum(20015)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Deokbae")
			end
		end


		when __TARGET__.target.click or 
			20015.chat."Meine Axt" begin
			target.delete("__TARGET__")
			say("Daok-be:")
			say("Hallo Fremder...")
			say("Du kennst doch meinen")
			say("Freund den Schmied?")
			say("")
			say("Er hat mir eine Spezielle")
			say("Axt gefertigt.")
			say("")
			say("")
			wait()
			say("Daok-be:")
			say("Nur gestern als ich in einer")
			say("Kneipe war wurde sie mir gestohlen.")
			say("")
			say("Kannst du sie mir wiederholen?")
			say("")
			local s=select("Ja, mach ich","Alter sauf net so viel.")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if  2==a then
					say("Daok-be:")
					say("Komm wieder sobald")
					say("du Zeit hast.")
					say("")	
					return
				end
				say("Daok-be:")
				say("Du wirst auch Älter...")
				say("Lappen.")
				say("")	
				set_state(__GIVEUP__)
				return
			end
			say("Daok-be:")
			say("wtf?")
			say("")

		set_state(hunt_for_goldaxe)
		end
	end
	
	
	
	
	state hunt_for_goldaxe begin
		when letter begin
			send_letter("Jagt nach der Axt")
			
			if pc.count_item(30102)>0 then
				local v=find_npc_by_vnum(20015)
				if 0==v then
				else
					target.vid("__TARGET__",v,"Deokbae")
				end
			end	

		end
		when info or  button begin
			if pc.count_item(30102)>0 then
				say(locale.NOTICE_COLOR.."Du hast die Axt"..locale.NORMAL_COLOR)
				say("")
				say("Du hast die Axt gefunden.")
				say("Bringe sie schnell Daok-be.")
				say("")
				return
			end
			say(locale.NOTICE_COLOR.."Die Axt von Daok-be"..locale.NORMAL_COLOR)
			say("")
			say("Töte "..mob_name(554).." sie haben die")
			say("Axt von Daok-be gestohlen.")
		end



		when 554.kill  begin
			local s = number(1, 100)
			if s <= 5 and pc.count_item(30102)==0  then
				pc.give_item2(30102, 1)

				local v=find_npc_by_vnum(20015)
				if 0==v then
				else
					target.vid("__TARGET__",v,"Deokbae")
				end
			end
		end



		when 20015.chat."Ich habe die Axt!" with pc.count_item("30102")>=1 begin
			target.delete("__TARGET__") 
			say("Daok-be:")
			say("Danke Fremder,")
			say("Ich stehe tief in deiner")
			say("Schuld.")
			say("Bitte sage dem Schmied nichts")
			say("davon.")
			say("")
			pc.remove_item(30102,1)		
			
			say_reward("Du erhältst 4.000.000 Ehrfahrung.")
			pc.give_exp2(4000000)	
		    set_quest_state("levelup","run")
			say_reward("Du erhältst 100 Grüne Potts")
			pc.give_item2(27111, 200)
			say_reward("Du erhältst " ..item_name(70005).."")
			pc.give_item2(70005, 1)
			pc.give_item2(70024, 1)
			say_reward("Du erhälst " ..item_name(70024).."")
			
			
			set_state(__THEEND__)
			clear_letter()	
		end
	end


	state __GIVEUP__ begin
	end
	state __THEEND__ begin
	end	
end
Q3
Quote:
Code:
quest subquest_25 begin
	state start begin
		when login or levelup with pc.level >= 86 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			local v=find_npc_by_vnum(20022)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Huahn-So")
			end
		end

		when __TARGET__.target.click or
		 20022.chat."Ich bin Verliebt" begin
			target.delete("__TARGET__")
			say("Huan-So:")
			say("Mir gehts so gut!")
			say("Seit einiger Zeit")
			say("bin ich wieder richtig Glücklich.")
			say("Du fragst dich sicher wieso.")
			say("")
			say("")
			say("")
			say("")
			wait()
			say("Huan-So:")
			say("Nunja jetzt wo du so Fragst")
			say("wird es mir glatt Peinlich.")
			say("Aber ich habe mich Verliebt!")
			say("Du kennst doch sicher")
			say("Ariyoung?")
			say("")
			say("")
			wait()
			say("Huan-So:")
			say("Sieht sie nicht bezaubernd aus?")
			say("Ihr Haar duftet nach Rosen.")
			say("Und ihr lächeln...")
			say("")
			say("Gehe bitte zu ihr")
			say("und frage sie mal")
			say("wie man ihr etwas gutes")
			say("tun könnte.")
			say("")
			set_state(to_hear_about_her)
			
		end
	end
	
	state to_hear_about_her begin	
		when letter begin
			setskin(NOWINDOW)
			q.set_title("Frage Ariyoung")
			q.start()
			makequestbutton("Frage Ariyoung")
			
			local v=find_npc_by_vnum(20021)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Ariyoung")
			end

		end
		
		when info or button begin
			say(locale.NOTICE_COLOR.."Frage Ariyoung"..locale.NORMAL_COLOR)
			say("")
			say("Huan-So hat sich in Ariyoung")
			say("verliebt und dich gebeten")
			say("sie zu fragen was sie mag.")
			say("")
			say("")
		end
		
		when  __TARGET__.target.click or
			20021.chat."Was magst du?" begin
			target.delete("__TARGET__")
			say("Ariyoung:")
			say("Was sagst du?")
			say("Ich habe einen Heimlichen")
			say("Verehrer?")
			say("")
			wait()
			say("Ariyoung:")
			say("Er lässt fragen was ich mag?")
			say("Hmm, mein Mann, Gott habe ihn Seelig,")
			say("hat mir Früher immer besondere Blumen")
			say("geschenkt.")
			say("Nur sind sie schwer zu beschaffen.")
			say("Sie wachsen nur in einer gefährlichen")
			say("Ecke im anderen Dorf.")
			say("Diese Blumen Liebe ich einfach.")
			say("")
			
			set_state(order)

	
		end
	end
	state order begin
		when letter begin
			setskin(NOWINDOW)
			q.set_title("Zurück zu Huahn-So")
			q.start()
			makequestbutton("Zurück zu Huahn-So")
			
			local v=find_npc_by_vnum(20022)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Huahn-So")
			end

		end
		when info or button begin
			say(locale.NOTICE_COLOR.."Zurück zu Huahn-So"..locale.NORMAL_COLOR)
			say("")
			say("Ariyoung sagte dir das sie speziele")
			say("Blumen Liebt.")
		end

		when __TARGET__.target.click or
			20022.chat."Ich weiss es"  begin
			target.delete("__TARGET__")
			say("")
			say("Huan-So:")
			say("Sie mag also bestimmte Blumen?")
			say("Wenn ich bloß hier weg könnte...")
			say("")
			say("Hmm, könntest du nicht für mich")
			say("ins nächste Dorf reisen und")
			say("die Blumen beschaffen?")
			say("")
			local s=select("Ja, mach ich.","Nein, keine Zeit.")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
					if  2==a then
						say("Huan-So:")
						say("Danke.")
						say("Komm wieder wenn du Zeit")
						say("für mich hast.")
						return
					end
					say("Huan-So:")
					say("Nicht?")
					say("Schade aber naja")
					say("ist ja deine Zeit.")
					set_state(__GIVEUP__)
					return
				end
				say("Huan-So:")
				say("Danke.")
				say("Gute Reise.")
				set_state(find_flower)
			end


	end

	state find_flower begin
		when letter begin
			setskin(NOWINDOW)
			q.set_title("Finde die Blume" )
			q.start()
			makequestbutton("Finde die Blume")
		
			local v=find_npc_by_vnum(20358)
			if 0==v then
			else
				target.vid("__TARGET__", v, "unbekannte Blume")
			end


		end
		when info or  button begin
			say(locale.NOTICE_COLOR.. "Finde die Blume"..locale.NORMAL_COLOR)
			say("")
			say("Huan-So hat dich gebeten")
			say("die Blumen zu finden die")
			say("Ariyoung so liebt.")
			say("Du findest sie nahe dem ersten Dorf.")

		end
		when 20022.chat. "Die Blumen" begin
			say("Huan-So :")
			say("Du hast die Blumen noch nicht?")
			say("Geh bitte los und besorge mir")
			say("die Blumen die Ariyoung")
			say("so liebt.")
		
			local s=select("Ich gehe sofort","Geh selber!")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
					if  2==a then
						say("Huan-So:")
						say("Danke")
						say("Bitte suche die Blumen.")
						return
					end
					say("Huan-So:")
					say("Schade.")
					say("Aber, Ok.")
					set_state(__GIVEUP__)
					return
				end
				say("Huan-So:")
				say("Danke")
				say("")
				say("Gute Reise.")
				say("")



		end	


		when __TARGET__.target.click or
			20358.chat."Wunderschöne Blume" with pc.getf("subquest_25","flower_done")==0 begin    
				target.delete("__TARGET__")
				say("Das ist die Blume von")
				say("der Ariyoung sprach.")
				pc.give_item2(30153, 1)                                                    
				set_state(go_to_reward)
			end
			
	end

	state go_to_reward begin
		when letter begin
			setskin(NOWINDOW)
			q.set_title("Rückkehr zu Huan-So" )
			q.start()
			makequestbutton("Rückkehr zu Huan-So")
			
			local v=find_npc_by_vnum(20022)
			if 0 == v then
				else
					target.vid("__TARGET__",v,"Huahn-So")
			end 

		end
		when info or  button begin
			say(locale.NOTICE_COLOR.. "Rückkehr zu Huan-So"..locale.NORMAL_COLOR)
			say("Du hast die Blume gefunden.")
			say("Bringe sie Huan-So.")

		end

		when __TARGET__.target.click or 
			20022.chat."Ich hab die Blume" with pc.count_item(30153) > 0 begin      
			target.delete("__TARGET__")
			say("Huan-So:")
			say("Danke.")
			say("Ich hoffe damit kann ich")
			say("Ariyoung eine Freude machen.")
			say("Sie sieht so bezaubernd aus wenn")
			say("sie Glücklich ist.")
			pc.remove_item(30153,1 )
			
			say_reward("Du erhältst 4.000.000 Ehrfahrung.")
			pc.give_exp2(4000000)
			 set_quest_state("levelup","run")
			
			pc.give_item2(70024, 1)
			say_reward("Du erhältst " ..item_name(70024).."")

			clear_letter()
			set_state(__COMPLETE__)

		end
	end

	state __GIVEUP__ begin
	end
	state __COMPLETE__ begin
	end
end
Q4
Quote:
Code:
quest subquest_28 begin
	state start begin
		when login or levelup with pc.level >=90 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			local v=find_npc_by_vnum(20017)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Yu-Hwan")
			end
		end

		when __TARGET__.target.click or
			20017.chat."Eine neue Harfe" begin
			target.delete("__TARGET__")
			say("Yu-Hwan:")
			say("Hmhmhm")
			say("Frage bitte den Schmied")
			say("Wielange er noch für meine")
			say("neue Harfe braucht.")
			say("")
			set_state(to_weaponshop)
		end
	end

	state to_weaponshop begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Frage an den Schmied")
			q.set_title("Frage an den Schmied")
			q.start()
			
			local v=find_npc_by_vnum(20016)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Schmied")
			end

		end
		when info or button begin
			say(locale.NOTICE_COLOR.."Frage an den Schmied"..locale.NORMAL_COLOR)
			say("")
			say("Frage den Schmied wielange")
			say("er noch für die Harfe von")
			say("Yu-Hwan brauch.")
		end

		
		when __TARGET__.target.click or
			20016.chat."Die Harfe?"begin
			target.delete("__TARGET__")
			say("Schmied:")
			say("Yu-Hwan schickt dich?")
			say("Sage ihm bitte das es mir")
			say("Furchbar leid tut")
			say("aber ich habe kein Wattebausch.")
			say("Ohne diesen kann ich meine")
			say("Arbeit nicht fortsetzten.")
			say("")
			say("")	
			set_state(back_to_youhwan)

		end
	end
	state back_to_youhwan begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zurück zu Yu-Hwan")
			q.set_title("Zurück zu Yu-Hwan")
			q.start()
		
			local v=find_npc_by_vnum(20017)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Yu-Hwan")
			end


		end
		
		when info or  button begin
			say(locale.NOTICE_COLOR.."Zurück zu Yu-Hwan"..locale.NORMAL_COLOR)
			say("Sage Yu-Hwan das der Schmied")
			say("Einen Wattebausch braucht.")
			say("")
		end
		
		when __TARGET__.target.click or
			20017.chat."Dem Schmied fehlt etwas" begin
			target.delete("__TARGET__")
			say("Yu-Hwan:")
			say("Schade.")
			say("So werde ich nie meine neue")
			say("Harfe bekommen.")
			say("Könntest du nicht versuchen")
			say("Einen Wattebausch zu bekommen?")
			say("Die "..mob_name(2054).." haben eigentlich immer welche.")
			say("")
			say("")
			local s=select("Ja, mach ich","Ich mag keine Musik." )
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if  2==a then
					say("Yu-Hwan:")
					say("Ok")
					say("Komm wieder wen du Zeit hast.")
					say("")
					say("")
					return
				end
				say("Yu-Hwan:")
				say("Schade")
				say("Musik geht doch in die Seele.")
				say("Wie kann man so etwas nicht lieben?")
				say("")
				say("")
				set_state(__GIVEUP__)
				return
			end
					
			say("Yu-Hwan:")
			say("Danke.")
			say("Ich wünsche dir viel Erfolg.")
			say("")
			set_state(find_spider)
			
		end

	end

		
		
		
	
	state find_spider begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Wattebausch")
			q.set_title("Wattebausch")
			q.start()
			
			if pc.count_item(30163)>0 then	
				local v=find_npc_by_vnum(20017)
				if 0!= v then
					target.vid("__TARGET__",v,"Yu-Hwan")
				end 
			end

		end
		when info or  button begin
			if pc.count_item(30163)>0 then	
				say(locale.NOTICE_COLOR.."Du hast den Wattebausch"..locale.NORMAL_COLOR)
				say("")
				say("Gehe zu Yu-Hwan")
				say("und bring ihm den Wattebausch.")
				say("")
				return
			end
	
			say(locale.NOTICE_COLOR.."Töte "..mob_name(2054)..""..locale.NORMAL_COLOR)
			say("")
			say("Die "..mob_name(2054).."")
			say("haben einen Wattebausch.")
			say("")
		end

		when 2054.kill  begin
			
			local s = number(1, 100)
			if s <= 5 and pc.count_item(30163)==0  then
				pc.give_item2(30163, 1)

			end
		end

		when __TAEGET__.target.click or 
			20017.chat."Wattebausch" begin
			target.delete("__TARGET__")
			if  pc.count_item(30163)>=1 then 
				target.delete("__TARGET__")
				say("Yu-Hwan:")
				say("Du hast tatsächlich einen")
				say("Wattebausch.")
				say("Dank dir kann ich weiter")
				say("Musizieren.")
				say("")
				pc.remove_item(30163, 1)
				say_reward("Ausserdem:")
				say_reward("Du erhältst 200.000.000 Ehrfahrung.")
				pc.give_exp2(200000000)
				say_reward("Du erhältst eine Regenbogenstein.")
				pc.give_item2(50512, 1)
				say_reward("Du erhältst eine Segenskugel.")
				pc.give_item2(70024, 1)
				clear_letter()
				set_state(__COMPLETE__)
				return
			else
				say("Yu-Hwan:")
				say("Du hast keinen Wattebausch!")
				say("Suchst du bitte weiter?")
				say("")
				local s=select("Ja, mach ich","Nein, keine lust." )
				if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if  2==a then
					say("Yu-Hwan:")
					say("Ok")
					say("Komm wieder wen du Zeit hast.")
					say("")
					say("")
					return
				end
				say("Yu-Hwan:")
				say("Schade")
				say("Musik geht doch in die Seele.")
				say("Wie kann man so etwas nicht lieben?")
				say("")
				say("")
				set_state(__GIVEUP__)
				return
				end
						
				say("Yu-Hwan:")
				say("Danke.")
				say("")
			end

		end
	end	
  state __GIVEUP__ begin
  end
  state __COMPLETE__ begin
	  
  end
  end
Q5
Quote:
Code:
quest subquest_34 begin
	state start begin
		when login or levelup or enter with pc.get_level() >=75 begin
			set_state( information )
		end
	end

	state information begin
		when letter begin
					
			local v = find_npc_by_vnum(20355)

			if v != 0 then
				target.vid("__TARGET__", v, "Waechter")
			end
		end

				
		when __TARGET__.target.click or
			20355.chat."Schwarzwind Clan" with pc.level >= 75  begin
			target.delete("__TARGET__")

			say("Hauptmann:")
			say("Aloa,")
			say("Ich habe eine neue")
			say("Idee gegen den Schwarzwind Clan.")
			say("Bitte Töte ")
			say(""..mob_name(454)..", "..mob_name(455).." und "..mob_name(456).."")
			say("")
			wait()
			say("Hauptmann:")
			say("Ich glaube")
			say("Die Anführer des Schwarzind Clan")
			say("sind "..mob_name(454)..", "..mob_name(455).." und"..mob_name(456)..".")
			say("Deshalb müssen sie sterben.")
			say("Die Sicherheit des Dorfes")
			say("hängt davon ab.")
			say("")
			say("")
			local s=select("Ich mach es sofort.","Wayne?")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if  2==a then
					say("Hauptmann:")
					say("Melde dich wenn du Zeit hast.")
					say("")
					return
				end
				say("Hauptmann:")
				say("Verräter!")
				say("")
				set_state(__GIVEUP__)
				return
			end
			say("Hauptmann:")
			say("Ich wünsche dir")
			say("Viel Erfolg.")
			say("")	
			say("")
			set_state(bye_blackwind)
		end	
	end
	state bye_blackwind begin
		when letter begin
			send_letter("Tot dem Schwarzwind Clan")
		end

		when info or button begin
			say(locale.NOTICE_COLOR.."Tot dem Schwarzwind Clan"..locale.NORMAL_COLOR)
			say("Der Hauptmann hat dich gebeten")
			say(""..mob_name(454)..", "..mob_name(455).." und "..mob_name(456).."")
			say("zu töten.")
			
		end
		when 20355.chat."Schwarzwind Clan" with pc.level >=32 begin
			say("Noch hier?")
			local s=select("Ich bin auf dem Weg","Kla ich mach es nicht.")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if  2==a then
					say("Hauptmann:")
					say("Melde dich wenn du Zeit hast.")
					say("")
					return
				end
				say("Hauptmann:")
				say("Verräter!")
				say("")
				set_state(__GIVEUP__)
				return
			end
			say("Hauptmann:")
			say("Ich wünsche dir")
			say("Viel Erfolg.")
			say("")	
			say("")
		end
		
	
		when 454.kill begin
			pc.setqf("kill_m1",1)
				
			if	pc.getqf("kill_m1")==1	and	pc.getqf("kill_m2")==1 and	pc.getqf("kill_m3")==1	then
				set_state(hunt_reward)
			end
			return
		end
		when 455.kill begin
				pc.setqf("kill_m2",1)
			
				if	pc.getqf("kill_m1")==1	and	pc.getqf("kill_m2")==1 and	pc.getqf("kill_m3")==1	then
					set_state(hunt_reward)
				end
				return

		end

		when 456.kill begin
			pc.setqf("kill_m3",1)
			
			if	pc.getqf("kill_m1")==1	and	pc.getqf("kill_m2")==1 and	pc.getqf("kill_m3")==1	then
				set_state(hunt_reward)
			end
			return
				
		end
	
			
	end
	
	state hunt_reward begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Rückkehr zum Hauptmann")
			q.set_title("Rückkehr zum Hauptmann")
			q.start()
		
			local v = find_npc_by_vnum(20355)

			if v != 0 then
				target.vid("__TARGET__", v, "Waechter")
			end
		end

		when info or button begin
			say(locale.NOTICE_COLOR.."Rückkehr zum Hauptmann"..locale.NORMAL_COLOR)
			say("Du hast die Anführer getötet.")
			say("Sage es dem Hauptmann.")
			say("")
		end
		
		when __TARGET__.target.click or
			20355.chat."Die Anführer" begin
			target.delete("__TARGET__")
			say("Hauptmann:")
			say("Gut gemacht.")
			say("Dank dir ist das Dorf")
			say("vorerst in Sicherheit.")
			say("Deine Belohnung!")
			say("")
			say_reward("Du erhälst " ..item_name(70024).."")
			pc.give_item2(70024, 1)
			say_reward("Du erhältst 10.000.000 Ehrfahrung.")
			pc.give_exp2(10000000)
			set_quest_state("levelup","run")
			say_reward("Du erhältst 100.000.000 Yang.")
			pc.change_money(100000000)
			say_reward("Du erhältst eine Gegenangriffsstrategie.")
			pc.give_item2(70031, 1)
			say_reward("Du erhältst eine Pferdemedaille.")
			pc.give_item2(50050, 1)
			
			set_state(THEEND)
			clear_letter()	

			pc.setqf("kill_m1",0)
			pc.setqf("kill_m2",0)
			pc.setqf("kill_m3",0)
		end

		end
	state __GIVEUP__ begin
	end
	state THEEND begin
	end
end
Q6
Quote:
Code:
quest subquest_42 begin 
	state start begin
		when login or levelup with pc.level >= 80 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			
			local vnum=0

			if pc.get_empire() == 1 then
				vnum= 20306
			elseif pc.get_empire() == 2 then
				vnum= 20326
			elseif pc.get_empire() == 3 then
				vnum=20346
			end


			local v=find_npc_by_vnum(vnum)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Krit-Lehre")
			end
		end

		when __TARGET__.target.click or
		 20306.chat."Die geheime Lehre"  begin
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Hey Fremder,")
			say("Ich hoffe du hast einen")
			say("Moment Zeit für mich.")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Wir haben mitbekommen")
			say("das es Bücher gibt in denen")
			say("steht wie wir unsere Macht")
			say("noch erhöhen können.")
			say("")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Töte bitte")
			say(""..mob_name(774)..", "..mob_name(775).."und "..mob_name(776)..".")
			say("Sie besitzen die Tempellehre und ")
			say("den Tempelschal um auch alles zu")
			say("Lernen.")
			say("")
		
			local s=select("Ja, ich besorg es.","Nein, keine lust..")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if 2==a then
					say("Lehrer der Drachenmacht:")
					say("Komm wieder sobald du Zeit hast")
					say("")
					return
				end
				say("Lehrer der Drachenmacht:")
				say("Schade...")
				say("Es hätte uns mit")
				say("Sicherheit weiter")
				say("geholfen.")
				say("")
				set_state(__GIVEUP__)
				return
			end
			say("Lehrer der Drachenmacht:")
			say("Dann wünsch ich dir")
			say("eine gute Reise.")
			say("")
			set_state(for_the_die)

			end

		when __TARGET__.target.click or
			20326.chat."Die geheime Lehre"  begin
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Hey Fremder,")
			say("Ich hoffe du hast einen")
			say("Moment Zeit für mich.")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Wir haben mitbekommen")
			say("das es Bücher gibt in denen")
			say("steht wie wir unsere Macht")
			say("noch erhöhen können.")
			say("")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Töte bitte")
			say(""..mob_name(774)..", "..mob_name(775).."und "..mob_name(776)..".")
			say("Sie besitzen die Tempellehre und ")
			say("den Tempelschal um auch alles zu")
			say("Lernen.")
			say("")
		
			local s=select("Ja, ich besorg es.","Nein, keine lust..")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if 2==a then
					say("Lehrer der Drachenmacht:")
					say("Komm wieder sobald du Zeit hast")
					say("")
					return
				end
				say("Lehrer der Drachenmacht:")
				say("Schade...")
				say("Es hätte uns mit")
				say("Sicherheit weiter")
				say("geholfen.")
				say("")
				set_state(__GIVEUP__)
				return
			end
			say("Lehrer der Drachenmacht:")
			say("Dann wünsch ich dir")
			say("eine gute Reise.")
			say("")
			set_state(for_the_die)

			end




		when __TARGET__.target.click or
			20346.chat."Die geheime Lehre"  begin
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Hey Fremder,")
			say("Ich hoffe du hast einen")
			say("Moment Zeit für mich.")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Wir haben mitbekommen")
			say("das es Bücher gibt in denen")
			say("steht wie wir unsere Macht")
			say("noch erhöhen können.")
			say("")
			say("")
			wait()
			say("Lehrer der Drachenmacht:")
			say("Töte bitte")
			say(""..mob_name(774)..", "..mob_name(775).."und "..mob_name(776)..".")
			say("Sie besitzen die Tempellehre und ")
			say("den Tempelschal um auch alles zu")
			say("Lernen.")
			say("")
		
			local s=select("Ja, ich besorg es.","Nein, keine lust..")
			if 2==s then
				say("Quest beenden?")
				local a=select("Ja","Nein")
				if 2==a then
					say("Lehrer der Drachenmacht:")
					say("Komm wieder sobald du Zeit hast")
					say("")
					return
				end
				say("Lehrer der Drachenmacht:")
				say("Schade...")
				say("Es hätte uns mit")
				say("Sicherheit weiter")
				say("geholfen.")
				say("")
				set_state(__GIVEUP__)
				return
			end
			say("Lehrer der Drachenmacht:")
			say("Dann wünsch ich dir")
			say("eine gute Reise.")
			say("")
			set_state(for_the_die)

			end

		end


	state for_the_die begin

		when letter begin

			setskin(NOWINDOW)
			makequestbutton("Geheime Lehre")
			q.set_title("Geheime Lehre")
			q.start()
			
			if  pc.count_item(30147) >=1 and  pc.count_item(30148) >=1 then
					local vnum=0

					if pc.get_empire() == 1 then
						vnum= 20306
					elseif pc.get_empire() == 2 then
						vnum= 20326
					elseif pc.get_empire() == 3 then
						vnum= 20346
					end

					local v=find_npc_by_vnum(vnum)
					if 0!= v then
						target.vid("__TARGET__",v,"")
					end 
				end	

		end		
			
	
		when info or  button begin
			if  pc.count_item(30147) >=1 and  pc.count_item(30148) >=1 then
				say(locale.NOTICE_COLOR..  "Die geheime Lehre" ..locale.NORMAL_COLOR)
				say("")
				say("Du hast alles was der")
				say("Lehrer der Drachenmacht")
				say("haben wollte.")
				say("")
				return
			end
			
			say(locale.NOTICE_COLOR..  "Die geheime Lehre" ..locale.NORMAL_COLOR)
			say("")
			say("Der Lehrer der Drachenmacht")
			say("möchte das du")
			say(""..mob_name(774)..", "..mob_name(775).." oder "..mob_name(776).."")
			say("tötest.")
			say("Sie haben die Tempellehre")
			say("und den Tempelschal.")
			say("")

		end


					
		when 774.kill or 775.kill or 776.kill  begin
			local s = number(1, 100)
			
			if s <= 5 and pc.count_item(30147)==0 then
				pc.give_item2(30147, 1)
			end	
	
			local a = number(1, 100)
			if a <= 5 and pc.count_item(30148)==0 then
				pc.give_item2(30148, 1)
			end
			
						
		end
			
				
		when __TARGET__.target.click or
			20306.chat."Ich habe alles." with pc.count_item(30147) >=1 and  pc.count_item(30148) >=1 begin
		
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Ja, wunderbar.")
			say("Nun können wir versuchen")
			say("das zu entschlüsseln.")
			say("Danke für deine Hilfe.")
			say("Hier ist deine Belohnung.")
			say("")
			say("")
			pc.remove_item(30147,1)
			pc.remove_item(30148,1)
			

	

			clear_letter()
			set_state(COMPLETE)

		end
	
		when __TARGET__.target.click or 
			20326.chat."Ich habe alles." with pc.count_item(30147) >=1 and  pc.count_item(30148) >=1 begin
		
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Ja, wunderbar.")
			say("Nun können wir versuchen")
			say("das zu entschlüsseln.")
			say("Danke für deine Hilfe.")
			say("Hier ist deine Belohnung.")
			say("")
			say("")
			pc.remove_item(30147, 1)
			pc.remove_item(30148, 1)
			say_reward("Du erhältst 50.000.000 Yang")
			pc.change_money(50000000)
	

			clear_letter()
			set_state(COMPLETE)

		end
	
		when __TARGET__.target.click or 
			20346.chat."Ich habe alles." with pc.count_item(30147) >=1 and  pc.count_item(30148) >=1 begin
		
			target.delete("__TARGET__")
			say("Lehrer der Drachenmacht:")
			say("Ja, wunderbar.")
			say("Nun können wir versuchen")
			say("das zu entschlüsseln.")
			say("Danke für deine Hilfe.")
			say("Hier ist deine Belohnung.")
			say("")
			say("")
			pc.remove_item(30147, 1)
			pc.remove_item(30148, 1)
			say_reward("Du erhältst 17.000.000 Ehrfahrung.")
			say_reward("Du erhältst 1 Regenbogenstein.")
			pc.give_exp2(17000000)
			pc.give_item2(50512, 1)
	


			clear_letter()
			set_state(COMPLETE)

		end

end

	state __GIVEUP__ begin
	end

	state COMPLETE begin
		when enter begin
			q.done()
		end
	end


end
Q7 (Hier werden die Kills nicht runter gezählt)
Quote:
Code:
quest pvpquest 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 200")
            say("Spieler aus anderen Reichen tötest!")
            say_reward("Töte 200 andere Spieler aus anderen Reichen!")
            say("")
            pc.setqf("state", 200)
            q.set_counter("kills", 200)
            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 200 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("200 Spieler aus anderen Reichen zu töten!")
                say("Du erhälst für deine Mühen:")
				say_reward("1x Ekstasefächer+9")
				say_reward("1x Siamesenmesser+9")
                say_reward("80.000.000 Yang")
                say_reward("80.000.000 EXP")
                pc.change_money(80000000)
                pc.give_item2(1129, 1)
                pc.give_item2(7159, 1)
                pc.give_exp2(80000000)
                notice_all("Gerade eben wurde eine 200 Killquest absolviert Glückwunsch an:")
				notice_all("".. pc.get_name() .." Viel spaß mit deiner Belohnung")
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end
    end

    state __COMPLETE__ begin
    end
end
Hoffe ihr könnt helfen :)
05/27/2011 22:02 .Delta#2430
wegen deinem counter: probiers damit mal
PHP Code:
quest pvpquest 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 200")
            
say("Spieler aus anderen Reichen tötest!")
            
say_reward("Töte 200 andere Spieler aus anderen Reichen!")
            
say("")
            
pc.setqf("state", 0)
            
q.set_counter("kills", 200)
            
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 ".." "..200-pc.getqf("state").."von 200 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 <= 200 then
                pc
.setqf("state", count)
                
q.set_counter("kills", -count)
            
end
            
if count == 200 then
                say_title
("Du hast es geschafft!")
                
say("200 Spieler aus anderen Reichen zu töten!")
                
say("Du erhälst für deine Mühen:")
                
say_reward("1x Ekstasefächer+9")
                
say_reward("1x Siamesenmesser+9")
                
say_reward("80.000.000 Yang")
                
say_reward("80.000.000 EXP")
                
pc.change_money(80000000)
                
pc.give_item2(1129, 1)
                
pc.give_item2(7159, 1)
                
pc.give_exp2(80000000)
                
notice_all("Gerade eben wurde eine 200 Killquest absolviert Glückwunsch an:")
                
notice_all("".. pc.get_name() .." Viel spaß mit deiner Belohnung")
                
clear_letter()
                
set_state(__COMPLETE__)

            
end
        end
    end
    end

    state __COMPLETE__ begin
    end
end 
Und hab die anderen Quests mal "überflogen" aber hab eig keinen Fehler gefunden, schreib doch mal wie Fehlercodes, die Putty/VPC ausgibt