AMCD(do_user_actions)
{
    char arg1[256];
    const char * line = one_argument(argument, arg1, sizeof(arg1));

    if (*arg1)
	{
		switch(LOWER(*arg1))
        {
            case 'p': // poly
                {
                    if (!(ch->IsPolymorphed()))
                        return;

                    ch->SetPolymorph(0);
                    ch->RemoveAffect(AFFECT_POLYMORPH);
                }
                break;
            case 'e': // exp
                {

                }
                break;
            case 's': // safebox
                {
                    ch->SetSafeboxOpenPosition();
	                ch->ChatPacket(CHAT_TYPE_COMMAND, "ShowMeSafeboxPassword");
                }
                break;
            case 'b': // buy poly
                {
                    enum {
                        POLYMARBLE_MAX_MONSTER = 7,
                        POLYMARBLE_MAX_COUNT = 100,
                        POLYMARBLE_ITEM_VNUM = 70104,
                        POLYMARBLE_PRICE = 10,
                    };

                    WORD POLYMARBLE_AVAIL_RACE[POLYMARBLE_MAX_MONSTER] = {
                        101, 102, 103, 104, 105, 106, 107,
                    };

                    WORD wIndex, wCount;

                    char arg2[256];
                    char arg3[256];

                    two_arguments(line, arg2, sizeof(arg2), arg3, sizeof(arg3));

                    str_to_number(wIndex, arg2);
                    str_to_number(wCount, arg3);

                    if (wIndex >= POLYMARBLE_MAX_MONSTER || wCount >= POLYMARBLE_MAX_COUNT)
                    {
                        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Invalid arguments"));
                        return;
                    }

                    if (ch->GetGold() < POLYMARBLE_PRICE * wCount)
                    {
                        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Not enough gold"));
                        return;
                    }

                    LPITEM item = NULL;
                    if ((item = ITEM_MANAGER::instance().CreateItem(POLYMARBLE_ITEM_VNUM, wCount)))
                    {
                        item->SetSocket(0, POLYMARBLE_AVAIL_RACE[wIndex]);

                        int iEmptyPos = ch->GetEmptyInventory(item->GetSize());
                        if (iEmptyPos != -1)
                        {
                            item->AddToCharacter(ch, TItemPos(INVENTORY, iEmptyPos));

                            ch->PointChange(POINT_GOLD, -(POLYMARBLE_PRICE * wCount), true);
                            ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Success"));
                        }
                        else
                        {
                            ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("ĽŇÁöÇ°żˇ şó °ř°ŁŔĚ ľř˝Ŕ´Ď´Ů."));
                            M2_DESTROY_ITEM(item);
                        }
                    }
                }
                break;
            default;
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("±×·± ¸í·Éľî´Â ľř˝Ŕ´Ď´Ů"));
                break;
        }
    }
    else
        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("±×·± ¸í·Éľî´Â ľř˝Ŕ´Ď´Ů"));
}