[SERVICE] Die Questkontrolle

10/08/2012 12:14 selomelox3#6961
[CODE]quest player_kill1 begin
state start begin
when login with pc.level >= 80 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 50")
say("Spieler aus anderen Reichen tötest!")
say_reward("Töte 50 andere Spieler aus anderen Reichen!")
say("")
pc.setqf("state", 50)
q.set_counter("kills", 50)
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 50 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 <= 50 then
pc.setqf("state", count)
q.set_counter("kills", -count)
end
if count == 0 then
say_title("Du hast es geschafft!")
say("50 Spieler aus anderen Reichen zu töten!")
say("Du erhälst für deine Mühen:")
say_reward("30x Weiße Perlen")
say_reward("30x Blaue Perlen")
say_reward("30x Rote Perlen")
pc.give_item2(27992, 30)
pc.give_item2(27993, 30)
pc.give_item2(27994, 30)
notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
notice_all("Er/Sie hat 50 Spieler getötet, Glückwunsch!")
clear_letter()
set_state(__COMPLETE__)

end
end
end
end

state __COMPLETE__ begin
end
end [CODE]
10/08/2012 15:05 [ShiizoPhreN]™#6962
Code:
quest player_kill1 begin
	state start begin
		when login with pc.level >= 80 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 50")
			say("Spieler aus anderen Reichen tötest!")
			say_reward("Töte 50 andere Spieler aus anderen Reichen!")
			say("")
			pc.setqf("state", 50)
			q.set_counter("kills", 50)
			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 50 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 <= 50 then
				pc.setqf("state", count)
				q.set_counter("kills", -count)
			end
			if count == 0 then
				say_title("Du hast es geschafft!")
				say("50 Spieler aus anderen Reichen zu töten!")
				say("Du erhälst für deine Mühen:")
				say_reward("30x Weiße Perlen")
				say_reward("30x Blaue Perlen")
				say_reward("30x Rote Perlen")
				pc.give_item2(27992, 30)
				pc.give_item2(27993, 30)
				pc.give_item2(27994, 30)
				notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
				notice_all("Er/Sie hat 50 Spieler getötet, Glückwunsch!")
				clear_letter()
				set_state(__COMPLETE__)
			end
		end
	end
	
	state __COMPLETE__ begin
	end
end
So sollte sie funktionieren is untested...
10/08/2012 15:45 .ZiPPO#6963
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?"  begin 
            say_title
("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
                pc
.warp( 93200 , 000 )
            elseif 
s == 2 then 
                pc
.warp() 
            elseif 
s == 3 then 
                pc
.warp() 
            elseif 
s == 4 then 
                
return 
            
end 
        end 
    end 
end 
kann mir da jemand noch ein min. Level einbauen?
King Regards,
10/08/2012 16:07 JannikKnorke#6964
Wenn ein, oder der erste, Skill zu G wird = x Achievementpunkte

In der Achievement.quest die weiter unten steht aus dem AbschiedsRelease

So schon mal nicht:
PHP Code:
when skill_level == 30 begin
    local Reward 
= 10 
    local Achievement 
= "G Skill" 
    
local actual_achievement_points = pc.getqf("achievement_points") 
    
pc.setqf("G Skill", 1) 
    
pc.setqf("achievement_points", actual_achievement_points + Reward)             
    
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
end 
PHP Code:
when pc.get_skill_level(skill_vnum) == 30 begin
    local Reward 
= 10 
    local Achievement 
= "G Skill" 
    
local actual_achievement_points = pc.getqf("achievement_points") 
    
pc.setqf("G Skill", 1) 
    
pc.setqf("achievement_points", actual_achievement_points + Reward)             
    
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
end 
Hier die normale und komplette Quest

Bitte um Hilfe
10/08/2012 16:19 ©by Noa#6965
Quote:
Originally Posted by .CrosSHair View Post
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?"  begin 
            say_title
("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
                pc
.warp( 93200 , 000 )
            elseif 
s == 2 then 
                pc
.warp() 
            elseif 
s == 3 then 
                pc
.warp() 
            elseif 
s == 4 then 
                
return 
            
end 
        end 
    end 
end 
kann mir da jemand noch ein min. Level einbauen?
King Regards,
für den ganzen teleporter oder nur für einzelne maps die lvl begrenzung?
10/08/2012 16:20 [ShiizoPhreN]™#6966
Quote:
Originally Posted by .CrosSHair View Post
kann mir da jemand noch ein min. Level einbauen?
King Regards,

Code:
quest teleporter begin 
    state start begin 
        when 20090.chat."Möchtest du die Map wechseln?" with pc.get_level() >=*DEINLEVEL* begin 
            say_title("Guten Tag, ".. pc.get_name() ..",") 
            say("wähle die Map aus, in die du möchtest:") 
            local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if s == 1 then 
                pc.warp( 93200 , 000 )
            elseif s == 2 then 
                pc.warp() 
            elseif s == 3 then 
                pc.warp() 
            elseif s == 4 then 
                return 
            end 
        end 
    end 
end
10/08/2012 16:30 ©by Noa#6967
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?" with pc.get_level() >= lvl begin         --Dein level eingeben lvl>= oder ==. (für den ganzen teleporter)
            
say_title("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
            
            
--ab hier, lvl begrenzung für einzelne maps
                
if pc.get_level()== lvl then        --lvl eintrag 
                    pc
.warp( 93200 , 000 )
                else
                    
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
if pc.get_level()== lvl then        --lvl eintrag
                pc
.warp() 
                else
                
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 3 then 
                
if pc.get_level()== lvl then        --lvl eintrag
                pc
.warp() 
                else 
                
chat("Dein Level ist zu Niedrig.")
                
end
            end 
        end 
    end 
end 
10/08/2012 18:28 .ZiPPO#6968
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?" with pc.get_level() >= 0 begin         --Dein level eingeben lvl>= oder ==. (für den ganzen teleporter)
            
say_title("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
            
            
--ab hier, lvl begrenzung für einzelne maps
                
if pc.get_level()== 50 then     --lvl eintrag 
                    pc
.warp( 2639900 , 26933 )
                else
                    
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
if pc.get_level( 819200 , 716800)== 90 then      --lvl eintrag
                pc
.warp() 
                else
                
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 3 then 
                
if pc.get_level()== 120 then      --lvl eintrag
                pc
.warp( 35000 , 65000) 
                else 
                
chat("Dein Level ist zu Niedrig.")
                
end
            end 
        end 
    end 
end 
Bin lv 53 und wenn ich auf die erste map will sagt er mir ich bin zu niedrig?:D
10/08/2012 18:56 ©by Noa#6969
die == heißen das die exakt das lvl sein müssen also nur bei der ersten map lvl 50 höhere spieler können nicht rein, mach am besten ">= 50"; ">=90"; ">=120" & da du die lvl grenze für die einzelne maps machen willst kannst du die Begrenzung oben entfernen.
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?" begin
            say_title
("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
                
if pc.get_level()>= 50 then     --lvl eintrag 
                    pc
.warp( 2639900 , 26933 )
                else
                    
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
if pc.get_level( 819200 , 716800)>= 90 then      --lvl eintrag
                pc
.warp() 
                else
                
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 3 then 
                
if pc.get_level()>= 120 then      --lvl eintrag
                pc
.warp( 35000 , 65000) 
                else 
                
chat("Dein Level ist zu Niedrig.")
                
end
            end 
        end 
    end 
end 
10/08/2012 18:56 DasKuchen#6970
Quote:
Originally Posted by .CrosSHair View Post
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?" with pc.get_level() >= 0 begin         --Dein level eingeben lvl>= oder ==. (für den ganzen teleporter)
            
say_title("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
            
            
--ab hier, lvl begrenzung für einzelne maps
                
if pc.get_level()== 50 then     --lvl eintrag 
                    pc
.warp( 2639900 , 26933 )
                else
                    
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
if pc.get_level( 819200 , 716800)== 90 then      --lvl eintrag
                pc
.warp() 
                else
                
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 3 then 
                
if pc.get_level()== 120 then      --lvl eintrag
                pc
.warp( 35000 , 65000) 
                else 
                
chat("Dein Level ist zu Niedrig.")
                
end
            end 
        end 
    end 
end 
Bin lv 53 und wenn ich auf die erste map will sagt er mir ich bin zu niedrig?:D

Sollte so gehen (keine Lust gehabt es einzurücken)
PHP Code:
quest teleporter begin 
    state start begin 
        when 20090.chat
."Möchtest du die Map wechseln?" begin 
            say_title
("Guten Tag, ".. pc.get_name() ..",") 
            
say("wähle die Map aus, in die du möchtest:") 
            
local s = select("Farm Map","Kommt noch","Kommt noch","Abbrechen") 
            if 
s == 1 then 
                
if pc.get_level() >= 50 then     --Wenn Level 50 oder höher ist
                    pc
.warp( 2639900 , 26933 )
                elseif 
pc.get_level() <= 50 then     --Wenn Level kleiner als 50 ist
                    chat
("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
if pc.get_level() >= 90 then
                pc
.warp() 
                elseif 
pc.get_level() <= 90 then
                chat
("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 3 then 
                
if pc.get_level() >= 120 then
                pc
.warp( 35000 , 65000) 
                elseif 
pc.get_level()<= 90 then 
                chat
("Dein Level ist zu Niedrig.")
                
end
            end 
        end 
    end 
end 
10/08/2012 19:06 ©by Noa#6971
zu kompliziert & aufwendig, mit >= lvl reicht es vollkommen z.b bei
pc.get_level() >= 50 then ---falls der spieler höher oder gleich 50 ist dann teleport
else ---falls nicht höher oder gleich 50 das bedeutet falls man lower ist kommt der text
chat("text")
10/08/2012 21:55 xxThePumaxx#6972
Nabend, com unzwarf ne frage eher gesagt weiß nicht mehr weiter ..
ich möchte in dieser quest einfügen das ich gerne
3x gift vnum : 99999
1x Truhe vnum : 99998
diese items brauch um die quest abzuschließen ..

Code:
quest rustungen begin
	state start begin
		when 20020.chat."Du hast die Rustung gefunden!" with pc.countitem("51039")>=1 begin 
			say("Ich danke dir treuer Abenteurer.")
			say("eine tolle Belohnung.")
			say("Möchteset du die Belohnung jetzt haben ?")
			local b=select("Ja", "Nein")
			if 1==b then
				if pc.countitem("51039")>=1 then
					pc.removeitem("51039", 1)
					pc.give_item2("119", 1)
					say("Hier hast du eine Truhe.")
					say("Sie enthält tolle Dinge.")
					say("Wenn du mir mehr Gift beschaffst")
					say("bekommst du mehr Truhen!")
					say("Also mach dich auf den Weg!")
					say("")
				end
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end

quest voodoopuppe2 begin
	state start begin
		when 20020.chat."Ich brauche Gift!" begin
			say("Hallo Abenteurer.")
			say("Ich brauche viele Flaschen Gift für")
			say("meine Experimente! Wenn du so eine Flasche")
			say("findest bring sie mir bitte.")
			say_item_vnum(19)
			say_item_vnum(229)
			say("Man findet das Gift bei Metin Steinen und")
			say("den Bossen !")
			say("Du bekommst für jede Flasche eine Belohung!")
			say("")
			
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end
10/08/2012 22:39 Computercrack#6973
Geht der Befehl so?
Quote:
game.set_event_flag("fightfull", game.get_event_flag("fightfull")+1)
10/09/2012 01:27 ©by Noa#6974
Quote:
Originally Posted by xxThePumaxx View Post
Nabend, com unzwarf ne frage eher gesagt weiß nicht mehr weiter ..
ich möchte in dieser quest einfügen das ich gerne
3x gift vnum : 99999
1x Truhe vnum : 99998
diese items brauch um die quest abzuschließen ..

Code:
quest rustungen begin
	state start begin
		when 20020.chat."Du hast die Rustung gefunden!" with pc.countitem("51039")>=1 begin 
			say("Ich danke dir treuer Abenteurer.")
			say("eine tolle Belohnung.")
			say("Möchteset du die Belohnung jetzt haben ?")
			local b=select("Ja", "Nein")
			if 1==b then
				if pc.countitem("51039")>=1 then
					pc.removeitem("51039", 1)
					pc.give_item2("119", 1)
					say("Hier hast du eine Truhe.")
					say("Sie enthält tolle Dinge.")
					say("Wenn du mir mehr Gift beschaffst")
					say("bekommst du mehr Truhen!")
					say("Also mach dich auf den Weg!")
					say("")
				end
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end

quest voodoopuppe2 begin
	state start begin
		when 20020.chat."Ich brauche Gift!" begin
			say("Hallo Abenteurer.")
			say("Ich brauche viele Flaschen Gift für")
			say("meine Experimente! Wenn du so eine Flasche")
			say("findest bring sie mir bitte.")
			say_item_vnum(19)
			say_item_vnum(229)
			say("Man findet das Gift bei Metin Steinen und")
			say("den Bossen !")
			say("Du bekommst für jede Flasche eine Belohung!")
			say("")
			
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end
es sollen 2 quests sein oder nicht?
die oberste ist die rüstungs quest wo man eine rüstung gg eine truhe eintauscht.
Die zweite quest mit der voodoopuppe & dem gift, ich denke das bringt wenig wenn man die quest fertig hat und man dabei nix bekommt.
PHP Code:
quest voodoopuppe2 begin
    state start begin
        when 20020.chat
."Ich brauche Gift!" begin
            say
("Hallo Abenteurer.")
            
say("Ich brauche viele Flaschen Gift für")
            
say("meine Experimente! Wenn du so eine Flasche")
            
say("findest bring sie mir bitte.")
            
say_item_vnum(19)
            
say_item_vnum(229)
            
say("Man findet das Gift bei Metin Steinen und")
            
say("den Bossen !")
            
say("Du bekommst für jede Flasche eine Belohung!")
            
say("")
            if 
pc.countitem("99999")>= 3 and pc.countitem("99998")>= 1 then
                chat
("Deine Belohnung ist ein Lob")

            
end
        end
    end
end 
10/09/2012 14:08 loll444555#6975
PHP Code:
quest achievement begin 
    state start begin         
        
--LOGIN 
        when login begin 
            local actual_achievement_points 
= pc.getqf("achievement_points") 
            if 
pc.getqf("firstlogin") != 1 then 
                local Reward 
= 1 
                pc
.setqf("firstlogin", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Dein_erster_Login%".. actual_achievement_points + Reward .."") 
            else 
                
cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
            
end 
        end 
     
        
--BOSSE 
        when 691.kill begin 
            local Reward 
= 2 
            local Achievement 
= "Oberork" 
            
local killcount = pc.getqf("691") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("691", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 791.kill begin 
            local Reward 
= 3 
            local Achievement 
= "Dunkler_Anführer" 
            
local killcount = pc.getqf("791") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("791", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 792.kill begin 
            local Reward 
= 4 
            local Achievement 
= "Dunkler_Geist-Anführer" 
            
local killcount = pc.getqf("792") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("792", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 1094.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Dämonen_Oberhaupt" 
            
local killcount = pc.getqf("1094") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("1094", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 1095.kill begin 
            local Reward 
= 10 
            local Achievement 
= "Blauer_Tod" 
            
local killcount = pc.getqf("1095") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("1095", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 1192.kill begin 
            local Reward 
= 12 
            local Achievement 
= "Große_Eishexe" 
            
local killcount = pc.getqf("1192") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("1192", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 1304.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Gelber_Tigergeist" 
            
local killcount = pc.getqf("1304") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("1304", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 1901.kill begin 
            local Reward 
= 4 
            local Achievement 
= "Neunschwanz" 
            
local killcount = pc.getqf("1901") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("1901", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 2091.kill begin 
            local Reward 
= 3 
            local Achievement 
= "Königinnenspinne" 
            
local killcount = pc.getqf("2091") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("2091", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 2206.kill begin 
            local Reward 
= 3 
            local Achievement 
= "Flammenkönig" 
            
local killcount = pc.getqf("2206") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("2206", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 2191.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Große_Wüstenschildkröte" 
            
local killcount = pc.getqf("2191") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("2191", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 2493.kill begin 
            local Reward 
= 25 
            local Achievement 
= "Beran-Setaou" 
            
local killcount = pc.getqf("2493") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("2493", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_getötet#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
         
        
--METINS 
        when 8020.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Shinsoo-Felsen" 
            
local killcount = pc.getqf("8020") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8020", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 8021.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Jinno-Felsen" 
            
local killcount = pc.getqf("8021") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8021", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 8022.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Chunjo-Felsen" 
            
local killcount = pc.getqf("8022") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8022", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 8023.kill begin 
            local Reward 
= 5 
            local Achievement 
= "Kaiserfelsen" 
            
local killcount = pc.getqf("8023") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8023", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 8026.kill begin 
            local Reward 
= 2 
            local Achievement 
= "Tu-Young" 
            
local killcount = pc.getqf("8026") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8026", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 
        when 8027.kill begin 
            local Reward 
= 3 
            local Achievement 
= "Jeon-Un" 
            
local killcount = pc.getqf("8027") 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("8027", killcount + 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward) 
            
cmdchat("achievement ".. Achievement .."_zerstört#".. killcount + 1  .."%".. actual_achievement_points + Reward .."") 
        
end 

        
--LEVELS 
        when login 
or levelup with pc.get_level() >= 50 and pc.getqf("Level50") != 1 begin 
            local Reward 
= 2 
            local Achievement 
= "Level_50" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level50", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
        when login 
or levelup with pc.get_level() >= 75 and pc.getqf("Level75") != 1 begin 
            local Reward 
= 5 
            local Achievement 
= "Level_75" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level75", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
        when login 
or levelup with pc.get_level() >= 85 and pc.getqf("Level85") != 1 begin 
            local Reward 
= 10 
            local Achievement 
= "Level_85" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level85", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
        when login 
or levelup with pc.get_level() >= 90 and pc.getqf("Level90") != 1 begin 
            local Reward 
= 25 
            local Achievement 
= "Level_90" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level90", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
        when login 
or levelup with pc.get_level() >= 95 and pc.getqf("Level95") != 1 begin 
            local Reward 
= 50 
            local Achievement 
= "Level_95" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level95", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
        when login 
or levelup with pc.get_level() >= 99 and pc.getqf("Level99") != 1 begin 
            local Reward 
= 100 
            local Achievement 
= "Level_99" 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
pc.setqf("Level99", 1) 
            
pc.setqf("achievement_points", actual_achievement_points + Reward)             
            
cmdchat("achievement ".. Achievement .."_erreicht%".. actual_achievement_points + Reward .."") 
        
end 
         
        
--CHECK EQUIP 
        when login begin 
            loop_timer
("check_eq", 10) 
        
end 
        when check_eq
.timer begin 
            local russi 
= pc.get_armor() 
            
local waffe = pc.get_weapon() 
            
local actual_achievement_points = pc.getqf("achievement_points") 
            
local Reward = 20 
            
if russi==11299 and pc.getqf("achievement_ssp") != 1 then 
                pc
.setqf("achievement_ssp", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Schwarzstahl-Panzer+9%".. actual_achievement_points + Reward .."") 
            elseif 
russi==11499 and pc.getqf("achievement_swa") != 1 then 
                pc
.setqf("achievement_swa", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Schwarzwindanzug+9%".. actual_achievement_points + Reward .."") 
            elseif 
russi==11699 and pc.getqf("achievement_mpp") != 1 then 
                pc
.setqf("achievement_mpp", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Magie-Plattenpanzer+9%".. actual_achievement_points + Reward .."") 
            elseif 
russi==11899 and pc.getqf("achievement_sk") != 1 then 
                pc
.setqf("achievement_sk", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Schwarze_Kleidung+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==189 and pc.getqf("achievement_gifti") != 1 then 
                pc
.setqf("achievement_gifti", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Giftschwert+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==199 and pc.getqf("achievement_lowenschw.") != 1 then 
                pc
.setqf("achievement_lowenschw.", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Löwenschwert+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==5129 and pc.getqf("achievement_orchiglocke") != 1 then 
                pc
.setqf("achievement_orchiglocke", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Orchideenglocke+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==2179 and pc.getqf("achievement_krahenstahl") != 1 then 
                pc
.setqf("achievement_krahenstahl", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Krähenstahlbogen+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==1139 and pc.getqf("achievement_teufelsflugenchak") != 1 then 
                pc
.setqf("achievement_teufelsflugenchak", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Teufelsflügel-Chakram+9%".. actual_achievement_points + Reward .."") 
            elseif 
waffe==3169 and pc.getqf("achievement_Grolli") != 1 then 
                pc
.setqf("achievement_Grolli", 1) 
                
pc.setqf("achievement_points", actual_achievement_points + Reward) 
                
cmdchat("achievement Grollschwert+9%".. actual_achievement_points + Reward .."") 
            
end 
        end 
         
        when 20006.chat
."Achievement Shop" begin 
            local actual_achievement_points 
= pc.getqf("achievement_points") 
            if 
actual_achievement_points <= 0 then 
                say_title
("".. mob_name(20006) ..":") 
                
say("") 
                
say("Hallo ".. pc.get_name() ..",") 
                
say("") 
                
say("Hier kannst du deine erworbenen Achievement-Points") 
                
say("gegen tolle Items eintauschen, falls du möchtest.") 
                
say("Leider hast du im Moment keine Achievement-Points,") 
                
say("die du eintauschen könntest") 
                
say("") 
                
say("") 
                
say("") 
                
say_reward("Komme mit Achievement-Points erneut zu mir") 
            else 
                
local achievment_points = pc.getqf("achievement_points")
                
say_title("".. mob_name(20006) ..":") 
                
say("") 
                
say("Hallo ".. pc.get_name() ..",") 
                
say("") 
                
say_reward("Guthaben : "..achievment_points.."")
                
say("Ich sehe du hast Achievement-Points gesammelt.") 
                
say("Möchtest du diese gegen tolle Items eintauschen?") 
                
say("Ich habe einige Items, ")   
                
say("die sehr wertvoll sein könnten.") 
                
local achievement = select("Eintauschen","Abbrechen") 
                if 
achievement == 3 then 
                    say_title
("".. mob_name(20006) ..":") 
                    
say("") 
                    
say("Please enter hour difference") 
                    
local hours = input() 
                    
say_title("".. mob_name(20006) ..":") 
                    
say("") 
                    
say("Please enter minute difference") 
                    
local minutes = input() 
                    
say_title("".. mob_name(20006) ..":") 
                    
say("") 
                    
say("Please enter second difference") 
                    
local seconds = input() 
                    
local var = search_time(hours,minutes,seconds) --hour/minute/second/ 
                    
local time = actual_time() 
                    
local timestamp = actual_timestamp() 
                    
say_title("".. mob_name(20006) ..":") 
                    
say("") 
                    
say("Actual Timestamp: ".. timestamp .."") 
                    
say("Actual Time: "..time) 
                    
say("Searched Time: ".. var.h ..":"..var.m..":"..var.s) 
                elseif 
achievement == 2 then 
                    
return 
                elseif 
achievement == 1 then 
                    say_title
("".. mob_name(20006) ..":") 
                    
say("") 
                    
say("Bitte wähle deine Kategorie.") 
                    
local selectcategory = select("Upp-Items","Hilfs-Items","Bonus-Items","Shop verlassen") 
                    if 
selectcategory == 4 then 
                        
return 
                    elseif 
selectcategory == 1 then 
                        say_title
("".. mob_name(20006) ..":") 
                        
say("") 
                        
say("Du möchtest Upp-Items?") 
                        
say("Ich habe ein großes Sortiment an Upp-Items.") 
                        
local uppitems = select("Weiße Perle","Blaue Perle","Rote Perle","Magisches Metall","Shop verlassen") 
                        if 
uppitems == 5 then 
                            
return 
                        elseif 
uppitems == 1 then 
                            local Price 
= 20 
                            say_title
("".. mob_name(20006) ..":") 
                            
say("") 
                            
say("Willst du eine Weiße Perle kaufen?") 
                            
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen") 
                            
say("") 
                            
say("") 
                            
say("") 
                            
say_reward("Sie kostet dich ".. Price .." Achievement-Points.") 
                            
local buyselection = select("Weiße Perle kaufen","Abbrechen") 
                            if 
buyselection == 2 then 
                                
return 
                            elseif 
buyselection == 1 then 
                                
if pc.getqf("achievement_points") < Price then 
                                    say_title
("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Du hast leider nicht genügend Achievement-Points.") 
                                    
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    
say("weitere Achievement-Points gesammelt hast") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    
say_title("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Hier bitte, deine Weiße Perle.") 
                                    
say("Diese Achievement-Points sind mir diese Perle wert.") 
                                    
say("Passe gut auf sie auf, sie ist sehr wertvoll.") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_item_vnum(27992) 
                                    
say_reward("Du hast eine Weiße Perle erhalten") 
                                    
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    
cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    
pc.give_item2(27992, 1) 
                                
end 
                            end 
                        
elseif uppitems == 2 then 
                            local Price 
= 30 
                            say_title
("".. mob_name(20006) ..":") 
                            
say("") 
                            
say("Willst du eine Blaue Perle kaufen?") 
                            
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen") 
                            
say("") 
                            
say("") 
                            
say("") 
                            
say_reward("Sie kostet dich ".. Price .." Achievement-Points.") 
                            
local buyselection = select("Blaue Perle kaufen","Abbrechen") 
                            if 
buyselection == 2 then 
                                
return 
                            elseif 
buyselection == 1 then 
                                
if pc.getqf("achievement_points") < Price then 
                                    say_title
("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Du hast leider nicht genügend Achievement-Points.") 
                                    
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    
say("weitere Achievement-Points gesammelt hast") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    
say_title("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Hier bitte, deine Blaue Perle.") 
                                    
say("Diese Achievement-Points sind mir diese Perle wert.") 
                                    
say("Passe gut auf sie auf, sie ist sehr wertvoll.") 
                                    
say_item_vnum(27993) 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Du hast eine Blaue Perle erhalten") 
                                    
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    
cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    
pc.give_item2(27993, 1) 
                                
end 
                            end 
                        
elseif uppitems == 3 then 
                            local Price 
= 40 
                            say_title
("".. mob_name(20006) ..":") 
                            
say("") 
                            
say("Willst du eine Rote Perle kaufen?") 
                            
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen") 
                            
say("") 
                            
say("") 
                            
say("") 
                            
say_reward("Sie kostet dich ".. Price .." Achievement-Points.") 
                            
local buyselection = select("Rote Perle kaufen","Abbrechen") 
                            if 
buyselection == 2 then 
                                
return 
                            elseif 
buyselection == 1 then 
                                
if pc.getqf("achievement_points") < Price then 
                                    say_title
("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Du hast leider nicht genügend Achievement-Points.") 
                                    
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    
say("weitere Achievement-Points gesammelt hast") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    
say_title("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Hier bitte, deine Rote Perle.") 
                                    
say("Diese Achievement-Points sind mir diese Perle wert.") 
                                    
say("Passe gut auf sie auf, sie ist sehr wertvoll.") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_item_vnum(27994) 
                                    
say_reward("Du hast eine Rote Perle erhalten") 
                                    
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    
cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    
pc.give_item2(27994, 1) 
                                
end 
                            end 
                        
elseif uppitems == 4 then 
                               local Price 
= 40 
                            say_title
("".. mob_name(20006) ..":") 
                            
say("") 
                            
say("Willst du eine Rote Perle kaufen?") 
                            
say("Du kannst sie zum Verbessern von Gegenständen gebrauchen") 
                            
say("") 
                            
say("") 
                            
say("") 
                            
say_reward("Sie kostet dich ".. Price .." Achievement-Points.") 
                            
local buyselection = select("Rote Perle kaufen","Abbrechen") 
                            if 
buyselection == 2 then 
                                
return 
                            elseif 
buyselection == 1 then 
                                
if pc.getqf("achievement_points") < Price then 
                                    say_title
("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Du hast leider nicht genügend Achievement-Points.") 
                                    
say("Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    
say("weitere Achievement-Points gesammelt hast") 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    
say_title("".. mob_name(20006) ..":") 
                                    
say("") 
                                    
say("Hier bitte, deine Rote Perle.") 
                                    
say("Diese Achievement-Points sind mir diese Perle wert.") 
                                    
say("Passe gut auf sie auf, sie ist sehr wertvoll.") 
                                    
say_item_vnum(27993) 
                                    
say("") 
                                    
say("") 
                                    
say("") 
                                    
say_reward("Du hast eine Rote Perle erhalten") 
                                    
pc.setqf("achievement_points", pc.getqf("achievement_points") - Price) 
                                    
cmdchat("achievementpoints ".. pc.getqf("achievement_points")) 
                                    
pc.give_item2(27994, 1) 
                                
end 
                            end 
                        end
                    
elseif selectcategory == 2 then 
                        say_title
("".. mob_name(20006) ..":") 
                        
say("") 
                        
say("Du brauchst also Items die dich im Spielverlauf") 
                        
say("weiterbringen und unterstützen?") 
                        
say("Sehr gern, auch hiervon hab ich einiges im Angebot") 
                        
local hilfsitems = select("Exp-Ring","Handschuh des Diebes","Shop verlassen") 
                        if 
hilfsitems == 3 then 
                            
return 
                        elseif 
hilfsitems == 1 then 
                            say_title
("".. mob_name(20006) ..":") 
                            
say("") 
                            
say("Eine gute Wahl, allerdings gibt habe ich hiervon") 
                            
say("verschiedene Angebote für deine Achievement-Points.") 
                            
say("Einige sind natürlich besser und ") 
                            
say("kosten dich mehr als andere.") 
                            
local expringe = select("3 Stunden Exp-Ring",""Abbrechen") 
                            if expringe == 2 then 
                                return 
                            elseif expringe == 1 then 
                                local Price = 10 
                                say_title("".. mob_name(20006) .."
:") 
                                say("") 
                                say("
Dieser Exp-Ring hält 30 Minuten lang.") 
                                say("
Du kannst ihn jederzeit an- und ausziehen,") 
                                say("
sodass du ihn sehr effizient benutzen kannst.") 
                                say("") 
                                say("") 
                                say("") 
                                say_reward("
Das ganze würde dich ".. Price .." Achievement-Points kosten.") 
                                local buyselection = select("
Exp-Ring kaufen","Abbrechen") 
                                if buyselection == 2 then 
                                    return 
                                elseif buyselection == 1 then                                 
                                local Price = 50 
                                say_title("".. mob_name(20006) .."
:") 
                                say("") 
                                say("
Dieser Exp-Ring hält 3 Stunden    lang.") 
                                say("
Du kannst ihn jederzeit an- und ausziehen,") 
                                say("
sodass du ihn sehr effizient benutzen kannst.") 
                                say("") 
                                say("") 
                                say("") 
                                say_reward("
Das ganze würde dich ".. Price .." Achievement-Points kosten.") 
                                local buyselection = select("
Exp-Ring kaufen","Abbrechen") 
                                if buyselection == 2 then 
                                    return 
                                elseif buyselection == 1 then 
                                    if pc.getqf("
achievement_points") < Price then 
                                        say_title("".. mob_name(20006) .."
:") 
                                        say("") 
                                        say("
Du hast leider nicht genügend Achievement-Points.") 
                                        say("
Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                        say("
weitere Achievement-Points gesammelt hast") 
                                        say("") 
                                        say("") 
                                        say("") 
                                        say_reward("
Sammel noch mehr Achievement-Points für dieses Item") 
                                        return     
                                    else 
                                        say_title("".. mob_name(20006) .."
:") 
                                        say("") 
                                        say("
Hier bitte, dein 3 stündiger Exp-Ring.") 
                                        say("
Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,") 
                                        say("
falls dir mal wenig Geld zur Verfügung steht.") 
                                        say("
Aber ich denke du kannst diesen Exp-Ring auch so gut gebrauchen.") 
                                        say("
Passe gut auf ihn auf.") 
                                        say_item_vnum(72003) 
                                        say_reward("
Du hast einen 3 stündigen Exp-Ring erhalten") 
                                        pc.setqf("
achievement_points", pc.getqf("achievement_points") - Price) 
                                        cmdchat("
achievementpoints ".. pc.getqf("achievement_points")) 
                                        pc.give_item2(72003, 1) 
                                                               
                                        end 
                                    end 
                                end 
                            end 
                        elseif hilfsitems == 2 then 
                            say_title("".. mob_name(20006) .."
:") 
                            say("") 
                            say("
Eine gute Wahl, allerdings gibt habe ich hiervon") 
                            say("
verschiedene Angebote für deine Achievement-Points.") 
                            say("
Einige sind natürlich besser und ") 
                            say("
kosten dich mehr als andere.") 
                            local handschuhe = select("
3 Stunden Diebeshandschuh","Abbrechen") 
                            if handschuhe == 2 then 
                                return 
                            
                            elseif handschuhe == 1 then 
                                local Price = 30
                                say_title("".. mob_name(20006) .."
:") 
                                say("") 
                                say("
Dieser Diebeshandschuh hält 3 Stunden    lang.") 
                                say("
Du kannst ihn jederzeit an- und ausziehen,") 
                                say("
sodass du ihn sehr effizient benutzen kannst.") 
                                say("") 
                                say("") 
                                say("") 
                                say_reward("
Das ganze würde dich ".. Price .." Achievement-Points kosten.") 
                                local buyselection = select("
Diebeshandschuh kaufen","Abbrechen") 
                                if buyselection == 2 then 
                                    return 
                                elseif buyselection == 1 then 
                                    if pc.getqf("
achievement_points") < Price then 
                                        say_title("".. mob_name(20006) .."
:") 
                                        say("") 
                                        say("
Du hast leider nicht genügend Achievement-Points.") 
                                        say("
Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                        say("
weitere Achievement-Points gesammelt hast") 
                                        say("") 
                                        say("") 
                                        say("") 
                                        say_reward("
Sammel noch mehr Achievement-Points für dieses Item") 
                                        return     
                                    else 
                                        say_title("".. mob_name(20006) .."
:") 
                                        say("") 
                                        say("
Hier bitte, dein 3 stündiger Diebeshandschuh.") 
                                        say("
Du kannst dieses wertvolle Stück auch in einem Shop verkaufen,") 
                                        say("
falls dir mal wenig Geld zur Verfügung steht.") 
                                        say("
Aber ich denke du kannst diesen Diebeshandschuh auch so gut gebrauchen.") 
                                        say("
Passe gut auf ihn auf.") 
                                        say_item_vnum(72006) 
                                        say_reward("
Du hast einen 3 stündigen Diebeshandschuh erhalten") 
                                        pc.setqf("
achievement_points", pc.getqf("achievement_points") - Price) 
                                        cmdchat("
achievementpoints ".. pc.getqf("achievement_points")) 
                                        pc.give_item2(72006, 1) 
                                                                  
                                        end 
                                    end 
                                end 
                            end 
                        
                        elseif selectcategory == 4 then 
                        say_title("".. mob_name(20006) .."
:") 
                        say("") 
                        say("
Du hättest gerne Bonus-Items für") 
                        say("
deine Achievement-Points?") 
                        say("
Die Bonus-Items sind sehr wertvoll, da sie") 
                        say("
dich im Spielverlauf unterstützten.") 
                        local bonusitems = select("
Gegenstand verstärken","Gegenstand verzaubern","Shop verlassen") 
                        if bonusitems == 3 then 
                            return 
                        elseif bonusitems == 1 then 
                            local Price = 10 
                            say_title("".. mob_name(20006) .."
:") 
                            say("") 
                            say("
Das Item Gegenstand verstärken verstärkt") 
                            say("
deine Items, sodass sie einen Bonus erhalten.") 
                            say("
Er ist sehr begehrt, da die Items mit Bonis") 
                            say("
einen sehr großen Wert besitzen.") 
                            say("") 
                            say("") 
                            say("") 
                            say_reward("
Es kostet dich ".. Price .." Achievement-Points.") 
                            local buyselection = select("
Gegenstand verstärken kaufen","Abbrechen") 
                            if buyselection == 2 then 
                                return 
                            elseif buyselection == 1 then 
                                if pc.getqf("
achievement_points") < Price then 
                                    say_title("".. mob_name(20006) .."
:") 
                                    say("") 
                                    say("
Du hast leider nicht genügend Achievement-Points.") 
                                    say("
Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    say("
weitere Achievement-Points gesammelt hast") 
                                    say("") 
                                    say("") 
                                    say("") 
                                    say_reward("
Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    say_title("".. mob_name(20006) .."
:") 
                                    say("") 
                                    say("
Hier bitte, deine Gegenstand verstärken.") 
                                    say("
Ich wünsche dir viel Erfolg mit den Bonis,") 
                                    say("
immerhin waren das meine Gegenstand verstärken.") 
                                    say("") 
                                    say("") 
                                    say_item_vnum(71085) 
                                    say_reward("
Du hast 10x Gegenstand verstärken erhalten") 
                                    pc.setqf("
achievement_points", pc.getqf("achievement_points") - Price) 
                                    cmdchat("
achievementpoints ".. pc.getqf("achievement_points")) 
                                    pc.give_item2(71085, 10) 
                                end 
                            end                         
                        elseif bonusitems == 2 then 
                            local Price = 30 
                            say_title("".. mob_name(20006) .."
:") 
                            say("") 
                            say("
Das Item Gegenstand verzaubern verzaubert") 
                            say("
deine bereits vorhanden Bonis eines Items.") 
                            say("
Eventuell hast du großes Glück damit.") 
                            say("") 
                            say("") 
                            say("") 
                            say_reward("
Er kostet dich ".. Price .." Achievement-Points.") 
                            local buyselection = select("
Gegenstand verzaubern kaufen","Abbrechen") 
                            if buyselection == 2 then 
                                return 
                            elseif buyselection == 1 then 
                                if pc.getqf("
achievement_points") < Price then 
                                    say_title("".. mob_name(20006) .."
:") 
                                    say("") 
                                    say("
Du hast leider nicht genügend Achievement-Points.") 
                                    say("
Bitte komme wieder, sobald du ".. Price - pc.getqf("achievement_points") .."") 
                                    say("
weitere Achievement-Points gesammelt hast") 
                                    say("") 
                                    say("") 
                                    say("") 
                                    say_reward("
Sammel noch mehr Achievement-Points für dieses Item") 
                                    return     
                                else 
                                    say_title("".. mob_name(20006) .."
:") 
                                    say("") 
                                    say("
Hier bitte, deine Gegenstand verzaubern.") 
                                    say("
Sie sind nicht nur wertvoll, sondern auch") 
                                    say("
sehr begehrt, sodass du beim Verkauf") 
                                    say("
einen hohen Preis erzielen könntest.") 
                                    say("") 
                                    say_item_vnum(71084) 
                                    say_reward("
Du hast 20x Gegenstand verzaubern erhalten") 
                                    pc.setqf("
achievement_points", pc.getqf("achievement_points") - Price) 
                                    cmdchat("
achievementpoints ".. pc.getqf("achievement_points")) 
                                    pc.give_item2(71084, 20) 
                                                           
                                end 
                            end 
                        end 
                    end 
                end 
            end 
        end 
    end 
end 

die quest läuft einbahnfrei aber das problem ist das ich nicht die shops auf machen kann bzw die punkte ned kommen aber es werden die punkte ned gut geschrieben

[/php]
quest teleporter begin
state start begin
when info or button begin
say_title("Handelsmap")
say("Auf die Handelsmap warpen?")

local s = select("Ja","Nein")
if s == 1 then
if pc.get_level()>= 1 then --lvl eintrag
pc.warp(912365400, 91236500)
else
chat("Dein Level ist zu Niedrig.")
end
elseif s == 2 then
return

end
end
end
end
end
[/php]

stimmt die so ? weil iwie klappt des ned so wirklich...

PHP Code:
quest teleporter begin 
    state start begin 
        when info 
or button begin 
            say_title
("Handelsmap") 
            
say("Auf die Handelsmap warpen?")
            
            
local s = select("Ja","Nein") 
            if 
s == 1 then 
                
if pc.get_level()>= 1 then     --lvl eintrag 
                    pc
.warp(912365400, 91236500)
                else
                    
chat("Dein Level ist zu Niedrig.")
                
end
            
elseif s == 2 then 
                
return
               
                
end
            end 
        end 
    end 
end 
wo ist da der fehler??