-
Contador contenido
19 -
Ingreso
-
Última visita
Mensajes publicados por dabliux
-
-
eres un asco para los servidore solo dañas los metin
- jaime baños soriano, cleiderman1, lordrogereitor y 4 mas reacciono a esto
- 7
-
quest blablabla beginstate start beginwhen #.use beginlocal chat = {"está online", "está offline"}local que = select("Estoy online", "estoy offline", "cerrar")if que != 3 thennotice_all(pc.get_name().." "..chat[que])endendendend
Amigo me podrias hacer una quest en donde el user escriba el comando cualquiera en la quest y le llege el items como haciendo el papel de implementor la quest
-
quest evento begin
state start begin
when npc_id.chat."activar evento" with pc.is_gm() begin
local s = select("si","cancelar","cerrar")
if s == 3 then
return
elseif s == 1 then
game.set_event_flag("easter_drop", 1)
notice_all("evento activo")
elseif s == 2 then
game.set_event_flag("easter_drop", 0)
notice_all("evento inactivo")
end
end
when npc_id.chat."canjear huevos" begin
say("texto")
local s2 = select("canjear","info","cerrar")
if s2 == 3 then
return
elseif s2 == 2 then
say("texto")
elseif s2 == 1 then
local s3 = select("item1","item2","item3","salir")
if s3 == 4 then
return
elseif s3 == 1 then
if pc.count_item(50160)> 2 == false then
chat("error")
else
pc.remove_item(50160,2)
pc.give_item2(29,1)
end
elseif s3 == 2 then
if pc.count_item(50160)> 2 == false then
chat("error")
else
pc.remove_item(50160,2)
pc.give_item2(39,1)
end
elseif s3 == 3 then
if pc.count_item(50179)> 2 == false then
chat("error")
else
pc.remove_item(50179,2)
pc.give_item2(49,1)
end
end
end
end
end
end
men dime porque cuando meto esta quest nunca me drop y donde podria edictar los mob para que me drop en esta quest
quest event_oua begin
state start begin
when login begin
if game.get_event_flag("oua_event") == 1 then
notice("Evento: Evento de Pascuas activado!")
end
end
when kill begin
local m_ind = pc.get_map_index()
if npc.is_pc() then
else
if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 70 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 90 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 250 then
if game.get_event_flag("oua_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50162)
--game.drop_item(50162)
else
end
else
end
end
end
end
when 20087.chat."<GM> Evento de Pascuas" with pc.is_gm() begin
if game.get_event_flag("oua_event") == 1 then
say_title("Administrar evento:")
say("")
say("Evento con huevos pascuas : ~ Activo ")
say("")
say_reward("Activar evento?")
local s=select("Si", "No")
if s==1 then
say_title("Administrar evento:")
say("")
say("El evento acabo.")
say("~ Hasta el proximo!")
game.set_event_flag("oua_event", 0)
char_log(0, "Oua_event_end from" ..pc.get_name())
notice_all("Evento con huevos pascuas ~ Terminado.")
elseif s==2 then
say_title("Administrar evento:")
say("")
say("~ Adios!")
end
else
say_title("Administrar evento:")
say("")
say("Evento con huevos pascuas : ~ Cerrado ")
say("")
say_reward("¿Empezar evento?")
local s=select("Si", "No")
if s==1 then
say_title("Administrar evento:")
say("")
say("El evento ~ empezo! .")
say("~ Suerteeee a todoss!")
game.set_event_flag("oua_event", 1)
char_log(0, "Oua_event_start from" ..pc.get_name())
notice_all("Evento con huevos pascuas ~ A empezado !")
elseif s==2 then
say_title("Administrar evento:")
say("")
say("~ Adios!")
end
end
end
when 20087.chat."<GM> Evento con huevos pascuas " with pc.is_gm() begin
if pc.get_name() == "NombreGM" or pc.get_name() == "...."or pc.get_name() == "....."then
say_title("Administrar evento:")
say("")
say("Como quieres que sea el drop?")
say("")
say_reward("Entre 1-100")
say("")
local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 100 then
say_title("Administrar evento:")
say("")
say("Has introducido datos incorrectos~")
else
char_log(0, "Oua_event_chance from" ..pc.get_name().. " to " ..new_chance.. "%")
game.set_event_flag("mond_drop_chance", new_chance)
say_title("Administrar evento:")
say("")
say("Drop actual " ..new_chance.. " setat.")
say("~ Adios !")
end
else
say_title("Administrar evento:")
say("")
say("No tienes los derechos a ejecuta esto.")
end
end
end
end
-
quien mejora esta quest ya que las dos post esta malas
-
a mi me tora este error
mini_pvp.lua:11::when doesn't have begin-end clause. (()
-
quest evento_pvp begin state start begin function Config() return { ["Coordenadas"] = {55500,55500}--Coordenadas del mapa cuando das al boton Participar ["Index"] = {360}--Index del mapa del evento ["Vidas"] = {3}--Vidas del usuario } end when 20011.chat("Evento pvp") with game.get_event_flag("eventopvp") == 1 begin local r = game.get_event_flag("eventopvp2") if pc.getqf("eventopvp") != r then pc.setqf("eventopvp",r) pc.setqf("muertes",0) pc.setqf("intento",0) end if pc.getqf("muertes") >= evento_pvp.Config().Vidas[1] then say("Usted ya agoto sus "..evento_pvp.Config().Vidas[1].." vidas.") return end if select ("Participar","Salir") == 1 then pc.warp(evento_pvp.Config().Coordenadas[1],evento_pvp.Config().Coordenadas[2]) end end when 20358.chat."Evento pvp GM" with pc.is_gm() begin local e = select ("Iniciar evento","Terminar evento","Nada") if e == 1 then notice_all("El evento pvp ha iniciado, ve a uriel para participar.") game.set_event_flag("eventopvp",1) game.set_event_flag("eventopvp2",game.get_event_flag("eventopvp2")+1) elseif e == 2 then notice_all("El evento pvp ha terminado.") game.set_event_flag("eventopvp",0) end end when login with pc.get_map_index() == evento_pvp.Config().Index[1] begin if pc.getqf("muertes") >= evento_pvp.Config().Vidas[1] or game.get_event_flag("eventopvp2") == 0 then warp_to_village() return end loop_timer("revisar_pvp",0.5) end when revisar_pvp.timer begin if pc.get_hp() <= 0 and pc.getqf("intento") == 0 then pc.setqf("intento",1) local m = pc.getqf("muertes")+1 pc.setqf("muertes",m) if m >= evento_pvp.Config().Vidas[1] then notice_in_map("El usuario "..pc.get_name().." ha muerto "..m.." veces y fue descalificado.") cleartimer("revisar_pvp") warp_to_village() return end chat("Has muerto "..m.." veces") end if pc.getqf("intento") == 1 and pc.get_hp() >= 1 then pc.setqf("intento",0) end if game.get_event_flag("eventopvp2") == 0 then cleartimer("revisar_pvp") warp_to_village() end end end end
Casi nunca ayudo pero hoy fue la excepsion, disfrutela.
eres el mejor te amoamos jajaja maricatu marica yo marica todos la la la xD ajajajajaja
-
quien ayuda o pasa la quest ya corregida
-
quest eventopvp begin state start begin when X.chat."Evento PvP" begin if game.get_event_flag("evento") == 0 then if pc.is_gm() then say("El evento pvp está desactivado.") say("Deseas activarlo?") local a = select ("Sí", "No") if a == 1 then game.set_event_flag("evento", 1) notice_all("El evento pvp ha comenzado") notice_all("Ve al npc X para participar.") end else say("El evento pvp está activado.") say("Quieres desactivarlo?") local b = select ("Si", "no") if b == 1 then game.set_event_flag("evento", 0) notice_all("El evento pvp ha terminado.") end else say("El evento pvp está activado.") say("Deseas participar?") local c = select ("Sí", "No") if c == 1 then pc.warp(coordenada x, coordenada y) end end end when kill with npc.is_pc() and pc.get_map_index() == Y and game.get_event_flag("evento") == 1 begin pc.setqf("vidas", pc.getqf("vidas") 25-1) if pc.getqf("vidas") == 0 then warp_to_village() end end end end
No se si asi funciona xD pero dejo esta alternativaPACI sera que la puedes corregir o rectificar por favor
-
sera que no nos ayudaran :C
-
esto si funcionara ?
-
yo lo veo mas facil por c++ usando el evento dead y listo xd
jaja no puedo no uso source
pasamelo por quest
-
¿Qué necesitáis?
que funcione la quest ejemplo que a las 3 muertes te envie a city eso es todo amigo gracias
-
revivo por favor ayuda
-
-
resube link
-
Chicos me gustaria meter un recuadro mas al formulario por ejemplo una opcion opcional donde diga
Nombre de usuario
clave
repetir clave
codigo de borrado
nombre real
APODO
ya podran ver que la nueva que quiero meter es apodo y que se cuarde en la misma ruta del ID Y PASS pero en la celda llamada regalo
aca les dejo el registro yo e intentado y no e podido
<div class="page-header">
<h1>Registro</h1>
</div>
<?php
if(isset($_SESSION['id'])) {
?>
<div class="alert alert-warning" role="alert">
Para crear su nueva cuenta usted debe <a href="index.php?page=logout">desconectar</a>.
</div>
<?php
} else {
?>
<?php
//Compruebe si el registro está deshabilitado.
$rg = mysqli_query($sqlHp, "SELECT * FROM ".SQL_HP_DB.".settings WHERE id=8");
$reg = mysqli_fetch_assoc($rg);
if ($reg['value'] == 'nu') {
echo '<div class="alert alert-danger" role="alert">
El registro es en la actualidad <strong>discapacitado</strong>!
</div>'; }
else {
if(!isset($_POST['register'])) {
?>
<div class="alert alert-info" role="alert">
<strong>Atencion!</strong> Todos los campos son obligatorios.<br> <strong>Atencion!</strong>
Direccion de correo electronico debe ser valida!
</div>
<div class="alert alert-danger" role="alert">
<strong>Atencion!</strong> Al registrarse en este servidor es
estar de acuerdo con <a href="index.php?page=rules">normas internas</a>.
</div>
<?php } ?>
<?php
if(isset($_POST['register']) && isset($_POST['agreed'])) {
$actions = array(
'username' => sanitize(stripInput($_POST['username'])),
'password' => sanitize(stripInput($_POST['password'])),
'usermail' => sanitize(stripInput($_POST['usermail'])),
'realname' => sanitize(stripInput($_POST['realname'])),
'socialid' => sanitize(stripInput($_POST['socialid'])),
);
$errors = array();
$check_login = "SELECT * FROM account.account WHERE login = '{$actions['username']}'";
$check_login = $sqlServ->query($check_login);
$rows_login = $check_login->num_rows;
$check_email = "SELECT * FROM account.account WHERE email = '{$actions['usermail']}'";
$check_email = $sqlServ->query($check_email);
$rows_email = $check_email->num_rows;
if($rows_login >= 1) {
echo '<div class="alert alert-danger" role="alert">';
echo ' Esta cuenta ya está registrado!';
echo '</div>';
} else if($rows_email >= 1) {
echo '<div class="alert alert-danger" role="alert">';
echo ' Este e-mail ya esta siendo utilizado por otra cuenta!';
echo '</div>';
} else {
if(filter_var($actions['usermail'], FILTER_VALIDATE_EMAIL)) {
if($_POST['password'] == $_POST['rpassword']) {
$query = "INSERT INTO account.account (login, password, real_name, social_id, email, create_time)
VALUES (?, PASSWORD(?), ?, ?, ?, NOW())";
$sanitize = array(
':user' => $actions['username'],
':pass' => $actions['password'],
':mail' => $actions['usermail'],
':name' => $actions['realname'],
':soid' => $actions['socialid'],
);
$insert = $sqlServ->prepare($query);
$insert->bind_param('sssss', $sanitize[':user'], $sanitize[':pass'], $sanitize[':name'], $sanitize[':soid'], $sanitize[':mail']);
$insert->execute();
echo '<div class="alert alert-success" role="alert">';
echo ' Cuenta <strong>' . $actions['username'] . '</strong> fue registrado correctamente!';
echo '</div>';
} else {
echo '<div class="alert alert-danger" role="alert">';
echo ' Las clave no coinciden!';
echo '</div>';
}
} else {
echo '<div class="alert alert-success" role="alert">';
echo ' E-mail no es válida!';
echo '</div>';
}
}
}
?>
<div class="well">
<div class="table-responsive">
<form action="<?= $_SERVER['PHP_SELF'] ?>?page=register" method="post">
<table class="table table-striped">
<tbody>
<tr>
<td>Nombre de usuario:</td>
<td><input type="text" class="form-control" name="username" pattern=".{5,16}" maxlength="16" placeholder="Nombre deseado ..." required title="Entre 5 y 16 caracteres permitidos."></td>
</tr>
<tr>
<td>Clave:</td>
<td><input type="password" class="form-control" name="password" pattern=".{5,16}" maxlength="16" placeholder="clave" required title="Entre 5 y 16 caracteres permitidos"></td>
</tr>
<tr>
<td>Repita Clave:</td>
<td><input type="password" class="form-control" name="rpassword" pattern=".{5,16}" maxlength="16" placeholder="Repita la clave" required title="Entre 5 y 16 caracteres permitidos."></td>
</tr>
<tr>
<td>Direccion de correo:</td>
<td><input type="text" class="form-control" name="usermail" pattern=".{7,64}" maxlength="64" placeholder="[email protected]" required title="Maximo 64 caracteres."></td>
</tr>
<tr>
<td> codigo de Eliminacion de Personaje:</td>
<td><input type="username" AUTOCOMPLETE="off" maxlength="7" class="form-control" name="socialid" placeholder="1234567 max 7 Num" required></td>
</tr>
<tr>
<td>Nombre Real:</td>
<td><input type="username" class="form-control" name="realname" pattern=".{3,15}" maxlength="15" placeholder="Su nombre" required title="Hasta 15 caracteres."></td>
</tr>
<tr>
<td>Estoy de acuerdo <a href="index.php?page=rules">Normas del
juego</a> <input type="checkbox" name="agreed"></td>
</td>
<td><input type="submit" class="btn btn-s btn-success" name="register" value="registrarse"></td>
</tr>
</tbody>
</table>
</form>
</div>
</div>
<?php }} ?> -
yo la baje hace unos 2 dias y no eh tenido tiempo de traducirla, cuanto les costara traducirlas a ustedes los '' Pro '' ? yo no eh tenido tiempo si no lo haria
oye amigo pasame el link bien de esa pagina es que creo que el que esta hay ta roto me lo evias por MP o lo publicas en el chat general
quest de intems
en Correcion de quests
Publicado
Buenas tengo una quest que me gustaría que me le terminen ya que aun no e dado para terminarla
quest eventdepaste_tree begin
state start begin
when 30129.click begin
local SOCK_VNUM = 50160
say("Enhorabuena El equipo de metin2 te hace entrega de una estola!")
local s = select("Tengo las telas!","No tengo ninguna tela!","En que consiste la mision ?")
if s==1 then
if pc.level >= 40 then
if pc.getqf("put_sock_count") >= 40 then
say("Lo siento! Hoy has traido ya 40 telas!")
else
if pc.countitem(SOCK_VNUM) >= 40 then
pc.setqf("put_sock_count", pc.getqf("put_sock_count") + 40)
pc.removeitem(SOCK_VNUM, 40)
say("Enhorabuena el equipo de metin2 te hace entrega de una estola!")
pc.give_item_from_special_item_group(SOCK_VNUM)
else
say("Lo siento no tienes 40 telas")
end
end
else
say("Tines que tener level 40 para traer las telas!")
end
elseif s==2 then
say("Quieres robarme ? Largate y trae 40 o no vuelvas!")
elseif s==3 then
say_reward("Obtener estola!")
say("Todo el tiempo que este aqui no faltaran las estolas regresa pronto!")
end
end
end
end
le falta el que cuando uno le de el item al npc el te entregue la estola ya eso solo falta