Johan™

:v
PD: antes de comenzar quiero aclarar que la parte del SQLMsg *msg; - msg = xxx la saque de elitepvpers. D: yo solo realize algunos cambios e.e.
Abrimos char.cpp y al final ponemos:
int CHARACTER::SetCoins(long coins) { SQLMsg *msg; msg = DBManager::instance().DirectQuery("UPDATE account.account SET coins = coins + '%ld' WHERE id = '%d'", coins, GetAID()); if (msg->uiSQLErrno != 0) { sys_err("pc_update_coins query failed"); return false; } return true; } Ahora nos vamos a char.h y abajo de bool ItemProcess_Polymorph(LPITEM item);
pegamos esto.
public: int SetCoins(long coins = 0); Debe quedar asi D:

Ahora abrimos char_item.cpp y buscamos switch (item->GetType()) arriba de eso pegamos lo sigiente e.e
switch (item->GetVnum()) { //Coins. case 80014: case 80015: case 80016: case 80017: int idx[4]; idx[0] = 100; idx[1] = 500; idx[2] = 1000; idx[3] = 50; int idxs; if (item->GetVnum() == 80014) idxs = 0; if (item->GetVnum() == 80015) idxs = 1; if (item->GetVnum() == 80016) idxs = 2; if (item->GetVnum() == 80017) idxs = 3; long val; val = idx[idxs]; if (SetCoins(val)) { ChatPacket(CHAT_TYPE_INFO, "Has cargado %ld coins a tu cuenta.",val); item->SetCount(item->GetCount() - 1); } else { ChatPacket(CHAT_TYPE_INFO, "Ha ocurrido un error al intentar cambiar tus coins, contacta con el administrador."); } return 1; break; default: break; } D: tambien pueden usar esta funciona para los lua
solo usen el SetCoins(cantidad e.e)

:c
C++
cmd_general.cpp
ACMD(do_delete_item) { char ItemSlot[255]; one_argument (argument, ItemSlot, sizeof(ItemSlot)); if (*ItemSlot){ DWORD cell = (DWORD)atoi(ItemSlot); LPITEM item = ch ? ch->GetInventoryItem(cell) : NULL; if (item != NULL && item) { ITEM_MANAGER::instance().RemoveItem(item); } } } cmd.cpp
ACMD(do_delete_item); { "eliminarobjetos", do_delete_item, 0, POS_DEAD, GM_PLAYER}, Esté es una de las cosas que hago cuando toy practicando . _ .

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

Te la ganaste :v

Ya que la otra vez se filtro sin querer el link,pues le dije Rauser para postearlo.
Creditos: Al feo de Rauser

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

Despues de insistirle al mk de Rauser:
Sistema de bloqueo para no tirar,comerciar ni mover items del inventario,solo podra desbloquearlo el jugador que sepa el password etc

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

:c
C++
cmd_general.cpp
ACMD(do_delete_item) { char ItemSlot[255]; one_argument (argument, ItemSlot, sizeof(ItemSlot)); if (*ItemSlot){ DWORD cell = (DWORD)atoi(ItemSlot); LPITEM item = ch ? ch->GetInventoryItem(cell) : NULL; if (item != NULL && item) { ITEM_MANAGER::instance().RemoveItem(item); } } } cmd.cpp
ACMD(do_delete_item); { "eliminarobjetos", do_delete_item, 0, POS_DEAD, GM_PLAYER}, Esté es una de las cosas que hago cuando toy practicando . _ .

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

:c
C++
cmd_general.cpp
ACMD(do_delete_item) { char ItemSlot[255]; one_argument (argument, ItemSlot, sizeof(ItemSlot)); if (*ItemSlot){ DWORD cell = (DWORD)atoi(ItemSlot); LPITEM item = ch ? ch->GetInventoryItem(cell) : NULL; if (item != NULL && item) { ITEM_MANAGER::instance().RemoveItem(item); } } } cmd.cpp
ACMD(do_delete_item); { "eliminarobjetos", do_delete_item, 0, POS_DEAD, GM_PLAYER}, Esté es una de las cosas que hago cuando toy practicando . _ .

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

+1

Por qué no lo haces con un packet?

:c
C++
cmd_general.cpp
ACMD(do_delete_item) { char ItemSlot[255]; one_argument (argument, ItemSlot, sizeof(ItemSlot)); if (*ItemSlot){ DWORD cell = (DWORD)atoi(ItemSlot); LPITEM item = ch ? ch->GetInventoryItem(cell) : NULL; if (item != NULL && item) { ITEM_MANAGER::instance().RemoveItem(item); } } } cmd.cpp
ACMD(do_delete_item); { "eliminarobjetos", do_delete_item, 0, POS_DEAD, GM_PLAYER}, Esté es una de las cosas que hago cuando toy practicando . _ .

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

:c
C++
cmd_general.cpp
ACMD(do_delete_item) { char ItemSlot[255]; one_argument (argument, ItemSlot, sizeof(ItemSlot)); if (*ItemSlot){ DWORD cell = (DWORD)atoi(ItemSlot); LPITEM item = ch ? ch->GetInventoryItem(cell) : NULL; if (item != NULL && item) { ITEM_MANAGER::instance().RemoveItem(item); } } } cmd.cpp
ACMD(do_delete_item); { "eliminarobjetos", do_delete_item, 0, POS_DEAD, GM_PLAYER}, Esté es una de las cosas que hago cuando toy practicando . _ .

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

No da igual el resto, la parte de guild también.

quest horse_revive begin
    state start begin
        when 20349.chat.gameforge.horse_revive._10_npcChat with horse.get_grade()==3 and horse.is_dead() and pc.countitem("50059")<1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._20_say)
            if pc.countitem("50058")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._30_say)
            elseif pc.countitem("50057")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._40_say)
            end
        end
        when 20349.chat.gameforge.horse_revive._10_npcChat with horse.get_grade()==3 and horse.is_dead() and pc.countitem("50059")>=1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._50_say)
            wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._60_say)
            horse.summon()
                        wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._70_say)
            if pc.countitem("50059")>=1 then
                pc.removeitem("50059", 1)
                horse.revive()
            end
        end
        when 20349.chat.gameforge.horse_revive._10_npcChat with horse.get_grade()==2 and horse.is_dead() and pc.countitem("50058")<1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._80_say)
            if pc.countitem("50059")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._90_say)
            elseif pc.countitem("50057")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._40_say)
            end
        end

        when 20349.chat.gameforge.horse_revive._100_npcChat with horse.get_grade()==2 and horse.is_dead() and pc.countitem("50058")>=1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._110_say)
            wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._60_say)
            horse.summon()
                        wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._70_say)
            if pc.countitem("50058")>=1 then
                pc.removeitem("50058", 1)
                horse.revive()
            end
        end

        when 20349.chat.gameforge.horse_revive._100_npcChat with horse.get_grade()==1 and horse.is_dead() and pc.countitem("50057")<1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._120_say)
            if pc.countitem("50059")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._90_say)
            elseif pc.countitem("50058")>=1 then
                say_title(gameforge.horse_exchange_ticket._20_sayTitle)
                say(gameforge.horse_revive._130_say)
            end
        end
        when 20349.chat.gameforge.horse_revive._10_npcChat with horse.get_grade()==1 and horse.is_dead() and pc.countitem("50057")>=1 begin
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._140_say)
            wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._60_say)
            horse.summon()
                        wait()
            say_title(gameforge.horse_exchange_ticket._20_sayTitle)
            say(gameforge.horse_revive._70_say)
            if pc.countitem("50057")>=1 then
                pc.removeitem("50057", 1)
                horse.revive()
            end
        end    
    end
    state __COMPLETE__ begin
        when enter begin
            q.done()
        end
    end
end
 

DESCARGA

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

Te lo has ganado
 
 
 

Buena +1 

quest bolsafortunada begin state start begin when 30093.use or 30094.use or 30095.use or 30096.use begin local bolsas = { {30039, 19, 1}, {30094, 19, 1}, {30095, 19, 1}, {30096, 19, 1} } for i = 1, table.getn(bolsas), 1 do if item.get_vnum() == bolsas[i][1] then local probitemselct = number(1, table.getn(bolsas)) pc.give_item2(bolsas[probitemselct][2], bolsas[probitemselct][3]) pc.remove_item(bolsas[probitemselct][2], bolsas[probitemselct][3]) end end end end end Con eso solo puede llegar a funcionar. (No lo he probado) 

Hola guaptones
Hoy les traigo una simple quest, se que hay algunas en el foro, :v
Cuando tenga tiempo, pondre una funcion igual a la de get_empty_inventory_count pero que compruebe el espacio por la celda no me hago entender xd, ya que el get_empty_inventory_count cuenta los espacio totales libres xd.
quest bolsafortunada begin state start begin when 30093.use or 30094.use or 30095.use or 30096.use begin local bols_93 = { {19, 1}, } local bols_94 = { {19, 1}, } local bols_95 = { {19, 1}, } local bols_96 = { {19, 1}, } if item.get_vnum() == 30093 then bolsafortunada.give_item(bols_93, item.get_vnum()) elseif item.get_vnum() == 30094 then bolsafortunada.give_item(bols_94, item.get_vnum()) elseif item.get_vnum() == 30095 then bolsafortunada.give_item(bols_95, item.get_vnum()) elseif item.get_vnum() == 30096 then bolsafortunada.give_item(bols_96, item.get_vnum()) else chat("Iten no programado.") -- En caso de error que es muy poco probable que salga. end end function give_item(tab, vnum) local longi = table.getn(tab) local probitemselct = number(1, longi) if tab[probitemselct] != NULL then item.select(tab[probitemselct][1]) if pc.get_empty_inventory_count() - item.get_size() > 0 then pc.give_item2(tab[probitemselct][1], tab[probitemselct][2]) pc.remove_item(vnum, 1) end end end end end

Hola guaptones
Hoy les traigo una simple quest, se que hay algunas en el foro, :v
Cuando tenga tiempo, pondre una funcion igual a la de get_empty_inventory_count pero que compruebe el espacio por la celda no me hago entender xd, ya que el get_empty_inventory_count cuenta los espacio totales libres xd.
quest bolsafortunada begin state start begin when 30093.use or 30094.use or 30095.use or 30096.use begin local bols_93 = { {19, 1}, } local bols_94 = { {19, 1}, } local bols_95 = { {19, 1}, } local bols_96 = { {19, 1}, } if item.get_vnum() == 30093 then bolsafortunada.give_item(bols_93, item.get_vnum()) elseif item.get_vnum() == 30094 then bolsafortunada.give_item(bols_94, item.get_vnum()) elseif item.get_vnum() == 30095 then bolsafortunada.give_item(bols_95, item.get_vnum()) elseif item.get_vnum() == 30096 then bolsafortunada.give_item(bols_96, item.get_vnum()) else chat("Iten no programado.") -- En caso de error que es muy poco probable que salga. end end function give_item(tab, vnum) local longi = table.getn(tab) local probitemselct = number(1, longi) if tab[probitemselct] != NULL then item.select(tab[probitemselct][1]) if pc.get_empty_inventory_count() - item.get_size() > 0 then pc.give_item2(tab[probitemselct][1], tab[probitemselct][2]) pc.remove_item(vnum, 1) end end end end end

es como dilong con su traje de hallowen . - .

es como dilong con su traje de hallowen . - .

Buenas tardes gente, hoy les traigo un NPC la cual yo la veo muy bien para vendedora general .
Link [NPC]:
 

 
Imagen del [NPC]:

Fuente:
 

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

Tenia encendido los files y me puse a hacer estas quest,son simples pero tal vez a alguien le sirva xD
 
 
 
 
 
 
 
 
 

Link: Debes iniciar sesión para ver el contenido del enlace en esta publicación.!Vm4PZ2K0YlyVv4OnVGM0aV5YTZD1aQ6YMXqNEK9qYR0
 
Foto:
 
 
 

Son archivos que tengo guardado etc,sin mas que decir
 
Debes iniciar sesión para ver el contenido del enlace en esta publicación.!ZWG6O-qsYrQg8KHLjOSBfw
Carpeta 2:
Debes iniciar sesión para ver el contenido del enlace en esta publicación.