[Service] Holograph Commands [Service]

**Makarov** · 01-09-10

This is my custom command service.

Here is the format.

[command]
[description]
[emulator]

Example
:test
:Send a notification to the user saying 'test'
Uber/Holograph

Please note, Some may not be instant.

**MentaL**

**richie4394** · 01-09-10

command - :brb
version = v26
what is does = makes user name example "(BRB) Richie"

**Makarov** · 01-09-10

Code:

#region brb
case "brb": 
{
_Username = "*[BRB] + "_Username"*";
refreshAppearance(true, true, true);
break;
}
#endregion

I doubt this will work..
but worth a shot

and i dont think force has it cause i have their emulator.

**ReDoc** · 01-09-10

K I would like a Toll function
<:Toll>
<R35>
<Charges a toll to go through on any one way gate from the set amount example blue gate :toll 11 credits charges a habbo 11 credits to go through it.>

**Makarov** · 01-09-10

Testing my abilities eh? xD

The actual toll code

Code:

 #region :toll
                    case "toll":
                        {
                            string owner;
                            using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                            {
                                owner = dbClient.getString("SELECT owner FROM rooms WHERE id = '" + _roomID + "'");
                            }
                            if (owner != _Username)
                                sendData("BK" + "Sorry, you cannot set a toll for a room you don't own");
                            else
                            {
                                int cost = int.Parse(args[1]);
                                if (cost < 0)
                                    sendData("BK" + "Sorry, set your toll at 0");
                                else
                                {
                                    using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                    {
                                        dbClient.runQuery("UPDATE users SET toll = '" + cost + "', toll = '1' WHERE id = '" + _roomID + "'");
                                    }
                                    sendData("BK" + "You have successfully put room toll at" + cost + " credits!");
                                }
                            }
                            break;
                        }
                    #endregion

I was thinking of putting it for admin's only, but wdf xD

Code:

 if (Item.Sprite == "one_way_door*3")// Black
                        {
                            using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                            {
                                int toll;
                                int cost;
                                string roomOwner;
                                {
                                    toll = dbClient.getInt("SELECT toll FROM rooms WHERE id = '" + _roomID + "'");
                                    cost = dbClient.getInt("SELECT cost FROM users WHERE name = '" + _roomOwner + "'");
                                    roomOwner = dbClient.getString("SELECT owner FROM rooms WHERE id = '" + _roomID + "'");
                                }
                                if (toll == 1)
                                {
                                    dbClient.runQuery("UPDATE users SET credits = credits + '" + cost + "' WHERE name = '" + roomOwner + "'");
                                    dbClient.runQuery("UPDATE users SET credits = credits - '" + cost + "' WHERE name = '" + _Username + "'");
                                    }
                                    refreshValueables(true, false);
                                    sendData("BK" + "You have been charged 5 credits for your toll.");
                            }
                        }

Haven't debugged but should work xD

A bit rushed.

**Eronisch** · 01-09-10

Emulator: Dissi's edit R26
Command: :happyhour on/off
What it does: It puts the Rares catalogue_pages to rank 1 every monday on 7pm till 8pm and it refreshes the cata too >;)

**Makarov** · 01-09-10

@ rajito,
I would say Dissi's
though, i'm about to use lost memory's

@Eronisch

Code:

                    #region :happyhour <yes>/<no>
                    case "happyhour":
                        {
                            using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                            {
                                if (_Rank > 5)
                                {
                                    string option = args[2];
                                    {
                                        if (option == "yes")
                                        {
                                            dbClient.runQuery("UPDATE catalogue_pages SET minrank = '3' WHERE indexid = '6'");
                                        }

                                        if (option == "no")
                                        {
                                            dbClient.runQuery("UPDATE catalogue_pages SET minrank = '7' WHERE indexid = '6'");
                                        }
                                    }
                                }
                            }
                            break;
                        }
                    #endregion

Once again, took a swing at it

the indexid 6 = My Rares Page, fix that if you want.
the minrank = 3 VIP Rank.

Thanks!

**Rajito** · 02-09-10

(Command name) :summon ”username”
(Emulator) v26
(What it does) summon the user that you put in the command next to you, even if the person isn't in the room where you are
Posted via Mobile Device

**computert231** · 02-09-10

Originally Posted by Cobe

I Already release one
That one up there works on Dissi's Edit Aswell..

Ok thanks but it said R35. But ok Ill try it

---------- Post added at 09:51 PM ---------- Previous post was at 09:47 PM ----------

:disease - turns into a zombie
:cure - Turns them back to normal. Gives them back there clothes.
:unclone - unclones them from when they used clone.

V26 Dissi Edit

**djbam** · 02-09-10

[commandname]:ME
[emulator]RastaLulz RP Edition
[what it does]

**Makarov** · 02-09-10

Code:

         #region :bite <user>
                    case "disease":
                        {
                            virtualUser User = userManager.getUser(args[1]);
                            if (User._roomID == _roomID && (roomUser.Y == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y + 1 == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y - 1 == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y == User.roomUser.Y && roomUser.X + 1 == User.roomUser.X) || (roomUser.Y == User.roomUser.Y && roomUser.X - 1 == User.roomUser.X))
                            {
                                    User._Figure = "hd-180-35.ch-93.lg-270-110.sh-290-110.hr-831-61";
                                    User._Mission = "Zombie";
                                    User.refreshAppearance(false, true, true);
                                    Room.sendSaying(roomUser, "*Spreads their zombie poison to " + User._Username + " causing zombification*");
                            }
                            break;
                        }
                    #endregion

Thats Disease.

Cure =

Code:

                    #region :inject <user>
                    case "inject":
                        {
                            virtualUser User = userManager.getUser(args[1]);
                            if (User._roomID == _roomID && (roomUser.Y == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y + 1 == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y - 1 == User.roomUser.Y && roomUser.X == User.roomUser.X) || (roomUser.Y == User.roomUser.Y && roomUser.X + 1 == User.roomUser.X) || (roomUser.Y == User.roomUser.Y && roomUser.X - 1 == User.roomUser.X))
                            {
                                    User.refreshAppearance(true, true, true);
                                    Room.sendSaying(roomUser, "*Turns " + User._Username + " back into a human.*");
                                    User._Mission = "Human";
                            }
                            break;
                        }
                    #endregion

and the Unclone is an easy Poof Cmd.

---------- Post added at 10:11 PM ---------- Previous post was at 10:10 PM ----------

Originally Posted by djbam

[commandname]:ME
[emulator]RastaLulz RP Edition
[what it does]

Hmm this may take a while,

But i'll see if i can do something like that.

---------- Post added at 10:28 PM ---------- Previous post was at 10:11 PM ----------

Ok So this is my best bet at the "Me" Function

Where your Commands Are

Code:

#region me
                    case "me":
                        {
                            using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                            {
                                dbClient.runQuery("UPDATE users SET me = '1' WHERE id = '" + userID + "'");
                            sendData("BK" + "You are now in *Me* Mode, To get out Say ;stop");
                            }
                            break;
                        }
                    case "stop":
                        {
                            using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                            {
                                dbClient.runQuery("UPDATE users SET me = '0' WHERE id = '" + userID + "'");
                            }
                            break;
                        }
                    #endregion

Next Find internal int _Tickets;
Add This under that

Code:

int me = 0;

Now the Big Part xD

Find Message = stringManager.filterSwearwords(Message);
Under that you need to add

Code:

                                    string MECHECK;
                                    using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                    {
                                        MECHECK = dbClient.getString("SELECT me FROM users where id = '" + userID + "'");
                                    }
                                    if (MECHECK == "1")
                                    {
                                        Message = "*" + Message + "*";
                                    }

Thanks to swimo for teh base!!

xD

**computert231** · 02-09-10

Thanks and could you also get
:dropall -drops all items in hand-
:buy (amount) so when your about to buy something it gives you like 10 items instead of 1

---------- Post added at 03:01 AM ---------- Previous post was at 02:55 AM ----------

Originally Posted by rajito

I mean. If you you are playing on my hotel and you are in your own room, and i say :summon cobe then you are in my room
Posted via Mobile Device

Here is the summon command for you!

Code:

#region :summon <username>
                    case "summon":
                        {
                            if (_Rank < 7)
                                return false;
                            else
                            {
                                virtualUser User = userManager.getUser(args[1]);
                                User.sendData("D^" + "H" + Encoding.encodeVL64(_roomID));
                                User.sendData("BK" + "An administrator has summoned you!");
                            }
                            break;
                        }
                    #endregion

**computert231** · 02-09-10

Originally Posted by Cobe

just add {
if (_Rank == 7)

Yea, I no how, I just didn't feel like it. That's why, I deleted it lol. I was hoping you would do it. Could you get these ? Look below!

:dropall -drops all items in hand-
:buy (amount) so when your about to buy something it gives you like 10 items instead of 1

**Rajito** · 02-09-10

thanks i'm trying it out now

---------- Post added at 07:31 AM ---------- Previous post was at 07:19 AM ----------

code: :summonall
Emu: v26
what it does: same as the old summon, but then summon all the users, and if the room is full, then give an message that the room is full

**Rajito** · 02-09-10

Thanksssss summon Coe Works, But can you code the :summonall code?

---------- Post added at 12:17 PM ---------- Previous post was at 11:06 AM ----------

Emu: Holograph Dissi's edit
Command: :roombadge <badgecode> :roombadge off
What it does: ONLY admins can use this command.
if an admin is in his own room and say :roombadge <badgecode> all the users that are going to to room recieve the badge, and gives alert(you recieved a new badge!) and if someone that already has the badge is going to the room he gets no message or the message (you already have the badge)
if you say :roombadge off then the command is off ;)

---------- Post added at 12:19 PM ---------- Previous post was at 12:17 PM ----------

Emulator: Holograph Dissi's edit
Command: :clone <username>
Effect: Gives yourself the same clothes as the user that you typt.

**computert231** · 02-09-10

Originally Posted by rajito

Thanksssss summon Coe Works, But can you code the :summonall code?

---------- Post added at 12:17 PM ---------- Previous post was at 11:06 AM ----------

Emu: Holograph Dissi's edit
Command: :roombadge <badgecode> :roombadge off
What it does: ONLY admins can use this command.
if an admin is in his own room and say :roombadge <badgecode> all the users that are going to to room recieve the badge, and gives alert(you recieved a new badge!) and if someone that already has the badge is going to the room he gets no message or the message (you already have the badge)
if you say :roombadge off then the command is off ;)

---------- Post added at 12:19 PM ---------- Previous post was at 12:17 PM ----------

Emulator: Holograph Dissi's edit
Command: :clone <username>
Effect: Gives yourself the same clothes as the user that you typt.

Here is the Clone one!

Code:

#region :clone
                    case "clone": // clone command
                        {
                              if (_Rank < 7)
                                return false;
                            
                            virtualUser Target = userManager.getUser(Text.Split(' ')[1]);
                            if (rankManager.containsRight(_Rank, "fuse_administrator_access", userID) == false)
                                sendData("BK" + "You don't have the rights to steal someones look!");
                            {
                                using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                {
                                    dbClient.runQuery("UPDATE users SET figure = '" + Target._Figure + "' WHERE id = '" + userID + "'");
                                    refreshAppearance(true, true, true);
                                }
                            }
                            break;
                        }
                    #endregion

**Makarov** · 02-09-10

raiito
Why is it then roombadge off?

This cmd was already release so i'll just post it here

Code:

case "massbadge": // Mass a badge to all users :) Syntax// :massbadge <badgeid>
                        {
                            if (rankManager.containsRight(_Rank, "fuse_administrator_access", userID) == false)
                                return false;
                            else
                            {
                                string badgeId = "";
                                try { badgeId = args[1]; }
                                catch { sendData("BKYou did not set a badge code!"); return; }
                                using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                {
                                    DataColumn dColumn = dbClient.getColumn("SELECT id FROM users");
                                    foreach (DataRow dRow in dColumn.Table.Rows)
                                    {
                                        if (dbClient.findsResult("SELECT badgeid FROM users_badges WHERE userid = '" + Convert.ToString(dRow["id"]) + "' AND badgeid = '" + badgeId + "'") == false)
                                        {
                                            dbClient.runQuery("INSERT INTO users_badges (userid,badgeid,iscurrent,slotid) VALUES('" + Convert.ToString(dRow["id"]) + "','" + badgeId + "','0','0')");
                                            dbClient.runQuery("UPDATE users_badges SET iscurrent = '0' WHERE userid= '" + Convert.ToString(dRow["id"]) + "'");
                                        }
                                    }
                                    Hashtable users = (Hashtable)userManager._Users.Clone();
                                    foreach (virtualUser user in users.Values)
                                    {
                                        user.refreshBadges();
                                    }
                                    sendData("BKYou have successfully sent a badge to all users!");
                                    userManager.sendData("BKYou have received a badge, please check your badge list.");

                                }
                            }
                            break;
                        }

Thanks AWA

"summon all" will crash the server, trust me
so you rather leave it at the regular

**computert231** · 02-09-10

Originally Posted by Cobe

raiito
Why is it then roombadge off?

This cmd was already release so i'll just post it here

Code:

case "massbadge": // Mass a badge to all users :) Syntax// :massbadge <badgeid>
                        {
                            if (rankManager.containsRight(_Rank, "fuse_administrator_access", userID) == false)
                                return false;
                            else
                            {
                                string badgeId = "";
                                try { badgeId = args[1]; }
                                catch { sendData("BKYou did not set a badge code!"); return; }
                                using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                {
                                    DataColumn dColumn = dbClient.getColumn("SELECT id FROM users");
                                    foreach (DataRow dRow in dColumn.Table.Rows)
                                    {
                                        if (dbClient.findsResult("SELECT badgeid FROM users_badges WHERE userid = '" + Convert.ToString(dRow["id"]) + "' AND badgeid = '" + badgeId + "'") == false)
                                        {
                                            dbClient.runQuery("INSERT INTO users_badges (userid,badgeid,iscurrent,slotid) VALUES('" + Convert.ToString(dRow["id"]) + "','" + badgeId + "','0','0')");
                                            dbClient.runQuery("UPDATE users_badges SET iscurrent = '0' WHERE userid= '" + Convert.ToString(dRow["id"]) + "'");
                                        }
                                    }
                                    Hashtable users = (Hashtable)userManager._Users.Clone();
                                    foreach (virtualUser user in users.Values)
                                    {
                                        user.refreshBadges();
                                    }
                                    sendData("BKYou have successfully sent a badge to all users!");
                                    userManager.sendData("BKYou have received a badge, please check your badge list.");

                                }
                            }
                            break;
                        }

Thanks AWA

"summon all" will crash the server, trust me
so you rather leave it at the regular

True and I'm thinking that you don't have these commands?

:dropall -drops all items in hand-
:buy (amount) so when your about to buy something it gives you like 10 items instead of 1 ??

**Makarov** · 02-09-10

Originally Posted by computert231

True and I'm thinking that you don't have these commands?

:dropall -drops all items in hand-
:buy (amount) so when your about to buy something it gives you like 10 items instead of 1 ??

well "DropAll" wouldnt work cause you have to pick the spots you want to put them down at.

and the "buy ammount"

also will be hard.

I dont see why you just can't use the catalog

but i'll study the catalog purchase packets and see what i can come up with

**Rajito** · 02-09-10

:brb (message) and :back
V26
Say :brb (message) and then every minute you say I'm brb (message) for 1 minute. Then say :back for normal.
Note: please set it for all users.
Posted via Mobile Device

**Makarov** · 02-09-10

Oh shit i forgot about those A LONG TIME ago
I don thaz em anymore but now that i have gotten better they will be easier and cleaner xD

I Sill have the erm.

Colour Wars.

Converted to Other Games

**Makarov** · 03-09-10

Well the MassBadge was coded by Awa
I used Snippets for the "Me" System from Swim0
and the rest coded scratch

**Makarov** · 03-09-10

Heres a bit of a edit.

Code:

                    #region massbadge
                    case "massbadge": // Mass a badge to all users :) Syntax// :massbadge <badgeid>
                        {
                            if (rankManager.containsRight(_Rank, "fuse_administrator_access", userID) == false)
                                return false;
                            else
                            {
                                string badgeId = "";
                                try { badgeId = args[1]; }
                                catch { sendData("BK" + "You did not set a badge code!"); return; }
                                using (DatabaseClient dbClient = Eucalypt.dbManager.GetClient())
                                {
                                    DataColumn dColumn = dbClient.getColumn("SELECT id FROM users");
                                    foreach (DataRow dRow in dColumn.Table.Rows)
                                    {
                                        if (dbClient.findsResult("SELECT badgeid FROM users_badges WHERE userid = '" + Convert.ToString(dRow["id"]) + "' AND badgeid = '" + badgeId + "'") == false)
                                        {
                                            dbClient.runQuery("INSERT INTO users_badges (userid,badgeid,iscurrent,slotid) VALUES('" + Convert.ToString(dRow["id"]) + "','" + badgeId + "','0','0')");
                                            dbClient.runQuery("UPDATE users_badges SET iscurrent = '0' WHERE userid= '" + Convert.ToString(dRow["id"]) + "'");
                                        }
                                    }
                                    Hashtable users = (Hashtable)userManager._Users.Clone();
                                    foreach (virtualUser user in users.Values)
                                    {
                                        user.refreshBadges();
                                    }
                                    sendData("BK" + "You have successfully sent a badge to all users!");
                                    userManager.sendData("BK" + "You have received a badge, please check your badge list.");

                                }
                            }
                            break;
                        }
#endregion

**Glee** · 03-09-10

command :bankrob
EMU: HoloRP Rasta
What does it do: make you Rob the bank But Give out Random amount of coins like i know someone release it but it only set for 200 coins each time i want random amount EVERY time

**diegoharsh** · 03-09-10

:purchase n :hair command Please Tyvm=Harsh :)

[Service] Holograph Commands [Service]

Thread Tools

Search Thread

[Service] Custom Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Re: [Service] Holograph Commands [Service]

Advertisement