[SERVICE] Die Questerstellung

Page 152 of 248 « First 52102142150151 152 153154162202 Last »
03/01/2015 18:50 BlackWood2#2266
Ich habe ein neues Pet und Siegel eingefügt. Ich will das man mit diesem Siegel dieses Pet ruft als Quest.. Hilft mir pls
Siegel: 53023
Pet: 34014
03/02/2015 15:20 .Soυzα#2267
Guten Tag,
sich suche eine Quest und hab mich gefragt ob jemand in der Lage währe es mir zu schreiben, natürlich nur wenn es keine Umstände macht.

Quest:
Es soll eine Umtausch-Quest sein.

Man klickt den Fischer an, und kann auswählen zB: Kekse eintauschen
Dann wird ein Text wiedergegeben und man kann Ja/Nein auswählen:
Fischer als überschrift:
Wie du siehst, tausche ich 1 deiner Kekse gegen Erdbeeren ein.
LEERE ZEILE
Willst du sie eintauschen?
Ja
Nein

Bei Ja wird ein Keks gegen ein Erdbeer getauscht.
Bei Nein geht das Fenster einfach zu.

Wenn man zuwenig hat kommt:
Überschrift: Fischer
LEERE ZEILE
Du hast keinen Keks


Gruß,
Souza.
03/02/2015 15:58 [Kaito]#2268
Quote:
Originally Posted by .Soυzα View Post
Guten Tag,
sich suche eine Quest und hab mich gefragt ob jemand in der Lage währe es mir zu schreiben, natürlich nur wenn es keine Umstände macht.

Quest:
Es soll eine Umtausch-Quest sein.

Man klickt den Fischer an, und kann auswählen zB: Kekse eintauschen
Dann wird ein Text wiedergegeben und man kann Ja/Nein auswählen:
Fischer als überschrift:
Wie du siehst, tausche ich 1 deiner Kekse gegen Erdbeeren ein.
LEERE ZEILE
Willst du sie eintauschen?
Ja
Nein

Bei Ja wird ein Keks gegen ein Erdbeer getauscht.
Bei Nein geht das Fenster einfach zu.

Wenn man zuwenig hat kommt:
Überschrift: Fischer
LEERE ZEILE
Du hast keinen Keks


Gruß,
Souza.
Code:
quest umtauschbykaito begin
	state start begin
		when 20014.chat."Kekse-Umtausch" begin
			local w = select("Kekse eintauschen?","Abbrechen")
			if w == 2 then return end
			elseif w == 1 then
			say_title("Der Kekse Umtausch!")
			say("")
			say("Wie du siehst,tausche ich 1")
			say("deiner Kekse gegen Erdbeeren ein!")
			say("")
			local s = select("Ja","Nein")
			if s == 2 then return end
				
			else
				if pc.get_item(KEKSEVNUM) >= 1 then
					pc.remove_item(KEKSEVNUM,1)
					pc.give_item2(ERDBEERENVNUM,1)
				elseif pc.get_item(KEKSEVNUM) == 0 then
					say_title("Fischer")
					say("")
					say_reward("Du hast keinen Keks!")
				end
			end
		end
	end
end
03/02/2015 17:06 rollback#2269
Quote:
Originally Posted by [Kaito] View Post
Code:
quest umtauschbykaito begin
	state start begin
		when 20014.chat."Kekse-Umtausch" begin
			local w = select("Kekse eintauschen?","Abbrechen")
			if w == 2 then return end
			elseif w == 1 then
			say_title("Der Kekse Umtausch!")
			say("")
			say("Wie du siehst,tausche ich 1")
			say("deiner Kekse gegen Erdbeeren ein!")
			say("")
			local s = select("Ja","Nein")
			if s == 2 then return end
				
			else
				if pc.get_item(KEKSEVNUM) >= 1 then
					pc.remove_item(KEKSEVNUM,1)
					pc.give_item2(ERDBEERENVNUM,1)
				elseif pc.get_item(KEKSEVNUM) == 0 then
					say_title("Fischer")
					say("")
					say_reward("Du hast keinen Keks!")
				end
			end
		end
	end
end
wenn es nur 2 auswahlmöglichkeiten gibt kann man einfach
PHP Code:
if select("Ja", "Nein") == 2 then return end 
machen.
bei 2 wird returned (der code an der stelle nicht fortgesetzt) und bei 1 macht er einfach weiter
03/02/2015 17:39 [Kaito]#2270
Quote:
Originally Posted by [Sensenmann] View Post
wenn es nur 2 auswahlmöglichkeiten gibt kann man einfach
PHP Code:
if select("Ja", "Nein") == 2 then return end 
machen.
bei 2 wird returned (der code an der stelle nicht fortgesetzt) und bei 1 macht er einfach weiter
danke für den tipp^^
03/02/2015 17:43 Mr.ChingLing#2271
Guten Tag,
Ich brauche eine Quest mit der man Automatische Tränke einstellen kann.
Die Quest soll bei dem Item "Roter Trang (G)" TP geben.
Man soll das Item immer benutzen können.
Mfg.ChingLing
03/02/2015 17:47 [Kaito]#2272
Quote:
Originally Posted by Mr.ChingLing View Post
Guten Tag,
Ich brauche eine Quest mit der man Automatische Tränke einstellen kann.
Die Quest soll bei dem Item "Roter Trang (G)" TP geben.
Man soll das Item immer benutzen können.
Mfg.ChingLing
wie viel tp soll das item denn geben?
03/02/2015 18:08 Nick#2273
Quote:
Originally Posted by [Kaito] View Post

Wird in der Form kaum funktionieren, da die Funktion pc.get_item() nicht existiert, ich vermute mal, dass du das Ganze mit pc.count_item() verwechselt hast. Ist auch eher suboptimal, wenn der Spieler mehrmals auf den NPC klicken muss, um seine ganzen Kekse einzutauschen. :p

lg
03/02/2015 18:39 [Kaito]#2274
Quote:
Originally Posted by .JayZoN View Post
Wird in der Form kaum funktionieren, da die Funktion pc.get_item() nicht existiert, ich vermute mal, dass du das Ganze mit pc.count_item() verwechselt hast. Ist auch eher suboptimal, wenn der Spieler mehrmals auf den NPC klicken muss, um seine ganzen Kekse einzutauschen. :p

lg
ja verschrieben ^^ sry :)

bei mir funkts mit pc.get_item ^^
03/02/2015 19:17 .Soυzα#2275
Quote:
Originally Posted by [Kaito] View Post
Code:
quest umtauschbykaito begin
	state start begin
		when 20014.chat."Kekse-Umtausch" begin
			local w = select("Kekse eintauschen?","Abbrechen")
			if w == 2 then return end
			elseif w == 1 then
			say_title("Der Kekse Umtausch!")
			say("")
			say("Wie du siehst,tausche ich 1")
			say("deiner Kekse gegen Erdbeeren ein!")
			say("")
			local s = select("Ja","Nein")
			if s == 2 then return end
				
			else
				if pc.get_item(KEKSEVNUM) >= 1 then
					pc.remove_item(KEKSEVNUM,1)
					pc.give_item2(ERDBEERENVNUM,1)
				elseif pc.get_item(KEKSEVNUM) == 0 then
					say_title("Fischer")
					say("")
					say_reward("Du hast keinen Keks!")
				end
			end
		end
	end
end

fischer_eintausch.quest:25:syntax error : [string "start"]:3: <eof> expected near `elseif'
Error occured on compile fischer_eintausch.quest
03/02/2015 19:20 [Kaito]#2276
Quote:
Originally Posted by .Soυzα View Post
fischer_eintausch.quest:25:syntax error : [string "start"]:3: <eof> expected near `elseif'
Error occured on compile fischer_eintausch.quest
Code:
quest umtauschbykaito begin
	state start begin
		when 20014.chat."Kekse-Umtausch" begin
			local w = select("Kekse eintauschen?","Abbrechen")
			if w == 2 then return end
			elseif w == 1 then
			say_title("Der Kekse Umtausch!")
			say("")
			say("Wie du siehst,tausche ich 1")
			say("deiner Kekse gegen Erdbeeren ein!")
			say("")
			local s = select("Ja","Nein")
			if s == 2 then return end	
			else
				if pc.count_item(KEKSEVNUM) >= 1 then
					pc.remove_item(KEKSEVNUM,1)
					pc.give_item2(ERDBEERENVNUM,1)
				elseif pc.count_item(KEKSEVNUM) == 0 then
					say_title("Fischer")
					say("")
					say_reward("Du hast keinen Keks!")
				end
			end
		end
	end
end
03/02/2015 20:25 Mr.ChingLing#2277
Quote:
Originally Posted by [Kaito] View Post
wie viel tp soll das item denn geben?
1500 TP
03/02/2015 22:07 Nick#2278
Quote:
Originally Posted by [Kaito] View Post
Code:
quest umtauschbykaito begin
	state start begin
		when 20014.chat."Kekse-Umtausch" begin
			local w = select("Kekse eintauschen?","Abbrechen")
			if w == 2 then return end
			elseif w == 1 then
			say_title("Der Kekse Umtausch!")
			say("")
			say("Wie du siehst,tausche ich 1")
			say("deiner Kekse gegen Erdbeeren ein!")
			say("")
			local s = select("Ja","Nein")
			if s == 2 then return end	
			else
				if pc.count_item(KEKSEVNUM) >= 1 then
					pc.remove_item(KEKSEVNUM,1)
					pc.give_item2(ERDBEERENVNUM,1)
				elseif pc.count_item(KEKSEVNUM) == 0 then
					say_title("Fischer")
					say("")
					say_reward("Du hast keinen Keks!")
				end
			end
		end
	end
end
Du hast das if Statement hiermit
PHP Code:
if s == 2 then return end 
bereits beendet, demnach wird das else hierbei nicht mehr mit einbezogen. Es bleiben also zwei Möglichkeiten;




Damit lässt sich dennoch weitaus mehr anstellen. (Countabfrage, ..)

lg
03/02/2015 22:41 [Kaito]#2279
Quote:
Originally Posted by Mr.ChingLing View Post
1500 TP
Quote:
Originally Posted by Bullrihgter View Post
Ich will mit handes eines Npcs also so ein kleines Kind kann man sich auf 2 farm maps teleportieren und bei dem einen Highfarmmap sollen 3 glyphensteine removed werden und bei dem Lowfarmmap 1 glypgenstein
bei der high levelfarmmap soll ab level 50 zu gängig sein der server spuckt immer error aus kann mir das einer verbessern ? was da nicht stimmt ?

da geht garnicht kompiliert nicht einfach


PHP Code:
quest farmmap begin  
    state start begin  
        when 20094.chat."High Farmmap" begin 
            if pc.get_level() < 50 then 
                say("Du bist noch nicht Level 50. Kommt erst") 
                say("wenn du 50 bist.") 
            else
            say_title("Ich brauche deine Hilfe")       
            say("Hallo ich brauch deine Hilfe!")
            say("Gestern Abend wurden wir Ueberfallen")
            say("Meine Familie und unser Dorf wurden")
            say("Zerstoert! Unser Dorf wurde von")
            say("Metinsteinen Ueberfallen du kannst")
            say("Uns Helfen die Metinsteine zu")
            say("Zerstoeren.")
            say("")
            local a = select("Jo!", "No")  
            if a == 1 then
                pc.removeitem("30178", 3)
                say_title("Los Gehts")       
                    say("Mach dich Gefasst es gibt in unserem")
                    say("Dorf sehr starke Metin steine pass ")
                    say(" Auf dich Auf viel Glueck ich wuerde")
                    say("mich freuen wenn du unser Dorf wieder")
                    say("Aufbaust ich wäre dir Dankbar")
                    say("")
                    wait()
                    pc.warp(105800, 9800)  
else
return
end
else
                    say_title("kein Glyphenstein")
                    say("Du besitz kein Glyphenstein")
                    say("Komm wieder wenn du einen hast!")

                    say_item_vnum(30178)
end
end
end
end
        when 20094.chat."Low Farmmap" begin 
            if pc.get_level() < 1 then 
                say("Du bist noch nicht Level 1. Komme erst") 
                say("wenn du 1 bist.") 
            else
            say_title("Ich brauche deine Hilfe")       
            say("Hallo ich brauch deine Hilfe!")
            say("Gestern Abend wurden wir Ueberfallen")
            say("Meine Familie und unser Dorf wurden")
            say("Zerstoert! Unser Dorf wurde von")
            say("Metinsteinen Ueberfallen du kannst")
            say("Uns Helfen die Metinsteine zu")
            say("Zerstoeren.")
            say("") 
            local b = select("Jo", "No") 
            if b == 1 then 
                pc.removeitem("30178", 1)
                say_title("Los Gehts")       
                    say("Mach dich Gefasst es gibt in unserem")
                    say("Dorf sehr starke Metin steine pass ")
                    say(" Auf dich Auf viel Glueck ich wuerde")
                    say("mich freuen wenn du unser Dorf wieder")
                    say("Aufbaust ich wäre dir Dankbar")
                    say("")
                    wait()
                    pc.warp(105800, 9800)  
else
return
end
else
                    say_title("kein Glyphenstein")
                    say("Du besitz kein Glyphenstein")
                    say("Komm wieder wenn du einen hast!")
                    say_item_vnum(30178)
end
end
end
end 
Code:
quest shops begin  
    state start begin  
        when 20094.chat."High Farmmap" begin 
            if pc.get_level() < 50 then 
                say("Du bist noch nicht Level 50. Kommt erst") 
                say("wenn du 50 bist.") 
            else
				say_title("Ich brauche deine Hilfe")       
				say("Hallo ich brauch deine Hilfe!")
				say("Gestern Abend wurden wir Ueberfallen")
				say("Meine Familie und unser Dorf wurden")
				say("Zerstoert! Unser Dorf wurde von")
				say("Metinsteinen Ueberfallen du kannst")
				say("Uns Helfen die Metinsteine zu")
				say("Zerstoeren.")
				say("")
				local a = select("Jo!", "No")  
				if a == 2 then return end
					pc.removeitem("30178", 3)
					say_title("Los Gehts")       
					say("Mach dich Gefasst es gibt in unserem")
					say("Dorf sehr starke Metin steine pass ")
					say(" Auf dich Auf viel Glueck ich wuerde")
					say("mich freuen wenn du unser Dorf wieder")
					say("Aufbaust ich wäre dir Dankbar")
					say("")
					wait()
					pc.warp(105800, 9800)  
				elseif pc.count_item(30178) == 0 then
					say_title("kein Glyphenstein")
					say("Du besitz kein Glyphenstein")
					say("Komm wieder wenn du einen hast!")
					say_item_vnum(30178)
					return
					setstate(weiter)
				end
			end
		end
	end
	state weiter begin
        when 20094.chat."Low Farmmap" begin 
            if pc.get_level() < 1 then 
                say("Du bist noch nicht Level 1. Komme erst") 
                say("wenn du 1 bist.") 
            else
				say_title("Ich brauche deine Hilfe")       
				say("Hallo ich brauch deine Hilfe!")
				say("Gestern Abend wurden wir Ueberfallen")
				say("Meine Familie und unser Dorf wurden")
				say("Zerstoert! Unser Dorf wurde von")
				say("Metinsteinen Ueberfallen du kannst")
				say("Uns Helfen die Metinsteine zu")
				say("Zerstoeren.")
				say("") 
				local b = select("Jo", "No") 
				if b == 2 then return end
					pc.removeitem("30178", 1)
					say_title("Los Gehts")       
					say("Mach dich Gefasst es gibt in unserem")
                    say("Dorf sehr starke Metin steine pass ")
                    say(" Auf dich Auf viel Glueck ich wuerde")
                    say("mich freuen wenn du unser Dorf wieder")
                    say("Aufbaust ich wäre dir Dankbar")
                    say("")
                    wait()
                    pc.warp(105800, 9800)  
				elseif pc.count_item(30178) == 0 then
                    say_title("kein Glyphenstein")
                    say("Du besitz kein Glyphenstein")
                    say("Komm wieder wenn du einen hast!")
                    say_item_vnum(30178)
				end
			end
		end
	end
end
03/03/2015 12:02 shadowbeatzzz#2280
Ich möchte gerne Sonderzeichen mit einfügen !
Page 152 of 248 « First 52102142150151 152 153154162202 Last »