[SERVICE] Die Questerstellung

Page 137 of 248

137

01/21/2015 19:51 .yorliK#2041

Quote:

Originally Posted by Darryus98

1. Ja halt wenn man z.B. auf "Aura Schwert" klickt, muss man die dementsprechende B�cher abgeben. Also das Skill Buch
2. Man sollte auch 10 abgeben k�nnen :D

Code:

quest buecher_npc begin
	state start begin
		when NpcID.chat."B�cherabgabe" begin
			say_title("B�cherabgabe")
			if pc.get_skill_group() == 0 then
				say("Du hast noch keine Fertigkeiten.")
				say("Versuche es sp�ter erneut.")
				return
			end
			local result = buecher_npc.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group())
			local vnum_list = result[1]
			local name_list = result[2]
			if table.getn(vnum_list) == 0 then
				say("Du hast keine verf�gbaren M Skills.")
				return
			end
			local menu_list = {}
			table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)
			table.insert(menu_list, "Abbrechen") 
			say("W�hle deinen Skill.")
			local s=select_table(menu_list)
			if table.getn(menu_list) == s then
				return
			end
			local skill_name=name_list[s]
			local skill_vnum=vnum_list[s]
			if pc.getqf("Skill_"..skill_vnum)>=55 then pc.setqf("Skill_"..skill_vnum, 0) end
			say_title(skill_name)
			say("Du willst also B�cher f�r "..skill_name)
			say("abgeben?")
			say("")
			say("Abgaberest: "..(55-pc.getqf("Skill_"..skill_vnum)).." B�cher")
			if select("Ja","Nein")==2 then return end
			local item_count = pc.count_item((50400+skill_vnum))
			local item_rest = 55-pc.getqf("Skill_"..skill_vnum)
			if item_rest<item_count then item_count = item_rest end
			pc.setqf("Skill_"..skill_vnum, pc.getqf("Skill_"..skill_vnum) + item_count)
			syschat(item_count.." B�cher abgegeben.")
			pc.remove_item((50400+skill_vnum), item_count)
			if pc.getqf("Skill_"..skill_vnum)>=55 then
				pc.set_skill_level(skill_vnum, 30)
				syschat(skill_name.." G")
			end
		end
		function BuildPerfectMasterSkillList(job, group)
			GRAND_MASTER_SKILL_LEVEL =20
			PERFECT_MASTER_SKILL_LEVEL = 30
			local skill_list = special.active_skill_list[job+1][group]
			local ret_vnum_list = {}
			local ret_name_list = {}
			table.foreach(skill_list, 
				function(i, skill_vnum) 
				local skill_level = pc.get_skill_level(skill_vnum)
				if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then
					table.insert(ret_vnum_list, skill_vnum)
					local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
					if name == nil then name=skill_vnum end
					table.insert(ret_name_list, name)
				end
			end)
			return {ret_vnum_list, ret_name_list}
		end
	end
end

01/22/2015 13:43 QuickFlameZ#2042

Es geht alles "eleganter", aber wenn er es nicht anders kann, dann ist das so und da hilft ihm dein Code-Schnipsel auch nicht wirklich weiter, da du ihm ja nicht mal erkl�rst wieso dein Code-Schnipsel kleiner ist und mit welchen funktionen du gearbeitet hast.
kind regards

01/22/2015 16:14 shurigeller#2043

kann mir einer eine regenbogenstein quest schreiben die alles auf G macht

danke im voraus

01/22/2015 17:53 'Mahone#2044

Quote:

Originally Posted by QuickFlameZ

Es geht alles "eleganter", aber wenn er es nicht anders kann, dann ist das so und da hilft ihm dein Code-Schnipsel auch nicht wirklich weiter, da du ihm ja nicht mal erkl�rst wieso dein Code-Schnipsel kleiner ist und mit welchen funktionen du gearbeitet hast.
kind regards

Wer den Ergeiz hat zu lernen, wird durch meinen Code durchsteigen.

01/22/2015 19:41 billijam#2045

Quest fehler error occured on compile amuleta.ques

Spoiler

01/22/2015 20:11 Hype#2046

Quote:

Originally Posted by 'Mahone

K�nnte man aber auch ein wenig eleganter machen

Code:

local items = {
-- vnum count job 		-> krieger = 0; ninja = 1; sura = 2; schami = 3
	{19, 1, 0},
	{19, 1, 2},
	{13009	1, -1}, -- -1 bei job, wenn es jeder char kriegen soll
}

for k,v in pairs(items) do
	pc.give_item2(((v[3] == pc.job or v[3] == -1) and unpack(({v[1],v[2]})) or 0))
end

Ich brauch aber die ganzen states, da ich mit denen im weiteren Levelverlauf weiterarbeite. Die Quest ist mitlerweile 1k+ Zeilen lang^^

Quote:

Originally Posted by QuickFlameZ

Es geht alles "eleganter", aber wenn er es nicht anders kann, dann ist das so und da hilft ihm dein Code-Schnipsel auch nicht wirklich weiter, da du ihm ja nicht mal erkl�rst wieso dein Code-Schnipsel kleiner ist und mit welchen funktionen du gearbeitet hast.
kind regards

Quote:

Originally Posted by 'Mahone

Wer den Ergeiz hat zu lernen, wird durch meinen Code durchsteigen.

Lernwillig bin ich immer, nur hab ich zurzeit keine Zeit um mich mit Questen zu besch�ftigen. Trotzdem w�re eine kurze Erkl�rung oder notfalls auch ein Link zu einem Guide immer hilfreich f�r einen "Anf�nger".

Quote:

Originally Posted by billijam

Quest fehler error occured on compile amuleta.ques

Spoiler

quest warpring begin
state start begin
when 70007.use begin
local x
local y
local t
local e = pc.get_empire()
say_title("Teleporter:")
say("Wohin m�chtest du Teleportiert werden?")
local s = select("Map1", "Map2", "Orktal", "W�ste", "Eisland", "Feuerland", "Weiter", "Schlie�en")
if s==7 then
say_title("Teleporter:")
say("�ncotro vrei s� mergi str�ine?")
local p = select("Turnul Demonilor", "V1", "P�durea Fantomelor", "P�durea Ro�ie", "Tara Gigantilor", "Grota Exilului", "�nchide")
if p==1 then
x="590400"
y="110500"
elseif p==2 then
x="91900"
y="525400"
elseif p==3 then
x="289000"
y="5800"
elseif p==4 then
say_title("Teleporter")
say("�ncotro vrei s� mergi str�ine?")
t = select("�nceput", "Sf�r�it", "�nchide")
if t==1 then
x="1119900"
y="70800"
elseif t==2 then
x="1119200"
y="7000"
end
elseif p==5 then
x="828100"
y="763400"
elseif p==6 then
x="284200"
y="809600"
end
elseif s==1 then
say_title("Teleporter")
say("�ncotro vrei s� mergi str�ine?")
t = select("Regatul Ro�u", "Regatul Galben", "Regatul Albastru","�nchide")
if t==1 then
x="473900"
y="954600"
elseif t==2 then
x="63200"
y="166700"
elseif t==3 then
x="959600"
y="269700"
end
elseif s==2 then
say_title("Teleporter:")
say("�ncotro vrei s� mergi str�ine?")
t = select("Regatul Ro�u", "Regatul Galben", "Regatul Albastru", "�nchide")
if t==1 then
x="352300"
y="882700"
elseif t==2 then
x="145700"
y="239800"
elseif t==3 then
x="863800"
y="246000"
end
elseif s==3 then
say_title("Teleporter:")
say("�ncotro vrei s� mergi str�ine?")
t = select("�nceput", "Centru", "Arahani", "�nchide")
if t==1 then
if e==1 then
x="402100"
y="673900"
elseif e==2 then
x="270400"
y="739900"
elseif e==3 then
x="321300"
y="808000"
end
elseif t==2 then
x="332700"
y="745600"
elseif t==3 then
x="282800"
y="792800"
end
elseif s==4 then
say_title("Teleporter:")
say("�ncotro vrei s� mergi str�ine?")
t = select("Inceput", "Sf�r�it", "�nchide")
if t==1 then
if e==1 then
x="217800"
y="627200"
elseif e==2 then
x="221900"
y="502700"
elseif e==3 then
x="344000"
y="502500"
end
elseif t==2 then
x="296300"
y="547500"
end
elseif s==5 then
say_title("Teleporter")
say("�ncotro vrei s� mergi str�ine?")
t = select("�nceput", "Mijloc", "�nchide")
if t==1 then
if e==1 then
x="434200"
y="290600"
elseif e==2 then
x="375200"
y="174900"
elseif e==3 then
x="491800"
y="173600"
end
elseif t==2 then
x="436200"
y="215300"
end
elseif s==6 then
say_title("Teleporter:")
say("�ncotro vrei s� mergi str�ine?")
t = select("�nceput", "�nchide")
if t==1 then
if e==1 then
x="599400"
y="756300"
elseif e==2 then
x="597800"
y="622200"
elseif e==3 then
x="730700"
y="689800"
end
elseif t==2 then
return
end
end
if s!=8 or p!= 7 then
pc.warp(x, y)
end
end
end
end

Spoiler

#!/bin/sh

#system recompiling
cd /usr/home/game/share/locale/germany/quest && ./make.py

quest amuleta begin [...]

Der Name sollte schon der gleiche sein wie in der Quest.

01/22/2015 20:13 billijam#2047

Quote:

Originally Posted by .ɦype

Ich brauch aber die ganzen states, da ich mit denen im weiteren Levelverlauf weiterarbeite. Die Quest ist mitlerweile 1k+ Zeilen lang^^

^

Lernwillig bin ich immer, nur hab ich zurzeit keine Zeit um mich mit Questen zu besch�ftigen. Trotzdem w�re eine kurze Erkl�rung oder notfalls auch ein Link zu einem Guide immer hilfreich f�r einen "Anf�nger".

quest amuleta.quest begin [...]

Der Name sollte schon der gleiche sein wie in der Quest.

Danke f�r dein antwort aber wie meinst du dass ?

01/22/2015 20:15 Hype#2048

Quote:

Originally Posted by billijam

Danke f�r dein antwort aber wie meinst du dass ?

Deine Fehlerbeschreibung: Quest fehler error occured on compile amuleta.quest

Deine Quest beginnt mit: quest warpring begin

muss aber hei�en:
quest amuleta begin
Weil das ^ ist der Questname

01/22/2015 20:19 billijam#2049

Quote:

Originally Posted by .ɦype

Deine Fehlerbeschreibung: Quest fehler error occured on compile amuleta.quest

Deine Quest beginnt mit: quest warpring begin

muss aber hei�en:
quest amuleta begin
Weil das ^ ist der Questname

Ja ich hab warpring ge�ndert und die quest hei�t so warpring.quest

Und amuleta.quest finde ich nirgendswo

01/22/2015 20:35 Hype#2050

Quote:

Originally Posted by billijam

Ja ich hab warpring ge�ndert und die quest hei�t so warpring.quest

Und amuleta.quest finde ich nirgendswo

Wieso bekommst du dann den Fehler, die Quest "amuleta.quest" kann nicht kompiliert werden?
Hast du sie im Questordner oder in der quest_list?

01/22/2015 21:34 billijam#2051

amuleta.quest ist in quest.list

01/22/2015 21:37 Hype#2052

Quote:

Originally Posted by billijam

amuleta.quest ist in quest.list

Wenn sie nicht in deinem Questordner ist, kannst du sie aus quest_list rausstreichen.

01/22/2015 21:47 billijam#2053

Habe ich dass gleiche fehler kommt aber anstatt amuleta.quest kommt catakomben.quest und ist auch nicht in Filezilla drin.

01/22/2015 21:49 rollback#2054

jede quest die nicht im questordner drin ist kannst du aus der quest_list l�schen

01/22/2015 22:57 Darryus98#2055

Guten Abend ^-^

Ich brauche mal wieder eine Quest
Die ist ein bisschen schwerer meiner Meinung nach

Also
Ich habe die Map

Spoiler

(Die wird gerade erstellt :s)

Die Map sollte so eine Art PvP-Map sein
Und die soll so wie OX funktionieren

Ein Admin �ffnet "die Tore"
Man kann rein gehen
Wenn "die Tore" geschlossen werden kann niemand rein

Dann begint das Event
Wenn ein Spieler jemanden T�tet bekommt der jenige 1 punkt und dann steht im Chat, nur f�r ihn zu sehen: "Du hast ... punkte"

Wenn man get�tet wird, wird man auf Map1 geportet und man kommt nicht mehr rein. Nur bei eine weitere "Runde". Also wenn die Tore wieder ge�ffnet werden.

Der letzte Spieler bekommt ein Preis und wird auch weg geportet. Un wenn der letze Spieler geblieben ist sollte im Chat, f�r alle: "Der Spieler ... hat ... teilnehmer get�tet, und somit den PvP-Event gewonnen."

Dank� :s

Page 137 of 248

137