[SERVICE] Die Questkontrolle

Page 805 of 845 « First 305705755795803804 805 806807815 Last »
12/28/2015 17:55 Flacko Jodye#12061
Quote:
Originally Posted by .Delta View Post
Ich habs mal so geschrieben wies für mich logisch ist, und ein if entfernt.

Außerdem hast du die quest wohl umbenannt.
Dann musst du auch alle Funktionsaufrufe von in der Quest definierten Funktionen anpassen.
Code:
local info = mysql_query("SELECT name, status FROM quest.gm_liste") 
local i = 1 
while tonumber(count[1][1]) >= i do 
	say("Name: "..info.name[i].." Status: "..info.status[i]) 
	i = i + 1 
end
was zum teufel soll das darstellen?
noch nie was von range based loops gehört?
12/28/2015 18:01 .Delta#12062
Quote:
Originally Posted by Flacko Jodye View Post
Code:
local info = mysql_query("SELECT name, status FROM quest.gm_liste") 
local i = 1 
while tonumber(count[1][1]) >= i do 
	say("Name: "..info.name[i].." Status: "..info.status[i]) 
	i = i + 1 
end
was zum teufel soll das darstellen?
noch nie was von range based loops gehört?
komm mit deinem main account wenn du mich blöd anmachen willst.
1) Die Quest habe ich nicht geschrieben, sondern nur auf schnellstem und einfachstem Weg fehlerfrei gemacht.
2)Für mich zählt die Funktionalität einer Quest und ich mache daraus keinen "Schönheitswettbewerb", danke.
12/28/2015 18:32 Flacko Jodye#12063
Quote:
Originally Posted by .Delta View Post
komm mit deinem main account wenn du mich blöd anmachen willst.
1) Die Quest habe ich nicht geschrieben, sondern nur auf schnellstem und einfachstem Weg fehlerfrei gemacht.
2)Für mich zählt die Funktionalität einer Quest und ich mache daraus keinen "Schönheitswettbewerb", danke.
wer sagt dass das hier nicht mein "main" account ist?
"funktionalität zählt"
das ist der dümmste spruch den man beim coding bringen kann
hat auch nichts mit schönheit zu tun sondern mit performance
performance bedeutet (im deutschen) leistung und symbolisiert in der programmierung die geschwindigkeit und stabilität des programms
ich habe es dir nun erklärt weil dir das wort anscheinend total fremd ist was man anhand deiner codes erkennen kann
12/31/2015 15:17 xElGorgy#12064
Code:
quest fetakdusan  begin
	state start begin
		when login or levelup with pc.level >= 110 begin
			set_state(information)
		end	
	end

	state information begin
		when letter begin
			local v = find_npc_by_vnum(20356)
			if v != 0 then
				target.vid("__TARGET__", v, "Sběrač listí Gingo")
			end
			send_letter("Najdi feťáka Dušana.")
		end

		when button or info begin
			say_title("Najdi feťáka Dušana")
			say("Běž za Sběračem listí Gingo,")
			say("ten nevyléčitelný feťák od tebe")
			say("něco zase potřebuje...")
			say("")
		end
		
		when __TARGET__.target.click or
			20356.chat."Už som tu.." begin
			target.delete("__TARGET__")
			say_title("Feťák Dušan")
			---                                                   l
			say("Dobrý deň, viete ako nemyslite si,")
			say(" že fetujem stále ja to beriem športovo.")
			say("To je môj život. Mna to prespieva ako.")
			say("Ginko je len krycie meno pred policajtami, viete ako.")
			say("Tak, ale nastal problém, viete ako..")
			say("Došlo mi riedidlo a potrebujem, aby si mi ")
			say("rýchlo priniesol pretože mám absťák.")
			say("")
			wait()
			say_title("Feťák Dušan")
			say("Môj verný kamarát, stará krčmová legenda")
			say("Jožo, by mal mať ešte okrem tých litrov")
			say("metanolu aj nejaký ten fetiš, viete ako")
			say("Niekto je Narkoman, ale ja som feťák.")
			say("Ty tu ešte si? Prines mi moje riedidlo.")
			say("")																																			  
			set_state(go_to_disciple)
			pc.setqf("duration",0)  --ĄiĄH¸Ő¸ŐŞş®É¶ˇ
			pc.setqf("collect_count",0)-- ¨ú±oŞşŞ««~ĽĆ¶q
			pc.setqf("drink_drug",0) --łÜ°g´bĂĤôŞş¸Ü1
		end
	end

	
	state go_to_disciple begin
		when letter begin
			local v = find_npc_by_vnum(20041)
			if v != 0 then
				target.vid("__TARGET__", v, "Opilý občan")
			end
			send_letter("Najdi feťáka Dušana.")
		end
		when button or info begin
			say_title("Najdi Dušanova kamaráda")
			say("Najdi Dušanova kamaráda Joža.")
			say("Nachází se v 1. městě. ")
		end
		when __TARGET__.target.click or
			20041.chat."Našel jsem tě.." begin
			target.delete("__TARGET__")
			say_title("Jožo")
			---                                                   l
			say("Ale som ťa lakol, to už je toľko hodín,")
			say("stará mi zas určite dá s metlou keď ma uvidí.")
			say("Ktože ťa posiela? Dušan? Jáj Dušanko môj,")
			say("nebude to lacné, ja už ani na ten metanol nemám.")
			say("Len alpu pijem. Preto mi prines nejakú tú alpu,")
			say("získáš ju z tých čiernych bubákov na tom ostrove 110.")
			say("Rýchlo nazbieraj 20ks Alpy a prines mi je.")
			say_item_vnum(31004) 
			say_reward("Zatím jsi donesl".." "..pc.getqf("collect_count").." kusov alpy.")
			say("")
		end
		
		when 1036.kill  begin
			local s = number(1,10)
			if s <= 5 and pc.count_item(31004)<=19 then
			pc.give_item2(31004, 1)
			end
		end
				
    	when 20041.chat."Daj sem tu Alpu" with pc.count_item(31004) >0   begin
			if get_time() > pc.getqf("duration") then
				say_title("Jožo")
				---                                                   l
				say("Zas si tu? ty ma nesleduj si nejaký úchyl alebo čo? ")
				say("Ahá ty máš pre mňa ten nápoj omamný, daj mi čuchnúť trošku.")
				say("Ale dokážem vypiť iba 1 Alpu za 1 sekundu")
				say("")
				pc.remove_item(31004, 1)
				pc.setqf("duration",get_time()+1) ----------------22??
				wait()
				
				local pass_percent
				if pc.getqf("drink_drug")==0 then
					pass_percent=100
				else		
					pass_percent=90
				end
				
				local s= number(1,100)
				if s<= pass_percent  then
				   if pc.getqf("collect_count")< 19 then     --15 Dämonenandenken
						local index =pc.getqf("collect_count")+1 
						pc.setqf("collect_count",index)     --¨ú±o¤@*Ó®É+1 
						say_title("Jožo")
						say(" Áno je to ona Alpa moja zlatá.")
						say("Ještě mi prines".." "..20-pc.getqf("collect_count").. " Alp.")
						say("Nezabudni, že vypiť dokážem iba 1 Alpu za 1 sekundu.")
						say("")
						pc.setqf("drink_drug",0)	 --ĂĤôŞě©l¤Ć
						return
					end
					say_title("Jožo")
					say("Dušanko, Dušanko, dobrého človeka si poslal")
					say("Vďaka za alpy, vela si mi pomohol.")
					say("Na oplátku ti dám Riedidlo pre Dušana.")
					say("A pozdravuj ho, od Joža!")
					say("")	
					pc.give_item2(50216, 1)
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)	
					pc.setqf("duration",0)
					return
				else								
				say_title("Jožo")
				say("Prepač ale toto nieje alpa")
				say("to je ňáká Voda alebo čo.")
				say("Prines mi prosím inú.")
				say("")				   
				pc.setqf("drink_drug",0)	 --ĂĤôŞě©l¤Ć
				return
				end
		else
		  say_title("Jožo")
		  say("Veď čo robíš, ještě som ")
		  say("nedopil tvoju poslednú alpu. ")
		  say(" Vrať sa čo skoro.")
		  say("")
		  set_state(__reward)
		end
	end
end	
	state __reward begin
		when letter begin
			send_letter("Jdi za Dušanem")
			
			local v = find_npc_by_vnum(20356)
			if v != 0 then
				target.vid("__TARGET__", v, "Sběrač listí Gingo")
			end
		end
		when button or info begin
			say_title("Najdi Feťáka Dušana")
			---                                                   l
			say("Když ho najdeš, dostaneš od")
			say("něj nějakou odměnu.")
			say("")
		end
		
		when __TARGET__.target.click  or
			20356.chat."Mám riedidlo" with pc.count_item(50216) >0   begin
		    target.delete("__TARGET__")
			say_title("Dušan:")
			say("Hej, hej kamarát čo mi to nesieš to je dúfam pre mňa,")
			say("samozrejme, že je to pre mňa, že kamarát viete ako.")
			say("Já už dlho plánujem ísť na liečenie, ale ešte nejdem.")
			say(" Čo ten Jožo, že ma pozdravoval? ")
			say("Ožran jeden, kiež by ho žena doma dobila, ale keby nie je ")
			say(" jeho a Teba, hej tak by som tu už nebol.")
			say(" ďakujem ti kamarát a tu máš odmenu.")
			say(" A nehovor mi aby som s tým fetom prestal ako,")
			say("radšej sa mám dať na chlast hej, ale ja hovorím, ")
			say("to už je môj život, teba do toho nič. ")
			say("Maj sa kamarát.")
			say("")	
			pc.give_item2(71107, 2)	
			pc.remove_item(50216, 1)
			
			clear_letter()
			set_state(__complete)
		end
			
	end

	state __complete begin
	end
end
Problem:
state _reward begin doesn´t apply target on 30256 and when I relog ingame I have to bring 20x 31004 again...
__________________________________________________ _______
Code:
quest pvpquest1 begin
	state start begin
		when login or levelup with pc.level >= 245 begin
		set_state(zabity)
	end
end

state zabity begin
	when letter begin
	send_letter("Quest - PvP")
end

	when button or info begin
	say_title("Chceš získat nějaké mince?.")
		say("Zabij hráče z nepřátelských říší,")
		say("kteří mají level 245.")
		say("Zvládneš jich zabít 250?")
		say_reward("Tvůj lov může začít.")
		say("")
	pc.setqf("state", 250)
		q.set_counter("kills", 250)
	set_state(kill)
	end
end

state kill begin
	when letter begin
	send_letter("Zabity")
end

when button or info begin
	say_title("Ahoj")
	say_reward("Zabil jsi "..pc.getqf("state")/250")
say("")
end

when kill begin
	if npc.is_pc() and npc.empire != pc.empire with pc.level >= 245 then 
	local count = pc.getqf("Stav") - 1
	if count <= 250then
	pc.setqf("state", count)
	q.set_counter("kills", -count)
end
	if count == 0 then
		say("Blahopřeji")
		say("Dokázal jsi zabít 250 hráčů ")
		say("")
		pc.give_item2(50132, 1)
		end
	end
end
		clear_letter()
		set_state(__COMPLETE__)
		set_quest_state("PVPquest2", "run")
		end
	end
end
	state __COMPLETE__ begin
	end
end
Problem:
Error occured compile pvpquest1.quest (All functions are in quest_functions)
___________________________
Sorry for my bad english...
Thank you for your help.

Happy new Year
01/01/2016 15:48 Pawnz99#12065
Moinsen erstmal Leute, und ein frohes neues;*:D
Irgendwas an der Quest ist falsch, aber was? weiss ich nicht ich hoffe einer von euch kann mir dabei behilflich sein , und Byeeeee

PHP Code:
quest ingameranking begin 
    state start begin 
        when login with pc.is_gm() begin 
            if game.get_event_flag("ingamerankingplatz1") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 1") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 2") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz3") == pc.get_name() then         
            if game.get_event_flag("ingamerankingplatz3") != pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 3") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 4") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team")         
                elseif game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 5") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 6") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 7") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 8") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 10") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 10") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                end 
            end 
        end         
        when levelup begin 
            if pc.get_level()> game.get_event_flag("ingamerankingplatz1") and game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz1", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz1lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz2") and game.get_event_flag("ingamerankingplatz3") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz2", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz2lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz3") and game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz3", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz3lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz4") and game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz4", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz4lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz5") and game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz5", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz5lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz6") and game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz6", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz6lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz7") and game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz7", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz7lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz8") and game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz8", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz8lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz9") and game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz9", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz9lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz10") then 
                game.set_event_flag("ingamerankingplatz10", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz10lvl", pc.get_level()) 
            end 
        end 
        when 20354.chat."Rangliste" with pc.is_gm() begin 
            say_title("Rangliste:") 
            say("") 
            say("Platz 1: ".. game.get_event_flag("ingamerankingplatz1") .." Level: ".. game.get_event_flag("ingamerankingplatz1lvl") .."") 
            say("Platz 2: ".. game.get_event_flag("ingamerankingplatz2") .." Level: ".. game.get_event_flag("ingamerankingplatz2lvl") .."") 
            say("Platz 3: ".. game.get_event_flag("ingamerankingplatz3") .." Level: ".. game.get_event_flag("ingamerankingplatz3lvl") .."") 
            say("Platz 4: ".. game.get_event_flag("ingamerankingplatz4") .." Level: ".. game.get_event_flag("ingamerankingplatz4lvl") .."") 
            say("Platz 5: ".. game.get_event_flag("ingamerankingplatz5") .." Level: ".. game.get_event_flag("ingamerankingplatz5lvl") .."") 
            say("Platz 6: ".. game.get_event_flag("ingamerankingplatz6") .." Level: ".. game.get_event_flag("ingamerankingplatz6lvl") .."") 
            say("Platz 7: ".. game.get_event_flag("ingamerankingplatz7") .." Level: ".. game.get_event_flag("ingamerankingplatz7lvl") .."") 
            say("Platz 8: ".. game.get_event_flag("ingamerankingplatz8") .." Level: ".. game.get_event_flag("ingamerankingplatz8lvl") .."") 
            say("Platz 9: ".. game.get_event_flag("ingamerankingplatz9") .." Level: ".. game.get_event_flag("ingamerankingplatz9lvl") .."") 
            say("Platz 10: ".. game.get_event_flag("ingamerankingplatz10") .." Level: ".. game.get_event_flag("ingamerankingplatz10lvl") .."") 
            say_reward("Das sind nur die besten der Besten") 
            --wait() 
            if game.get_event_flag("ingamerankingplatz1") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 1 der Rangliste") 
                say("") 
                say_reward("Herzlichen Glueckwunsch") 
            elseif game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 2 der Rangliste") 
                say("Streng dich an und bald bist du der Fuehrende") 
                say("") 
                say_reward("Du hast es bald geschafft!") 
            elseif game.get_event_flag("ingamerankingplatz3") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 3 der Rangliste") 
                say("Nurnoch 2 User sind vor dir") 
                say("") 
                say_reward("Geh leveln dann bist du bald 2.") 
            elseif game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 3 der Rangliste") 
                say("Nurnoch 3 User sind vor dir") 
                say("Das waere nur eine Blechmedaille") 
                say("") 
                say_reward("Geh leveln dann bist du bald 3.") 
            elseif game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 5 der Rangliste") 
                say("Nurnoch 4 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 6 der Rangliste") 
                say("Nurnoch 5 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 7 der Rangliste") 
                say("Nurnoch 6 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 8 der Rangliste") 
                say("Nurnoch 7 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 9 der Rangliste") 
                say("Nurnoch 8 User sind vor dir") 
                say("Du schaffst das schon noch!) 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 10 der Rangliste") 
                say("Wenn du dich nicht anstrengst,") 
                say("Bist du bald nicht mehr verzeichnet") 
                say("") 
                say_reward("Geh leveln wenn du in der Rangliste bleiben willst!") 
            elseif game.get_event_flag("ingamerankingplatz10") != pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("leider noch nicht verzeichnet") 
                say("Aber du kannst es schaffen, wir glauben daran") 
                say("") 
                say_reward("Long way to go!") 
            end 
         end 
      end 
   end 
end 
01/01/2016 19:40 rollback#12066
Quote:
Originally Posted by Pawnz99 View Post
Moinsen erstmal Leute, und ein frohes neues;*:D
Irgendwas an der Quest ist falsch, aber was? weiss ich nicht ich hoffe einer von euch kann mir dabei behilflich sein , und Byeeeee

PHP Code:
quest ingameranking begin 
    state start begin 
        when login with pc.is_gm() begin 
            if game.get_event_flag("ingamerankingplatz1") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 1") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 2") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz3") == pc.get_name() then         
            if game.get_event_flag("ingamerankingplatz3") != pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 3") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 4") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team")         
                elseif game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 5") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 6") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 7") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 8") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 10") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                elseif game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                    chat("Du bist auf der Rangliste Platz 10") 
                    chat("Herzlichen Glueckwunsch vom Antakia2 Team") 
                end 
            end 
        end         
        when levelup begin 
            if pc.get_level()> game.get_event_flag("ingamerankingplatz1") and game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz1", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz1lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz2") and game.get_event_flag("ingamerankingplatz3") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz2", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz2lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz3") and game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz3", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz3lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz4") and game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz4", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz4lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz5") and game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz5", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz5lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz6") and game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz6", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz6lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz7") and game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz7", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz7lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz8") and game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz8", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz8lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz9") and game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                game.set_event_flag("ingamerankingplatz9", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz9lvl", pc.get_level()) 
            elseif pc.get_level() > game.get_event_flag("ingamerankingplatz10") then 
                game.set_event_flag("ingamerankingplatz10", pc.get_name()) 
                game.set_event_flag("ingamerankingplatz10lvl", pc.get_level()) 
            end 
        end 
        when 20354.chat."Rangliste" with pc.is_gm() begin 
            say_title("Rangliste:") 
            say("") 
            say("Platz 1: ".. game.get_event_flag("ingamerankingplatz1") .." Level: ".. game.get_event_flag("ingamerankingplatz1lvl") .."") 
            say("Platz 2: ".. game.get_event_flag("ingamerankingplatz2") .." Level: ".. game.get_event_flag("ingamerankingplatz2lvl") .."") 
            say("Platz 3: ".. game.get_event_flag("ingamerankingplatz3") .." Level: ".. game.get_event_flag("ingamerankingplatz3lvl") .."") 
            say("Platz 4: ".. game.get_event_flag("ingamerankingplatz4") .." Level: ".. game.get_event_flag("ingamerankingplatz4lvl") .."") 
            say("Platz 5: ".. game.get_event_flag("ingamerankingplatz5") .." Level: ".. game.get_event_flag("ingamerankingplatz5lvl") .."") 
            say("Platz 6: ".. game.get_event_flag("ingamerankingplatz6") .." Level: ".. game.get_event_flag("ingamerankingplatz6lvl") .."") 
            say("Platz 7: ".. game.get_event_flag("ingamerankingplatz7") .." Level: ".. game.get_event_flag("ingamerankingplatz7lvl") .."") 
            say("Platz 8: ".. game.get_event_flag("ingamerankingplatz8") .." Level: ".. game.get_event_flag("ingamerankingplatz8lvl") .."") 
            say("Platz 9: ".. game.get_event_flag("ingamerankingplatz9") .." Level: ".. game.get_event_flag("ingamerankingplatz9lvl") .."") 
            say("Platz 10: ".. game.get_event_flag("ingamerankingplatz10") .." Level: ".. game.get_event_flag("ingamerankingplatz10lvl") .."") 
            say_reward("Das sind nur die besten der Besten") 
            --wait() 
            if game.get_event_flag("ingamerankingplatz1") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 1 der Rangliste") 
                say("") 
                say_reward("Herzlichen Glueckwunsch") 
            elseif game.get_event_flag("ingamerankingplatz2") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 2 der Rangliste") 
                say("Streng dich an und bald bist du der Fuehrende") 
                say("") 
                say_reward("Du hast es bald geschafft!") 
            elseif game.get_event_flag("ingamerankingplatz3") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 3 der Rangliste") 
                say("Nurnoch 2 User sind vor dir") 
                say("") 
                say_reward("Geh leveln dann bist du bald 2.") 
            elseif game.get_event_flag("ingamerankingplatz4") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 3 der Rangliste") 
                say("Nurnoch 3 User sind vor dir") 
                say("Das waere nur eine Blechmedaille") 
                say("") 
                say_reward("Geh leveln dann bist du bald 3.") 
            elseif game.get_event_flag("ingamerankingplatz5") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 5 der Rangliste") 
                say("Nurnoch 4 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz6") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 6 der Rangliste") 
                say("Nurnoch 5 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz7") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 7 der Rangliste") 
                say("Nurnoch 6 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz8") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 8 der Rangliste") 
                say("Nurnoch 7 User sind vor dir") 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz9") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 9 der Rangliste") 
                say("Nurnoch 8 User sind vor dir") 
                say("Du schaffst das schon noch!) 
                say("") 
                say_reward("Geh leveln und verbessere dein Ergebnis!") 
            elseif game.get_event_flag("ingamerankingplatz10") == pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("auf Platz 10 der Rangliste") 
                say("Wenn du dich nicht anstrengst,") 
                say("Bist du bald nicht mehr verzeichnet") 
                say("") 
                say_reward("Geh leveln wenn du in der Rangliste bleiben willst!") 
            elseif game.get_event_flag("ingamerankingplatz10") != pc.get_name() then 
                say_title("Rangliste:") 
                say("") 
                say("Du bist") 
                say("leider noch nicht verzeichnet") 
                say("Aber du kannst es schaffen, wir glauben daran") 
                say("") 
                say_reward("Long way to go!") 
            end 
         end 
      end 
   end 
end 
Code:
quest ingameranking begin
	state start begin
		when login with pc.is_gm() begin
			local plPID = pc.get_player_id()
			local topPlayers = ingameranking.getTop(10)
			
			for i,player in ipairs(topPlayers) do
				if player.pid == plPID then
					chat("Du bist auf der Rangliste Platz " .. i)
					chat("Herzlichen Glueckwunsch vom Antakia2 Team")
					break
				end
			end
		end
		
		when 20354.chat."Rangliste" with pc.is_gm() begin
			local plPID = pc.get_player_id()
			local topPlayers = ingameranking.getTop(10)
			local plRank = nil
			
			
			say_title("Rangliste:")
			say("")
			
			for i,player in ipairs(topPlayers) do
				say(string.format("Platz %d: %s Level: %d", i, player.name, player.level))
				
				if player.pid == plPID then
					plRank = i
				end
			end
			
			say_reward("Das sind nur die besten der Besten")
			
			wait()
			
			if plRank then
				say_title("Rangliste:") 
				say("") 
				say("Du bist") 
				say("auf Platz " .. plRank .. " der Rangliste")
				say("Nurnoch " .. (plRank - 1) .. " User sind vor dir")
				say("Du schaffst das schon noch!")
				say("")
				say_reward("Geh leveln und verbessere dein Ergebnis!")
			else
				say_title("Rangliste:") 
				say("") 
				say("Du bist") 
				say("leider noch nicht verzeichnet") 
				say("Aber du kannst es schaffen, wir glauben daran") 
				say("") 
				say_reward("Long way to go!")
			end
		end
		
		function getTop(count)
			local topResult = mysql_query("SELECT id,name,level FROM player.player ORDER BY level DESC, exp DESC, playtime ASC " .. (count and "LIMIT " .. count or "") .. ";")
			if not topResult then return nil end
			
			local topPlayers = {}
			for _,player in ipairs(topResult) do
				table.insert(topPlayers, {pid = tonumber(player[1]), name = player[2], level = tonumber(player[3])})
			end
			
			return topPlayers
		end
	end
end
01/03/2016 02:48 Pawnz99#12067
Falls einer mir behilflich sein kann wäre es nice:D
Mfg <3 Die Fehlermeldung ist nochmal [Only registered and activated users can see links. Click Here To Register...] aber es muss an der quest liegen von daher ist die Fehlermeldung nicht so wichtig, aber falls ihr sie benötigt ....

Hier die Quest:

PHP Code:
quest vote begin 
    state start begin 
        when 11000.chat."Serverbewertung" with pc.is_gm() begin 
                if game.get_event_flag("bewertung") >=1 then    
                    say_gold("Möchtest du die Bewertung ausschalten?") 
                    local g = select("Ja", "NeiN") 
                    if g == 2 then 
                        return 
                    elseif g == 1 then 
                        game.set_event_flag("bewertung", 0) 
                    end 
                end 
                say_gold("Möchtest du das Bewertungssystem einschalten?") 
                local s = select("Ja", "Nein") 
                if s == 2 then 
                    return 
                elseif s == 1 then 
                    game.set_event_flag("bewertung", 1) 
                    say_reward("Eingeschaltet!") 
                end 
        end 
        when 11000.chat."Serverbewertung" with game.get_event_flag("bewertung") >=1 then 
            say_size(256, 329) 
            say_gold("Hier kannst du unseren Server bewerten!") 
            local menu = select("Aktuelle Statistik", "Voten", "Abbrechen") 
            if menu == 3 then 
                return 
            elseif menu == 1 then 
                say_reward("Unsere akutuelle Statistik:") 
                say("Bester Server"..game.get_event_flag("bewertung_beschde").."") 
                say("") 
                say("Klasse Server"..game.get_event_flag("bewertung_klasse").."") 
                say("") 
                say("Es gab schon bessere Server.."..game.get_event_flag("bewertung_mittel").."") 
                say("") 
                say("Schlechter Server"..game.get_event_flag("bewertung_schlecht").."") 
            elseif menu == 2 then 
                if get_time() >= pc.getqf("vote") then 
                    say_red("Stimme nun ab:") 
                    local s = select("Bester Server", "Klasse Server", "Es gab schon bessere Server..", "Schlechter Server", "Abbrechen") 
                        if s == 5 then 
                            return 
                        elseif s == 1 then 
                            game.set_event_flag("bewertung_beschde", game.get_event_flag("bewertung_beschde")+1) 
                        elseif s == 2 then 
                            game.set_event_flag("bewertung_klasse", game.get_event_flag("bewertung_klasse")+1) 
                        elseif s == 3 then 
                            game.set_event_flag("bewertung_mittel", game.get_event_flag("bewertung_mittel")+1) 
                        elseif s == 4 then 
                            game.set_event_flag("bewertung_schlecht", game.get_event_flag("bewertung_schlecht")+1) 
                        end 
                        say_gold("Du hast erfolgreich abgestimmt!") 
                        say_gold("Du kannst in 24Stunden wieder voten!") 
                        pc.setqf("vote",get_time()+60*60*24)    
                else 
                    say_black("Du musst 24 Stunden warten bis du wieder voten kannst!") 
                    return 
                end 
            end 
        end 
    end 
end 
01/03/2016 02:51 WhiteKinG#12068
Hallo,
ich habe gerade angefangen, eine Quest zuschreiben. Jetzt kommt der Error und ich finde den Fehler nicht.
Fehler:
Code:
WHEN  : pc.getqf
pre_qc/CapeDragon.quest:92:when doesn't have begin-end clause. (()
Error occured on compile CapeDragon.quest
Teilabschnitt des Codes mit Fehler:
PHP Code:
when pc.getqf("g_temp") == 3 begin
            say_title(main.quest2.title) 
            say(main.quest2.string02)
            local v = find_npc_by_vnum(20378) 
            if 0 != v then
                target.vid("__TARGET__", v, mob_name(20378))
            end
        end 
Ganzer Code:
01/03/2016 06:05 rollback#12069
Quote:
Originally Posted by WhiteKinG View Post
Hallo,
ich habe gerade angefangen, eine Quest zuschreiben. Jetzt kommt der Error und ich finde den Fehler nicht.
Fehler:
Code:
WHEN  : pc.getqf
pre_qc/CapeDragon.quest:92:when doesn't have begin-end clause. (()
Error occured on compile CapeDragon.quest
Teilabschnitt des Codes mit Fehler:
PHP Code:
when pc.getqf("g_temp") == 3 begin
            say_title(main.quest2.title) 
            say(main.quest2.string02)
            local v = find_npc_by_vnum(20378) 
            if 0 != v then
                target.vid("__TARGET__", v, mob_name(20378))
            end
        end 
Ganzer Code:
Die Quest braucht einen Trigger (login, levelup, kill, ...). Eine Bedingung kannst du nicht als Trigger nutzen.
01/03/2016 15:28 gerald500#12070
Quote:
Originally Posted by Pawnz99 View Post
Falls einer mir behilflich sein kann wäre es nice:D
Mfg <3 Die Fehlermeldung ist nochmal [Only registered and activated users can see links. Click Here To Register...] aber es muss an der quest liegen von daher ist die Fehlermeldung nicht so wichtig, aber falls ihr sie benötigt ....

Hier die Quest:

PHP Code:
quest vote begin 
    state start begin 
        when 11000.chat."Serverbewertung" with pc.is_gm() begin 
                if game.get_event_flag("bewertung") >=1 then    
                    say_gold("Möchtest du die Bewertung ausschalten?") 
                    local g = select("Ja", "NeiN") 
                    if g == 2 then 
                        return 
                    elseif g == 1 then 
                        game.set_event_flag("bewertung", 0) 
                    end 
                end 
                say_gold("Möchtest du das Bewertungssystem einschalten?") 
                local s = select("Ja", "Nein") 
                if s == 2 then 
                    return 
                elseif s == 1 then 
                    game.set_event_flag("bewertung", 1) 
                    say_reward("Eingeschaltet!") 
                end 
        end 
        when 11000.chat."Serverbewertung" with game.get_event_flag("bewertung") >=1 then 
            say_size(256, 329) 
            say_gold("Hier kannst du unseren Server bewerten!") 
            local menu = select("Aktuelle Statistik", "Voten", "Abbrechen") 
            if menu == 3 then 
                return 
            elseif menu == 1 then 
                say_reward("Unsere akutuelle Statistik:") 
                say("Bester Server"..game.get_event_flag("bewertung_beschde").."") 
                say("") 
                say("Klasse Server"..game.get_event_flag("bewertung_klasse").."") 
                say("") 
                say("Es gab schon bessere Server.."..game.get_event_flag("bewertung_mittel").."") 
                say("") 
                say("Schlechter Server"..game.get_event_flag("bewertung_schlecht").."") 
            elseif menu == 2 then 
                if get_time() >= pc.getqf("vote") then 
                    say_red("Stimme nun ab:") 
                    local s = select("Bester Server", "Klasse Server", "Es gab schon bessere Server..", "Schlechter Server", "Abbrechen") 
                        if s == 5 then 
                            return 
                        elseif s == 1 then 
                            game.set_event_flag("bewertung_beschde", game.get_event_flag("bewertung_beschde")+1) 
                        elseif s == 2 then 
                            game.set_event_flag("bewertung_klasse", game.get_event_flag("bewertung_klasse")+1) 
                        elseif s == 3 then 
                            game.set_event_flag("bewertung_mittel", game.get_event_flag("bewertung_mittel")+1) 
                        elseif s == 4 then 
                            game.set_event_flag("bewertung_schlecht", game.get_event_flag("bewertung_schlecht")+1) 
                        end 
                        say_gold("Du hast erfolgreich abgestimmt!") 
                        say_gold("Du kannst in 24Stunden wieder voten!") 
                        pc.setqf("vote",get_time()+60*60*24)    
                else 
                    say_black("Du musst 24 Stunden warten bis du wieder voten kannst!") 
                    return 
                end 
            end 
        end 
    end 
end 

so weit ich das sehen kann

("Bester Server"..game.get_event_flag("bewertung_beschde"). ."")

gehört das überall so gemacht:

("Bester Server"..game.get_event_flag("bewertung_beschde"))

bessert mich mal aus falls das nicht stimmt aber am ende kommt ja kein string mehr also braucht man .."" nicht
01/03/2016 15:43 rollback#12071
Quote:
Originally Posted by gerald500 View Post
so weit ich das sehen kann

("Bester Server"..game.get_event_flag("bewertung_beschde"). ."")

gehört das überall so gemacht:

("Bester Server"..game.get_event_flag("bewertung_beschde"))

bessert mich mal aus falls das nicht stimmt aber am ende kommt ja kein string mehr also braucht man .."" nicht
Was du sagst ist richtig, hat allerdings nichts mit seiner Fehlermeldung zu tun.
01/03/2016 16:02 .Delta#12072
PHP Code:
when 11000.chat."Serverbewertung" with game.get_event_flag("bewertung") >=1 then 
-->
PHP Code:
when 11000.chat."Serverbewertung" with game.get_event_flag("bewertung") >=1 begin 
01/03/2016 17:48 gerald500#12073
Quote:
Originally Posted by Seחsi View Post
Was du sagst ist richtig, hat allerdings nichts mit seiner Fehlermeldung zu tun.
oh ich hab garnicht gesehen das er die auch gepostet hat ^^
01/03/2016 17:58 Pawnz99#12074
Quote:
Originally Posted by Seחsi View Post
Code:
quest ingameranking begin
	state start begin
		when login with pc.is_gm() begin
			local plPID = pc.get_player_id()
			local topPlayers = ingameranking.getTop(10)
			
			for i,player in ipairs(topPlayers) do
				if player.pid == plPID then
					chat("Du bist auf der Rangliste Platz " .. i)
					chat("Herzlichen Glueckwunsch vom Antakia2 Team")
					break
				end
			end
		end
		
		when 20354.chat."Rangliste" with pc.is_gm() begin
			local plPID = pc.get_player_id()
			local topPlayers = ingameranking.getTop(10)
			local plRank = nil
			
			
			say_title("Rangliste:")
			say("")
			
			for i,player in ipairs(topPlayers) do
				say(string.format("Platz %d: %s Level: %d", i, player.name, player.level))
				
				if player.pid == plPID then
					plRank = i
				end
			end
			
			say_reward("Das sind nur die besten der Besten")
			
			wait()
			
			if plRank then
				say_title("Rangliste:") 
				say("") 
				say("Du bist") 
				say("auf Platz " .. plRank .. " der Rangliste")
				say("Nurnoch " .. (plRank - 1) .. " User sind vor dir")
				say("Du schaffst das schon noch!")
				say("")
				say_reward("Geh leveln und verbessere dein Ergebnis!")
			else
				say_title("Rangliste:") 
				say("") 
				say("Du bist") 
				say("leider noch nicht verzeichnet") 
				say("Aber du kannst es schaffen, wir glauben daran") 
				say("") 
				say_reward("Long way to go!")
			end
		end
		
		function getTop(count)
			local topResult = mysql_query("SELECT id,name,level FROM player.player ORDER BY level DESC, exp DESC, playtime ASC " .. (count and "LIMIT " .. count or "") .. ";")
			if not topResult then return nil end
			
			local topPlayers = {}
			for _,player in ipairs(topResult) do
				table.insert(topPlayers, {pid = tonumber(player[1]), name = player[2], level = tonumber(player[3])})
			end
			
			return topPlayers
		end
	end
end
______________________________________

Und jetzt taucht die Fehlermeldung auf....
----------------------------------------------------
WHEN : 20354.chat ("Rangliste")
with pc . is_gm ( )
Function get_Top (count)
Calls undeclared funktion ! :
ingamranking.getTop
ipairs
Error occured on compile ingameranking.quest
-----------------------------------------------------
Falls ihr es sehen wollt:


hier
01/03/2016 19:49 rollback#12075
Quote:
Originally Posted by Pawnz99 View Post
______________________________________

Und jetzt taucht die Fehlermeldung auf....
----------------------------------------------------
WHEN : 20354.chat ("Rangliste")
with pc . is_gm ( )
Function get_Top (count)
Calls undeclared funktion ! :
ingamranking.getTop
ipairs
Error occured on compile ingameranking.quest
-----------------------------------------------------
Falls ihr es sehen wollt:


hier
einfach in die quest_functions reinschreiben ;)
Page 805 of 845 « First 305705755795803804 805 806807815 Last »