[SERVICE] Die Questkontrolle

11/08/2010 21:40 .Delta#871
hm weiß net obs relevant ist, aber fehlt unter if a == 2 then nicht

PHP Code:
if == 2 then
    
return
end 
11/08/2010 21:43 .ŋight#872
Ich teste es...

Edit:

Nö geht nicht.
11/08/2010 21:53 henpii#873
Quote:
Originally Posted by Delta619 View Post
hm weiß net obs relevant ist, aber fehlt unter if a == 2 then nicht

PHP Code:
if == 2 then
    
return
end 
nein es ist nicht relevant
11/09/2010 14:52 elo_77²☺#874
PHP Code:
quest Tiger begin
    state start begin
        when 1307.kill begin
            say_title
("Herzlichen Glückwunsch")
            
say("Du hast RaymondMt2 von einem bösen Monster befreit.")
            
say("Als Belohnung für deinen Mut sollst du eine angemessene")
            
say("Belohnung erhalten. Such dir ein Item aus!")    
            
say("Welches Item möchtest du?")
            
local aselect("Blutkrustenschild""Dreikaiserschild","Strahlendes Schild","Krieger-Rüstung","Sura-Rüstung","Ninja-Rüstung","Schami-Rüstung""Kein Item")
            if 
1==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte ein Blutkrustenschild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13146)
            
end
        
if 2==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte ein Dreikaiserschild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13166)
            
end
        
if 3==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte das strahlende Schild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13186)
            
end
        
if 4==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Krieger-Rüstung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11310)
            
end
        
if 5==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Sura-Rüstung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11710)
            
end
        
if 6==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte einen fürstlichen Ninja-Anzug."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11510)
            
end
        
if 7==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Kleidung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(12010)
            
end
            
if 8==a then
                say
("Du Schlingel! Du denkst du hast alles?")
                
say("Was ist hiermit?")
            
pc.give_item2(279923)
            
pc.give_item2(279933)
            
pc.give_item2(279943)
            
pc.give_item2(700315)
            
pc.give_item2(13069)
            
end
        end
    end
end 

Was mache ich falsch? Schnelle Hilfe Bitte gebe natürlich Thx...
11/09/2010 16:11 Nixodas#875
ähh vllt am anfang nach notice_all
nicht zwei "
11/09/2010 16:24 °ѕ¢αη∂ιυм#876
Quote:
Originally Posted by elo_77²☺ View Post
PHP Code:
quest Tiger begin
    state start begin
        when 1307.kill begin
            say_title
("Herzlichen Glückwunsch")
            
say("Du hast RaymondMt2 von einem bösen Monster befreit.")
            
say("Als Belohnung für deinen Mut sollst du eine angemessene")
            
say("Belohnung erhalten. Such dir ein Item aus!")    
            
say("Welches Item möchtest du?")
            
local aselect("Blutkrustenschild""Dreikaiserschild","Strahlendes Schild","Krieger-Rüstung","Sura-Rüstung","Ninja-Rüstung","Schami-Rüstung""Kein Item")
            if 
1==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte ein Blutkrustenschild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13146)
            
end
        
if 2==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte ein Dreikaiserschild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13166)
            
end
        
if 3==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte das strahlende Schild."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(13186)
            
end
        
if 4==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Krieger-Rüstung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11310)
            
end
        
if 5==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Sura-Rüstung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11710)
            
end
        
if 6==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte einen fürstlichen Ninja-Anzug."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(11510)
            
end
        
if 7==a then
                notice_all 
(""..pc.get_name() .." hat den schrecklichen gelben Tigergeist bezwungen!")
                
notice_all (""..pc.get_name ()  .."durfte sich ein Item aussuchen und wählte eine fürstliche Kleidung."
            
notice_all ("Nehmt euch ein Beispiel an "..pc.get_name ()  .." 's Tapferkeit und Mut."
                
pc.give_item2(12010)
            
end
            
if 8==a then
                say
("Du Schlingel! Du denkst du hast alles?")
                
say("Was ist hiermit?")
            
pc.give_item2(279923)
            
pc.give_item2(279933)
            
pc.give_item2(279943)
            
pc.give_item2(700315)
            
pc.give_item2(13069)
            
end
        end
    end
end 

Was mache ich falsch? Schnelle Hilfe Bitte gebe natürlich Thx...
Hey

Hab zwar nicht viel Ahnung davon, aber ich glaub in der 9. Zeile ist was falsch bei der Auswahl ^^
Müsste eigentlich so heißen:

PHP Code:
local a==select("Blutkrustenschild","Dreikaiserschild","Strahlendes Schild","Krieger-Rüstung","Sura-Rüstung","Ninja-Rüstung","Schami-Rüstung","Kein Item"
Und guck mal, dass du überall
PHP Code:
"..pc.get_name().." 
schreibst, ohne das Leerzeichen vor bzw. hinter den Klammern ;)
Mehr weiß ich aber leider nicht, bin in Sachen Quest schreiben noch am lernen :D

Und
Quote:
Originally Posted by Nixodas View Post
ähh vllt am anfang nach notice_all
nicht zwei "
Doch, die müssen sein, da das erste " für den Text steht und das Zweite für das ..pc.get_name().. steht :)

LG °ѕ¢αη∂ιυм
11/09/2010 17:48 TTapi#877

Was daran falsch? :D VPC fehler...:

syntax error : [string "start"]:5: `)´expected near `1´
11/09/2010 18:55 °ѕ¢αη∂ιυм#878
Quote:
Originally Posted by TTapi View Post

Was daran falsch? :D VPC fehler...:

syntax error : [string "start"]:5: `)´expected near `1´
Wie gesagt, bin noch Quest schreiben am lernen, aber versuchs mal so:



Habe noch "Weihnachts-Event beenden" hinzugefügt ;)

LG °ѕ¢αη∂ιυм
11/09/2010 20:43 TTapi#879
Quote:
Originally Posted by °ѕ¢αη∂ιυм View Post
Wie gesagt, bin noch Quest schreiben am lernen, aber versuchs mal so:



Habe noch "Weihnachts-Event beenden" hinzugefügt ;)

LG °ѕ¢αη∂ιυм
werde es direkt mal testen wenn core fehler beseitigt wurde xP Wenns funzt bekommst en thanks ;)

Grüße

Edit: Funzt leider immer noch net ;)

Fehler: when doesn´t have begin-end clause. (say)

Kriegst aber trtzdem thx für mühe ;D
11/09/2010 20:47 °ѕ¢αη∂ιυм#880
Quote:
Originally Posted by TTapi View Post
werde es direkt mal testen wenn core fehler beseitigt wurde xP Wenns funzt bekommst en thanks ;)

Grüße
Bin kein THX-Gammler, aber freue mich trotzdem über jedes THX :D

Quote:
Originally Posted by TTapi View Post
Edit: Funzt leider immer noch net

Fehler: when doesn´t have begin-end clause. (say)

Kriegst aber trtzdem thx für mühe ;D
Okay, hab nochma drüber geschaut... kannst mal das versuchen:

Wenns dann immer noch nicht denke ich kann ich dir leider nicht helfen... Aber kannst dann ja trotzdem nochma den Fehler, der dann kommt, hier posten....

GreeTz °ѕ¢αη∂ιυм
11/09/2010 21:21 henpii#881
Code:
quest event begin 
    state start begin 
        when 20087.click begin
            say("Was möchtest du machen?") 
            local a == select ("Reichsschlacht starten","Reichsschlacht beenden","Weihnachts-Event starten","Weihnachts-Event beenden","Abbrechen") 
            if a == 1 then 
                say("Die Reichsschlacht beginnt.") 
                notice_all("Die Reichsschlacht hat begonnen.") 
                notice_all("Geht zum Schlachtenverwalter um teilzu nehmen.") 
                notice_all("Das Gewinner Reich erhält tolle Preise.") 
                game.set_event_flag(threeway_war 1) 
                game.set_event_flag(threeway_war_dead_count 5) 
                game.set_event_flag(threeway_war_kill_boss_count 1) 
                game.set_event_flag(threeway_war_kill_count 200) 
                game.set_event_flag(threeway_war_mob_count 150) 
                game.set_event_flag(threeway_war_open_gate1 1) 
                game.set_event_flag(threeway_war_open_gate2 1) 
                game.set_event_flag(threeway_war_open_gate3 1) 
            end 
            if a == 2 then 
                say("Du hast die Reichsschlacht beendet.") 
                notice_all("Die Reichsschlacht ist beendet.") 
                notice_all("Viel Spaß beim weiteren Spielen.") 
                game.set_event_flag(threeway_war 0) 
            end 
            if a == 3 then 
                say("Du hast das Weihnachts Event gestartet.") 
                notice_all("Das Weihnachts Event ist gestartet.") 
                notice_all("Findet einen GM / GA der verwandelt ist als Weihnachtsmann") 
                notice_all("Ihr werdet bei jedem Fund tolle Preise erhlaten.") 
                game.set_event_flag(xmas_snow 1) 
                game.set_event_flag(xmas_boom 1) 
                game.set_event_flag(xmas_tree 1) 
                game.set_event_flag(xmas_tree 2) 
                game.set_event_flag(xmas_tree 3) 
            end 
            if a == 4 then 
                say("Du hast das Weihnachts Event beendet.") 
                notice_all("Das Weihnachts Event wurde beendet.") 
                notice_all("Viel Spaß beim weiteren Spielen.") 
                game.set_event_flag(xmas_snow 0) 
                game.set_event_flag(xmas_boom 0) 
                game.set_event_flag(xmas_tree 0) 
                game.set_event_flag(xmas_tree 0) 
                game.set_event_flag(xmas_tree 0) 
            end 
        end 
    end 
end
so sollte das genze laufen ;)
11/09/2010 21:26 Drache1234#882
Quote:
Originally Posted by henpii View Post
Code:
---------------------------------
--- Lvl 80 Quest
--- (c) by Henpii aka Allatar @ World of Cerberus
---------------------------------
quest Quest_80 begin 
	when login with pc.get_level() >= 80 then
        state start begin
			local a == find_npc_by_vnum(20355)		--Hauptmann als Target setzen
			if a == 0 then
				return
			else
				target.vid("__TARGET__", a, "Target")
				setstate( letter )
			end
		end  
		
		state letter begin							--Letter
			say_title("Angriff aus dem DT")
			say("Bitte melde dich umgehend beim Hauptmann.")
			say("Er wird dich ueber unsere Lage aufklären.")
		end
	end
	
	when __TARGET__.target.click begin
		state Hauptmann begin
			target.delete("__TARGET__")
				say("Hauptmann:") 
				say("Zuerst einmal,") 
				say("Danke für deine bisherige Hilfe.") 
				say("Nur leider benoetigen wir sie nun dringender als je zuvor!") 
				say("Der Sensenmann Herr des Daemonenturms ist erwacht und sprach ein Fluch aus.") 
				say("Nur du kannst ihn aufhalten!") 
				say("Du findest ihn in der 8. Ebene des Daemonenturms...") 
				wait() 
				say("Also zieh los und töte den") 
				say("Sensenmann") 
				say_reward("Du wirst dafür belohnt") 
				say_reward("Erfahrung:".."500000000" ) 
				say_reward("Geiststein".."+9".."" )
					return
		end
	end
	
	when 8003.kill begin							--Sensi kill
		state kill begin
		    say(locale.NOTICE_COLOR.."Der Fluch wurde gebrochen!"..locale.NORMAL_COLOR) 
            say("Du hast den Sensenmann getötet.") 
            say("Berichte dies dem Hauptmann.") 
				setstate ( Hauptmann )
				return
			end
		end
		
		state Hauptmann begin
			local b = find_npc_by_vnum(20355) 		-- Hauptmann als Target
				if b == 0 then
					return
				else
				target.vid("__TARGET__", v, "Zum Hauptmann")
				end
		end
	end

	when __TARGET__.target.click begin				--ENDE
		target.delete("__TARGET__")
		pc.give_exp2(500000000) 
        set_quest_state("levelup","run") 
        pc.give_item2( stone ,1 )
		
        say("Hauptmann:") 
        say("Wie ich höre hast du es geschafft.") 
        say("Du bist stärker als ich erwartet hätte.") 
        say("Auf dich wartet eine erfolgreiche") 
        say("und vielversprechende Zukunft!")     
        say("Wir sprechen uns bald wieder.") 
        say("") 
        say(locale.NOTICE_COLOR.."Belohnung:"..locale.NORMAL_COLOR) 
        say_reward("Erfahrung:".."500000000" ) 
        say_reward("Geiststein:"..item_name(stone).."" )
	end
end
Für Drache12345

sollte so funktionieren... wurde nicht getestet..

LG
Henpii

Wenn ich Level 80 bin bekomme ich keine Quest <.<

Fazit: geht immer noch nicht...
11/09/2010 21:30 °ѕ¢αη∂ιυм#883
Quote:
Originally Posted by Drache1234 View Post
Wenn ich Level 80 bin bekomme ich keine Quest <.<

Fazit: geht immer noch nicht...
Mh, gab es eine Fehlermeldung bei VPC??
11/09/2010 21:32 TTapi#884
funzt immer noch net >.< :D Hab beide von euch versucht ;)

Fehler: syntax error : [string "start"]:2: unexpected symbol near `==´
11/09/2010 21:33 henpii#885
Code:
---------------------------------
--- Lvl 80 Quest
--- (c) by Henpii aka Allatar @ World of Cerberus
---------------------------------
quest Quest_80 begin
    state start begin
		when login with pc.get_level() >= 80 then
        
			local a == find_npc_by_vnum(20355)		--Hauptmann als Target setzen
			if a == 0 then
				return
			else
				target.vid("__TARGET__", a, "Target")
				setstate( letter )
			end
		end  
		
		state letter begin							--Letter
			say_title("Angriff aus dem DT")
			say("Bitte melde dich umgehend beim Hauptmann.")
			say("Er wird dich ueber unsere Lage aufklären.")
		end
	
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
				say("Hauptmann:") 
				say("Zuerst einmal,") 
				say("Danke für deine bisherige Hilfe.") 
				say("Nur leider benoetigen wir sie nun dringender als je zuvor!") 
				say("Der Sensenmann Herr des Daemonenturms ist erwacht und sprach ein Fluch aus.") 
				say("Nur du kannst ihn aufhalten!") 
				say("Du findest ihn in der 8. Ebene des Daemonenturms...") 
				wait() 
				say("Also zieh los und töte den") 
				say("Sensenmann") 
				say_reward("Du wirst dafür belohnt") 
				say_reward("Erfahrung:".."500000000" ) 
				say_reward("Geiststein".."+9".."" )
					return
		end
	end
	
	when 8003.kill begin							--Sensi kill
		state kill begin
		    say(locale.NOTICE_COLOR.."Der Fluch wurde gebrochen!"..locale.NORMAL_COLOR) 
            say("Du hast den Sensenmann getötet.") 
            say("Berichte dies dem Hauptmann.") 
				return
		
			local b = find_npc_by_vnum(20355) 		-- Hauptmann als Target
				if b == 0 then
					return
				else
				target.vid("__TARGET__", v, "Zum Hauptmann")
				end
		end
	end

	when __TARGET__.target.click begin				--ENDE
		target.delete("__TARGET__")
		pc.give_exp2(500000000) 
        set_quest_state("levelup","run") 
        pc.give_item2( stone ,1 )
		
        say("Hauptmann:") 
        say("Wie ich höre hast du es geschafft.") 
        say("Du bist stärker als ich erwartet hätte.") 
        say("Auf dich wartet eine erfolgreiche") 
        say("und vielversprechende Zukunft!")     
        say("Wir sprechen uns bald wieder.") 
        say("") 
        say(locale.NOTICE_COLOR.."Belohnung:"..locale.NORMAL_COLOR) 
        say_reward("Erfahrung:".."500000000" ) 
        say_reward("Geiststein:"..item_name(stone).."" )
	end
end
jo mein fehler sry, hatte da was verwechselt xD