Jump to content

Tiico™

Miembro
  • Contador contenido

    174
  • Ingreso

  • Última visita

  • Días ganados

    2

Mensajes publicados por Tiico™

  1. quest 9_colas begin	state start begin		when login or levelup with pc.get_level() == 115 begin			set_state(mision_test) 		end	end	state mision_test begin		when letter begin			send_letter("Mision 9 colas")		end		when button or info begin			say_title("Bienvenido a La Mision 9 Colas")			say("Hola ".. pc.get_name() .." ,estas Preparado?")			say("Deberas Matar Al Jefe.")			say("9 Colas Y Podras obtener")			say("Una Recompensa .")			say("Jfirewall.")			set_state(test)		end	end	state test begin		when letter begin			send_letter("Derrota Al 9 Colas")		end		when button or info begin			say_title("mision 9 colas:")			say_reward( " Vete a las zonas donde esté el Metin de Nivel 115, Mapa Bosque")			say("jfirewall")		end		when 8025.kill begin 			say_title("Misión 9 colas")			say("Has acabado con el Jefe 9 colas!")			say("Misión jfirewall")			say("Recibirás tu recompensa:")			say_reward("500 Exp")			say_reward("100 Yang") 			pc.change_money(100)			pc.give_exp2(500)			chat("Has completado la mision 9 colas.")			chat("By jfirewall.")			clear_letter()			set_state(__COMPLETE__)		end	end	state __COMPLETE__ begin	endend

    Tabulación para quien quiera.

  2. Toma, con la información que facilitas no puedo hacer más:

    quest array begin	state start begin		when [ITEM].use begin			tabla={			[1]={300,800,1500,2500,4300},			[2]={1000,2000,3000,4000,5000}			}			chat(tabla[1][number(1,5)].." Exp")			chat(tabla[2][number(1,5)].." Yang")		end	endend

    Cambias [iTEM] por el vnum de tu item(Recuerda que el item tenga type 18 en la base de datos).

     

    Salu2.

    pepineitor , por que el "number" deberia ser math.random no ?

  3. Espero mis +1

    quest exp_yang begin	state start begin		when 2900.use begin		say_title(" "..pc.get_name().." ")		say("Hola , este item te ofrece darte una")		say("Cantidad de yang y experiencia para ti.")		say_reward("Quieres recibirla")		local exp = {300,800,1500,2500,4300}		local yang = {1000,2000,3000,4000,5000}		local s = select ("OK" , "Cerrar")		if s == 2 then		return		end		pc.give_exp2(exp[math.random(1,5)])		pc.changegold(yang[math.random(1,5)])		chat("Haz recibido "..exp([math.random(1,5)]).." de Experiencia.")		chat("Haz recibido "..yang([math.random(1,5)]).." de Yang.")		end	endend
  4. Corregida*

    Tenia demas un end , y la deje con tabulación para quien quiera.

    quest lvl200 begin	state start begin		when login or levelup or enter with pc.get_level() == 200 begin			set_state( mision_test )		end 	end	state mision_test begin		when letter begin			send_letter("Misión lvl200")		end		when button or info begin			say_title("Bienvenido a la Mision Nivel 200")			say("Hola ".. pc.get_name() .." ,esto es una misión")			say("en donde tendrás una misión Particular.")			say("Recuerda que para llegar hacer fuerte debes")			say("destruir al jefe que dare.")			say("Destruye un jefe Que queras.")			set_state(test)		end	end	state test begin		when letter begin			send_letter("Destruye el Jefe Que Elejiste")		end		when button or info begin			say_title("Mision 200")			say_reward( "Dirijete Al Mapa Cristlino Y Mata el Jefe")			say("El Tendra Una Recompensa Para Ti")		end		when 8025.kill begin			say_title("Misión Nivel 200")			say("Has acabado con el jefe nivel 200			say("Misión nivel 200")			say("Recibirás tu recompensa:")			say_reward("500.000.000 Exp")			say_reward("100.000.000 Yang")			pc.change_money(1000000000)			pc.give_exp2(5000000000) 			chat("Has completado la Misión .")			chat("By Jfirewall.")			clear_letter()			set_state(completada) 		end	end		state completada begin	endend
  5. Aquí te la dejo , te la tenia ayer como me la pediste , pero no eh estado ^^

    quest libros_habi begin	state start begin		when 29000.chat."Vender Tus Libros" begin			say_title("Hola "..pc.get_name().." ")			say("Para vender tu libro, solo tira hacia")			say("mi el libro de habilidad. Suerte")		end		when 29000.take begin			local libros = {			[50401] = {1000000},			[50402] = {1000000},			[50403] = {1000000},			[50404] = {1000000},			[50405] = {1000000},			[50416] = {1000000},			[50417] = {1000000},			[50418] = {1000000},			[50419] = {1000000},			[50420] = {1000000},			[50461] = {1000000},			[50462] = {1000000},			[50463] = {1000000},			[50464] = {1000000},			[50465] = {1000000},			[50466] = {1000000},			[50476] = {1000000},			[50477] = {1000000},			[50478] = {1000000},			[50479] = {1000000},			[50480] = {1000000},			[50481] = {1000000},			[50431] = {1000000},			[50432] = {1000000},			[50433] = {1000000},			[50434] = {1000000},			[50435] = {1000000},			[50446] = {1000000},			[50447] = {1000000},			[50448] = {1000000},			[50449] = {1000000},			[50450] = {1000000},			[50491] = {1000000},			[50492] = {1000000},			[50493] = {1000000},			[50494] = {1000000},			[50495] = {1000000},			[50496] = {1000000},			[50506] = {1000000},			[50507] = {1000000},			[50508] = {1000000},			[50509] = {1000000},			[50510] = {1000000},			[50511] = {1000000}			}						pc.remove_item()			pc.change_gold(libros[item.get_vnum()][1])		end	endend

    Espero mis +1

  6. Aquí Tienes la que te dejo Rafa, pero traduccida y modificada un poquito al español 100% 

     

     

    quest extractor_de_piedras begin	state start begin		function getItemVnum()			return 71109 ----- Item a usar xD		end				when 9003.take begin			say_title(mob_name(npc.get_race()))			if pc.count_item(extractor_piedras.getItemVnum()) == 0 then				say("Para poder sacar la ultima piedra de tu item")				say("Deveras poseer este objeto:[ENTER]")				say_item_vnum(extractor_piedras.getItemVnum())				return			end			if not extractor_piedras.IsValidItem(item.get_type(), item.get_sub_type()) then				say("Esta trancicion solo funciona con armas y armaduras.[ENTER]")				return			end					local last_stone = {['vnum'] = nil, ['slotID'] = nil}			local i = 2			local found = false			while i >= 0 and not found do				local sckt_state = item.get_socket(i)				if extractor_piedras.IsValidSocket(sckt_state) then					last_stone.vnum = sckt_state					last_stone.slotID = i					found = true				end				i = i-1			end			if last_stone.vnum == nil then				say("Hay Piedras para eliminarse.[ENTER]")				return			end			say("Si sacamos la ultima piedra")			say("la piedra sacada le quedara en su inventario")			say("no se preocupe.[ENTER]")			say_reward("Ultima Piedra: "..item_name(last_stone.vnum).." [ENTER]")			local s = select("Continuar", "Cancelar")			if s == 2 then				return			end			pc.remove_item(extractor_piedras.getItemVnum(), 1)			pc.give_item2(last_stone.vnum, 1)			item.set_socket(last_stone.slotID, 28960)			say_title(mob_name(npc.get_race()))			say("Operacion completada.[ENTER]")			end				function IsValidItem(it_type, it_subtype)			return ((it_type == 1 and it_subtype < 6) or (it_type == 2 and it_subtype == 0))		end				function IsValidSocket(sckt_value)			return (sckt_value != 0 and sckt_value != 1 and sckt_value != 28960)		end	endend 

     

     

×
×
  • Crear nuevo...