Jump to content

[PETICION]Quest en NPC


PENTAGRAMA

Mensajes recomendados

Me encantaria poner Esta Quest. en un NPC.

 

 

Debes iniciar sesión para ver el contenido del enlace en esta publicación.

-----------------------------
-- Quest reparada por Yori --
--   Para Metin2Zone.net   --
-----------------------------
quest loteria begin
	state start begin
		when 20041.chat."Loteria" begin
			if get_time() > pc.getqf("lottery_last_play") then
				say_title ( "Loteria" )
				say("Participa en la loteria de Metin2. [ENTER]Elige tu número y podrás ganar un funtastico premio")
				say_reward ("Precio: 5 MD")
				local DB_USER = "root"        	--Nombre de usuario de la DB
				local DB_PASS = "sasuke"		--Pass de la DB
				local DB_IP = "192.192.192.100"	--IP de la DB
				local PRECIO = 5				--Precio de la apuesta
				local PREMIO = 70				--Premio de la apuesta
				local RANGO = 20				--Numero maximo que puede salir
				local TIEMPO = 30				--Tiempo entre oportunidades (Segundos)
				local ID = pc.get_account_id()
				local coins2 = mysql_query("SELECT account.coins FROM account.account WHERE account.id = '"..ID.."' LIMIT 1;",DB_USER,DB_PASS,"account",DB_IP)
				local scelta = select ( "Si","No" )
				if scelta == 1 then
					if coins2.coins[1] >= PRECIO then
						local k
						repeat
							say_title ( "Lotería" )
							say ( "Introduzca un número de 1 a "..RANGO)
							say ("Si el número sorteado se corresponde con el")
							say ("número elegido por usted puede ganar un")
							say ("premio de "..PREMIO.." MD!!")
							say("Si metes un numero decimal jamás te tocará ")
							say("Actualmente tienes: "..coins2.coins[1].." coins")
							k = tonumber(input())
							if k == "" then
								say_title("Lotería")
								say("Usted debe introducir un número entre 1 y "..RANGO..".[ENTER]No puedes dejarlo vacío.")
								local s = select("Continuar", "Cerrar")
								if s == 2 then
									return
								end
							else
								if k <= 0 then
									say_title("Lotería")
									say("Debe introducir un número positivo entre 1 y "..RANGO)
									local s = select("Continuar", "Cerrar")
									if s == 2 then
										return
									end
								else
									if k > RANGO then
										say_title("Lotería")
										say("Debe introducir un número entre 1 y "..RANGO)
										local s = select("Continuar", "Cerrar")
										if s == 2 then
											return
										end
									else
										say("Número elegido es: "..k)
										say("Estás seguro de que quiere ese número?")
										local asd = select("Si","Cambiar","Cerrar")
										if asd == 1 then
											break
										elseif asd == 3 then
											return
										end
									end
								end
							end
						until false  
						say ("Y ahora procedemos al sorteo")
						local random_number = tostring(number(1,RANGO))
						mysql_query("UPDATE account.account SET account.coins = account.coins - "..PRECIO.." WHERE id = '"..ID.."';",DB_USER,DB_PASS,"account",DB_IP)
						pc.setqf("lottery_last_play",get_time()+TIEMPO)
						say_reward("Número Ganador es: "..random_number)
						say("Y tu habías elegido el "..k)
						if random_number == tostring(k) then
							say ("Felicidades, usted ganó un premio de "..PREMIO.."MDs!")
							say_reward ("Has Recibido "..PREMIO.." MDs")
							mysql_query("UPDATE account.account SET account.coins = account.coins + "..PREMIO.." WHERE id = '"..ID.."';",DB_USER,DB_PASS,"account",DB_IP)
							return
						else
							say ("Siento que hayas perdido. No siempre se gana!")
							return
						end  
					else 
						say("Lo siento, no tienes MDs suficientes")
						return				
					end
				end  
			else
				say("Todavia no puedes jugar, espera un poco.")
			end  
		end
	end
end

Si alguien me puede Ayudar Seria Genial.

Enlace para comentar
Compartir en otros sitios

Si, pero cuando pongo ese  NPC, no me Agarra es un Borracho.  le doy clic y clic y nunca me agarro el  quest.

bueno para empezar esa no es una quest como cualquier otra, esta usa la base de datos, y por lo que veo es mysql asi que se instala de una manera distinta a una quest normal(hay una guia de agregar la funcion mysql)

Enlace para comentar
Compartir en otros sitios

bueno para empezar esa no es una quest como cualquier otra, esta usa la base de datos, y por lo que veo es mysql asi que se instala de una manera distinta a una quest normal(hay una guia de agregar la funcion mysql)

Si pero minimo tiene que aparecer en el NPC, al dar click o dar algun error. pero no da nada.. simplemente no sale. 

Enlace para comentar
Compartir en otros sitios

Si pero minimo tiene que aparecer en el NPC, al dar click o dar algun error. pero no da nada.. simplemente no sale. 

No tiene porque, no te da ningun error al compilar la quest?, puede que la función mysql la tengas ya en los files porque es un poco vieja, aparte solo se me ocurre que tengas mal la función mysql o no la tengas bien, porque la sintaxis parece correcta.

Enlace para comentar
Compartir en otros sitios

  • Dilong locked this tema
Guest
Este tema está cerrado a otras respuestas.
  • Recientemente navegando por este tema   0 miembros

    • No hay usuarios registrados visitando esta página.
×
×
  • Crear nuevo...