[SERVICE] Die Questkontrolle

quest ingame_tombola begin
	state start begin
		function give_item()
			-- Methode 1: MySQL
			--[[local item = mysql_query("select vnum,anz from player.tombola_items;")]]
			-- Methode 2: Array
				--[[local item = {
					{19, 1},
					{29, 1},
					{39, 1},
					{49, 1},
					{59, 1},
				}
			]]
			local anz = number(1, table.getn(item))
			pc.give_item2(item[1], item[2])
		end
		function get_coins()
			local c = mysql_query("select coins from account.account where id = 
			function pc.get_accountid(c1)
    local b5 = mysql_query("SELECT account_id FROM player.player WHERE player.name='"..c1.."'")
    return b5[1]
end  
			return c
		end
		when 20095.chat."Ingame Tombola" begin
			if pc.getqf("frei") == 1 then
				say_title(string.format("%d:", mob_name(npc.get_race())))
				say()
				say("Du kannst an der Tombola noch nicht teilnehmen.")
				wait()
				return
			end
			local current_coins = ingame_tombola.get_coins()
			local reward_coins = 500
			say_title(string.format("%d:", mob_name(npc.get_race())))
			say_reward(string.format("Aktuelle Coins: %d", current_coins))
			say_reward(string.format("Teilnahmekosten: %d Coins", reward_coins))
			say()
			if select("Teilnehmen","Abbrechen") == 2 then return end
			if current_coins < reward_coins then return chat(string.format("Dir fehlen %d Coins", (reward_coins - current_coins))) end
			ingame_tombola.give_item()
			mysql_query("update account.account set coins = coins - reward_coins where id = '"..pc.get_accountid().."';")
			pc.setqf("frei",1)
			server_timer("freimachen", 60*60*24)
		end
		end
	end
end

Quote:

QUEST : ingame_tombola STATE : start FUNCTION give_item() Error occured on compile ingame_tombola.quest

Quote:

quest jobquest begin state start begin end state run begin when login or levelup with pc.level >= 50 and pc.level <= 250 begin set_state(information) end end state information begin when letter begin local v = find_npc_by_vnum(20355) if v != 0 then target.vid("__TARGET__", v, "Häuptling") end send_letter("Spezifische Ausbildung") end when button or info begin say_title("Die Spezifische Ausbildung..") say("Gehe zum Häuptling, er sucht dich.") say("Es steht eine weitere Ausbildung für dich bereit.") say("Er wird dich weiter ausbilden.") say("Du solltest nicht auf dich warten lassen..") say_reward("Gehe zum Häuptling deines Reiches!!") end when __TARGET__.target.click or 20355.chat."Spezifische Ausbildung" begin say_title("Spezifische Klassenausbildung:") say("") say(""..pc.get_name()..", sei gegrüßt!") say("Du kannst bei mir eine Ausbildung beginnen") say("je nach Wahl bekommst du andere Vorteile.") say("Doch eins muss ich dir sagen wähle klug, denn") say("es gibt anderen Spielern gegenüber") say("Vor - und Nachteile.") say("") say("") wait() say_black("Spezifische Klassenausbildung:") say("") say("Ich zähle dir nun auf was in Frage kommen würde") say("bei den Ausbildungen. Du kannst wählen") say("zwischen:") say("") say("Gladiator (Körper-Lehre)") say("Berserker (Mental-Lehre)") say("Assasine (Nahkampf-Lehre)") say("Jäger (Fernkampf-Lehre)") say("Alchemist (Waffen-Lehre)") say("Magier (Schwarze Magie-Lehre)") say("Heiler (Heil-Lehre)") say("Beschwörer (Drachenmacht-Lehre)") say("") say("") wait() say_title("Spezifische Klassenausbildung:") say("") say("Nun wähle weise und entscheide dich") say("welchen Weg du beschreiten möchtest.") say("") local wahl = select ("Gladiator", "Berserker", "Assasine", "Jäger", "Alchemist", "Magier", "Heiler", "Beschwörer", "Abbrechen") if wahl == 9 then return elseif wahl == 1 then say_title("Ausbildung zum Gladiator:") say("") say("Du hast dich zu einer Ausbildung zum") say("Gladiator entschieden "..pc.get_name()..".") say("Du wirst ein Kriegsherr deines Reiches!") say("") say("Du bekommst:") say("") say_reward("+5 Stärke") say_reward("5% Durchbruch") say_reward("30 Angriffswert") affect.add_collect(apply.ATT_GRADE_BONUS, 30, 60*60*24*365*60) affect.add_collect(apply.STR, 5, 60*60*24*365*60) affect.add_collect(apply.PENETRATE_PCT, 5, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 2 then say_title("Ausbildung zum Berserker:") say("") say("Du hast dich zu einer Ausbildung zum") say("Berserker entschieden "..pc.get_name()..".") say("Du wirst das Veiteidigungskommando deines Reiches!") say("") say("Du bekommst:") say("") say_reward("+5 Beweglichkeit") say_reward("+10% Zaubergeschwindigkeit") say_reward("+10% Angriffsgeschwindigkeit") affect.add_collect(apply.DEX, 5, 60*60*24*365*60) affect.add_collect(apply.CAST_SPEED, 10, 60*60*24*365*60) affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 3 then say_title("Ausbildung zum Assasine:") say("") say("Du hast dich zu einer Ausbildung zum") say("Assasine entschieden "..pc.get_name()..".") say("Du wirst ein unendeckter Assasine, der aus dem Hinterhalt angreift!") say("") say("Du bekommst:") say("") say_reward("+5 Beweglichkeit") say_reward("+5% Chance auf Vergiften") say_reward("+5% reflektieren") affect.add_collect(apply.DEX, 5, 60*60*24*365*60) affect.add_collect(apply.POISON_PCT, 5, 60*60*24*365*60) affect.add_collect(apply.REFLECT_MELEE, 5, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 4 then say_title("Ausbildung zum Jäger:") say("") say("Du hast dich zu einer Ausbildung zum") say("Jäger entschieden "..pc.get_name()..".") say("Du wirst ein präziser Fernkämpfer und kannst deinen Reich Rückendeckung geben!") say("") say("Du bekommst:") say("") say_reward("+5 Stärke") say_reward("+3% Ohnmachtchance") say_reward("+5% abblocken") affect.add_collect(apply.STR, 5, 60*60*24*365*60) affect.add_collect(apply.STUN_PCT, 3, 60*60*24*365*60) affect.add_collect(apply.BLOCK, 5, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 5 then say_title("Ausbildung zum Alchemist:") say("") say("Du hast dich zu einer Ausbildung zum") say("Alchemist entschieden "..pc.get_name()..".") say("Du wirst ein mysteriöser Alchemist und kämpst mit verzauberten Waffen für dein Reich!") say("") say("Du bekommst:") say("") say_reward("+5 Intelligenz") say_reward("+5% Giftwiderstand") say_reward("+5% Verlangsamen") affect.add_collect(apply.INT, 5, 60*60*24*365*60) affect.add_collect(apply.POISON_REDUCE, 5, 60*60*24*365*60) affect.add_collect(apply.SLOW_PCT, 5, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 6 then say_title("Ausbildung zum Magier:") say("") say("Du hast dich zu einer Ausbildung zum") say("Magier entschieden "..pc.get_name()..".") say("Du wirst ein mächtiger dunkler Magier, der für sein Reich zaubert!") say("") say("Du bekommst:") say("") say_reward("+5 Intelligenz") say_reward("+20% Tp-Regeneration") say_reward("+10% Tp-Absorbtion") affect.add_collect(apply.INT, 5, 60*60*24*365*60) affect.add_collect(apply.HP_REGEN, 20, 60*60*24*365*60) affect.add_collect(apply.STEAL_HP, 10, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 7 then say_title("Ausbildung zum Heiler:") say("") say("Du hast dich zu einer Ausbildung zum") say("Heiler entschieden "..pc.get_name()..".") say("Du wirst Heiler deines Reiches. Du wirst den mächtigen Krieger im Kampf zur Seite stehen!") say("") say("Du bekommst:") say("") say_reward("+5 Intelligenz") say_reward("+20% Tp-Regeneration") say_reward("+5% Krit") affect.add_collect(apply.INT, 5, 60*60*24*365*60) affect.add_collect(apply.HP_REGEN, 20, 60*60*24*365*60) affect.add_collect(apply.CRITICAL_PCT, 5, 60*60*24*365*60) set_state(__COMPLETE__) elseif wahl == 8 then say_title("Ausbildung zum Beschwörer:") say("") say("Du hast dich zu einer Ausbildung zum") say("Beschwörer entschieden "..pc.get_name()..".") say("Du wirst ein mächtiger Beschwörer. Du kannst mächtige Wesen herbeirufen!") say("") say("Du bekommst:") say("") say_reward("+5 Intelligenz") say_reward("+10% Zaubergeschwindigkeit") say_reward("+20 Magischer angriffswert") affect.add_collect(apply.INT, 5, 60*60*24*365*60) affect.add_collect(apply.CAST_SPEED, 3, 60*60*24*365*60) affect.add_collect(apply.ATT_GRADE_BONUS, 20, 60*60*24*365*60) set_state(__COMPLETE__) end end end state __COMPLETE__ begin end end

Quote:

Originally Posted by LeykasRecordz Code: quest official_pets begin state start begin when 53001.use with pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin if pc.getqf("firephoenix_use") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("firephoenix_use", 1) pc.setqf("firephoenix", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.ATT_MAX_HP, 100, 60*60*8) affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 9999, 60*60*8) horse.set_level("22") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.ATT_MAX_HP, 100, 60*60*8) affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 9999, 60*60*8) horse.unsummon() pc.setqf("firephoenix_use", 0) pc.setqf("firephoenix", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("firephoenix_use") == 1 begin pc.setqf("firephoenix_use", 0) pc.setqf("firephoenix", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier ging alleine fort!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 9999, 60*60*8) end when 53003.use with pc.getqf("firephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin if pc.getqf("icephoenix_use") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("icephoenix_use", 1) pc.setqf("icephoenix", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("23") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("icephoenix_use", 0) pc.setqf("icephoenix", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("icephoenix_use") == 1 begin pc.setqf("icephoenix_use", 0) pc.setqf("icephoenix", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Eisphönix verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53002.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("pwahuang") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin if pc.getqf("reindeer") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("reindeer_use", 1) pc.setqf("reindeer", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("24") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("reindeer_use", 0) pc.setqf("reindeer", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("reindeer_use") == 1 begin pc.setqf("reindeer_use", 0) pc.setqf("reindeer", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin if pc.getqf("pwahuang") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("pwahuang_use", 1) pc.setqf("pwahuang", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("25") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("pwahuang_use", 0) pc.setqf("pwahuang", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("pwahuang_use") == 1 begin pc.setqf("pwahuang_use", 0) pc.setqf("pwahuang", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53006.use with pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin if pc.getqf("dog_use") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("dog_use", 1) pc.setqf("dog", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("26") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("dog_use", 0) pc.setqf("dog", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("dog_use") == 1 begin pc.setqf("dog_use", 0) pc.setqf("dog", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53007.use with pc.getqf("dog") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin if pc.getqf("lion_use") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("lion_use", 1) pc.setqf("lion", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("27") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("lion_use", 0) pc.setqf("lion", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("lion_use") == 1 begin pc.setqf("lion_use", 0) pc.setqf("lion", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53008.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("tiger") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin if pc.getqf("pig") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("pig_use", 1) pc.setqf("pig", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("28") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("pig_use", 0) pc.setqf("pig", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("pig_use") == 1 begin pc.setqf("pig_use", 0) pc.setqf("pig", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end when 53009.use with pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("pwahuang") == 0 begin if pc.getqf("tiger") == 0 then local old_horse_name = horse.get_name() ; if string.len(old_horse_name) == 0 then chat("Dein Haustier hat noch keinen Namen!") end chat("Dein Haustier wurde gerufen!") local your_horse_level = horse.get_level() pc.setqf("horse_level_save", your_horse_level) pc.setqf("tiger_use", 1) pc.setqf("tiger", 1) affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.add_collect(apply.MAX_HP, 1000, 60*60*8) horse.set_level("29") horse.unsummon() horse.summon() local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) else chat("Dein Haustier verabschiedet sich nun von dir!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) horse.unsummon() pc.setqf("tiger_use", 0) pc.setqf("tiger", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) end end when logout or login with pc.getqf("tiger_use") == 1 begin pc.setqf("tiger_use", 0) pc.setqf("tiger", 0) local horse_settings = pc.getqf("horse_level_save") horse.set_level(horse_settings) chat("Dein Haustier verlässt dich nun!") affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) end end end Versuch mal so ;)

Quote:

Originally Posted by Jоe PHP Code: quest horse_getting begin     state start begin         when 20349.chat."Mein Pferd" with horse.get_level()==0 begin             say_title("Stallbursche")             say("Hallo "..pc.get_name())             say("Um ein Pferd von mir zu bekommen")             say("kannst du mir einfach eine")             say("Millionen Yang geben.")             local s = select("Kaufen", "Nicht kaufen")             if s==2 then                  return              end --if             say_title("Stallbursche")             if pc.money>=1000000 then                  pc.changemoney("-1000000")                  horse.unride()                  horse.advance()                  horse.ride()                  pc.set_skill_level(131, 10)                 pc.give_item2("50051", 1)             else                  say("Du hast nicht genug Yang!")                  say("")                  return                 end     --if                                     say("Oh danke! Hier kriegst du ein Pferd.")             say("Pass gut drauf auf!")                     end --when         when 20349.chat."Mein Kampfpferd" with horse.get_level() >=1 and horse.get_level() <11 begin             say_title("Stallbursche")             say("Hallo "..pc.get_name())             say("Um ein Kampfpferd von mir zu bekommen")             say("musst du mir etwas Yang bezahlen.")             say("Die Pferde pflegen sich nicht von")             say("alleine und mir geht bald das Futter")             say("aus. Wenn du mir ein Kampfpferd für")             say("7kk Yang abkaufst währe ich dir sehr")             say("dankbar.")             local s = select("Kaufen", "Nicht kaufen")             if s==2 then                  return              end --if             say_title("Stallbursche")             if pc.get_gold()<7000000 then                 say("Du hast zu wenig Yang um mir")                 say("eines abzukaufen.")                 return             end --if                         say("Oh danke! Hier kriegst du ein Kampfpferd.")             say("Pass gut drauf auf!")             pc.change_gold(-7000000)             pc.give_item2("50052", 1)             pc.remove_item("50051", 1)             horse.unride()             horse.set_level(11)             horse.summon()                 horse.ride()         end --when         when 20349.chat."Mein Millitärspferd" with horse.get_level()>=11 begin             say_title("Stallbursche")             say("Hallo "..pc.get_name())             say("Um ein Millitärspferd von mir zu bekommen")             say("musst du mir einen Gefallen tun.")             say("Der Oberork hat letztens eines meiner")             say("Pferde getötet. Um ihn zu rächen wünsche")             say("ich mir von dir, dass du ihn tötest.")             say_reward("Willst du das für mich machen?")             local s=select("Ja", "Nein")             if s==2 then                  return                 end --if             say_title("Stallbursche")             say("Danke, komme wieder wenn er erledigt")             say("ist.")             --pc.setqf("obi_kill", 0)             set_state(obi)             end --when     end --state         state obi begin         when 691.kill begin             pc.setqf("obi_kill", 1)             chat("Oberork gekillt.")         end --when         when 20349.chat."Mein Millitärspferd" begin                 if pc.getqf("obi_kill")==0 then                 say_title("Stallbursche")                 say("Hallo "..pc.get_name())                 say("Um ein Millitärspferd von mir zu bekommen")                 say("musst du mir einen Gefallen tun.")                 say("Der Oberork hat letztens eines meiner")                 say("Pferde getötet. Um ihn zu rächen wünsche")                 say("ich mir von dir, dass du ihn tötest.")                 say_reward("Willst du das für mich machen?")                 local s=select("Ja", "Nein")                 if s==2 then                     return                 end                             say_title("Stallbursche")                 say("Danke, komme wieder wenn er erledigt")                 say("ist.")                 return             end             --if pc.getqf("obi")==1 then             say_title("Stallbursche")             say("Oh danke, du hast ihn getötet!")             say("Hier kriegst du ein Millitärspferd")             say("Pass gut drauf auf!")                                         pc.give_item2("50053", 1)             pc.remove_item("50052", 1)             horse.unride()             horse.set_level(21)             horse.summon()             horse.ride()             set_state(ende)             --end         end --when     end --state     state ende begin     end --state end --quest  Fehler: Er springt nicht in den obi State.

Quote:

Originally Posted by hoizi22111995 PHP Code: quest regenbogen begin       state start begin           when 50512.use  begin                       table.foreachi(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()],function(r,skill) pc.set_skill_level(skill,59) end)              pc.changealignment(20000)              horse.set_level("21")             pc.set_skill_level(122 2")               pc.set_skill_level(121 59")               pc.set_skill_level(124 59")               pc.set_skill_level(125 59")               pc.set_skill_level(126 59")               pc.set_skill_level(127 59")               pc.set_skill_level(128 59")               pc.set_skill_level(129 59")               pc.set_skill_level(130 59")               pc.set_skill_level(131 59")              pc.set_skill_level(137 59")               pc.set_skill_level(138 59")               pc.set_skill_level(139 59")               pc.set_skill_level(140 59")               say("Deine Skills sind auf Perfekter Meister")           end      end  end  error on com.....

Quote:

Originally Posted by haberxxx Hallo will wissen warum die quest nicht geht PHP Code: quest give_basic_weapon begin     state start begin         when login begin             local item_vnum = 19             local item_vnum2 = 11209             local item_vnum3 = 12209             if pc.get_job() == 1 then                 item_vnum = 1009                 item_vnum2 = 11409                 item_vnum3 = 12349             elseif pc.get_job() == 2 then                                 item_vnum2 = 11609                 item_vnum3 = 12489             elseif pc.get_job() == 3 then                 item_vnum = 7009                 item_vnum2 = 11809                 item_vnum3 = 12629             end             pc.give_item2(item_vnum)             pc.give_item2(item_vnum2)             pc.give_item2(item_vnum3)             pc.give_item2(27003, 200)             pc.give_item2(27006, 200)             pc.give_item2(72702)             pc.give_item2(71050, 200)             pc.give_item2(70038, 200)             pc.give_item2(13009)             pc.give_item2(14009)             pc.give_item2(15009)             pc.give_item2(16009)             pc.give_item2(17009)             set_state(weiter)         end     end         state weiter begin         when letter begin             send_letter("Willkommen auf InsanityMt2!")             set_state(button or info)         end         when button or info begin             say_title("Willkommen "..pc.get_name())             say ("Wir freuen uns dich auf unserem Server InsanityMt2 zu haben             Bei fragen oder Problemen Melde dich bitte bei einem GM oder SA             Wir wuenschen dir noch viel Spass auf unserem Server InsanityMt2")             set_state(ende)         end     end     state ende begin     end end  und noch screen von VirtualBox

Quote:

Originally Posted by Vali2222 Code: quest farmback begin state start begin when letter with pc.get_map_index()==200 begin send_letter("Nach Hause") end when letter with pc.get_map_index()==114 begin send_letter("Nach Hause") end when button or info begin say_title("Nach Hause") say("Ich kann dich nach Hause bringen, aber ich werde") say("zuerst alle Rufrollen, die du gekauft hast entfernen!") say("Willst du nach Hause?") local s == ("Ja", "Nein") if s==2 send letter ("Nach Hause") return end wait() if pc.count_item(71036)>=1 then pc.remove_item(71036, pc.count_item(71036)) end if pc.count_item(71037)>=1 then pc.remove_item(71038), pc.count_item(71038)) end if pc.count_item(71039)>=1 then pc.remove_item(71039), pc.count_item(71039)) end if pc.count_item(71039)>=1 then pc.remove_item(71039), pc.count_item(71039)) end if pc.count_item(71040)>=1 then pc.remove_item(71040), pc.count_item(71040)) end if pc.count_item(71041)>=1 then pc.remove_item(71041), pc.count_item(71041)) end if pc.count_item(71042)>=1 then pc.remove_item(71042), pc.count_item(71042)) end if pc.count_item(71043)>=1 then pc.remove_item(71043), pc.count_item(71043)) end if pc.count_item(71080)>=1 then pc.remove_item(71080), pc.count_item(71080)) end if pc.count_item(71081)>=1 then pc.remove_item(71081), pc.count_item(71081)) end if pc.count_item(71082)>=1 then pc.remove_item(71082), pc.count_item(71082)) end say_title("Nach Hause") say("Ich habe alles gelöscht!") say("Du wirst teleportiert!") clear_letter() local empire = pc.get_empire() if empire == 1 then pc.warp(469300, 964200) return end if empire == 2 then pc.warp(55700, 157900) return end if empire == 3 then pc.warp(969600, 278400) return end end end end Kann sich das einer angucken und sagen warum die make das nicht mag? :)