[SERVICE] Die Questkontrolle

01/17/2013 20:26 .Delta#7486
end zu viel un so^^
01/18/2013 13:35 J4NG0#7487
quest give75er begin
state start begin
when levelup with pc.get_level() == 75 begin
say_title("Du bist ja schnell unterwegs")
say("")
say("Hallo, du hast das Level 75 erreicht!")
say("")
say("Du hast dich bis jetzt tapfer geschlagen und warst sehr fleißig.")
say("")
say("Also hast du nun die Reife erreicht eine bessere Waffe dein Eigen nennen zu dürfen.")
say("")
say("Das ganze Casalia2 Team hofft das du weiterhin bei uns bleibst und deinen Spaß hast.")
say("Weiter so wir sind stolz auf dich.")
if pc.job == 0 then
pc.give_item2(180,1 )
pc.give_item2(3160,1 )

elseif pc.job == 1 then
pc.give_item2(2170,1 )
pc.give_item2(1130,1 )

elseif pc.job == 2 then
pc.give_item2(190,1 )
pc.give_item2(180,1 )

elseif pc.job == 3 then
pc.give_item2(5120,1 )
pc.give_item2(7150,1 )

end
end
end
end
end
end
end
end
end
end
end
end
01/18/2013 14:21 mike59991#7488
Ne frage könnte mir wär ne quest erstellen in der mann direckt wenn mann startet lvl 55 wird ?!
01/18/2013 19:12 .Sinnex#7489
Quote:
Bekomme

WHEN : 20077.chat ("The SkyRun")
WHEN : login
with pc . in_dungeon ( )
qc in malloc(): error: allocation failed
Error occured on compile skyrun.quest
PHP Code:
quest skyrun begin
    state start begin
    
--Eintritt

        when 20077.chat
."The SkyRun" begin
            
if pc.get_level() < 100 then 
                say_title
("Wächter des Skyrun")
                
say("")
                
say_reward("Du bist noch zu schwach für die Skyrun!")
                
say("")
            else
                
say_title("Wächter des Skyrun")
                
say("")
                
say("Blaaaaaaaaa")
                
say("bluuauauauauaaaaa")
                
say("Marc ist coool")
                
wait()
                
say_title("Wächter des Skyrun")
                
say("")
                
say("")
                
pc.setqf("Ebene"1)
                
local sky_login select("Betreten""Abbrechen")
                if 
sky_login == 1 then
                    pc
.warp(17161003523600)
                elseif 
sky_login == 2 then
                    
return
                
end
            end
        end  
        
        
        when login with pc
.in_dungeon() begin
            
if d.getf("Ebene") == 2 then
            chat
("Ihr befindet euch jetzt in der 2. Ebene!")
            
chat("Schlagt euch zum Schildkrötenfels durch!")
            
chat("Ihr habt nur 10 minuten Zeit!")
            
timer("sky1"600)
        
end
        
--Ebene 1 
            
        when login with pc
.get_map_index() == 300 begin
            
if pc.getqf("Ebene") == 1 then
            say_title
("Skyrun")
            
say("Kille 100 Mobs. ")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 5 Metin-Steine.")
            
say("Kille 5 Metin-Steine")
            
say("Kille 5 Metin-Steine")
            
npc.purge()
            
say_reward("Inschrift:")
            
say("Es ist noch ein weiter weg.")
            
d.setf("skyauftrag"1)
            
d.setf("mustersky" 0)
            
d.setf("skysauftrag"1)
            
d.setf("musterskys" 0)
            
d.spawn_mob(803613498)
            
d.spawn_mob(8036119182)
            
d.spawn_mob(803612973)
            
d.spawn_mob(8036195170)
            
d.spawn_mob(803650210)
            
end
            
        when kill with npc
.get_race() == 3604 and d.getf("skyauftrag") ==1 begin
            d
.setf("mustersky"d.getf("mustersky") +1)
            
d.notice ("Noch "..100-d.getf("mustersky").." Mobs besiegen.")
            if 
d.getf("mustersky") ==100 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("ihr müsst noch 5 Metins Killen")
                
d.setf("skyauftrag"0)
                
d.setf("mustersky"0)
            
end
        end
        
        when kill with npc
.get_race() == 8036 and d.getf("skysauftrag") ==1 begin
            d
.setf("musterskys"d.getf("musterskys") +1)
            
d.notice ("Noch "..5-d.getf("musterskys").." Mobs besiegen.")
            if 
d.getf("musterskys") ==5 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("Gleich geht es weiter")
                
timer("sky_run_ebene2"5)
                
d.setf("skysauftrag"0)
                
d.setf("musterskys"0)
            
end
        end 

--Ebene 2

        
        when sky_run_ebene2
.timer begin
            
if pc.getqf("Ebene") == 2 then
            d
.new_jump_all(3001716935233)
            
d.notice("Du HUND")
            
d.notice("Du HUND")
            
end 
01/18/2013 20:24 .Rack's#7490
Quote:
Originally Posted by .Sinnex View Post
PHP Code:
quest skyrun begin
    state start begin
    
--Eintritt

        when 20077.chat
."The SkyRun" begin
            
if pc.get_level() < 100 then 
                say_title
("Wächter des Skyrun")
                
say("")
                
say_reward("Du bist noch zu schwach für die Skyrun!")
                
say("")
            else
                
say_title("Wächter des Skyrun")
                
say("")
                
say("Blaaaaaaaaa")
                
say("bluuauauauauaaaaa")
                
say("Marc ist coool")
                
wait()
                
say_title("Wächter des Skyrun")
                
say("")
                
say("")
                
pc.setqf("Ebene"1)
                
local sky_login select("Betreten""Abbrechen")
                if 
sky_login == 1 then
                    pc
.warp(17161003523600)
                elseif 
sky_login == 2 then
                    
return
                
end
            end
        end  
        
        
        when login with pc
.in_dungeon() begin
            
if d.getf("Ebene") == 2 then
            chat
("Ihr befindet euch jetzt in der 2. Ebene!")
            
chat("Schlagt euch zum Schildkrötenfels durch!")
            
chat("Ihr habt nur 10 minuten Zeit!")
            
timer("sky1"600)
        
end
        
--Ebene 1 
            
        when login with pc
.get_map_index() == 300 begin
            
if pc.getqf("Ebene") == 1 then
            say_title
("Skyrun")
            
say("Kille 100 Mobs. ")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 5 Metin-Steine.")
            
say("Kille 5 Metin-Steine")
            
say("Kille 5 Metin-Steine")
            
npc.purge()
            
say_reward("Inschrift:")
            
say("Es ist noch ein weiter weg.")
            
d.setf("skyauftrag"1)
            
d.setf("mustersky" 0)
            
d.setf("skysauftrag"1)
            
d.setf("musterskys" 0)
            
d.spawn_mob(803613498)
            
d.spawn_mob(8036119182)
            
d.spawn_mob(803612973)
            
d.spawn_mob(8036195170)
            
d.spawn_mob(803650210)
            
end
            
        when kill with npc
.get_race() == 3604 and d.getf("skyauftrag") ==1 begin
            d
.setf("mustersky"d.getf("mustersky") +1)
            
d.notice ("Noch "..100-d.getf("mustersky").." Mobs besiegen.")
            if 
d.getf("mustersky") ==100 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("ihr müsst noch 5 Metins Killen")
                
d.setf("skyauftrag"0)
                
d.setf("mustersky"0)
            
end
        end
        
        when kill with npc
.get_race() == 8036 and d.getf("skysauftrag") ==1 begin
            d
.setf("musterskys"d.getf("musterskys") +1)
            
d.notice ("Noch "..5-d.getf("musterskys").." Mobs besiegen.")
            if 
d.getf("musterskys") ==5 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("Gleich geht es weiter")
                
timer("sky_run_ebene2"5)
                
d.setf("skysauftrag"0)
                
d.setf("musterskys"0)
            
end
        end 

--Ebene 2

        
        when sky_run_ebene2
.timer begin
            
if pc.getqf("Ebene") == 2 then
            d
.new_jump_all(3001716935233)
            
d.notice("Du HUND")
            
d.notice("Du HUND")
            
end 

PHP Code:
quest skyrun begin
    state start begin
        when 20077.chat
."The SkyRun" begin
            
if pc.get_level() < 100 then 
                say_title
("Wächter des Skyrun")
                
say("")
                
say_reward("Du bist noch zu schwach für die Skyrun!")
                
say("")
            else
                
say_title("Wächter des Skyrun")
                
say("")
                
say("Blaaaaaaaaa")
                
say("bluuauauauauaaaaa")
                
say("Marc ist coool")
                
wait()
                
say_title("Wächter des Skyrun")
                
say("")
                
say("")
                
pc.setqf("Ebene"1)
                
local sky_login select("Betreten""Abbrechen")
                if 
sky_login == 1 then
                    pc
.warp(17161003523600)
                elseif 
sky_login == 2 then
                    
return
                
end
            end
        end  
        
        
        when login with pc
.in_dungeon() begin
            
if d.getf("Ebene") == 2 then
            chat
("Ihr befindet euch jetzt in der 2. Ebene!")
            
chat("Schlagt euch zum Schildkrötenfels durch!")
            
chat("Ihr habt nur 10 minuten Zeit!")
            
timer("sky1"600)
        
end
        
--Ebene 1 
            
        when login with pc
.get_map_index() == 300 begin
            
if pc.getqf("Ebene") == 1 then
            say_title
("Skyrun")
            
say("Kille 100 Mobs. ")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 100 Mobs.")
            
say("Kille 5 Metin-Steine.")
            
say("Kille 5 Metin-Steine")
            
say("Kille 5 Metin-Steine")
            
npc.purge()
            
say_reward("Inschrift:")
            
say("Es ist noch ein weiter weg.")
            
d.setf("skyauftrag"1)
            
d.setf("mustersky" 0)
            
d.setf("skysauftrag"1)
            
d.setf("musterskys" 0)
            
d.spawn_mob(803613498)
            
d.spawn_mob(8036119182)
            
d.spawn_mob(803612973)
            
d.spawn_mob(8036195170)
            
d.spawn_mob(803650210)
            
end
            
        when kill with npc
.get_race() == 3604 and d.getf("skyauftrag") ==1 begin
            d
.setf("mustersky"d.getf("mustersky") +1)
            
d.notice ("Noch "..100-d.getf("mustersky").." Mobs besiegen.")
            if 
d.getf("mustersky") ==100 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("ihr müsst noch 5 Metins Killen")
                
d.setf("skyauftrag"0)
                
d.setf("mustersky"0)
            
end
        end
        
        when kill with npc
.get_race() == 8036 and d.getf("skysauftrag") ==1 begin
            d
.setf("musterskys"d.getf("musterskys") +1)
            
d.notice ("Noch "..5-d.getf("musterskys").." Mobs besiegen.")
            if 
d.getf("musterskys") ==5 then
                d
.notice("Ihr habt es geschafft.")
                
d.notice("Gleich geht es weiter")
                
timer("sky_run_ebene2"5)
                
d.setf("skysauftrag"0)
                
d.setf("musterskys"0)
            
end
        end 

--Ebene 2

        
        when sky_run_ebene2
.timer begin
            
if pc.getqf("Ebene") == 2 then
            d
.new_jump_all(3001716935233)
            
d.notice("Du HUND")
            
d.notice("Du HUND")
        
end
    end
end 
Versuch es mal so :)
01/19/2013 17:40 J4NG0#7491
Code:
quest give75er begin
	state start begin
		when levelup with pc.get_level() == 75 begin
					say_title("Du bist ja schnell unterwegs")
					say("")
					say("Hallo, du hast das Level 75 erreicht!")
					say("")
					say("Du hast dich bis jetzt tapfer geschlagen und warst sehr fleißig.")
					say("")
					say("Also hast du nun die Reife erreicht eine bessere Waffe dein Eigen nennen zu dürfen.")
					say("")
					say("Das ganze Casalia2 Team hofft das du weiterhin bei uns bleibst und deinen Spaß hast.")
					say("Weiter so wir sind stolz auf dich.")
					if pc.job == 0 then
						pc.give_item2(180,1 )
						pc.give_item2(3160,1 )
				   
							elseif pc.job == 1 then
								pc.give_item2(2170,1 )
								pc.give_item2(1130,1 )
						
									elseif pc.job == 2 then
										pc.give_item2(190,1 )
										pc.give_item2(180,1 )
							
											elseif pc.job == 3 then
												pc.give_item2(5120,1 )
												pc.give_item2(7150,1 )
								
								            end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end
01/19/2013 18:55 xLobo™#7492
PHP Code:
quest multiring begin
    state start begin
        when 70007.
use begin
            say_title
("Warpring:")
            
local main=select("Warpring-Funktion""Lager-Funktion""Shopping-Funktion""GM.Chat-Funktion""Tastensperre")
            if 
1==main then
                say_title
("Warpring-Funktion:")
                
local s=select("Map1""Map2""Orktal (Mitte)""Eisland (Mitte)""Wüste (Oase)""Weitere""Beenden")
                if 
1==s then
                    say_title
("Warpring-Funktion:")
                    
local a=select ("Rotes""Gelbes""Blaues""Beenden")
                    if 
1==a then
                        pc
.warp(474086954540)
                    elseif 
2==a then
                        pc
.warp(63098166617)
                    elseif 
3==a then
                        pc
.warp(960054268807)
                    elseif 
4==a then
                        
return
                    
end
                
elseif 2==s then
                    say_title
("Warpring-Funktion:")
                    
local a=select ("Rotes""Gelbes""Blaues""Beenden")
                    if 
1==a then
                        pc
.warp(353003882460)
                    elseif 
2==a then
                        pc
.warp(145582240227)
                    elseif 
3==a then
                        pc
.warp(863589246139)
                    elseif 
4==a then
                        
return
                    
end
                
elseif 3==s then
                    pc
.warp(332885745737)
                elseif 
4==s then
                    pc
.warp(435705215084)
                elseif 
5==s then
                    pc
.warp(296758547724)
                elseif 
6==s then
                    
if pc.get_level() < 1 then    
                        say_title
("Weitere Maps:")
                        
local a=select ("Feuerland (Teleporter)""Spinnendungeon""Dämonenturm""Beenden")
                        if 
1==a then
                            pc
.warp(600813687144)
                        elseif 
2==a then
                            say_title
("Warping-Funktion:")
                            
local sd select ("Spinnendungeon 1""Spinnendungeon 2""Beenden")
                            if 
1==sd then
                                pc
.warp(51200486400)
                            elseif 
2==sd then
                                pc
.warp(665600435200)
                            elseif 
3==sd then
                                
return
                            
end
                        
elseif 3==a then
                            pc
.warp(590516110606)
                        elseif 
4==a then
                            
return
                        
end
                    
elseif pc.get_level() < 1 then
                        say_title
("Weitere Maps:")
                        
local a=select ("Feuerland (Teleporter)""Spinnendungeon""Dämonenturm""Seelengrotte""Areal der Steine""Beenden")
                        if 
1==a then
                            pc
.warp(600813687144)
                        elseif 
2==a then
                            say_title
("Warping-Funktion:")
                            
local sd select ("Spinnendungeon 1""Spinnendungeon 2""Beenden")
                            if 
1==sd then
                                pc
.warp(51200486400)
                            elseif 
2==sd then
                                pc
.warp(665600435200))
                            elseif 
3==sd then
                                
return
                            
end
                        
elseif 3==a then
                            pc
.warp(590516110606)
                        elseif 
4==a then
                            say_reward
("In welche Seelengrotte möchtest du denn?")
                            
local b=select ("Seelengrotte 1""Seelengrotte 2""Beenden")
                            if 
1==b then
                                pc
.warp(100861213190)
                            elseif 
2==b then
                                pc
.warp(2416821275028)
                            elseif 
3==b then
                                
return
                            
end
                        
elseif 5==a then
                            pc
.warp(4444597844445878)
                        elseif 
6==a then
                            
return
                        
end
                    
elseif pc.get_level() < 1 then
                        say_title
("Weitere Maps:")
                        
local a=select ("Feuerland (Teleporter)""Spinnendungeon""Dämonenturm""Seelengrotte""Areal der Steine""Weitere""Beenden")
                        if 
1==a then
                            pc
.warp(600813687144)
                        elseif 
2==a then
                            say_title
("Warping-Funktion:")
                            
local sd select ("Spinnendungeon 1""Spinnendungeon 2""Beenden")
                            if 
1==sd then
                                pc
.warp(51200486400)
                            elseif 
2==sd then
                                pc
.warp(665600435200)
                            elseif 
3==sd then
                                
return
                            
end
                        
elseif 3==a then
                            pc
.warp(590516110606)
                        elseif 
4==a then
                            say_reward
("In welche Seelengrotte möchtest du denn?")
                            
local b=select ("Seelengrotte 1""Seelengrotte 2""Beenden")
                            if 
1==b then
                                pc
.warp(100861213190)
                            elseif 
2==b then
                                pc
.warp(2416821275028)
                            elseif 
3==b then
                                
return
                            
end
                        
elseif 5==a then
                            pc
.warp(4444597844445878)
                        elseif 
6==a then
                            say_title
("Warpring-Funktion:")
                            
local c=select ("Beenden")
                            if 
1==c then
                                
return
                            
end
                        
elseif 7==a then
                            
return
                        
end
                    
elseif pc.get_level() >= 1 then
                        say_title
("Weitere Maps:")
                        
local a=select ("Feuerland (Teleporter)""Spinnenmaps""Dämonenturm""Seelengrotte""Areal der Steine""Weitere""Beenden")
                        if 
1==a then
                            pc
.warp(600813687144)
                        elseif 
2==a then
                            say_title
("Warping-Funktion:")
                            
local sd select ("Spinnendungeon 1""Spinnendungeon 2""Beenden")
                            if 
1==sd then
                                pc
.warp(51200486400)
                            elseif 
2==sd then
                                pc
.warp(665600435200)
                            elseif 
3==sd then
                                
return
                            
end
                        
elseif 3==a then
                            pc
.warp(590516110606)
                        elseif 
4==a then
                            say_reward
("In welche Seelengrotte möchtest du denn?")
                            
local b=select ("Seelengrotte 1""Seelengrotte 2""Beenden")
                            if 
1==b then
                                pc
.warp(100861213190)
                            elseif 
2==b then
                                pc
.warp(2416821275028)
                            elseif 
3==b then
                                
return
                            
end
                        
elseif 5==a then
                            pc
.warp(4444597844445878)
                        elseif 
6==a then
                            say_title
("Warpring-Funktion:")
                            
local c=select ("Beenden")
                            if 
1==c then
                                
return
                            
end
                        
elseif 7==a then
                            
return
                        
end
                    end
                
elseif 7==s then
                    
return
                
end
            
elseif 2==main then
                say_title
("Lager-Funktion")
                
say("Hallo und Herzlich Willkomen!")
                
say("Ich bin deine Mobile Lager-Funktion.")
                
say("Ich kann dir überall dein Lager öffnen.")
                
say_reward("Möchtest du dein Lager öffnen?")
                
local lager=select("Ja""Nein")
                if 
1==lager then
                    say_title
("Lager-Funktion:")
                    
say("Welches Lager möchtest du denn öffnen?")
                    
local a=select("Normales Lager""Itemshop Lager""Beenden")
                    if 
1==a then
                        game
.open_safebox()
                    elseif 
2==a then
                        game
.open_mall()
                    elseif 
3==a then
                        
return
                    
end
                
elseif 2==lager then
                    
return
                
end
            
elseif 3==main then
                say_title
("Shopping-Funktion:")
                
say("Mit dieser Funktion kannst einen")
                
say("Multishop herbeirufen.")
                
say("Dieser Shop hat das zu bieten ,was du bestellst")
                
say("Also probier es einfach mal aus!")
                
say()
                
say("Aber denk dran:")
                
say()
                
say("Der Shop muss einmal geöffnet werden!")
                
say_reward("Sonst funktioniert der Warpring nichtmehr!")
                
local s=select("Ok""Nein")
                if 
1==s then
                    say
("Shopping-Funktion:")
                    
say_reward("Welchen Shop möchtes du öffnen?")
                    
local shop=select("Waffenhandel""Specialshop""Rüstungshandel""Gemischtwarenhandel""Schmuckhandel""Mehr Anzeigen""Beenden")
                    if 
1==shop then
                        mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                        
set_state(waffen)
                    elseif 
2==shop then
                        mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                        
set_state(special)
                    elseif 
3==shop then
                        mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                        
set_state(rüstung)
                    elseif 
4==shop then
                        mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                        
set_state(gemi)
                    elseif 
5==shop then
                        mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                        
set_state(schmuck)
                    elseif 
6==shop then
                        say_title
("Shopping-Funktion")
                        
say_reward("Welchen Shop möchtest du öffnen?")
                        
local shop2=select("Pfeilhandel""Beenden")
                        if 
1==shop2 then
                            mob
.spawn(20024pc.get_local_x(),  pc.get_local_y(), 111)
                            
set_state(pfeil)
                        elseif 
2==shop2 then
                            
return
                        
end
                    
elseif 7==shop then
                        
return
                    
end
                
elseif 2==s then
                    
return
                
end
            
elseif 4==main then
                
if get_time() > pc.getqf("duration"then
                    say_title
("GM.Chat-Funktion:")
                    
say("Hallo ".. pc.get_name() .." ich bin die GM.Chat-Funktion und")
                    
say("ich kann deine Nachrichten in andere Reiche")
                    
say("vermitteln. Es kostet dich auch nichts.")
                    
say("Das einzigste was du beachten musst, sind die")
                    
say("Regeln.")
                    
say("")
                    
say_reward("Klicke auf Weiter um die Regeln zu lesen.")
                    
wait()
                    
say_title("GM.Chat-Funktion:")
                    
say("Durch diese Funktion, könnt ihr in dem so-")
                    
say("gennanten GM - Chat eure Nachrichten vermitteln.")
                    
say("Ihr könnt damit durch alle 3. Reiche handeln")
                    
say("oder Fragen rund um den Server Fragen.")
                    
say("")
                    
say_title("Beachte bitte diese Regeln:")
                    
say_reward("- Du darfst / kannst maximal. 1 Nachricht")
                    
say_reward("  innerhalb einer Halbenstunde schreiben.")
                    
say_reward("- Keine Beleidigungen oder Drohungen.")
                    
say_reward("- Sinnloses Spamen führt zum Account Bann.")
                    
say_reward("- Keine rassistischen Wörter/Sprüche.")
                    
say("")
                    
wait()
                    
say_title("GM.Chat-Funktion:")
                    
say("Hast du die Regeln gelesen, so kannst du hier")
                    
say("deine Nachricht eingeben, die der ganze Server")
                    
say("lesen soll.")
                    
say("")
                    
say_reward("Bitte gebe deine Nachricht jetzt ein!")
                    
local y input(  )
                    
say_title("GM.Chat-Funktion:")
                    
say("Möchtest du deine Nachricht wirklich senden?")
                    
local main_set select("Nachricht senden.","Abbrechen.")
                    if 
main_set == 2 then
                        say_title
("GM.Chat-Funktion:")
                        
say("Deine Nachricht wurde nicht versendet.")
                    elseif 
main_set == 1 then
                        notice_all
("".. pc.get_name() ..":".. .."")
                        
say_title("GM.Chat-Funktion:")
                        
say("Deine Nachricht wurde gesendet.")
                        
pc.setqf("duration",get_time()+1800)
                    
end
                
else
                    
say("Du hast in dieser Halbenstunde erst eine Nachricht geschrieben.")
                    
say("Warte noch ein wenig.")
                
end
            
elseif 5==main then
                
return
            
end
        end    
    end
    state waffen begin
        when 20024.chat
."Waffenhandel" begin
            npc
.open_shop(1)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end
    state special begin
        when 20024.chat
."Spezialhandel" begin
            npc
.open_shop(41)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end
    state rüstung begin
        when 20024.chat
."Rüstungshandel" begin
            npc
.open_shop(16)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end
    state gemi begin
        when 20024.chat
."Gemischtwarenhandel" begin
            npc
.open_shop(3)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end
    state schmuck begin
        when 20024.chat
."Schmuckhandel" begin
            npc
.open_shop(17)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end
    state pfeil begin
        when 20024.chat
."Pfeilhandel" begin
            npc
.open_shop(15)
            
setskin(NOWINDOW)
            
npc.purge()
            
set_state(start)
        
end
    end    
end 
Es funktioniert nicht.
01/20/2013 04:15 LikeCranK™#7493
Sers Leute ich hab ne Zen-Bohnen Quest geschrieben für ne 2. Zen-Bohne
Funzt alles Problem nur sie setzt es nicht auf 0 wenn man weniger Rang hat
als sie gibt.. kann man das anderster regeln wie mit dem Befehl den ich drin hab
der funzt nur bei GM's thx im Voraus

PHP Code:
        when 70109.use begin
            
if pc.is_gm() then
                pc
.change_alignment(3500
                
pc.removeitem(701091
            elseif (
pc.get_alignment() + 3500) > 0 then
                command
("set "..pc.get_name().." alignment 0")
                return
            else
                
pc.remove_item(70109,1)
                
pc.change_alignment(3500)
            
end
        end
    end
end 
:/
01/20/2013 13:12 Fear *_*#7494
Machs einfach so das du die momentanen rangpunkte *(-1) rechnest und ihm die dann gibts, dadurch wirds dann 0 :D
01/20/2013 16:53 ©by Noa#7495
so vll?
PHP Code:
 when 70109.use begin
    
if pc.is_gm() then
        pc
.change_alignment(3500
        
pc.removeitem(701091
    else
        while 
pc.get_alignment() < do
            
pc.change_alignment(50)
        
end
        pc
.remove_item(70109,1)
    
end
end 
01/20/2013 19:33 LikeCranK™#7496
Ich dachte mehr an sowas kann man das nicht anders definieren?
Noa ich will das gm's sie benutzen können um in +rang zu kommen

So kann mal wer sagen ob des so funzen würde?
PHP Code:
        when 70109.use begin
            
if pc.is_gm() then
                pc
.change_alignment(3500
                
pc.removeitem(701091
            elseif (
pc.get_alignment() + 3500) > 0 then
                pc
.change_alignment("pc.get_alignment()")
                return
            else
                
pc.remove_item(70109,1)
                
pc.change_alignment(3500)
            
end
        end 
01/20/2013 19:44 ©by Noa#7497
gms können doch das Item benutzen steht doch da
PHP Code:
 if pc.is_gm() then
        pc
.change_alignment(3500
        
pc.removeitem(701091
wenn nicht dann wird abgefragt ob der Spieler weniger als 0 rang hat(negativ) falls ja dann bekommt er so lange was bis er gleich null ist
01/20/2013 19:54 LikeCranK™#7498
und das ist das problem hab ich -2434 funzt es nicht da die zen bohne 3500 rang gibt
01/20/2013 20:10 giwrgos23#7499
Anyone can help me???
Wrong at putty says:
syntax error : [string "information"]:13: unexpected symbol near `state'
dinamigigs.quest:84:Abort trap (core dumped)

Code:
quest dinamigig begin
	state start begin
		when login with pc.level >= 150 begin
			set_state(information)
		end
	end

	state information begin
		when letter begin
			send_letter("Η δύναμη των γιγάντων ")
		end

		when info or button begin
			say("Η δύναμη των γιγάντων ")
			say("Αναζήτησε την χαμένη δύναμη των γιγάντων ")
			say("στην μακρινή τους χώρα που προστατεύεται από χίλιους μαχητές! ")
			say("Σκότωσε 150 γίγαντες χίλιοι μαχητές για να βρείς την ")
			say("δύναμη που κρύβουν μέσα τους! ")
			say("")
			pc.setqf("state", 150)
			q.set_counter("χίλιοι μαχητές ", 150)
		end

		when 1403.kill begin
			local count = pc.getqf("state") - 1
			if count <= 150 then
				pc.setqf("state", count)
				q.set_counter("χίλιοι μαχητές ", count)
			end
			if count == 0 then
				say_title("Η δύναμη των γιγάντων ")
				say("Εξολόθρευσες και τους 150 γίγαντες χίλιους μαχητές! ")
				say("Δεν βρήκες όμως την δύναμη που κρίβουν μέσα τους! ")
				say("Πήγαινε στον Λοχαγό και πες του τα αποτελέσματα σου! ")
				set_state(__reward)
			end
			state __reward begin
				when letter begin
					send_letter("Τα αποτελέσματα! ")
					
					local v = find_npc_by_vnum(20355)
					if v != 0 then
					target.vid("__TARGET__", v, "Λοχαγός ")
				end
			end

		end
		when __TARGET__.target.click  or
			20355.chat."Τα αποτελέσματα! " begin
				target.delete("__TARGET__")
				say_title("Λοχαγός: ")
				say("")
				say("Μα πώς ήξερες ότι σε ήθελα για αυτήν την δουλειά ")
				say("ενώ δεν σου είχα πει τίποτα? ")
				say("Αααα!!!Μάλιστα!Νομίζω κατάλαβα!")
				say("Πάλυ άνοιξε το στόμα της η κυρία του Γενικού καταστήματος! ")
				say("")
				say("")
				say("")
				-----------												l
				say_title("Αφού λοιπόν τελείωσες πρίν κάν σου πώ την αποστολή ")
				say("και ας μην βρήκες τίποτα θα σου κάνω ένα δώρο! ")
				say_reward("10% άμυνα ενάντια σε ημιανθρώπους και ")
				say_reward("παρακαλώ επέλεξε ανάμεσα στα επόμενα στοιχεία! ")
				pc.setqf("collect_count",10)
				local s=select("Ζωή +2000 ","άμυνα +200 ")
				if 1== s then
					affect.add_collect(1, 2000, 60*60*24*365*60) --hp+1000  hp is 1 
				elseif 2== s then
					affect.add_collect(apply.DEF_GRADE_BONUS, 200, 60*60*24*365*60) 
				end
				affect.add_collect_point(POINT_RESIST_WARRIOR,10,60*60*24*365*60) --60³β	
				affect.add_collect_point(POINT_RESIST_ASSASSIN,10,60*60*24*365*60) --60³β	
				affect.add_collect_point(POINT_RESIST_SURA,10,60*60*24*365*60) --60³β	
				affect.add_collect_point(POINT_RESIST_SHAMAN,10,60*60*24*365*60) --60³β	
				clear_letter()
				set_state(__COMPLETE__)

			end
		end
	end

	state __COMPLETE__ begin
	end
end
01/21/2013 23:24 Red Firestar#7500
PHP Code:
ques gm_mode begin
    state start begin
        when login 
or logout or levelup or kill or use begin
            
if game.get_event_flag("test") > 0 then
                game
.set_event_flag("test"0)
            
end
        end
    end
end 
das soll eine quest gegen Gm mod sein also das tool ist das so richtig wenn nicht könnte es jemand verbessern wäre nett