Jump to content

error con quest = error string information]:8 "=" expected near "/" ayuda


sossin

Mensajes recomendados

Testeada y Arreglada :3 ... Si pudieras darme mis +1 e.e

 

 

 

quest control begin	state start begin		when login with pc.is_gm() begin			set_state(information)		end	end	state information begin		when letter begin			send_letter("Control de Gm")		end		when button or info begin			say_title("Control de Gm:")			say("Que Quieres hacer?")			local menu = select("Halloween","Dia y Noche","Rates","Bloquear Chat","Navidad","Banear Pj","Teleport","Cerrar")			if menu == 8 then				return			elseif menu == 1 then				command("m 20023")				command("m npc")				command("m npc")			elseif menu == 2 then				say("Que quieres poner?")				local menu2 = select("Dia","Noche","Cerrar")				if menu2 == 1 then					command ("x 2")				elseif menu2 == 2 then					command ("x 1")				elseif menu2 == 3 then					return				end			elseif menu == 3 then				say("Rates:")				say("Que rate quieres añadir?")				local menu2 = select("Experiencia","Yang","Drop","Cerrar")				if menu2 == 4 then					return				elseif menu2 == 1 then					say("Experiencia:")					say("A que reino le quieres dar experiencia?")					local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar")					if menu3 == 5 then						return					elseif menu3 == 1 then						local tipo = 4						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Experiencia para Shinsoo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 2 then						local tipo = 4						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Experiencia para Chunjo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 3 then						local tipo = 4						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Experiencia para Jinno:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 4 then						local tipo = 4						local reino = 0						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Experiencia para todos:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					end				elseif menu2 == 2 then					say("Yang:")					say("A que reino le quieres dar Yang?")					local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar")					if menu3 == 5 then						return					elseif menu3 == 1 then						local tipo = 2						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Yang para Shinsoo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 2 then						local tipo = 2						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Yang para Chunjo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 3 then						local tipo = 2						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Yang para Jinno:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 4 then						local tipo = 2						local reino = 0						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Yang para todos:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					end				elseif menu2 == 3 then					say("Drop:")					say("A que reino le quieres dar Drop?")					local menu3 = select("Shinsoo","Chunjo","Jinno","Todos","Cerrar")					if menu3 == 5 then						return					elseif menu3 == 1 then						local tipo = 1						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Drop para Shinsoo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 2 then						local tipo = 1						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Drop para Chunjo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 3 then						local tipo = 1						local reino = menu3						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Drop para Chunjo:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					elseif menu3 == 4 then						local tipo = 1						local reino = 0						say("Que porcentaje quieres darle?")						say_reward("Introduce solo numeros enteros.")						local rate = input()						rate=tonumber(rate)						say("Introduce el tiempo de duración en minutos")						say("Ej: 120")						say("Que serian 2 horas")						local tiempo=input()						tiempo=tonumber(tiempo)						say("Drop para todos:")						say("Estas seguro que quieres darle "..rate.."%[ENTER]durante "..tiempo.." minutos?")						local menu4 = select("Si","No")						if menu4 == 1 then							__give_empire_priv(reino, tipo, rate, tiempo*60)						else							return						end					end				end			elseif menu == 4 then				say("Que quieres hacer")				local menu2 = select("Bloquear chat","Quitar bloqueo de chat","Lista de bloqueados","Cerrar")				if menu2 == 1 then					say("Bloquear chat:")					say("Introduce el nombre del jugador que quieres mutear")					local nombre = input()					say("Introduce el tiempo que quieres silecciarlo en minutos")					say("Recuerda 1 hora = 60 minutos")					say("Debes introducir solo el numero")					local tiempo = input()					say("Estas seguro que quieres mutear a "..nombre.."[ENTER]durante "..tiempo.." minutos?")					local menu3 = select("Si","Cerrar")					if menu3 == 1 then						notice_all(nombre.." ha sido silenciado del chat durante "..tiempo.." minutos de juego")						tiempo = tonumber(tiempo)*60						command("block_chat "..nombre.." "..tiempo)					elseif menu3 == 2 then						return					end				elseif menu2 == 2 then					say("Desbloquear chat:")					say("Escribe el nombre del jugador que quieres desmutear.")					local nombre = input()					if find_pc_by_name(nombre) == 0 then						say("Ese nombre no existe")						return					end					say("Estas seguro que quieres quitar el muteo a "..nombre)					local menu3 = select("Si","Cerrar")					if menu3 == 1 then						command("block_chat "..nombre.." 0")					elseif menu3== 2 then						return					end				elseif menu2 == 3 then					command("block_chat_list")				elseif menu2 == 4 then					return				end			elseif menu == 5 then				say("Que quieres hacer?")				local menu2 = select("Nieve","Villancicos","Fuegos artificiales","Arbol navidad","Santa Claus","Cerrar")				if menu2==1 then					say("Nieve:")					local menu3 = select("Nieve On","Nieve Off","Cerrar")					if menu3 == 1 then						command("xmas_snow 1")					elseif menu3 == 2 then						command("xmas_snow 0")					elseif menu3 == 3 then						return					end				elseif menu2 == 2 then					say("Villancicos:")					local menu3 = select("Villancicos On","Villancicos Off","Cerrar")					if menu3 == 1 then						command("xmas_song 1")					elseif menu3 == 2 then						command("xmas_song 0")					elseif menu3 == 3 then						return					end				elseif menu2 == 3 then					say("Fuegos artificiales:")					local menu3 = select("Fuegos artificiales On","Fuegos artificiales Off","Cerrar")					if menu3 == 1 then						command("xmas_boom 1")					elseif menu3 == 2 then						command("xmas_boom 0")					elseif menu3 == 3 then						return					end				elseif menu2 == 4 then					say("Arbol de navidad:")					local menu3 = select("Arbol Fase1","Arbol Fase 2","Arbol Fase 3","Arbol Off","Cerrar")					if menu3 == 1 then						command("xmas_tree 1")					elseif menu3 == 2 then						command("xmas_tree 2")					elseif menu3 == 3 then						command("xmas_tree 3")					elseif menu3 == 4 then						command("xmas_tree 0")					elseif menu3 == 4 then						return					end									elseif menu2 == 5 then					say("Santa Claus:")					local menu3 = select("Santa Claus On","Santa Claus Off","Cerrar")					if menu3 == 1 then						command("xmas_santa 1")					elseif menu3 == 2 then						command("xmas_santa 0")					elseif menu3 == 3 then						return					end				elseif menu2 == 6 then					return				end			elseif menu == 6 then				say("Banear:")				say("Que quieres hacer?")				local menu2 = select("Banear","Quitar Ban","Cerrar")				if menu2 == 1 then					say("Introduce el nombre del jugador[ENTER]que quieres perder de vista xD")					local nombre = input()					say("Estas seguro que quieres banear a "..nombre)					local menu2 = select("Si","No")					if menu2 == 1 then						local id = mysql_query("SELECT player.account_id from player.player where player.name = '"..nombre.."'","root","dortmund4ever","player","192.168.7.100")						--say(id.account_id[1].." intento 1")						--say(id.id.." intento 2")						mysql_query("Update account.account set account.status = 'BLOCK' WHERE account.id = "..id.account_id[1].."","root","dortmund4ever","account","192.168.7.100")						say(nombre.." ha sido baneado.")					elseif menu2== 2 then						return					end				elseif menu2 == 2 then					say("Introduce el nombre del jugador[ENTER]al que le quieres quitar el ban.")					local nombre = input()					say("Estas seguro que quieres[ENTER]quitarle el ban a "..nombre)					local menu2 = select("Si","No")					if menu2 == 1 then						local id = mysql_query("SELECT player.account_id from player.player where player.name = '"..nombre.."'","root","dortmund4ever","player","192.168.7.100")						--say(id.account_id[1].." intento 1")						--say(id.id.." intento 2")						mysql_query("Update account.account set account.status = 'OK' WHERE account.id = "..id.account_id[1].."","root","dortmund4ever","account","192.168.7.100")						say(nombre.." ha sido desbaneado.")					elseif menu2== 2 then						return					end				elseif menu2 == 3 then					return				end			elseif menu == 7 then				say("Que quieres hacer")				local menu2 = select("Traer a alguien","Ir hacia alguien","Cerrar")				if menu2 == 3 then 					return				elseif menu2 == 1 then					say("Traer a alguien:")					say("")					say("Escribe el nombre del jugador")					local nombre = input()					if find_pc_by_name(nombre) == 0 then						say("El jugadore no existe o está desconectado")						return					else						command("t "..nombre)						say("El jugador "..nombre.." está de camino xD")					end				elseif menu2== 2 then					say("Ir hacia alguien:")					say("")					say("Escribe el nombre del jugador")					local nombre = input()					if find_pc_by_name(nombre) == 0 then						say("El jugador no existe o está desconectado")						return					else						command("warp "..nombre)					end				end			end  		end	endend

 

 

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...