Tutorial Generar Diamantes

  • 13 Respuestas
  • 1442 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

*

Desconectado Javas

Generar Diamantes
« en: Mayo 11, 2017, 09:19:36 pm »
¡Hola Forozone! Hoy les traigo un tutorial muy solicitado. Cómo colocar un Furni que genera diamantes, básicamente una barra de oro que genera diamantes.

Abra la source de su emulador, vaya a: Communication >> Packets >> Incoming >> Rooms >> Furni >> CreditFurniRedeemEvent.cs.

Ahora, substitua todo el código por:
Spoiler para Oculto:
using System;
using System.Linq;
using System.Text;
using System.Collections.Generic;

using Plus.HabboHotel.Rooms;
using Plus.HabboHotel.Items;
using Plus.Communication.Packets.Outgoing.Inventory.Purse;
using Plus.Communication.Packets.Outgoing.Inventory.Furni;

using Plus.Database.Interfaces;


namespace Plus.Communication.Packets.Incoming.Rooms.Furni
{
    class CreditFurniRedeemEvent : IPacketEvent
    {
        public void Parse(HabboHotel.GameClients.GameClient Session, ClientPacket Packet)
        {
            if (!Session.GetHabbo().InRoom)
                return;

            Room Room;

            if (!PlusEnvironment.GetGame().GetRoomManager().TryGetRoom(Session.GetHabbo().CurrentRoomId, out Room))
                return;

            if (!Room.CheckRights(Session, true))
                return;

            if (PlusEnvironment.GetDBConfig().DBData["exchange_enabled"] != "1")
            {
                Session.SendNotification("Sorry but the catalogue has been disabled for now!");
                return;
            }

            Item Exchange = Room.GetRoomItemHandler().GetItem(Packet.PopInt());
            if (Exchange == null)
                return;

            if (!Exchange.GetBaseItem().ItemName.StartsWith("CF_") && !Exchange.GetBaseItem().ItemName.StartsWith("CFC_") && !Exchange.GetBaseItem().ItemName.StartsWith("DF_") && !Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                return;

            string[] Split = Exchange.GetBaseItem().ItemName.Split('_');
            int Value = int.Parse(Split[1]);

            if (Value > 0)
            {
                if (Exchange.GetBaseItem().ItemName.StartsWith("CF_") || Exchange.GetBaseItem().ItemName.StartsWith("CFC_"))
                {
                    Session.GetHabbo().Credits += Value;
                    Session.SendMessage(new CreditBalanceComposer(Session.GetHabbo().Credits));
                }
                else if (Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
            }

            using (IQueryAdapter dbClient = PlusEnvironment.GetDatabaseManager().GetQueryReactor())
            {
                dbClient.RunQuery("DELETE FROM `items` WHERE `id` = '" + Exchange.Id + "' LIMIT 1");
            }

            Session.SendMessage(new FurniListUpdateComposer());
            Room.GetRoomItemHandler().RemoveFurniture(null, Exchange.Id, false);
            Session.GetHabbo().GetInventoryComponent().RemoveItem(Exchange.Id);

        }
    }
}

Ahora, haga las descargas de los XMLs, SWFs, furnitures y items, abajo. E inserte en sus respectivos locales.

O si ya tiene todo, basta ir a su db, en la tabla furniture y colocar el nombre del furni como DF_ "CANTIDAD" _ "ALGUNOMBRE", por ejemplo: DF_100_bar.

VT:
Spoiler para Oculto:
No tienes permiso para ver enlaces. Registrarme ó Logearme

Descarga:
Spoiler para Oculto:
No tienes permiso para ver enlaces. Registrarme ó Logearme

Créditos:
Spoiler para Oculto:
Spyro por aviso de Error
Xpz holos por aviso de Error



« Última modificación: Septiembre 20, 2017, 03:46:53 am por xRaymundo »

*

Spyro

Re:Barra de Diamantes
« Respuesta #1 en: Mayo 11, 2017, 09:27:18 pm »
Y creo que tienes un fallo en el código ya que no quitas los furnis de la sala...
« Última modificación: Mayo 12, 2017, 07:14:14 pm por Spyro »

*

Desconectado Friend

Re:Barra de Diamantes
« Respuesta #2 en: Mayo 11, 2017, 09:42:14 pm »
¡ERROR!
Como dice Spyro, he revisado yo también el código y no recoge los furnis de la sala, solucionalo y recarga tema  [smiley17]
Soy el superhéroe de tu corazón
      <F ♥ Te Quiero 21 ♥ F>

*

Desconectado Javas

Re:Barra de Diamantes
« Respuesta #3 en: Mayo 11, 2017, 09:44:23 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme
¡ERROR!
Como dice Spyro, he revisado yo también el código y no recoge los furnis de la sala, solucionalo y recarga tema  [smiley17]

¿No hablo español muy bien, podrían ser más específicos?

*

Desconectado Friend

Re:Barra de Diamantes
« Respuesta #4 en: Mayo 11, 2017, 09:52:49 pm »

El error que decíamos yo y Spyro es que el furni del lingo o el crédito que da el diamante,
 debería recogerse y eliminarse completamente al canjearlo, pero no hace la función, por aquí te dejo el código para que lo cambies y asi no tengan problemas nuestros usuarios de ForoZone al instalar el codigo en su emulador, espero y me pongas en créditos xd.



Código
if (!Exchange.GetBaseItem().ItemName.StartsWith("CF_") && !Exchange.GetBaseItem().ItemName.StartsWith("CFC_") && !Exchange.GetBaseItem().ItemName.StartsWith("DF_") && !Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                return;
           
            string[] Split = Exchange.GetBaseItem().ItemName.Split('_');
            int Value = int.Parse(Split[1]);


            if (Value > 0)
            {
                if (Exchange.GetBaseItem().ItemName.StartsWith("CF_") || Exchange.GetBaseItem().ItemName.StartsWith("CFC_"))
                {
                    Session.GetHabbo().Credits += Value;
                    Session.SendMessage(new CreditBalanceComposer(Session.GetHabbo().Credits));
                }
                else if(Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
            }

  using (IQueryAdapter dbClient = PlusEnvironment.GetDatabaseManager().GetQueryReactor())
            {
                dbClient.RunQuery("DELETE FROM `items` WHERE `id` = '" + Exchange.Id + "' LIMIT 1");
            }


            Session.SendMessage(new FurniListUpdateComposer());
            Room.GetRoomItemHandler().RemoveFurniture(null, Exchange.Id, false);
            Session.GetHabbo().GetInventoryComponent().RemoveItem(Exchange.Id);


        }
    }


Saludos..  [smiley15]
Soy el superhéroe de tu corazón
      <F ♥ Te Quiero 21 ♥ F>

*

Desconectado Javas

Re:Barra de Diamantes
« Respuesta #5 en: Mayo 11, 2017, 09:56:53 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme

El error que decíamos yo y Spyro es que el furni del lingo o el crédito que da el diamante,
 debería recogerse y eliminarse completamente al canjearlo, pero no hace la función, por aquí te dejo el código para que lo cambies y asi no tengan problemas nuestros usuarios de ForoZone al instalar el codigo en su emulador, espero y me pongas en créditos xd.



Código
if (!Exchange.GetBaseItem().ItemName.StartsWith("CF_") && !Exchange.GetBaseItem().ItemName.StartsWith("CFC_") && !Exchange.GetBaseItem().ItemName.StartsWith("DF_") && !Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                return;
           
            string[] Split = Exchange.GetBaseItem().ItemName.Split('_');
            int Value = int.Parse(Split[1]);


            if (Value > 0)
            {
                if (Exchange.GetBaseItem().ItemName.StartsWith("CF_") || Exchange.GetBaseItem().ItemName.StartsWith("CFC_"))
                {
                    Session.GetHabbo().Credits += Value;
                    Session.SendMessage(new CreditBalanceComposer(Session.GetHabbo().Credits));
                }
                else if(Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
            }

  using (IQueryAdapter dbClient = PlusEnvironment.GetDatabaseManager().GetQueryReactor())
            {
                dbClient.RunQuery("DELETE FROM `items` WHERE `id` = '" + Exchange.Id + "' LIMIT 1");
            }


            Session.SendMessage(new FurniListUpdateComposer());
            Room.GetRoomItemHandler().RemoveFurniture(null, Exchange.Id, false);
            Session.GetHabbo().GetInventoryComponent().RemoveItem(Exchange.Id);


        }
    }


Saludos..  [smiley15]

Ahora entiendo ustedes, pero en mi caso no modificé todo el código sólo la parte mencionada en el tutorial, pero visto que presenta error para ustedes, lo mejor es borrar el tutorial.

*

Desconectado Friend

Re:Barra de Diamantes
« Respuesta #6 en: Mayo 11, 2017, 09:59:34 pm »
Solo tienes que ir a tu comentario, le das a "Actions" y le das a modificar, en la parte del código a reemplazar, pones el código que te pase en el comentario anterior y asi no debes borrarlo, saludos xd.
Soy el superhéroe de tu corazón
      <F ♥ Te Quiero 21 ♥ F>

*

Desconectado xRaymundo

Re:Gerar Diamantes
« Respuesta #7 en: Mayo 12, 2017, 05:51:36 pm »
& si mejor quieren que les de Duckets el codigo sería así:


//Empieza el codigo

                else if (Exchange.GetBaseItem().ItemName.StartsWith("DU_") || Exchange.GetBaseItem().ItemName.StartsWith("DUC_"))
                {
                    Session.GetHabbo().Duckets += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Duckets, Value));
                }
//Termina el codigo

El item empezaria así DU_"CANTIDAD"_bar
Hoy no tenga nada que hacer, excepto sonreír.

*

Desconectado Javas

Re:Gerar Diamantes
« Respuesta #8 en: Mayo 12, 2017, 07:30:43 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme
& si mejor quieren que les de Duckets el codigo sería así:


//Empieza el codigo

                else if (Exchange.GetBaseItem().ItemName.StartsWith("DU_") || Exchange.GetBaseItem().ItemName.StartsWith("DUC_"))
                {
                    Session.GetHabbo().Duckets += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Duckets, Value));
                }
//Termina el codigo

El item empezaria así DU_"CANTIDAD"_bar

Deberías empezar desde el "if", pues allí que comienza el código.

*

Desconectado Krust

Re:Generar Diamantes
« Respuesta #9 en: Mayo 17, 2017, 06:28:17 am »
No funcionó, creo que falta algo en este tutorial.

No tienes permiso para ver enlaces. Registrarme ó Logearme
Código
if (Value > 0)
            {
                if (Exchange.GetBaseItem().ItemName.StartsWith("CF_") || Exchange.GetBaseItem().ItemName.StartsWith("CFC_"))
                {
                    Session.GetHabbo().Credits += Value;
                    Session.SendMessage(new CreditBalanceComposer(Session.GetHabbo().Credits));
                }
                else if (Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
            }

el codigo no entra en DF_ else
Código
else if (Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
« Última modificación: Mayo 17, 2017, 06:41:11 am por Krust »

*

Desconectado Javas

Re:Generar Diamantes
« Respuesta #10 en: Mayo 17, 2017, 04:08:26 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme
No funcionó, creo que falta algo en este tutorial.

No tienes permiso para ver enlaces. Registrarme ó Logearme
Código
if (Value > 0)
            {
                if (Exchange.GetBaseItem().ItemName.StartsWith("CF_") || Exchange.GetBaseItem().ItemName.StartsWith("CFC_"))
                {
                    Session.GetHabbo().Credits += Value;
                    Session.SendMessage(new CreditBalanceComposer(Session.GetHabbo().Credits));
                }
                else if (Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }
            }

el codigo no entra en DF_ else
Código
else if (Exchange.GetBaseItem().ItemName.StartsWith("DF_") || Exchange.GetBaseItem().ItemName.StartsWith("DFD_"))
                {
                    Session.GetHabbo().Diamonds += Value;
                    Session.SendMessage(new HabboActivityPointNotificationComposer(Session.GetHabbo().Diamonds, Value, 5));
                }

El código se inicia con if, no con else if.
« Última modificación: Mayo 17, 2017, 05:11:33 pm por Javas »

*

Desconectado Krust

Re:Generar Diamantes
« Respuesta #11 en: Mayo 17, 2017, 09:13:07 pm »

Se está iniciando con if sólo marque el else para usted diciendo que en ningún momento entra en el else.

*

Desconectado Javas

Re:Generar Diamantes
« Respuesta #12 en: Mayo 17, 2017, 09:19:57 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme

Se está iniciando con if sólo marque el else para usted diciendo que en ningún momento entra en el else.

¿Colocó las SWF's y xm'ls corrientemente? Recuerde también modificar el interaction_type del furni para "exchange"

*

Desconectado Krust

Re:Generar Diamantes
« Respuesta #13 en: Mayo 17, 2017, 10:03:36 pm »
No tienes permiso para ver enlaces. Registrarme ó Logearme
No tienes permiso para ver enlaces. Registrarme ó Logearme

Se está iniciando con if sólo marque el else para usted diciendo que en ningún momento entra en el else.

¿Colocó las SWF's y xm'ls corrientemente? Recuerde también modificar el interaction_type del furni para "exchange"



No entendió Derecho, tutorial Mobis VEN con sus CF más Monedas Son tan graves DF_ Ya No CF? No cambié como las interacciones mobi hacer, los mueve precisos? He puesto como swf, pero yo cargaba No, Son de Correcto hot_furni en la carpeta?

 

Temas relacionados

  Asunto / Iniciado por Respuestas Último mensaje
0 Respuestas
514 Vistas
Último mensaje Diciembre 05, 2016, 11:46:00 pm
por axlwinter
5 Respuestas
1340 Vistas
Último mensaje Febrero 03, 2017, 06:23:54 pm
por Spyro
5 Respuestas
242 Vistas
Último mensaje Marzo 19, 2018, 07:32:43 am
por ALEJOHK
4 Respuestas
41 Vistas
Último mensaje Julio 24, 2018, 03:50:34 am
por -Kudus
1 Respuestas
45 Vistas
Último mensaje Julio 28, 2018, 03:15:38 am
por Alhxe