Script Ruleta en funcion de intentos

#Script de Ruleta en función de intentos creado por Helio, con ayuda de Kyu y Polectron. Se ruega dar créditos a todos ellos.
#Este script escogerá un número aleatorio y dará al jugador una cantidad limitada de intentos para adivinarlo.
#En función de los intentos que le lleve, mediante un evento de condiciones y efectos, puedes dar al jugador los premios que desees.
def RNGuessing()
rng = rand(100)+1 #cambiad 100 por el último número del rango. Elegirá un número entre el 1 y el número que le hayáis puesto.
	n = 10  #esto define el número de intentos que tiene el jugador para acertar el número.
  while n > 0
a = pbEnterText("Número entre 1 y 100",1,3).to_i
    if a < 1 || a > 100
			 Kernel.pbMessage("El número que has elegido está fuera del rango que te he dicho, dime otro número.")
		end
		if a > rng
			Kernel.pbMessage("El número que he escogido es menor que el que has escrito.")
			n = n-1
      Kernel.pbMessage("Te quedan #{n} intentos.")
			Kernel.pbMessage("Inténtalo de nuevo.")
		end
		if a < rng
			Kernel.pbMessage("El número que he escogido es mayor que el que has escrito.")
			n = n-1
      Kernel.pbMessage("Te quedan #{n} intentos.")
			Kernel.pbMessage("Inténtalo de nuevo.")
		end
    if a == rng
			Kernel.pbMessage("¡Felicidades! ¡Has acertado!")
			Kernel.pbMessage("¡Te ha llevado #{n} intentos!")
			$game_variables[30] = n #Con esto, guardamos la cantidad de intentos en la variable número 30. Podéis escoger la variable de RMXP que queráis y esté libre.
      n=-1
		end
	end
	if n==0
	Kernel.pbMessage("¡No has acertado! El número era #{rng}.")
  return false
  $game_variables[30] = n
  n=-1
end
if n==-1
  return true
end
end