Domanda [RELESE]Quest Biologo Bulbasaur

Stato
Discussione chiusa ad ulteriori risposte.

juicebox

Utente Gold
10 Aprile 2009
536
69
23
222
Ultima modifica:
Salve, oggi non avendo niente da fare mi sono messo a fare questa missione =)
Codice:
----------------------------------------------------
--Una nuova ricerca 
--Creata grazie alle manine di juicebox 
--Idea di juicebox
----------------------------------------------------
quest Bulbasaur Quest  begin
	state start begin
        when login or levelup with pc.get_level(45) >=Level für die Mission  begin
			set_state(information)
		end	
	end

	state information begin
		when letter begin
			local v = find_npc_by_vnum(100000)
			if v != 0 then
				target.vid("__TARGET__", v, "Quest")
			end
			send_letter("Bulbasaur Quest")
		end

		when button or info begin
			say_title("Bulbasaur Quest")
			say("")
			say("Salve")
			say("Ho perso il mio Bulbasaur")
			say("Lo puoi trovare dagli Orchi Neri")
			say("Ti prego Sono un flippato")
			say("Aiutami")
			say("!!")
			say("")
		end

		when __TARGET__.target.click or
			100000.chat."Quest" begin
			target.delete("__TARGET__")
			say("Bulbasaur:")
			---                                                   l
			say("Puoi trovare")
			say("Bulbasaur")
			say("Dagli Orchi Neri Coraggiosi")
			say("Nella Valle del Drago")
			say("Sbrigati")
			say("Altrimenti il biologo piangerà!")
			say("")	
			set_state(go_to_disciple)
			pc.setqf("collect_count",0)
			pc.setqf("drink_drug",0) 
		end
	end

	state go_to_disciple begin
		when letter begin
			send_letter("Auftrag von Bulbasaur")

		end
		when button or info begin
			say_title("Quest")
			---                                                   l
			say("")
			say("Devi trovare il mio Bulbasaur!")
			say("Solo 1 Bulbasaur!")
			say("Lo puoi trovare dagli Orchi Neri Coraggiosi.")
			say("Buona fortuna!")
			say("")
			say_item_vnum(100000)
			say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
			say("")
		end

		when 71035.use begin --°g´bÃĤô
			if pc.getqf("drink_drug")==1 then
				say("")
				say("Bessere Droppchance!")
				say("")

				return
			end
			if pc.count_item(100000)==0 then
				say("")
				say("Du hast keine!")
				say("Lauf los und besorg mir welche!")
				say("")
				return
			end
			item.remove()	
			pc.setqf("drink_drug",1)
		end


		when 656.kill begin
			if pc.count_item(100000)<1-pc.getqf("collect_count") then
				pc.give_item2(100000, 1)
			end
		end

    	when 100000.chat."Quest" with pc.count_item(100000) >0   begin
				say("Einen Moment!")
				---                                                   l
				say("Ich werde das Item")
				say("Rivedere i tempi veloci.")
				say("Spero che tutto vada bene!")
				say("")
				pc.remove_item(100000, 1)
				wait()

				local pass_percent
				if pc.getqf("drink_drug")==0 then
					pass_percent=7199
				else		
					pass_percent=7199
				end

				local s= number(1,100)
			if s<= pass_percent  then
			   if pc.getqf("collect_count")< 0 then     --5*Ó¥H¤U 
						local index =pc.getqf("collect_count")+1 
						pc.setqf("collect_count",index)     --¨ú±o¤@* +1
						say("Bulbasaur:")
						say("Perfetto! L' item è perfetto!!!")
						say("Ce l' hai fatta! ".." "..1-pc.getqf("collect_count").. " abgegeben!")
						say("Perfetto!")
						say("")
						pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ
						return
					end
					say("Bulbasaur:")
					say("Yuhu! ce l' hai fatta")
					say("me lo hai riportato!")
					say("Lo rimetto subito nella pokeball")
				    say("Ah!Giusto ecco a te la ricompensa!")
					say("")
					say_reward("Hai Ricevuto Ventaglio del Demone!")
					say_reward("Hai Ricevuto Spada del Dio Drago!")
					say_reward("Hai Ricevuto Spada di Sirio!")
					say_reward("Hai Ricevuto 10000000 Yang!")
					say_reward("Hai Ricevuto 1000000 EXP!")
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
					clear_letter()
					set_state(__complete)

					pc.give_item2(7199)
					pc.give_item2(3209)
					pc.give_item2(279)
					pc.change_money(10000000)
					pc.give_exp2(1000000)
					set_quest_state("levelup","run")


					return
				else								
				say("Bulbasaur:")
				say("Ma questo non è il mio Bulbasaur!!")
				say("Portami il mio!!!!.")
				say("Sbrigati!!")
				say("")
				pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ
				return
				end
	end
end


		
	state __complete begin
	end
end
Naturalmente dovrete implementare Bulbasaur xD, quindi:
item_proto:
Codice:
		<Item vnum="100000" hashName="Bulbasaur" name="Bulbasaur" type="" subtype="" weight="0" size="" antiflag="" flag="1" wearflag="" immuneflag="0" gold="60000" buy_price="60000" limittype0="1" limitvalue0="0" limittype1="0" limitvalue1="0" applytype0="0" applyvalue0="0" applytype1="0" applyvalue1="0" applytype2="0" applyvalue2="0" value0="0" value1="0" value2="0" value3="0" value4="0" value5="0" socket0="0" socket1="64944" socket2="127" socket3="65008" socket4="21631" socket5="4855" refine_vnum="11" refine_set="1" magic_pct="15" specular="" socket_pct="0" />
querry:
Codice:
INSERT INTO `item_proto` VALUES ('100000', 'Bulbasaur', 'Bulbasaur', '', '', '0', '', '', '1', '', '', '60000', '60000', '', '0', '0', '15', '1', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '-1', '-1', '-1', '-1', '-1', '-1', '', '0', '0');
item_list:
Codice:
100000		icon/item/100000.tga
in seguito è inutile che vi dia il download per una singola tga e quindi
BulbasaurSmallSprite.gif

(LIK IMMAGINE: http://www.realitysrequiem.com/phpBB3/images/smilies/BulbasaurSmallSprite.gif )
rinominate l' immagine .tga ed è fatto =)

SI ACCETTANO +1 CON PIACERE :)

Saluti da Juicebox
 
OMG! Mitica questa missione :asd: (Stavo piangendo quando ho letto:"Questo non è il mio Bulbasaur! Aahahhahahaha)
 
L'hai fatta tu, vero? Allora ci vedo male

----------------------------------------------------
--Eine neue Quest
--erstellt mit dem Biologen Quest Editor
--Made by _DownTime from Elitepvpers.de
----------------------------------------------------
 
Salve, oggi non avendo niente da fare mi sono messo a fare questa missione =)
Codice:
----------------------------------------------------
--Eine neue Quest 
--erstellt mit dem Biologen Quest Editor 
--Made by _DownTime from Elitepvpers.de


Direi che è un FAIL dici che l'hai fatta te e sotto ci sono i crediti di Elite quindi metti le fonti :asd:

--- Aggiornamento Post ---

L'hai fatta tu, vero? Allora ci vedo male

ormai la gente prende cose da altri siti e le spaccia per sue senza mettere crediti -.-' ( il bello che non cancellano le cose scritte in tedesco )
 
Direi che è un FAIL dici che l'hai fatta te e sotto ci sono i crediti di Elite quindi metti le fonti :asd:

--- Aggiornamento Post ---



ormai la gente prende cose da altri siti e le spaccia per sue senza mettere crediti -.-' ( il bello che non cancellano le cose scritte in tedesco )

Ma almeno la decenza di levare le fonti, lasciare persino scritto il sito di Elite...
 
Codice:
[B][B] if pc.getqf("collect_count")< 0 then     --5*Ó¥H¤U 
						local index =pc.getqf("collect_count")+1 
						pc.setqf("collect_count",index)     --¨ú±o¤@* +1
						say("Bulbasaur:")
						say("Perfetto! L' item è perfetto!!!")
						say("Ce l' hai fatta! ".." "..1-pc.getqf("collect_count").. " abgegeben!")
						say("Perfetto!")
						say("")
						pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ[/B][/B]


nemmeno la decenza di togliere i commenti in cinese =)
 
Non posso scrivere molto perche' sono collegato col cellulare, ma volevo dire solo una cosa a te juicebox "non spacciare cose per tue che non lo sono. White1®
 
L'hai fatta tu, vero? Allora ci vedo male
Asd uso un editor tedesco

--- Aggiornamento Post ---

lo so, ma mi sembrava inutile citare persino i dialoghi... Già dal titolo uno resta così -> -.-"
se guardi bene la quest non è l'unica cosa in tedesco quella :asd:
ma almeno la decenza di levare le fonti, lasciare persino scritto il sito di elite...
direi che è un fail dici che l'hai fatta te e sotto ci sono i crediti di elite quindi metti le fonti :asd:

--- aggiornamento post ---



ormai la gente prende cose da altri siti e le spaccia per sue senza mettere crediti -.-' ( il bello che non cancellano le cose scritte in tedesco )
ripeto! se non lo avessi fatto io avrei messo le fonti se voi usasse il quest biologo creator vi darebbe le stesse cose.......scettici!

--- Aggiornamento Post ---

Codice:
[B][B] if pc.getqf("collect_count")< 0 then     --5*Ó¥H¤U 
						local index =pc.getqf("collect_count")+1 
						pc.setqf("collect_count",index)     --¨ú±o¤@* +1
						say("Bulbasaur:")
						say("Perfetto! L' item è perfetto!!!")
						say("Ce l' hai fatta! ".." "..1-pc.getqf("collect_count").. " abgegeben!")
						say("Perfetto!")
						say("")
						pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ[/B][/B]


nemmeno la decenza di togliere i commenti in cinese =)

Perchè ti danno noia?

--- Aggiornamento Post ---

°(^_^)°
 
Stato
Discussione chiusa ad ulteriori risposte.
Indietro
Top Bottom