[SERVICE] Die Questerstellung

Page 112 of 248

112

08/28/2014 19:33 .Quadral#1666

Tag,

brauche eine simple Quest kann .lua aber nicht also:

Aus einer Truhe droppt man immer 3 Fb's aber f�r die jeweilige Rasse bestimmt.
KK nur KK Fb's und so.

Danke im vorraus

08/28/2014 21:08 Avulsed#1667

Quote:

Originally Posted by b-l-v-k-k

Tag,

brauche eine simple Quest kann .lua aber nicht also:

Aus einer Truhe droppt man immer 3 Fb's aber f�r die jeweilige Rasse bestimmt.
KK nur KK Fb's und so.

Danke im vorraus

Geht glaube ich nur mit Meisterb�chern, da normale Fertigkeitsb�cher anhand des Socket0-Werts definiert werden. Falls ich mich irre, musste die vnums halt eben austauschen. :o

PHP Code:


			
quest skillbook_treasure begin
    state start begin
        when 85159.use begin --Item vnum
            local books = {
            {{50401, 50402, 50403, 50404, 50405},{50416, 50417, 50418, 50419, 50420}},                -- Krieger (K�rper, Mental)
            {{50431, 50432, 50433, 50434, 50435},{50446, 50447, 50448, 50449, 50550}},                 -- Ninja (Nah, Fern)
            {{50461, 50462, 50463, 50464, 50465, 50466},{50476, 50477, 50478, 50479, 50480, 50481}},    -- Sura (Waffe, Magie)
            {{50491, 50492, 50493, 50494, 50495, 50496},{50506, 50507, 50508, 50509, 50510, 50511}}}    -- Schamane (Drache, Heil)
            local group = pc.get_skill_group()
            local job = pc.get_job()+1
            local rnd = table.getn(books[job][group])
            local i = 0
            while i < 3 do
                pc.give_item2(books[job][group][number(1,rnd)],1)
                i = i + 1
            end
            item.remove()
        end
    end
end

08/28/2014 21:22 SkillAuraMT2#1668

K�nntet Ihr Bitte eine Quest Schreiben wo man den seon pyeong anklickt und sich in die grotte 2 Warpen kann (und in den drachen run)?

Die Koordinaten Kann ich selber eintragen :)

08/28/2014 21:31 .Quadral#1669

Danke Avulsed, kannst du es auch noch getrennter machen also KK und Mento noch getrennt das nur jeder kriegt was er auch hat?

08/28/2014 21:35 Avulsed#1670

Quote:

Originally Posted by SkillAuraMT2

K�nntet Ihr Bitte eine Quest Schreiben wo man den seon pyeong anklickt und sich in die grotte 2 Warpen kann (und in den drachen run)?

Die Koordinaten Kann ich selber eintragen :)

So?

Spoiler

Quote:

Originally Posted by b-l-v-k-k

Danke Avulsed, kannst du es auch noch getrennter machen also KK und Mento noch getrennt das nur jeder kriegt was er auch hat?

Sollte bereits so sein, die Zeilen von der Main-Tabelle sind noch mal in zwei Untertabellen unterteilt.

08/29/2014 09:09 .Quadral#1671

Br�uchte eine Quest, gibts bestimmt schon. Ganz Simple.

Wenn ein Spieler einen Mob killt kommt ne Ak�ndigung SPIELERNAME hat bla gekillt.

Danke

08/29/2014 10:57 terron#1672

Quote:

Originally Posted by b-l-v-k-k

Br�uchte eine Quest, gibts bestimmt schon. Ganz Simple.

Wenn ein Spieler einen Mob killt kommt ne Ak�ndigung SPIELERNAME hat bla gekillt.

Danke

Code:

quest simple begin
	state start begin
		when kill with npc.get_race() == MOBID begin -- change MOBID to monster's id
			notice_all(pc.get_name().." has killed MOBNAME.")
		end
	end
end

08/29/2014 11:28 Asterix112#1673

Brauche eine quest wo ich au einen beliebigeb npc dr�cke und mich auf ei e bestimmte map teleportiere
Und eine frage habe und wie kann ich die einem npc geben

LG

08/29/2014 23:04 TeufelsKreis'#1674

Guten tag liebe leute
Ich brauche eine quest die folgender ma�en aussieht
Mit lvl 50 kommt eine quest links an der seite wo drinn steht das man 5 feuer der macht t�ten muss
Mann kann ablehnen und zustimmen!
Wenn mann das geschaft hatt bekommt man die 50 King r�ssi f�r die jeweilige rasse

W�rde mich �ber Ergebnise freuen

Mfg

08/29/2014 23:45 x'Radon#1675

Quote:

Originally Posted by TeufelsKreis'

Guten tag liebe leute
Ich brauche eine quest die folgender ma�en aussieht
Mit lvl 50 kommt eine quest links an der seite wo drinn steht das man 5 feuer der macht t�ten muss
Mann kann ablehnen und zustimmen!
Wenn mann das geschaft hatt bekommt man die 50 King r�ssi f�r die jeweilige rasse

W�rde mich �ber Ergebnise freuen

Mfg

PHP Code:


			
quest kingfdm begin

    state start begin

        when login or levelup with pc.get_level() >= 50 begin

            send_letter("DER NAME DER UNTER DER QUESTROLLE STEHT)")

        end

        when button or info begin

            say_title("DEIN TITEL")

            say("")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("")

            say_reward("DIE AUFGABE DIE MAN ERLEDIGEN SOLL")

            local s=select("ZUSTIMMEN", "ABLEHNEN")

            if s==2 then

                set_state("ende")

                return

            else

                pc.setqf("killfdm", 0)

                

        when kill with npc.get_race() == MOBID begin

            local flag = npc.get_race() == MOBID and "killfdm"

            pc.setqf(flag,pc.getqf(flag)+1)

            if pc.getqf"killfdm">= 5 then

                set_state("blg")

                send_letter("Aufgabe abgeschlossen")

            end

        end

    end

    state blg begin

        when button or info begin

            say_title("DEIN TITEL")

            say("")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("DEIN TEXT")

            say("")

            say_reward("DIE BELOHUNG DIE MAN BEKOMMT")

            set_state("ende")

            if pc.get_job() == 0 then

                pc.give_item2(ITEMVNUM, 1) -- Krieger

            elseif pc.get_job() == 1 then

                pc.give_item2(ITEMVNUM, 1) -- Ninja

            elseif pc.get_job() == 1 then

                pc.give_item2(ITEMVNUM, 1) -- Sura

            elseif pc.get_job() == 1 then

                pc.give_item2(ITEMVNUM, 1) -- hami

            end

        end

    end

    state ende begin

    end

end

evtl so

08/30/2014 19:44 geron552#1676

Quote:

Originally Posted by terron

Code:

quest simple begin
	state start begin
		when 20016.chat."You're awesome" begin -- blacksmith
			say_title(mob_name(npc.get_race())..":")
			say("Thank you. Go to grandma. ")
			set_state(grandma)
		end
	end

	state grandma begin
		when 9006.chat."Sup, granny" begin -- old woman
			say_title(mob_name(npc.get_race())..":")
			say("That's all.")
			pc.give_item2(vnum, value) -- vnum = item's id; value = value of items
			pc.give_item2(vnum, value) -- e.g. pc.give_item2(50513, 5) --> it gives 5x soul stones
			set_state(complete)
		end
	end
	
	state complete begin
	end
end

Okay, but I need two kinds of quest.

The first is:
When you first sign that I was sent to a blacksmith and then to the old woman.

The second is:
When I reach level 20, it sends me to a blacksmith and then to the old woman who enters my task, such as "Kill 20 dogs"

08/31/2014 16:10 .DarkDreams#1677

Ich suche eine quest die es nur einen teamler gestattet channel 3 zu betreten

08/31/2014 17:10 terron#1678

Quote:

Originally Posted by geron552

Okay, but I need two kinds of quest.

The first is:
When you first sign that I was sent to a blacksmith and then to the old woman.

The second is:
When I reach level 20, it sends me to a blacksmith and then to the old woman who enters my task, such as "Kill 20 dogs"

Test them. I've never written quests with targets before.

First quest

Second one

Code:

quest simple_sec begin
	state start begin
		when levelup with pc.get_level() == 20 begin
			set_state(information)
		end
	end
	
	state information begin
		when letter begin
			local v = find_npc_by_vnum(20016)--blacksmith
			if v != 0 then
				target.vid("__TARGET__", v, "Blacksmith")
			end
			send_letter("Blacksmith is looking for you")
		end
		
		when button or info begin
			say_title("Information: ")
			say("Blacksmith needs your help. Visit him. ")
		end

		when  __TARGET__.target.click or 20016.chat."You're awesome" begin -- blacksmith
			target.delete("__TARGET__")
			say_title(mob_name(npc.get_race())..":")
			say("Thank you. Go to grandma.")
			set_state(grandma)
		end
	end

	state grandma begin
		when letter begin
			local v = find_npc_by_vnum(9006)-- old woman
			if v != 0 then
				target.vid("__TARGET__", v, "Old Woman")
			end
			send_letter("Granny is looking for you")
		end
		
		when button or info begin
			say_title("Information:")
			say("Go to granny, dude.")
		end
		
		when __TARGET__.target.click or 9006.chat."Sup, granny" begin -- old woman
			target.delete("__TARGET__")
			say_title(mob_name(npc.get_race())..":")
			say("You should kill 20 dogs.")
			set_state(kill_rush)
		end
	end
	
	state kill_rush begin
		when letter begin
			send_letter("Find and kill 20 dogs")
		end

		when button or info begin
			say_title("Information:")
			say("You should kill 20 dogs.")
			say("You've killed "..pc.getqf("dog_counter").." dogs. ")
		end
	
		when kill with npc.get_race() == 101 begin -- 101 = id of gods
			if pc.getqf("dog_counter") < 19 then
				pc.setqf("dog_counter", pc.getqf("dog_counter")+1)
			else
				set_state(reward)
			end
		end
	end
	
	state reward begin
		when letter begin
			local v = find_npc_by_vnum(9006)-- old woman
			if v != 0 then
				target.vid("__TARGET__", v, "Old Woman")
			end
			send_letter("Go back to granny")
		end

		when button or info begin
			say_title("Information:")
			say("You've successfully killed 20 dogs.")
			say("Go to granny for reward. ")
		end

		when __TARGET__.target.click or 9006.chat."I've killed them" begin -- old woman
			target.delete("__TARGET__")
			say_title(mob_name(npc.get_race())..":")
			say("You're so awesome! I'll reward you.")
			pc.give_item2(vnum, value) -- vnum = item's id; value = value of items
			pc.give_item2(vnum, value) -- e.g. pc.give_item2(50513, 5) --> it gives 5x soul stones
			set_state(complete)		
		end
	end
	
	state complete begin
	end
end

08/31/2014 17:33 .M3L1H#1679

M�chte einen Rangsystem auf meinem Server haben.
Also beim Charakter Start Level1 direkt Ritterlich werden

Hier der give basic weapon

Quote:

quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
if pc.get_job() == 0 then
pc.give_item2(27002, 200)
pc.give_item2(27002, 200)
pc.give_item2(27005, 200)
pc.change_money(250000000)
pc.give_exp2(44000)
pc.give_item2(19)
pc.give_item2(11209)
pc.give_item2(12209)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(72702)
pc.give_item2(71044, 20)
pc.give_item2(71045, 20)
pc.give_item2(70021)
pc.give_item2(10009)
horse.set_level(21)
horse.ride()
pc.give_item2 ( 50053 )
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("Willkommen auf Melsona2!")
say("Melsona2 bietet dir sehr viel Spass.")
say("Wir hoffen der Server wird dir gefallen.")
say("Werde einer der besten auf dem Server!")
say("Dein Startlevel 30. Endlevel 250.")
say("Du kannst dich schonmal nach Orktal telepotieren.")
say("")
say("Nicht zu vergessen zu Voten.")

elseif pc.get_job() == 1 then
pc.give_item2(27002, 200)
pc.give_item2(27002, 200)
pc.give_item2(27005, 200)
pc.give_item2(1009)
pc.change_money(250000000)
pc.give_exp2(44000)
pc.give_item2(11409)
pc.give_item2(12349)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(72702)
pc.give_item2(71044, 20)
pc.give_item2(71045, 20)
pc.give_item2(70021)
pc.give_item2(10009)
horse.set_level(21)
horse.ride()
pc.give_item2(50053)
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("Willkommen auf Melsona2!")
say("Melsona2 bietet dir sehr viel Spass.")
say("Wir hoffen der Server wird dir gefallen.")
say("Werde einer der besten auf dem Server!")
say("Dein Startlevel 30. Endlevel 250.")
say("Du kannst dich schonmal nach Orktal telepotieren.")
say("")
say("Nicht zu vergessen zu Voten.")

elseif pc.get_job() == 2 then
pc.give_item2(27002, 200)
pc.give_item2(27002, 200)
pc.give_item2(27005, 200)
pc.give_item2(19)
pc.change_money(250000000)
pc.give_exp2(44000)
pc.give_item2(11609)
pc.give_item2(12489)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(72702)
pc.give_item2(71044, 20)
pc.give_item2(71045, 20)
pc.give_item2(70021)
pc.give_item2(10009)
horse.set_level(21)
horse.ride()
pc.give_item2(50053)
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("Willkommen auf Melsona2!")
say("Melsona2 bietet dir sehr viel Spass.")
say("Wir hoffen der Server wird dir gefallen.")
say("Werde einer der besten auf dem Server!")
say("Dein Startlevel 30. Endlevel 250.")
say("Du kannst dich schonmal nach Orktal telepotieren.")
say("")
say("Nicht zu vergessen zu Voten.")

elseif pc.get_job() == 3 then
pc.give_item2(27002, 200)
pc.give_item2(27002, 200)
pc.give_item2(27005, 200)
pc.give_item2(7009)
pc.change_money(250000000)
pc.give_exp2(44000)
pc.give_item2(11809)
pc.give_item2(12629)
pc.give_item2(13009)
pc.give_item2(14009)
pc.give_item2(15009)
pc.give_item2(16009)
pc.give_item2(17009)
pc.give_item2(72702)
pc.give_item2(71044, 20)
pc.give_item2(71045, 20)
pc.give_item2(70021)
pc.give_item2(10009)
horse.set_level(21)
horse.ride()
pc.give_item2(50053)
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("Willkommen auf Melsona2!")
say("Melsona2 bietet dir sehr viel Spass.")
say("Wir hoffen der Server wird dir gefallen.")
say("Werde einer der besten auf dem Server!")
say("Dein Startlevel 30. Endlevel 250.")
say("Du kannst dich schonmal nach Orktal telepotieren.")
say("")
say("Nicht zu vergessen zu Voten.")
end
end
end
end
end

08/31/2014 17:48 .yorliK#1680

Quote:

Originally Posted by .M3L1H

M�chte einen Rangsystem auf meinem Server haben.
Also beim Charakter Start Level1 direkt Ritterlich werden

Hier der give basic weapon

Code:

quest give_basic_weapon begin 
	state start begin 
		when login with pc.getqf("basic_weapon")==0 begin 
			pc.setqf("basic_weapon", 1) 
			wa = ({19, 1009, 19, 7009})[pc.get_job()+1]
			ru = ({11209, 11409, 11609, 11809})[pc.get_job()+1]
			he = ({12209, 12349, 12489, 12629})[pc.get_job()+1]
			pc.give_item2(27002, 200)
			pc.give_item2(27002, 200)
			pc.give_item2(27005, 200)
			pc.change_alignment(12000)
			pc.change_money(250000000)
			pc.give_exp2(44000)
			pc.give_item2(wa, 1)
			pc.give_item2(ru, 1)
			pc.give_item2(he, 1)
			pc.give_item2(13009, 1)
			pc.give_item2(14009, 1)
			pc.give_item2(15009, 1)
			pc.give_item2(16009, 1)
			pc.give_item2(17009, 1)
			pc.give_item2(72702, 1)
			pc.give_item2(71044, 20)
			pc.give_item2(71045, 20)
			pc.give_item2(70021, 1)
			pc.give_item2(10009, 1)
			horse.set_level(21)
			horse.ride()
			pc.give_item2(50053, 1)
			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("Willkommen auf Melsona2!")
			say("Melsona2 bietet dir sehr viel Spass.")
			say("Wir hoffen der Server wird dir gefallen.")
			say("Werde einer der besten auf dem Server!")
			say("Dein Startlevel 30. Endlevel 250.")
			say("Du kannst dich schonmal nach Orktal telepotieren.")
			say("")
			say("Nicht zu vergessen zu Voten.")
		end
	end
end

Page 112 of 248

112