summaryrefslogtreecommitdiff
path: root/src/map/charcommand.c
diff options
context:
space:
mode:
authorultramage <ultramage@54d463be-8e91-2dee-dedb-b68131a5f0ec>2008-11-02 22:27:34 +0000
committerultramage <ultramage@54d463be-8e91-2dee-dedb-b68131a5f0ec>2008-11-02 22:27:34 +0000
commit577030c8bb2b2952cd97869f1c47a0fb1276933f (patch)
treea7f6fdc1887d3f89f351720684feb04bfd8a5387 /src/map/charcommand.c
parent5d034433e7f906e2a2c95bfe3bc9b8e5661a7ca2 (diff)
downloadhercules-577030c8bb2b2952cd97869f1c47a0fb1276933f.tar.gz
hercules-577030c8bb2b2952cd97869f1c47a0fb1276933f.tar.bz2
hercules-577030c8bb2b2952cd97869f1c47a0fb1276933f.tar.xz
hercules-577030c8bb2b2952cd97869f1c47a0fb1276933f.zip
stop erasing revision history, damnit...
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@13345 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'src/map/charcommand.c')
-rw-r--r--src/map/charcommand.c7872
1 files changed, 3936 insertions, 3936 deletions
diff --git a/src/map/charcommand.c b/src/map/charcommand.c
index 8ddc22d7d..cc25a6d28 100644
--- a/src/map/charcommand.c
+++ b/src/map/charcommand.c
@@ -1,3936 +1,3936 @@
-// Copyright (c) Athena Dev Teams - Licensed under GNU GPL
-// For more information, see LICENCE in the main folder
-
-#include "../common/cbasetypes.h"
-#include "../common/mmo.h"
-#include "../common/timer.h"
-#include "../common/nullpo.h"
-#include "../common/showmsg.h"
-#include "../common/strlib.h"
-#include "../common/utils.h"
-
-#include "atcommand.h" // msg_txt()
-#include "charcommand.h"
-#include "battle.h"
-#include "clif.h"
-#include "chrif.h"
-#include "intif.h"
-#include "itemdb.h"
-#include "log.h"
-#include "map.h"
-#include "pc.h"
-#include "status.h"
-#include "skill.h"
-#include "mob.h"
-#include "npc.h"
-#include "pet.h"
-#include "homunculus.h"
-#include "party.h"
-#include "guild.h"
-#include "script.h"
-#include "trade.h"
-#include "unit.h"
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <math.h>
-
-char charcommand_symbol = '#';
-
-extern char *msg_table[1000]; // Server messages (0-499 reserved for GM commands, 500-999 reserved for others)
-
-#define CCMD_FUNC(x) int charcommand_ ## x (const int fd, struct map_session_data* sd, const char* command, const char* message)
-
-typedef struct CharCommandInfo {
- const char* command;
- int level;
- CharCommandFunc func;
-} CharCommandInfo;
-
-static CharCommandInfo* get_charcommandinfo_byname(const char* name);
-static CharCommandInfo* get_charcommandinfo_byfunc(const CharCommandFunc func);
-
-
-/*==========================================
- * 対象キャラクターを転職させる upper指定で転生や養子も可能
- *------------------------------------------*/
-int charcommand_jobchange(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[100];
- struct map_session_data* pl_sd;
- int job = 0, upper = -1;
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &job, character) < 2) {
- clif_displaymessage(fd, "Please, enter a job and a player name (usage: #job/#jobchange <job ID> <player>).");
- clif_displaymessage(fd, " 0 Novice 7 Knight 14 Crusader 21 Peco Crusader");
- clif_displaymessage(fd, " 1 Swordman 8 Priest 15 Monk 22 N/A");
- clif_displaymessage(fd, " 2 Mage 9 Wizard 16 Sage 23 Super Novice");
- clif_displaymessage(fd, " 3 Archer 10 Blacksmith 17 Rogue 24 Gunslinger");
- clif_displaymessage(fd, " 4 Acolyte 11 Hunter 18 Alchemist 25 Ninja");
- clif_displaymessage(fd, " 5 Merchant 12 Assassin 19 Bard 26 N/A");
- clif_displaymessage(fd, " 6 Thief 13 Peco Knight 20 Dancer");
- clif_displaymessage(fd, "4001 Novice High 4008 Lord Knight 4015 Paladin 4022 Peco Paladin");
- clif_displaymessage(fd, "4002 Swordman High 4009 High Priest 4016 Champion");
- clif_displaymessage(fd, "4003 Mage High 4010 High Wizard 4017 Professor");
- clif_displaymessage(fd, "4004 Archer High 4011 Whitesmith 4018 Stalker");
- clif_displaymessage(fd, "4005 Acolyte High 4012 Sniper 4019 Creator");
- clif_displaymessage(fd, "4006 Merchant High 4013 Assassin Cross 4020 Clown");
- clif_displaymessage(fd, "4007 Thief High 4014 Peco Lord Knight 4021 Gypsy");
- clif_displaymessage(fd, "4023 Baby Novice 4030 Baby Knight 4037 Baby Crusader 4044 Baby Peco Crusader");
- clif_displaymessage(fd, "4024 Baby Swordsman 4031 Baby Priest 4038 Baby Monk 4045 Super Baby");
- clif_displaymessage(fd, "4025 Baby Mage 4032 Baby Wizard 4039 Baby Sage 4046 Taekwon Kid");
- clif_displaymessage(fd, "4026 Baby Archer 4033 Baby Blacksmith 4040 Baby Rogue 4047 Taekwon Master");
- clif_displaymessage(fd, "4027 Baby Acolyte 4034 Baby Hunter 4041 Baby Alchemist 4048 N/A");
- clif_displaymessage(fd, "4028 Baby Merchant 4035 Baby Assassin 4042 Baby Bard 4049 Soul Linker");
- clif_displaymessage(fd, "4029 Baby Thief 4036 Baby Peco-Knight 4043 Baby Dancer");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) == NULL) {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!pcdb_checkid(job)) {
- clif_displaymessage(fd, msg_txt(49)); // Invalid job ID.
- return -1;
- }
-
- if (pc_jobchange(pl_sd, job, upper) != 0) {
- clif_displaymessage(fd, msg_txt(192)); // Unable to change the specified character's job.
- return -1;
- }
-
- clif_displaymessage(fd, msg_txt(48)); // Character's job changed.
- return 0;
-}
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_petrename(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- struct pet_data *pd;
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #petrename <player>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) == NULL) {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if (!pl_sd->status.pet_id || !pl_sd->pd) {
- clif_displaymessage(fd, msg_txt(191)); // Sorry, but this player has no pet.
- return -1;
- }
-
- pd = pl_sd->pd;
-
- if (pd->pet.rename_flag) {
- clif_displaymessage(fd, msg_txt(190)); // This player can already rename his/her pet.
- return -1;
- }
- pd->pet.rename_flag = 0;
- intif_save_petdata(pl_sd->status.account_id, &pd->pet);
- clif_send_petstatus(pl_sd);
- clif_displaymessage(fd, msg_txt(189)); // This player can now rename his/her pet.
- return 0;
-}
-
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_petfriendly(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int friendly = 0;
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- struct pet_data *pd;
-
- memset(character, '\0', sizeof(character));
- if (!message || !*message || sscanf(message,"%d %23s",&friendly,character) < 2) {
- clif_displaymessage(fd, "Please, enter a valid value (usage: #petfriendly <0-1000> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!pl_sd->status.pet_id || !pl_sd->pd) {
- clif_displaymessage(fd, msg_txt(191)); // Sorry, but this player has no pet.
- return -1;
- }
-
- friendly = cap_value(friendly, 0, 1000);
-
- pd = pl_sd->pd;
- if (friendly == pd->pet.intimate) {
- clif_displaymessage(fd, msg_txt(183)); // Pet friendly is already the good value.
- return -1;
- }
-
- pd->pet.intimate = friendly;
- clif_send_petstatus(pl_sd);
- clif_pet_emotion(pd,0);
- clif_displaymessage(pl_sd->fd, msg_txt(182)); // Pet friendly value changed!
- clif_displaymessage(sd->fd, msg_txt(182)); // Pet friendly value changed!
- return 0;
-}
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_stats(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- char job_jobname[100];
- char output[200];
- struct map_session_data *pl_sd;
- int i;
- struct {
- const char* format;
- int value;
- } output_table[] = {
- { "Base Level - %d", 0 },
- { NULL, 0 },
- { "Hp - %d", 0 },
- { "MaxHp - %d", 0 },
- { "Sp - %d", 0 },
- { "MaxSp - %d", 0 },
- { "Str - %3d", 0 },
- { "Agi - %3d", 0 },
- { "Vit - %3d", 0 },
- { "Int - %3d", 0 },
- { "Dex - %3d", 0 },
- { "Luk - %3d", 0 },
- { "Zeny - %d", 0 },
- { "Free SK Points - %d", 0 },
- { "JobChangeLvl - %d", 0 },
- { NULL, 0 }
- };
-
- memset(character, '\0', sizeof(character));
- memset(job_jobname, '\0', sizeof(job_jobname));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #stats <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- //direct array initialization with variables is not standard C compliant.
- output_table[0].value = pl_sd->status.base_level;
- output_table[1].format = job_jobname;
- output_table[1].value = pl_sd->status.job_level;
- output_table[2].value = pl_sd->status.hp;
- output_table[3].value = pl_sd->status.max_hp;
- output_table[4].value = pl_sd->status.sp;
- output_table[5].value = pl_sd->status.max_sp;
- output_table[6].value = pl_sd->status.str;
- output_table[7].value = pl_sd->status.agi;
- output_table[8].value = pl_sd->status.vit;
- output_table[9].value = pl_sd->status.int_;
- output_table[10].value = pl_sd->status.dex;
- output_table[11].value = pl_sd->status.luk;
- output_table[12].value = pl_sd->status.zeny;
- output_table[13].value = pl_sd->status.skill_point;
- output_table[14].value = pl_sd->change_level;
-
- sprintf(job_jobname, "Job - %s %s", job_name(pl_sd->status.class_), "(level %d)");
- sprintf(output, msg_txt(53), pl_sd->status.name); // '%s' stats:
-
- clif_displaymessage(fd, output);
-
- for (i = 0; output_table[i].format != NULL; i++) {
- sprintf(output, output_table[i].format, output_table[i].value);
- clif_displaymessage(fd, output);
- }
-
- return 0;
-}
-
-/*==========================================
- * Character Reset
- *------------------------------------------*/
-int charcommand_reset(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #reset <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pc_resetstate(pl_sd);
- pc_resetskill(pl_sd,1);
- sprintf(output, msg_txt(208), character); // '%s' skill and stat points have been reset.
- clif_displaymessage(fd, output);
-
- return 0;
-}
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_option(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- int opt1 = 0, opt2 = 0, opt3 = 0;
- struct map_session_data* pl_sd;
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message ||
- sscanf(message, "%d %d %d %23[^\n]", &opt1, &opt2, &opt3, character) < 4 ||
- opt1 < 0 || opt2 < 0 || opt3 < 0) {
- clif_displaymessage(fd, "Please, enter valid options and a player name (usage: #option <param1> <param2> <param3> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pl_sd->sc.opt1 = opt1;
- pl_sd->sc.opt2 = opt2;
- pc_setoption(pl_sd, opt3);
- clif_displaymessage(fd, msg_txt(58)); // Character's options changed.
-
- return 0;
-}
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_save(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char map_name[MAP_NAME_LENGTH_EXT];
- char character[NAME_LENGTH];
- struct map_session_data* pl_sd;
- int x = 0, y = 0;
- int m;
-
- memset(map_name, '\0', sizeof(map_name));
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%15s %d %d %23[^\n]", map_name, &x, &y, character) < 4 || x < 0 || y < 0) {
- clif_displaymessage(fd, "Please, enter a valid save point and a player name (usage: #save <map> <x> <y> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- m = map_mapname2mapid(map_name);
- if (m < 0 && !mapindex_name2id(map_name)) {
- clif_displaymessage(fd, msg_txt(1)); // Map not found.
- return -1;
- }
-
- //FIXME: What do you do if the map is in another map server with the nowarpto flag?
- if (m>=0 && map[m].flag.nosave && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
- clif_displaymessage(fd, "You are not authorised to set this map as a save map.");
- return -1;
- }
-
- if (m>=0)
- pc_setsavepoint(pl_sd, map[m].index, x, y);
- else
- pc_setsavepoint(pl_sd, mapindex_name2id(map_name), x, y);
- clif_displaymessage(fd, msg_txt(57)); // Character's save point changed.
-
- return 0;
-}
-
-/*==========================================
- * CharSpiritBall Function by PalasX
- *------------------------------------------*/
-int charcommand_spiritball(const int fd, struct map_session_data* sd,const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char character[NAME_LENGTH];
- int spirit = 0;
-
- memset(character, '\0', sizeof(character));
-
- if(!message || !*message || sscanf(message, "%d %23[^\n]", &spirit, character) < 2 || spirit < 0 || spirit > 1000) {
- clif_displaymessage(fd, "Usage: @spiritball <number: 0-1000> <player>.");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if (spirit >= 0 && spirit <= 0x7FFF) {
- if (pl_sd->spiritball != spirit || spirit > 999) {
- if (pl_sd->spiritball > 0)
- pc_delspiritball(pl_sd, pl_sd->spiritball, 1);
- }
- pl_sd->spiritball = spirit;
- clif_spiritball(pl_sd);
- // no message, player can look the difference
- if (spirit > 1000)
- clif_displaymessage(fd, msg_txt(204)); // WARNING: more than 1000 spiritballs can CRASH your server and/or client!
- } else {
- clif_displaymessage(fd, msg_txt(205)); // You already have that number of spiritballs.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * #itemlist <character>: Displays the list of a player's items.
- *------------------------------------------*/
-int charcommand_itemlist(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- struct item_data *item_data, *item_temp;
- int i, j, equip, count, counter, counter2;
- char character[NAME_LENGTH], output[200], equipstr[100], outputtmp[200];
- struct item *i_item; //Current inventory item.
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
- memset(equipstr, '\0', sizeof(equipstr));
- memset(outputtmp, '\0', sizeof(outputtmp));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #itemlist <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- counter = 0;
- count = 0;
- for (i = 0; i < MAX_INVENTORY; i++) {
- i_item = &pl_sd->status.inventory[i];
- if (pl_sd->status.inventory[i].nameid > 0 && (item_data = itemdb_exists(i_item->nameid)) != NULL) {
- counter = counter + i_item->amount;
- count++;
- if (count == 1) {
- sprintf(output, "------ Items list of '%s' ------", pl_sd->status.name);
- clif_displaymessage(fd, output);
- }
- if ((equip = i_item->equip)) {
- strcpy(equipstr, "| equiped: ");
- if (equip & EQP_GARMENT)
- strcat(equipstr, "robe/gargment, ");
- if (equip & EQP_ACC_L)
- strcat(equipstr, "left accessory, ");
- if (equip & EQP_ARMOR)
- strcat(equipstr, "body/armor, ");
- if ((equip & EQP_ARMS) == EQP_HAND_R)
- strcat(equipstr, "right hand, ");
- if ((equip & EQP_ARMS) == EQP_HAND_L)
- strcat(equipstr, "left hand, ");
- if ((equip & EQP_ARMS) == EQP_ARMS)
- strcat(equipstr, "both hands, ");
- if (equip & EQP_SHOES)
- strcat(equipstr, "feet, ");
- if (equip & EQP_ACC_R)
- strcat(equipstr, "right accessory, ");
- if ((equip & EQP_HELM) == EQP_HEAD_LOW)
- strcat(equipstr, "lower head, ");
- if ((equip & EQP_HELM) == EQP_HEAD_TOP)
- strcat(equipstr, "top head, ");
- if ((equip & EQP_HELM) == (EQP_HEAD_LOW|EQP_HEAD_TOP))
- strcat(equipstr, "lower/top head, ");
- if ((equip & EQP_HELM) == EQP_HEAD_MID)
- strcat(equipstr, "mid head, ");
- if ((equip & EQP_HELM) == (EQP_HEAD_LOW|EQP_HEAD_MID))
- strcat(equipstr, "lower/mid head, ");
- if ((equip & EQP_HELM) == EQP_HELM)
- strcat(equipstr, "lower/mid/top head, ");
- // remove final ', '
- equipstr[strlen(equipstr) - 2] = '\0';
- } else
- memset(equipstr, '\0', sizeof(equipstr));
- if (i_item->refine)
- sprintf(output, "%d %s %+d (%s %+d, id: %d) %s", i_item->amount, item_data->name, i_item->refine, item_data->jname, i_item->refine, i_item->nameid, equipstr);
- else
- sprintf(output, "%d %s (%s, id: %d) %s", i_item->amount, item_data->name, item_data->jname, i_item->nameid, equipstr);
- clif_displaymessage(fd, output);
- memset(output, '\0', sizeof(output));
- counter2 = 0;
-
- if(i_item->card[0]==CARD0_PET) { //pet eggs
- if (i_item->card[3])
- sprintf(outputtmp, " -> (pet egg, pet id: %u, named)", (unsigned int)MakeDWord(i_item->card[1], i_item->card[2]));
- else
- sprintf(outputtmp, " -> (pet egg, pet id: %u, unnamed)", (unsigned int)MakeDWord(i_item->card[1], i_item->card[2]));
- strcat(output, outputtmp);
- } else
- if(i_item->card[0]==CARD0_FORGE) { //forged items.
- sprintf(outputtmp, " -> (crafted item, creator id: %u, star crumbs %d, element %d)", (unsigned int)MakeDWord(i_item->card[2], i_item->card[3]), i_item->card[1]>>8, i_item->card[1]&0x0f);
- } else
- if(i_item->card[0]==CARD0_CREATE) { //created items.
- sprintf(outputtmp, " -> (produced item, creator id: %u)", (unsigned int)MakeDWord(i_item->card[2], i_item->card[3]));
- strcat(output, outputtmp);
- } else //Normal slots
- for (j = 0; j < item_data->slot; j++) {
- if (pl_sd->status.inventory[i].card[j]) {
- if ((item_temp = itemdb_exists(i_item->card[j])) != NULL) {
- if (output[0] == '\0')
- sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- else
- sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- strcat(output, outputtmp);
- }
- }
- }
- if (output[0] != '\0') {
- output[strlen(output) - 2] = ')';
- output[strlen(output) - 1] = '\0';
- clif_displaymessage(fd, output);
- }
- }
- }
- if (count == 0)
- {
- clif_displaymessage(fd, "No item found on this player.");
- return -1;
- }
-
- sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
- clif_displaymessage(fd, output);
- return 0;
-}
-
-/*==========================================
- * #effect by [MouseJstr]
- *
- * Create a effect localized on another character
- *------------------------------------------*/
-int charcommand_effect(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd = NULL;
- char character[NAME_LENGTH];
- int type = 0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &type, character) != 2) {
- clif_displaymessage(fd, "usage: #effect <type+> <target>.");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- clif_specialeffect(&pl_sd->bl, type, AREA);
- clif_displaymessage(fd, msg_txt(229)); // Your effect has changed.
-
- return 0;
-}
-
-/*==========================================
- * #storagelist <character>: Displays the items list of a player's storage.
- *------------------------------------------*/
-int charcommand_storagelist(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- struct item_data *item_data, *item_temp;
- int i, j, count = 0, counter = 0, counter2 = 0;
- char character[NAME_LENGTH], output[200], outputtmp[200];
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
- memset(outputtmp, '\0', sizeof(outputtmp));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #itemlist <char name>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- for (i = 0; i < MAX_STORAGE; i++)
- {
- struct item* it = &pl_sd->status.storage.items[i];
- if( it->nameid > 0 && (item_data = itemdb_search(it->nameid)) != NULL )
- {
- counter = counter + it->amount;
- count++;
- if (count == 1) {
- sprintf(output, "------ Storage items list of '%s' ------", pl_sd->status.name);
- clif_displaymessage(fd, output);
- }
- if (it->refine)
- sprintf(output, "%d %s %+d (%s %+d, id: %d)", it->amount, item_data->name, it->refine, item_data->jname, it->refine, it->nameid);
- else
- sprintf(output, "%d %s (%s, id: %d)", it->amount, item_data->name, item_data->jname, it->nameid);
- clif_displaymessage(fd, output);
-
- memset(output, '\0', sizeof(output));
- counter2 = 0;
- for (j = 0; j < item_data->slot; j++) {
- if (it->card[j]) {
- if ((item_temp = itemdb_search(it->card[j])) != NULL) {
- if (output[0] == '\0')
- sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- else
- sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- strcat(output, outputtmp);
- }
- }
- }
- if (output[0] != '\0') {
- output[strlen(output) - 2] = ')';
- output[strlen(output) - 1] = '\0';
- clif_displaymessage(fd, output);
- }
- }
- }
-
- if (count == 0)
- clif_displaymessage(fd, "No item found in the storage of this player.");
- else {
- sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
- clif_displaymessage(fd, output);
- }
-
- return 0;
-}
-
-static void charcommand_item_sub(struct map_session_data *sd,struct item_data *item_data,int number)
-{
- int loop, get_count, pet_id, i;
-
- if( sd == NULL || item_data == NULL )
- return;
-
- if( !itemdb_isstackable2(item_data) ) {
- loop = number; get_count = 1;
- } else {
- loop = 1; get_count = number;
- }
-
- for (i = 0; i < loop; i++)
- {
- if( (pet_id = search_petDB_index(item_data->nameid, PET_EGG)) >= 0 )
- {// if pet egg
- sd->catch_target_class = pet_db[pet_id].class_;
- intif_create_pet(sd->status.account_id, sd->status.char_id,
- (short)pet_db[pet_id].class_, (short)mob_db(pet_db[pet_id].class_)->lv,
- (short)pet_db[pet_id].EggID, 0, (short)pet_db[pet_id].intimate,
- 100, 0, 1, pet_db[pet_id].jname);
- }
- else
- {// if not pet egg
- int flag = 0;
- struct item item_tmp;
- memset(&item_tmp, 0, sizeof(item_tmp));
- item_tmp.nameid = item_data->nameid;
- item_tmp.identify = 1;
-
- if ((flag = pc_additem(sd, &item_tmp, get_count)))
- clif_additem(sd, 0, 0, flag);
-
- //Logs (A)dmins items [Lupus]
- if(log_config.enable_logs&0x400)
- log_pick_pc(sd, "A", item_tmp.nameid, number, &item_tmp);
- }
- }
-}
-
-/*==========================================
- * #item command (usage: #item <name/id_of_item> <quantity> <player>)
- * by MC Cameri
- *------------------------------------------*/
-int charcommand_item(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char item_name[100];
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- int number = 0, item_id;
- struct item_data *item_data;
- int gmlvl;
- char tmp_cmdoutput[1024];
- nullpo_retr(-1, sd);
-
- memset(item_name, '\0', sizeof(item_name));
-
- if (!message || !*message || (
- sscanf(message, "\"%99[^\"]\" %d %23[^\n]", item_name, &number, character) < 3 &&
- sscanf(message, "%99s %d %23[^\n]", item_name, &number, character) < 3
- )) {
- clif_displaymessage(fd, "Please, enter an item name/id (usage: #item <item name or ID> <quantity> <char name>).");
- return -1;
- }
-
- if (number <= 0)
- number = 1;
-
- item_id = 0;
- if ((item_data = itemdb_searchname(item_name)) != NULL ||
- (item_data = itemdb_exists(atoi(item_name))) != NULL)
- item_id = item_data->nameid;
-
- if (item_id < 500) {
- clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
- return -1;
- }
-
- gmlvl = pc_isGM(sd);
- if( !pc_can_give_items(gmlvl) )
- {
- clif_displaymessage(fd, msg_txt(246)); // GM is not allowed to trade
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) != NULL)
- {
- int pl_gmlvl = pc_isGM(pl_sd);
- if( gmlvl < pl_gmlvl || !itemdb_cantrade_sub(item_data, gmlvl, pl_gmlvl) )
- {// you can give items only to lower or same level
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- charcommand_item_sub(pl_sd,item_data,number);
- clif_displaymessage(fd, msg_txt(18)); // Item created.
- }
- else if (strcmpi(character,"all")==0 || strcmpi(character,"everyone")==0)
- {
- struct s_mapiterator* iter = mapit_getallusers();
- for( pl_sd = (TBL_PC*)mapit_first(iter); mapit_exists(iter); pl_sd = (TBL_PC*)mapit_next(iter) )
- {
- int pl_gmlvl = pc_isGM(pl_sd);
- if( gmlvl < pl_gmlvl || !itemdb_cantrade_sub(item_data, gmlvl, pl_gmlvl) )
- continue;
-
- charcommand_item_sub(pl_sd,item_data,number);
- clif_displaymessage(pl_sd->fd, msg_txt(18)); // Item created.
- }
- mapit_free(iter);
-
- snprintf(tmp_cmdoutput, sizeof(tmp_cmdoutput), "Everyone received %s %d.",item_name,number);
- clif_displaymessage(fd, tmp_cmdoutput);
- }
- else
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * #warp/#rura/#rura+ <mapname> <x> <y> <char name>
- *------------------------------------------*/
-int charcommand_warp(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char map_name[MAP_NAME_LENGTH_EXT];
- char character[NAME_LENGTH];
- int x = 0, y = 0;
- struct map_session_data *pl_sd;
- int m;
-
- nullpo_retr(-1, sd);
-
- memset(map_name, '\0', sizeof(map_name));
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%15s %d %d %23[^\n]", map_name, &x, &y, character) < 4) {
- clif_displaymessage(fd, "Usage: #warp/#rura/#rura+ <mapname> <x> <y> <char name>");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) == NULL) {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
- if (pc_isGM(sd) < pc_isGM(pl_sd)) { // you can rura+ only lower or same GM level
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- m = map_mapname2mapid(map_name);
- if (m < 0) {
- clif_displaymessage(fd, msg_txt(1)); // Map not found.
- return -1;
- }
- if ((x || y) && map_getcell(m, x, y, CELL_CHKNOREACH)) {
- clif_displaymessage(fd, msg_txt(2)); // Coordinates out of range.
- x = y = 0;
- }
- if (map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
- clif_displaymessage(fd, "You are not authorised to warp someone to this map.");
- return -1;
- }
- if (pl_sd->bl.m >= 0 && map[pl_sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
- clif_displaymessage(fd, "You are not authorised to warp this player from its actual map.");
- return -1;
- }
- if (pc_setpos(pl_sd, map[m].index, x, y, 3) == 0) {
- clif_displaymessage(pl_sd->fd, msg_txt(0)); // Warped.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(15)); // Player warped (message sends to player too).
- return 0;
- }
- //No error message specified...?
- return -1;
-}
-
-/*==========================================
- * #zeny <charname>
- *------------------------------------------*/
-int charcommand_zeny(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char character[NAME_LENGTH];
- int zeny = 0, new_zeny;
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &zeny, character) < 2 || zeny == 0) {
- clif_displaymessage(fd, "Please, enter a number and a player name (usage: #zeny <zeny> <name>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) != NULL) {
- new_zeny = pl_sd->status.zeny + zeny;
- if (zeny > 0 && (zeny > MAX_ZENY || new_zeny > MAX_ZENY)) // fix positiv overflow
- new_zeny = MAX_ZENY;
- else if (zeny < 0 && (zeny < -MAX_ZENY || new_zeny < 0)) // fix negativ overflow
- new_zeny = 0;
- if (new_zeny != pl_sd->status.zeny) {
- pl_sd->status.zeny = new_zeny;
- clif_updatestatus(pl_sd, SP_ZENY);
- clif_displaymessage(fd, msg_txt(211)); // Character's current zeny changed.
- } else {
- if (zeny < 0)
- clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
- else
- clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * #cash or #points <amount> <charname>
- *------------------------------------------*/
-int charcommand_cash(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char character[NAME_LENGTH];
- int value = 0;
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
-
- if( !message || !*message || sscanf(message, "%d %23[^\n]", &value, character) < 2 || value == 0 )
- {
- clif_displaymessage(fd, "Please, enter a number and a player name (usage: #cash|#points <points> <name>).");
- return -1;
- }
-
- if( (pl_sd = map_nick2sd(character)) != NULL )
- {
- if( !strcmpi(command+1,"cash") )
- {
- if( value > 0 )
- pc_getcash(pl_sd, value, 0);
- else
- pc_paycash(pl_sd, -value, 0);
-
- clif_displaymessage(fd, "Character's Cash Points changed!.");
- }
- else
- { // @points
- if( value > 0 )
- pc_getcash(pl_sd, 0, value);
- else
- pc_paycash(pl_sd, -value, -value);
-
- clif_displaymessage(fd, "Character's Kafra Points changed!.");
- }
- }
- else
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * #fakename <char name> <fake name>
- *------------------------------------------*/
-int charcommand_fakename(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char name[NAME_LENGTH];
- char char_name[NAME_LENGTH];
-
- nullpo_retr(-1, sd);
-
- name[0] = '\0'; //If you don't pass a second word, name is left as garbage, most definitely not a blank name! [Skotlex]
- if (!message || !*message || sscanf(message, "%23s %23[^\n]", char_name, name) < 1) {
- clif_displaymessage(sd->fd,"Usage: #fakename <char name> <fake name>.");
- clif_displaymessage(sd->fd,"Or: #fakename <char name> to disable.");
- return 0;
- }
-
- if(!(pl_sd = map_nick2sd(char_name))) {
- clif_displaymessage(sd->fd,"Character not found.");
- return -1;
- }
-
- if(!name[0]) {
- if(strlen(pl_sd->fakename) > 1) {
- pl_sd->fakename[0]='\0';
- clif_charnameack(0, &pl_sd->bl);
- clif_displaymessage(sd->fd,"Returned to real name.");
- } else {
- clif_displaymessage(sd->fd,"Character does not has a fake name.");
- }
- return 0;
- }
-
- if(strlen(name) < 2) {
- clif_displaymessage(sd->fd,"Fake name must be at least two characters.");
- return 0;
- }
-
- memcpy(pl_sd->fakename, name, NAME_LENGTH);
- clif_charnameack(0, &pl_sd->bl);
- clif_displaymessage(sd->fd,"Fake name enabled.");
-
- return 0;
-}
-
-
-/*==========================================
- * #baselvl <#> <nickname>
- * Transferred by: Kevin
- *------------------------------------------*/
-int charcommand_baselevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int level = 0, i, status_point=0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, player) < 2 || level == 0) {
- clif_displaymessage(fd, "Please, enter a level adjustment and a player name (usage: #baselvl <#> <nickname>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) == NULL) {
- clif_displaymessage(fd, msg_table[3]); // Character not found.
- return -1;
- }
- if (pc_isGM(sd) < pc_isGM(pl_sd)) { // you can change base level only lower or same gm level
- clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (level > 0) {
- if (pl_sd->status.base_level == pc_maxbaselv(pl_sd)) { // check for max level by Valaris
- clif_displaymessage(fd, msg_table[91]); // Character's base level can't go any higher.
- return 0;
- } // End Addition
- if ((unsigned int)level > pc_maxbaselv(pl_sd) ||
- pl_sd->status.base_level > pc_maxbaselv(pl_sd) -level)
- level = pc_maxbaselv(pl_sd) - pl_sd->status.base_level;
- for (i = 1; i <= level; i++)
- status_point += (pl_sd->status.base_level + i + 14) / 5;
-
- if (pl_sd->status.status_point > USHRT_MAX - status_point)
- pl_sd->status.status_point = USHRT_MAX;
- else
- pl_sd->status.status_point += status_point;
- pl_sd->status.base_level += (unsigned int)level;
- status_percent_heal(&pl_sd->bl, 100, 100);
- clif_misceffect(&pl_sd->bl, 0);
- clif_displaymessage(fd, msg_table[65]); // Character's base level raised.
- } else {
- if (pl_sd->status.base_level == 1) {
- clif_displaymessage(fd, msg_table[193]); // Character's base level can't go any lower.
- return -1;
- }
- level *= -1;
- if ((unsigned int)level >= pl_sd->status.base_level)
- level = pl_sd->status.base_level -1;
- for (i = 0; i > -level; i--)
- status_point += (pl_sd->status.base_level +i + 14) / 5;
- if (pl_sd->status.status_point < status_point)
- pc_resetstate(pl_sd);
- if (pl_sd->status.status_point < status_point)
- pl_sd->status.status_point = 0;
- else
- pl_sd->status.status_point -= status_point;
- pl_sd->status.base_level -= (unsigned int)level;
- clif_displaymessage(fd, msg_table[66]); // Character's base level lowered.
- }
- clif_updatestatus(pl_sd, SP_BASELEVEL);
- clif_updatestatus(pl_sd, SP_NEXTBASEEXP);
- clif_updatestatus(pl_sd, SP_STATUSPOINT);
- status_calc_pc(pl_sd, 0);
- if(pl_sd->status.party_id)
- party_send_levelup(pl_sd);
- return 0; //正常終了
-}
-
-/*==========================================
- * #jlvl <#> <nickname>
- * Transferred by: Kevin
- *------------------------------------------*/
-int charcommand_joblevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int level = 0;
- //転生や養子の場合の元の職業を算出する
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, player) < 2 || level == 0) {
- clif_displaymessage(fd, "Please, enter a level adjustment and a player name (usage: #joblvl <#> <nickname>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can change job level only lower or same gm level
- if (level > 0) {
- if (pl_sd->status.job_level == pc_maxjoblv(pl_sd)) {
- clif_displaymessage(fd, msg_txt(67)); // Character's job level can't go any higher.
- return -1;
- }
- if ((unsigned int)level > pc_maxjoblv(pl_sd) ||
- pl_sd->status.job_level > pc_maxjoblv(pl_sd) -level)
- level = pc_maxjoblv(pl_sd) - pl_sd->status.job_level;
- pl_sd->status.job_level += (unsigned int)level;
- clif_updatestatus(pl_sd, SP_JOBLEVEL);
- clif_updatestatus(pl_sd, SP_NEXTJOBEXP);
-
- if (pl_sd->status.skill_point > USHRT_MAX - level)
- pl_sd->status.skill_point = USHRT_MAX;
- else
- pl_sd->status.skill_point += level;
- clif_updatestatus(pl_sd, SP_SKILLPOINT);
- status_calc_pc(pl_sd, 0);
- clif_misceffect(&pl_sd->bl, 1);
- clif_displaymessage(fd, msg_txt(68)); // character's job level raised.
- } else {
- if (pl_sd->status.job_level == 1) {
- clif_displaymessage(fd, msg_txt(194)); // Character's job level can't go any lower.
- return -1;
- }
- level*=-1;
- if ((unsigned int)level >= pl_sd->status.job_level)
- level = pl_sd->status.job_level-1;
- pl_sd->status.job_level -= (unsigned int)level;
- clif_updatestatus(pl_sd, SP_JOBLEVEL);
- clif_updatestatus(pl_sd, SP_NEXTJOBEXP);
- if (pl_sd->status.skill_point < level)
- pc_resetskill(pl_sd, 0); //Need more skill points to substract
- if (pl_sd->status.skill_point < level)
- pl_sd->status.skill_point = 0;
- else
- pl_sd->status.skill_point -= level;
- clif_updatestatus(pl_sd, SP_SKILLPOINT);
- status_calc_pc(pl_sd, 0);
- clif_displaymessage(fd, msg_txt(69)); // Character's job level lowered.
- }
- } else {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-
-/*==========================================
- * #questskill <skill_#> <nickname>
- * Transferred by: Kevin
- *------------------------------------------*/
-int charcommand_questskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int skill_id = 0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &skill_id, player) < 2 || skill_id < 0) {
- clif_displaymessage(fd, "Please, enter a quest skill number and a player name (usage: #questskill <#:0+> <nickname>).");
- return -1;
- }
-
- if (skill_id < 0 && skill_id >= MAX_SKILL_DB) {
- clif_displaymessage(fd, msg_txt(198)); // This skill number doesn't exist.
- return -1;
- }
- if (!(skill_get_inf2(skill_id) & INF2_QUEST_SKILL)) {
- clif_displaymessage(fd, msg_txt(197)); // This skill number doesn't exist or isn't a quest skill.
- return -1;
- }
- if ((pl_sd = map_nick2sd(player)) == NULL) {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
- if (pc_checkskill(pl_sd, skill_id) > 0) {
- clif_displaymessage(fd, msg_txt(200)); // This player already has this quest skill.
- return -1;
- }
-
- pc_skill(pl_sd, skill_id, 1, 0);
- clif_displaymessage(fd, msg_txt(199)); // This player has learned the skill.
-
- return 0;
-}
-
-
-/*==========================================
- * #lostskill <skill_#> <nickname>
- * Transferred by: Kevin
- *------------------------------------------*/
-int charcommand_lostskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int skill_id = 0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &skill_id, player) < 2 || skill_id < 0) {
- clif_displaymessage(fd, "Please, enter a quest skill number and a player name (usage: @charlostskill <#:0+> <char_name>).");
- return -1;
- }
-
- if (skill_id < 0 && skill_id >= MAX_SKILL) {
- clif_displaymessage(fd, msg_txt(198)); // This skill number doesn't exist.
- return -1;
- }
- if (!(skill_get_inf2(skill_id) & INF2_QUEST_SKILL)) {
- clif_displaymessage(fd, msg_txt(197)); // This skill number doesn't exist or isn't a quest skill.
- return -1;
- }
- if ((pl_sd = map_nick2sd(player)) == NULL) {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
- if (pc_checkskill(pl_sd, skill_id) == 0) {
- clif_displaymessage(fd, msg_txt(203)); // This player doesn't have this quest skill.
- return -1;
- }
-
- pl_sd->status.skill[skill_id].lv = 0;
- pl_sd->status.skill[skill_id].flag = 0;
- clif_skillinfoblock(pl_sd);
- clif_displaymessage(fd, msg_txt(202)); // This player has forgotten the skill.
-
- return 0;
-}
-
-/*==========================================
- * Character Skill Reset
- *------------------------------------------*/
-int charcommand_skreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- char tmp_cmdoutput[1024];
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: @charskreset <charname>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset skill points only lower or same gm level
- pc_resetskill(pl_sd,1);
- sprintf(tmp_cmdoutput, msg_txt(206), player); // '%s' skill points reset.
- clif_displaymessage(fd, tmp_cmdoutput);
- } else {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Character Stat Reset
- *------------------------------------------*/
-int charcommand_streset(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- char tmp_cmdoutput[1024];
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: @charstreset <charname>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset stats points only lower or same gm level
- pc_resetstate(pl_sd);
- sprintf(tmp_cmdoutput, msg_txt(207), player); // '%s' stats points reset.
- clif_displaymessage(fd, tmp_cmdoutput);
- } else {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Character Model by chbrules
- *------------------------------------------*/
-int charcommand_model(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hair_style = 0, hair_color = 0, cloth_color = 0;
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- char tmp_cmdoutput[1024];
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %d %d %23[^\n]", &hair_style, &hair_color, &cloth_color, player) < 4 || hair_style < 0 || hair_color < 0 || cloth_color < 0) {
- sprintf(tmp_cmdoutput, "Please, enter a valid model and a player name (usage: @charmodel <hair ID: %d-%d> <hair color: %d-%d> <clothes color: %d-%d> <name>).",
- MIN_HAIR_STYLE, MAX_HAIR_STYLE, MIN_HAIR_COLOR, MAX_HAIR_COLOR, MIN_CLOTH_COLOR, MAX_CLOTH_COLOR);
- clif_displaymessage(fd, tmp_cmdoutput);
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (hair_style >= MIN_HAIR_STYLE && hair_style <= MAX_HAIR_STYLE &&
- hair_color >= MIN_HAIR_COLOR && hair_color <= MAX_HAIR_COLOR &&
- cloth_color >= MIN_CLOTH_COLOR && cloth_color <= MAX_CLOTH_COLOR) {
- pc_changelook(pl_sd, LOOK_HAIR, hair_style);
- pc_changelook(pl_sd, LOOK_HAIR_COLOR, hair_color);
- pc_changelook(pl_sd, LOOK_CLOTHES_COLOR, cloth_color);
- clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
- } else {
- clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Character Skill Point (Rewritten by [Yor])
- *------------------------------------------*/
-int charcommand_skpoint(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int new_skill_point;
- int point = 0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &point, player) < 2 || point == 0) {
- clif_displaymessage(fd, "Please, enter a number and a player name (usage: @charskpoint <amount> <name>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (point > 0 && pl_sd->status.skill_point > USHRT_MAX - point)
- new_skill_point = USHRT_MAX;
- else if (point < 0 && pl_sd->status.skill_point < -point)
- new_skill_point = 0;
- else
- new_skill_point = pl_sd->status.skill_point + point;
- if (new_skill_point != (int)pl_sd->status.skill_point) {
- pl_sd->status.skill_point = new_skill_point;
- clif_updatestatus(pl_sd, SP_SKILLPOINT);
- clif_displaymessage(fd, msg_txt(209)); // Character's skill points changed.
- } else {
- if (point < 0)
- clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
- else
- clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Character Status Point (rewritten by [Yor])
- *------------------------------------------*/
-int charcommand_stpoint(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- int new_status_point;
- int point = 0;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &point, player) < 2 || point == 0) {
- clif_displaymessage(fd, "Please, enter a number and a player name (usage: @charstpoint <amount> <name>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) != NULL) {
- if (point > 0 && pl_sd->status.status_point > USHRT_MAX - point)
- new_status_point = USHRT_MAX;
- else if (point < 0 && pl_sd->status.status_point < -point)
- new_status_point = 0;
- else
- new_status_point = pl_sd->status.status_point + point;
- if (new_status_point != (int)pl_sd->status.status_point) {
- pl_sd->status.status_point = new_status_point;
- clif_updatestatus(pl_sd, SP_STATUSPOINT);
- clif_displaymessage(fd, msg_txt(210)); // Character's status points changed.
- } else {
- if (point < 0)
- clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
- else
- clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * charchangesex command (usage: charchangesex <player_name>)
- *------------------------------------------*/
-int charcommand_changesex(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char player[NAME_LENGTH];
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: @charchangesex <name>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(player)) == NULL)
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
- if (pc_isGM(sd) < pc_isGM(pl_sd)) {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- clif_displaymessage(fd, msg_table[88]); // Character name sent to char-server to ask it.
- chrif_changesex(pl_sd);
- return 0;
-}
-
-/*==========================================
- * Feel (SG save map) Reset
- *------------------------------------------*/
-int charcommand_feelreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #feelreset <charname>).");
- return -1;
- }
-
- if ((pl_sd = map_nick2sd(character)) != NULL) {
- if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset a character only for lower or same GM level
- pc_resetfeel(pl_sd);
- sprintf(output, msg_txt(267), character); // '%s' designated maps reset.
- clif_displaymessage(fd, output);
- } else {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- } else {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * #help - Char commands [Kayla]
- *------------------------------------------*/
-int charcommand_help(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char buf[2048], w1[2048], w2[2048];
- int i, gm_level;
- FILE* fp;
- nullpo_retr(-1, sd);
-
- memset(buf, '\0', sizeof(buf));
-
- if ((fp = fopen(charhelp_txt, "r")) != NULL) {
- clif_displaymessage(fd, msg_txt(26)); /* Help commands: */
- gm_level = pc_isGM(sd);
- while(fgets(buf, sizeof(buf), fp) != NULL)
- {
- if (buf[0] == '/' && buf[1] == '/')
- continue;
- for (i = 0; buf[i] != '\0'; i++) {
- if (buf[i] == '\r' || buf[i] == '\n') {
- buf[i] = '\0';
- break;
- }
- }
- if (sscanf(buf, "%2047[^:]:%2047[^\n]", w1, w2) < 2)
- clif_displaymessage(fd, buf);
- else if (gm_level >= atoi(w1))
- clif_displaymessage(fd, w2);
- }
- fclose(fp);
- } else {
- clif_displaymessage(fd, msg_txt(27)); /* File help.txt not found. */
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Loads a character back to their save point [HiddenDragon]
- *------------------------------------------*/
-int charcommand_load(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int m;
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #load <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- m = map_mapindex2mapid(pl_sd->status.save_point.map);
- if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(pl_sd)) {
- clif_displaymessage(fd, "Not authorized to warp to target map.");
- return -1;
- }
- if (pl_sd->bl.m >= 0 && map[pl_sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(pl_sd)) {
- clif_displaymessage(fd, "Not authorized to warp from current map.");
- return -1;
- }
-
- pc_setpos(pl_sd, pl_sd->status.save_point.map, pl_sd->status.save_point.x, pl_sd->status.save_point.y, 0);
- clif_displaymessage(pl_sd->fd, msg_txt(7)); // Warping to respawn point.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(7)); // Warping to respawn point.
-
- return 0;
-}
-
-/*==========================================
- * Changes the targets speed [HiddenDragon]
- *------------------------------------------*/
-int charcommand_speed(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int speed;
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &speed, character) < 2) {
- sprintf(output, "Please, enter proper values (usage: #speed <%d-%d> <player>).", MIN_WALK_SPEED, MAX_WALK_SPEED);
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pl_sd->base_status.speed = cap_value(speed, MIN_WALK_SPEED, MAX_WALK_SPEED);
- status_calc_bl(&pl_sd->bl, SCB_SPEED);
- clif_displaymessage(pl_sd->fd, msg_txt(8)); // Speed changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(8)); // Speed changed.
- return 0;
-}
-
-/*==========================================
- * Opens their storage [HiddenDragon]
- *------------------------------------------*/
-int charcommand_storage(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #storage <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->npc_id || pl_sd->vender_id || pl_sd->state.trading || pl_sd->state.storage_flag)
- return -1;
-
- if (storage_storageopen(pl_sd) == 1)
- { //Already open.
- clif_displaymessage(fd, "Players storage already open.");
- return -1;
- }
-
- clif_displaymessage(pl_sd->fd, "Storage opened.");
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player's storage opened.");
-
- return 0;
-}
-
-
-/*==========================================
- * Opens their guild storage
- *------------------------------------------*/
-int charcommand_guildstorage(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #gstorage <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->npc_id || pl_sd->vender_id || pl_sd->state.trading)
- return -1;
-
- if (pl_sd->status.guild_id == 0) {
- clif_displaymessage(fd, "Target player is not in a guild.");
- return -1;
- }
-
- if (pl_sd->state.storage_flag) {
- clif_displaymessage(fd, "Guild storage is currently in use.");
- return -1;
- }
-
- storage_guild_storageopen(pl_sd);
-
- clif_displaymessage(pl_sd->fd, "Guild storage opened.");
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player's guild storage opened.");
-
- return 0;
-}
-
-/*==========================================
- * Applies GM Hide to a character [HiddenDragon]
- *------------------------------------------*/
-int charcommand_hide(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #hide <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->sc.option & OPTION_INVISIBLE) {
- pl_sd->sc.option &= ~OPTION_INVISIBLE;
- if (pl_sd->disguise)
- status_set_viewdata(&pl_sd->bl, pl_sd->disguise);
- else
- status_set_viewdata(&pl_sd->bl, pl_sd->status.class_);
- clif_changeoption(&pl_sd->bl);
- clif_displaymessage(pl_sd->fd, msg_txt(10)); // Invisible: Off
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(10)); // Invisible: Off
- } else {
- pl_sd->sc.option |= OPTION_INVISIBLE;
- pl_sd->vd.class_ = INVISIBLE_CLASS;
- clif_changeoption(&pl_sd->bl);
- clif_displaymessage(pl_sd->fd, msg_txt(11)); // Invisible: On
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(11)); // Invisible: On
- }
-
- return 0;
-}
-
-/*==========================================
- * Resurrects a dead character [HiddenDragon]
- *------------------------------------------*/
-int charcommand_alive(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #alive <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!status_revive(&pl_sd->bl, 100, 100))
- {
- clif_displaymessage(fd, "Target player is not dead.");
- return -1;
- }
- clif_skill_nodamage(&pl_sd->bl,&pl_sd->bl,ALL_RESURRECTION,4,1);
- clif_displaymessage(pl_sd->fd, msg_txt(16)); // You've been revived! It's a miracle!
- return 0;
-}
-
-/*==========================================
- * Heals someone's HP and SP [HiddenDragon]
- *------------------------------------------*/
-int charcommand_heal(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hp = 0, sp = 0; // [Valaris] thanks to fov
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%d %d %23[^\n]", &hp, &sp, character) < 3) {
- clif_displaymessage(fd, "Please, enter proper values (usage: #heal <hp> <sp> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- // some overflow checks
- if( hp == INT_MIN ) hp++;
- if( sp == INT_MIN ) sp++;
-
- if ( hp == 0 && sp == 0 ) {
- if (!status_percent_heal(&pl_sd->bl, 100, 100))
- clif_displaymessage(fd, msg_txt(157)); // HP and SP are already with the good value.
- else
- {
- clif_displaymessage(pl_sd->fd, msg_txt(17)); // HP, SP recovered.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(17)); // HP, SP recovered.
- }
- return 0;
- }
-
- if(hp > 0 && sp >= 0) {
- if( !status_heal(&pl_sd->bl, hp, sp, 2) )
- clif_displaymessage(fd, msg_txt(157)); // HP and SP are already with the good value.
- else
- {
- clif_displaymessage(pl_sd->fd, msg_txt(17)); // HP, SP recovered.
- if ( pl_sd->fd != fd )
- clif_displaymessage(fd, msg_txt(17)); // HP, SP recovered.
- }
- return 0;
- }
-
- if( hp < 0 && sp <= 0 ) {
- status_damage(NULL, &pl_sd->bl, -hp, -sp, 0, 0);
- clif_damage(&pl_sd->bl,&pl_sd->bl, gettick(), 0, 0, -hp, 0 , 4, 0);
- clif_displaymessage(pl_sd->fd, msg_txt(156)); // HP or/and SP modified.
- if ( pl_sd->fd != fd )
- clif_displaymessage(fd, msg_txt(156)); // HP or/and SP modified.
- return 0;
- }
-
- //Opposing signs.
- if ( hp ) {
- if ( hp > 0 )
- status_heal(&pl_sd->bl, hp, 0, 2);
- else {
- status_damage(NULL, &pl_sd->bl, -hp, 0, 0, 0);
- clif_damage(&pl_sd->bl,&pl_sd->bl, gettick(), 0, 0, -hp, 0 , 4, 0);
- }
- }
-
- if ( sp ) {
- if ( sp > 0 )
- status_heal(&pl_sd->bl, 0, sp, 2);
- else
- status_damage(NULL, &pl_sd->bl, 0, -sp, 0, 0);
- }
-
- clif_displaymessage(pl_sd->fd, msg_txt(156)); // HP or/and SP modified.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(156)); // HP or/and SP modified.
- return 0;
-}
-
-/*==========================================
- * Creates items as specified [HiddenDragon]
- *------------------------------------------*/
-int charcommand_item2(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct item item_tmp;
- struct item_data *item_data;
- char item_name[100];
- int item_id, number = 0;
- int identify = 0, refine = 0, attr = 0;
- int c1 = 0, c2 = 0, c3 = 0, c4 = 0;
- int flag;
- int loop, get_count, i;
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || (
- sscanf(message, "\"%99[^\"]\" %d %d %d %d %d %d %d %d %23[^\n]", item_name, &number, &identify, &refine, &attr, &c1, &c2, &c3, &c4, character) < 10 &&
- sscanf(message, "%99s %d %d %d %d %d %d %d %d %23[^\n]", item_name, &number, &identify, &refine, &attr, &c1, &c2, &c3, &c4, character) < 10
- )) {
- clif_displaymessage(fd, "Please, enter all informations (usage: @item2 <item name or ID> <quantity>");
- clif_displaymessage(fd, " <Identify_flag[1|0]> <refine> <attribut> <Card1> <Card2> <Card3> <Card4> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
- if (number <= 0)
- number = 1;
-
- item_id = 0;
- if ((item_data = itemdb_searchname(item_name)) != NULL ||
- (item_data = itemdb_exists(atoi(item_name))) != NULL)
- item_id = item_data->nameid;
-
- if (item_id > 500) {
- loop = 1;
- get_count = number;
- if (item_data->type == 4 || item_data->type == 5 ||
- item_data->type == 7 || item_data->type == 8) {
- loop = number;
- get_count = 1;
- if (item_data->type == 7) {
- identify = 1;
- refine = 0;
- }
- if (item_data->type == 8)
- refine = 0;
- if (refine > 10)
- refine = 10;
- } else {
- identify = 1;
- refine = attr = 0;
- }
- for (i = 0; i < loop; i++) {
- memset(&item_tmp, 0, sizeof(item_tmp));
- item_tmp.nameid = item_id;
- item_tmp.identify = identify;
- item_tmp.refine = refine;
- item_tmp.attribute = attr;
- item_tmp.card[0] = c1;
- item_tmp.card[1] = c2;
- item_tmp.card[2] = c3;
- item_tmp.card[3] = c4;
- if ((flag = pc_additem(pl_sd, &item_tmp, get_count)))
- clif_additem(pl_sd, 0, 0, flag);
- }
-
- //Logs (A)dmins items [Lupus]
- if(log_config.enable_logs&0x400)
- log_pick_pc(pl_sd, "A", item_tmp.nameid, number, &item_tmp);
-
- clif_displaymessage(pl_sd->fd, msg_txt(18)); // Item created.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(18)); // Item created.
- } else {
- clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Reset a character's items [HiddenDragon]
- *------------------------------------------*/
-int charcommand_itemreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int i, count = 0;
- char character[NAME_LENGTH];
- char output[200];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #itemreset <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- for (i = 0; i < MAX_INVENTORY; i++) {
- if (pl_sd->status.inventory[i].amount && pl_sd->status.inventory[i].equip == 0) {
-
- //Logs (A)dmins items [Lupus]
- if(log_config.enable_logs&0x400)
- log_pick_pc(pl_sd, "A", pl_sd->status.inventory[i].nameid, -pl_sd->status.inventory[i].amount, &pl_sd->status.inventory[i]);
-
- pc_delitem(pl_sd, i, pl_sd->status.inventory[i].amount, 0);
- count++;
- }
- }
-
- sprintf(output, msg_txt(114), count);
- if (pl_sd->fd != fd)
- clif_displaymessage(pl_sd->fd, output); // %d item(s) removed from the player.
- clif_displaymessage(fd, msg_txt(20)); // All of your items have been removed.
-
- return 0;
-}
-
-/*==========================================
- * Refine their items [HiddenDragon]
- *------------------------------------------*/
-int charcommand_refine(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int i,j, position = 0, refine = 0, current_position, final_refine;
- int count;
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%d %d %23[^\n]", &position, &refine, character) < 3) {
- clif_displaymessage(fd, "Please, enter a position and a amount (usage: #refine <equip position> <+/- amount> <player>).");
- sprintf(output, "%d: Left Accessory", EQI_ACC_L);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Right Accessory", EQI_ACC_R);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Shoes", EQI_SHOES);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Garment", EQI_GARMENT);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Lower Headgear", EQI_HEAD_LOW);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Mid Headgear", EQI_HEAD_MID);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Top Headgear", EQI_HEAD_TOP);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Body Armor", EQI_ARMOR);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Left Hand", EQI_HAND_L);
- clif_displaymessage(fd, output);
- sprintf(output, "%d: Right Hand", EQI_HAND_R);
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (refine < -MAX_REFINE)
- refine = -MAX_REFINE;
- else if (refine > MAX_REFINE)
- refine = MAX_REFINE;
- else if (refine == 0)
- refine = 1;
-
- count = 0;
- for (j = 0; j < EQI_MAX-1; j++) {
- if ((i = pl_sd->equip_index[j]) < 0)
- continue;
- if(j == EQI_HAND_R && pl_sd->equip_index[EQI_HAND_L] == i)
- continue;
- if(j == EQI_HEAD_MID && pl_sd->equip_index[EQI_HEAD_LOW] == i)
- continue;
- if(j == EQI_HEAD_TOP && (pl_sd->equip_index[EQI_HEAD_MID] == i || pl_sd->equip_index[EQI_HEAD_LOW] == i))
- continue;
-
- if(position && !(pl_sd->status.inventory[i].equip & position))
- continue;
-
- final_refine = pl_sd->status.inventory[i].refine + refine;
- if (final_refine > MAX_REFINE)
- final_refine = MAX_REFINE;
- else if (final_refine < 0)
- final_refine = 0;
- if (pl_sd->status.inventory[i].refine != final_refine) {
- pl_sd->status.inventory[i].refine = final_refine;
- current_position = pl_sd->status.inventory[i].equip;
- pc_unequipitem(pl_sd, i, 3);
- clif_refine(fd, 0, i, pl_sd->status.inventory[i].refine);
- clif_delitem(pl_sd, i, 1);
- clif_additem(pl_sd, i, 1, 0);
- pc_equipitem(pl_sd, i, current_position);
- clif_misceffect(&pl_sd->bl, 3);
- count++;
- }
- }
-
- if (count == 0)
- clif_displaymessage(fd, msg_txt(166)); // No item has been refined!
- else if (count == 1)
- {
- clif_displaymessage(pl_sd->fd, msg_txt(167)); // 1 item has been refined!
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(167)); // 1 item has been refined!
- }
- else {
- sprintf(output, msg_txt(168), count); // %d items have been refined!
- clif_displaymessage(pl_sd->fd, output);
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, output);
- }
-
- return 0;
-}
-
-/*==========================================
- * Produce a manufactured item in their inventory [HiddenDragon]
- *------------------------------------------*/
-int charcommand_produce(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char item_name[100];
- int item_id, attribute = 0, star = 0;
- int flag = 0;
- struct item_data *item_data;
- struct item tmp_item;
- char character[NAME_LENGTH];
- char output[200];
-
- struct map_session_data *pl_sd;
-
- nullpo_retr(-1, sd);
-
- if (!message || !*message || (
- sscanf(message, "\"%99[^\"]\" %d %d %23[^\n]", item_name, &attribute, &star, character) < 4 &&
- sscanf(message, "%99s %d %d %23[^\n]", item_name, &attribute, &star, character) < 4
- )) {
- clif_displaymessage(fd, "Please, enter at least an item name/id (usage: #produce <equip name or equip ID> <element> <# of very's> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- item_id = 0;
- if ((item_data = itemdb_searchname(item_name)) == NULL &&
- (item_data = itemdb_exists(atoi(item_name))) == NULL)
- {
- sprintf(output, msg_txt(170)); // This item is not an equipment.
- clif_displaymessage(fd, output);
- return -1;
- }
- item_id = item_data->nameid;
- if (itemdb_isequip2(item_data)) {
- if (attribute < MIN_ATTRIBUTE || attribute > MAX_ATTRIBUTE)
- attribute = ATTRIBUTE_NORMAL;
- if (star < MIN_STAR || star > MAX_STAR)
- star = 0;
- memset(&tmp_item, 0, sizeof tmp_item);
- tmp_item.nameid = item_id;
- tmp_item.amount = 1;
- tmp_item.identify = 1;
- tmp_item.card[0] = CARD0_FORGE;
- tmp_item.card[1] = item_data->type==IT_WEAPON?
- ((star*5) << 8) + attribute:0;
- tmp_item.card[2] = GetWord(pl_sd->status.char_id, 0);
- tmp_item.card[3] = GetWord(pl_sd->status.char_id, 1);
- clif_produceeffect(pl_sd, 0, item_id);
- clif_misceffect(&pl_sd->bl, 3);
-
- //Logs (A)dmins items [Lupus]
- if(log_config.enable_logs&0x400)
- log_pick_pc(pl_sd, "A", tmp_item.nameid, 1, &tmp_item);
-
- if ((flag = pc_additem(pl_sd, &tmp_item, 1)))
- {
- clif_additem(pl_sd, 0, 0, flag);
- clif_displaymessage(fd, msg_txt(18));
- }
- } else {
- sprintf(output, msg_txt(169), item_id, item_data->name); // This item (%d: '%s') is not an equipment.
- clif_displaymessage(fd, output);
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Changes a character's stats [HiddenDragon
- *------------------------------------------*/
-int charcommand_param(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int index, value = 0, new_value;
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
- const char* param[] = { "#str", "#agi", "#vit", "#int", "#dex", "#luk", NULL };
- short* status[6];
-
-
- if (!message || !*message || sscanf(message, "%d %s", &value, character) < 2 || value == 0) {
- sprintf(output, "Please, enter a valid value (usage: #str,#agi,#vit,#int,#dex,#luk <+/-adjustment> <player>).");
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- status[0] = &pl_sd->status.str;
- status[1] = &pl_sd->status.agi;
- status[2] = &pl_sd->status.vit;
- status[3] = &pl_sd->status.int_;
- status[4] = &pl_sd->status.dex;
- status[5] = &pl_sd->status.luk;
-
- index = -1;
- for (index = 0; index < ARRAYLENGTH(param); index++) {
- if (strcmpi(command, param[index]) == 0)
- break;
- }
- if (index == ARRAYLENGTH(param) || index > MAX_STATUS_TYPE) {
- // normaly impossible...
- sprintf(output, "Please, enter a valid value (usage: #str,#agi,#vit,#int,#dex,#luk <+/-adjustment> <player>).");
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if (value > 0 && *status[index] > 999 - value)
- new_value = 999;
- else if (value < 0 && *status[index] <= -value)
- new_value = 1;
- else
- new_value = *status[index] + value;
-
- if (new_value != (int)*status[index]) {
- *status[index] = new_value;
- clif_updatestatus(pl_sd, SP_STR + index);
- clif_updatestatus(pl_sd, SP_USTR + index);
- status_calc_pc(pl_sd, 0);
- clif_displaymessage(pl_sd->fd, msg_txt(42)); // Stat changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(42)); // Stat changed.
- } else {
- if (value < 0)
- clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
- else
- clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Levels up a character's guild [HiddenDragon]
- *------------------------------------------*/
-int charcommand_guildlevelup(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int level = 0;
- short added_level;
- struct guild *guild_info;
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %s", &level, character) < 2 || level == 0) {
- clif_displaymessage(fd, "Please, enter a valid level and player (usage: #guildlvup/@guildlvlup <# of levels> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->status.guild_id <= 0 || (guild_info = guild_search(pl_sd->status.guild_id)) == NULL) {
- clif_displaymessage(fd, "Target player is not in a guild"); // You're not in a guild.
- return -1;
- }
- //if (strcmp(sd->status.name, guild_info->master) != 0) {
- // clif_displaymessage(fd, msg_txt(44)); // You're not the master of your guild.
- // return -1;
- //}
-
- added_level = (short)level;
- if (level > 0 && (level > MAX_GUILDLEVEL || added_level > ((short)MAX_GUILDLEVEL - guild_info->guild_lv))) // fix positiv overflow
- added_level = (short)MAX_GUILDLEVEL - guild_info->guild_lv;
- else if (level < 0 && (level < -MAX_GUILDLEVEL || added_level < (1 - guild_info->guild_lv))) // fix negativ overflow
- added_level = 1 - guild_info->guild_lv;
-
- if (added_level != 0) {
- intif_guild_change_basicinfo(guild_info->guild_id, GBI_GUILDLV, &added_level, 2);
- clif_displaymessage(pl_sd->fd, msg_txt(179)); // Guild level changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(179));
- } else {
- clif_displaymessage(fd, msg_txt(45)); // Guild level change failed.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Opens a hatch window for them [HiddenDragon]
- *------------------------------------------*/
-int charcommand_hatch(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #hatch <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->status.pet_id <= 0)
- clif_sendegg(sd);
- else {
- clif_displaymessage(fd, "Target player already has a pet"); // You already have a pet.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Change target pet's hunger [HiddenDragon]
- *------------------------------------------*/
-int charcommand_pethungry(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hungry;
- struct pet_data *pd;
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
-
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &hungry, character) < 2) {
- clif_displaymessage(fd, "Please, enter a valid number and player (usage: #pethungry <0-100> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pd = pl_sd->pd;
- if (!pl_sd->status.pet_id || !pd) {
- clif_displaymessage(fd, "Target has no pet"); // Sorry, but you have no pet.
- return -1;
- }
- if (hungry < 0 || hungry > 100) {
- clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
- return -1;
- }
- if (hungry == pd->pet.hungry) {
- clif_displaymessage(fd, msg_txt(186)); // Pet hungry is already the good value.
- return -1;
- }
-
- pd->pet.hungry = hungry;
- clif_send_petstatus(pl_sd);
- clif_displaymessage(pl_sd->fd, msg_txt(185)); // Pet hungry value changed!
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(185)); // Pet hungry value changed!
-
- return 0;
-}
-
-/*==========================================
- * Give all skills to target [HiddenDragon]
- *------------------------------------------*/
-int charcommand_allskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #allskill <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pc_allskillup(pl_sd); // all skills
- pl_sd->status.skill_point = 0; // 0 skill points
- clif_updatestatus(pl_sd, SP_SKILLPOINT); // update
- clif_displaymessage(pl_sd->fd, msg_txt(76)); // You have received all skills.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player has received all skills for his/her class.");
-
- return 0;
-}
-
-
-/*==========================================
- * Change target's clothing color [HiddenDragon]
- *------------------------------------------*/
-int charcommand_dye(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int cloth_color = 0;
- char character[NAME_LENGTH];
- char output[200];
-
- struct map_session_data *pl_sd;
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &cloth_color, character) < 2) {
- sprintf(output, "Please, enter a clothes color (usage: #dye/@ccolor <clothes color: %d-%d> <player>).", MIN_CLOTH_COLOR, MAX_CLOTH_COLOR);
- clif_displaymessage(fd,output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (cloth_color >= MIN_CLOTH_COLOR && cloth_color <= MAX_CLOTH_COLOR) {
- pc_changelook(pl_sd, LOOK_CLOTHES_COLOR, cloth_color);
- clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
- } else {
- clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Change target's hair style [HiddenDragon]
- *------------------------------------------*/
-int charcommand_hair_style(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hair_style = 0;
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &hair_style, character) < 2) {
- sprintf(output, "Please, enter a hair style (usage: #hairstyle/#hstyle <hair ID: %d-%d> <player>.", MIN_HAIR_STYLE, MAX_HAIR_STYLE);
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (hair_style >= MIN_HAIR_STYLE && hair_style <= MAX_HAIR_STYLE) {
- pc_changelook(pl_sd, LOOK_HAIR, hair_style);
- clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
- } else {
- clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Change target's hair color [HiddenDragon]
- *------------------------------------------*/
-int charcommand_hair_color(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hair_color = 0;
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
- nullpo_retr(-1, sd);
-
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &hair_color, character) < 2) {
- sprintf(output, "Please, enter a hair color (usage: #haircolor/#hcolor <hair color: %d-%d> <player>).", MIN_HAIR_COLOR, MAX_HAIR_COLOR);
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (hair_color >= MIN_HAIR_COLOR && hair_color <= MAX_HAIR_COLOR) {
- pc_changelook(pl_sd, LOOK_HAIR_COLOR, hair_color);
- clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
- } else {
- clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Change all target's stats [HiddenDragon]
- *------------------------------------------*/
-int charcommand_allstats(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int index, count, value = 0, max, new_value;
- short* status[6];
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
-
- //we don't use direct initialization because it isn't part of the c standard.
- nullpo_retr(-1, sd);
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #statall/#statsall/#allstat/#allstats <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- status[0] = &pl_sd->status.str;
- status[1] = &pl_sd->status.agi;
- status[2] = &pl_sd->status.vit;
- status[3] = &pl_sd->status.int_;
- status[4] = &pl_sd->status.dex;
- status[5] = &pl_sd->status.luk;
-
- count = 0;
- max = pc_maxparameter(pl_sd);
- for (index = 0; index < ARRAYLENGTH(status); index++) {
-
- if (value > 0 && *status[index] > max - value)
- new_value = max;
- else if (value < 0 && *status[index] <= -value)
- new_value = 1;
- else
- new_value = *status[index] +value;
-
- if (new_value != (int)*status[index]) {
- *status[index] = new_value;
- clif_updatestatus(pl_sd, SP_STR + index);
- clif_updatestatus(pl_sd, SP_USTR + index);
- status_calc_pc(pl_sd, 0);
- count++;
- }
- }
-
- if (count > 0) // if at least 1 stat modified
- {
- clif_displaymessage(pl_sd->fd, msg_txt(84)); // All stats changed!
- if (fd != pl_sd->fd)
- clif_displaymessage(fd, "Player's stats changed"); // All stats changed!
- }
- else {
- if (value < 0)
- clif_displaymessage(fd, msg_txt(177)); // Impossible to decrease a stat.
- else
- clif_displaymessage(fd, msg_txt(178)); // Impossible to increase a stat.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Gives/Removes a peco from a player [HiddenDragon]
- *------------------------------------------*/
-int charcommand_mount_peco(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char character[NAME_LENGTH];
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #mount/#mountpeco <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!pc_isriding(pl_sd))
- { // if actually no peco
- if (!pc_checkskill(pl_sd, KN_RIDING))
- {
- clif_displaymessage(fd, msg_txt(217)); // This player cannot mount a Peco Peco with his/her current job.
- return -1;
- }
-
- if (pl_sd->disguise)
- {
- clif_displaymessage(fd, msg_txt(215)); // This player cannot mount a Peco Peco while in disguise.
- return -1;
- }
-
- pc_setoption(pl_sd, pl_sd->sc.option | OPTION_RIDING);
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player mounted a peco.");
- clif_displaymessage(pl_sd->fd, msg_txt(216)); // This player has mounted a Peco Peco.
- }
- else
- { //Dismount
- pc_setoption(pl_sd, pl_sd->sc.option & ~OPTION_RIDING);
- clif_displaymessage(pl_sd->fd, msg_txt(218)); // This player's Peco Peco has been released.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player unmounted a peco.");
- }
-
- return 0;
-}
-
-/*==========================================
- * Remove items from a player (now a char command) [HiddenDragon]
- *------------------------------------------*/
-int charcommand_delitem(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data *pl_sd;
- char item_name[100];
- int i, number = 0, item_id, item_position, count;
- struct item_data *item_data;
- char character[NAME_LENGTH];
- char output[200];
-
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
- memset(item_name, '\0', sizeof(item_name));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || (
- sscanf(message, "\"%99[^\"]\" %d %23[^\n]", item_name, &number, character) < 3 &&
- sscanf(message, "%s %d %23[^\n]", item_name, &number, character) < 3
- ) || number < 1) {
- clif_displaymessage(fd, "Please, enter an item name/id, a quantity and a player name (usage: #delitem <item_name_or_ID> <quantity> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- item_id = 0;
- if ((item_data = itemdb_searchname(item_name)) != NULL ||
- (item_data = itemdb_exists(atoi(item_name))) != NULL)
- item_id = item_data->nameid;
-
- if (item_id > 500) {
- item_position = pc_search_inventory(pl_sd, item_id);
- if (item_position >= 0) {
- count = 0;
- for(i = 0; i < number && item_position >= 0; i++) {
-
- //Logs (A)dmins items [Lupus]
- if(log_config.enable_logs&0x400)
- log_pick_pc(pl_sd, "A", pl_sd->status.inventory[item_position].nameid, -1, &pl_sd->status.inventory[item_position]);
-
- pc_delitem(pl_sd, item_position, 1, 0);
- count++;
- item_position = pc_search_inventory(pl_sd, item_id); // for next loop
- }
- sprintf(output, msg_txt(113), count); // %d item(s) removed by a GM.
- clif_displaymessage(pl_sd->fd, output);
- if (number == count)
- sprintf(output, msg_txt(114), count); // %d item(s) removed from the player.
- else
- sprintf(output, msg_txt(115), count, count, number); // %d item(s) removed. Player had only %d on %d items.
- clif_displaymessage(fd, output);
- } else {
- clif_displaymessage(fd, msg_txt(116)); // Character does not have the specified item.
- return -1;
- }
- }
- else
- {
- clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
- return -1;
- }
-
- return 0;
-}
-
-//Added by Coltaro
-//We're using this function here instead of using time_t so that it only counts player's jail time when he/she's online (and since the idea is to reduce the amount of minutes one by one in status_change_timer...).
-//Well, using time_t could still work but for some reason that looks like more coding x_x
-static void get_jail_time(int jailtime, int* year, int* month, int* day, int* hour, int* minute) {
- const int factor_year = 518400; //12*30*24*60 = 518400
- const int factor_month = 43200; //30*24*60 = 43200
- const int factor_day = 1440; //24*60 = 1440
- const int factor_hour = 60;
-
- *year = jailtime/factor_year;
- jailtime -= *year*factor_year;
- *month = jailtime/factor_month;
- jailtime -= *month*factor_month;
- *day = jailtime/factor_day;
- jailtime -= *day*factor_day;
- *hour = jailtime/factor_hour;
- jailtime -= *hour*factor_hour;
- *minute = jailtime;
-
- *year = *year > 0? *year : 0;
- *month = *month > 0? *month : 0;
- *day = *day > 0? *day : 0;
- *hour = *hour > 0? *hour : 0;
- *minute = *minute > 0? *minute : 0;
- return;
-}
-
-/*==========================================
- * Jail a player for a certain amount of time [Coltaro]
- *------------------------------------------*/
-int charcommand_jailtime(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct map_session_data* pl_sd;
- int year, month, day, hour, minute;
- char character[NAME_LENGTH];
- char output[200];
- memset(character, '\0', sizeof(character));
-
- nullpo_retr(-1, sd);
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #jailtime <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!pl_sd->sc.data[SC_JAILED]) {
- clif_displaymessage(fd, "This player is not in jail.");
- return -1;
- }
-
- if (pl_sd->sc.data[SC_JAILED]->val1 == INT_MAX) {
- clif_displaymessage(fd, "This player has been jailed indefinitely.");
- return 0;
- }
-
- if (pl_sd->sc.data[SC_JAILED]->val1 <= 0) { // Was not jailed with @jailfor (maybe @jail? or warped there? or got recalled?)
- clif_displaymessage(fd, "This player has been jailed for an unknown amount of time.");
- return -1;
- }
- //Get remaining jail time
- get_jail_time(pl_sd->sc.data[SC_JAILED]->val1,&year,&month,&day,&hour,&minute);
- sprintf(output,msg_txt(402),"This player will remain",year,month,day,hour,minute);
- clif_displaymessage(fd, output);
-
- return 0;
-}
-
-/*==========================================
- * Disguises a player [HiddenDragon]
- *------------------------------------------*/
-int charcommand_disguise(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int mob_id;
- char mob_name[NAME_LENGTH];
- struct map_session_data* pl_sd;
- char character[NAME_LENGTH];
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
- memset(mob_name, '\0', sizeof(mob_name));
-
- if (!message || !*message || sscanf(message, "%s %23[^\n]", mob_name, character) < 2) {
- clif_displaymessage(fd, "Please, enter a Monster/NPC name/id and a player name (usage: #disguise <monster_name_or_monster_ID> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if ((mob_id = atoi(mob_name)) > 0)
- { //Acquired an ID
- if (!mobdb_checkid(mob_id) && !npcdb_checkid(mob_id))
- mob_id = 0; //Invalid id for either mobs or npcs.
- } else { //Acquired a Name
- if ((mob_id = mobdb_searchname(mob_name)) == 0)
- {
- struct npc_data* nd = npc_name2id(mob_name);
- if (nd != NULL)
- mob_id = nd->class_;
- }
- }
-
- if (mob_id == 0)
- {
- clif_displaymessage(fd, msg_txt(123)); // Monster/NPC name/id hasn't been found.
- return -1;
- }
-
- if(pc_isriding(pl_sd))
- {
- //FIXME: wrong message [ultramage]
- //clif_displaymessage(fd, msg_txt(228)); // Character cannot wear disguise while riding a PecoPeco.
- return -1;
- }
-
- pc_disguise(pl_sd, mob_id);
- clif_displaymessage(pl_sd->fd, msg_txt(122)); // Disguise applied.
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(140)); // Character's disguise applied.
-
-
- return 0;
-}
-
-/*==========================================
- * Undisguises a player [HiddenDragon]
- *------------------------------------------*/
-int charcommand_undisguise(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data* pl_sd;
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #undisguise <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->disguise)
- {
- pc_disguise(pl_sd, 0);
- clif_displaymessage(pl_sd->fd, msg_txt(124)); // Disguise removed from character
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(141)); // Undisguise applied
- }
- else {
- clif_displaymessage(fd, msg_txt(142)); // Character is not disguised.
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Displays contents of target's cart [HiddenDragon]
- *------------------------------------------*/
-int charcommand_cart_list(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char outputtmp[200];
- char output[200];
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- struct item_data *item_data, *item_temp;
- int i, j, count = 0, counter = 0, counter2;
- nullpo_retr(-1, sd);
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
- memset(outputtmp, '\0', sizeof(outputtmp));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #cartlist <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- for (i = 0; i < MAX_CART; i++) {
- if (pl_sd->status.cart[i].nameid > 0 && (item_data = itemdb_search(pl_sd->status.cart[i].nameid)) != NULL) {
- counter = counter + pl_sd->status.cart[i].amount;
- count++;
- if (count == 1) {
- sprintf(output, "------ Cart items list of '%s' ------", pl_sd->status.name);
- clif_displaymessage(fd, output);
- }
- if (pl_sd->status.cart[i].refine)
- sprintf(output, "%d %s %+d (%s %+d, id: %d)", pl_sd->status.cart[i].amount, item_data->name, pl_sd->status.cart[i].refine, item_data->jname, pl_sd->status.cart[i].refine, pl_sd->status.cart[i].nameid);
- else
- sprintf(output, "%d %s (%s, id: %d)", pl_sd->status.cart[i].amount, item_data->name, item_data->jname, pl_sd->status.cart[i].nameid);
- clif_displaymessage(fd, output);
- memset(output, '\0', sizeof(output));
- counter2 = 0;
- for (j = 0; j < item_data->slot; j++) {
- if (pl_sd->status.cart[i].card[j]) {
- if ( (item_temp = itemdb_search(pl_sd->status.cart[i].card[j])) != NULL) {
- if (output[0] == '\0')
- sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- else
- sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
- strcat(output, outputtmp);
- }
- }
- }
- if (output[0] != '\0') {
- output[strlen(output) - 2] = ')';
- output[strlen(output) - 1] = '\0';
- clif_displaymessage(fd, output);
- }
- }
- }
- if (count == 0)
- clif_displaymessage(fd, "No item found in the cart of this player.");
- else {
- sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
- clif_displaymessage(fd, output);
- }
-
- return 0;
-}
-
-static int charcommand_stopattack(struct block_list *bl,va_list ap)
-{
- struct unit_data *ud = unit_bl2ud(bl);
- int id = va_arg(ap, int);
- if (ud && ud->attacktimer != INVALID_TIMER && (!id || id == ud->target))
- {
- unit_stop_attack(bl);
- return 1;
- }
- return 0;
-}
-
-/*==========================================
- * Enable a player to kill players even when not in pvp [HiddenDragon]
- *------------------------------------------*/
-int charcommand_killer(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #killer <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pl_sd->state.killer = !pl_sd->state.killer;
-
- if(pl_sd->state.killer)
- {
- clif_displaymessage(pl_sd->fd, msg_txt(241));
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Target player can now kill anybody.");
- }
- else
- {
- clif_displaymessage(pl_sd->fd, msg_txt(287));
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(287));
- pc_stop_attack(pl_sd);
- }
-
- return 0;
-}
-
-/*==========================================
- * Enable other players to kill target even when not in pvp [HiddenDragon]
- *------------------------------------------*/
-int charcommand_killable(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #killable <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- pl_sd->state.killable = !pl_sd->state.killable;
-
- if(pl_sd->state.killable)
- {
- clif_displaymessage(pl_sd->fd, msg_txt(242));
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(289));
- }
- else
- {
- clif_displaymessage(pl_sd->fd, msg_txt(288));
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, msg_txt(290));
- map_foreachinrange(charcommand_stopattack,&pl_sd->bl, AREA_SIZE, BL_CHAR, pl_sd->bl.id);
- }
-
- return 0;
-}
-
-/*==========================================
- * Drop all of the target's possessions on the ground
- *------------------------------------------*/
-int charcommand_dropall(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int i;
- struct map_session_data *pl_sd = NULL;
- nullpo_retr(-1, sd);
-
- if (!message || !*message)
- return -1;
- if((pl_sd=map_nick2sd((char *) message)) == NULL)
- return -1;
- for (i = 0; i < MAX_INVENTORY; i++) {
- if (pl_sd->status.inventory[i].amount) {
- if(pl_sd->status.inventory[i].equip != 0)
- pc_unequipitem(pl_sd, i, 3);
- pc_dropitem(pl_sd, i, pl_sd->status.inventory[i].amount);
- }
- }
-
- clif_displaymessage(pl_sd->fd, "All items dropped");
- clif_displaymessage(fd, "It is done");
-
- return 0;
-}
-
-/*==========================================
- * Put all of the target's possessions into storage
- *------------------------------------------*/
-int charcommand_storeall(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int i;
- struct map_session_data *pl_sd = NULL;
- nullpo_retr(-1, sd);
-
- if (!message || !*message)
- return -1;
- if((pl_sd=map_nick2sd((char *) message)) == NULL)
- return -1;
-
- if (pl_sd->state.storage_flag != 1)
- { //Open storage.
- if( storage_storageopen(pl_sd) == 1 ) {
- clif_displaymessage(fd, "The character currently can't use the storage.");
- return 1;
- }
- }
-
- for (i = 0; i < MAX_INVENTORY; i++) {
- if (pl_sd->status.inventory[i].amount) {
- if(pl_sd->status.inventory[i].equip != 0)
- pc_unequipitem(pl_sd, i, 3);
- storage_storageadd(pl_sd, i, sd->status.inventory[i].amount);
- }
- }
- storage_storageclose(pl_sd);
-
- clif_displaymessage(pl_sd->fd, "Everything you own has been put away for safe keeping.");
- clif_displaymessage(pl_sd->fd, "go to the nearest kafka to retrieve it..");
- clif_displaymessage(pl_sd->fd, " -- the management");
-
- clif_displaymessage(fd, "It is done");
-
- return 0;
-}
-
-/*==========================================
- * Refreshes target [HiddenDragon]
- *------------------------------------------*/
-int charcommand_refresh(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #refresh <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- clif_refresh(pl_sd);
- return 0;
-}
-
-
-/*==========================================
- * View target's exp [HiddenDragon]
- *------------------------------------------*/
-int charcommand_exp(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char output[200];
- double nextb, nextj;
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
-
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
-
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #exp <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- nextb = pc_nextbaseexp(pl_sd);
- if (nextb)
- nextb = pl_sd->status.base_exp*100.0/nextb;
-
- nextj = pc_nextjobexp(pl_sd);
- if (nextj)
- nextj = pl_sd->status.job_exp*100.0/nextj;
-
- sprintf(output, "Base Level: %d (%.3f%%) | Job Level: %d (%.3f%%)", pl_sd->status.base_level, nextb, pl_sd->status.job_level, nextj);
- clif_displaymessage(fd, output);
- return 0;
-}
-
-/*==========================================
- * Makes monsters ignore target [HiddenDragon]
- *------------------------------------------*/
-int charcommand_monsterignore(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #monsterignore/#battleignore <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (!pl_sd->state.monster_ignore) {
- pl_sd->state.monster_ignore = 1;
- clif_displaymessage(pl_sd->fd, "You are now immune to attacks.");
- if (fd != pl_sd->fd)
- clif_displaymessage(pl_sd->fd, "Target player is now immune to attacks.");
- } else {
- pl_sd->state.monster_ignore = 0;
- clif_displaymessage(sd->fd, "You are no longer immune to attacks.");
- if (fd != pl_sd->fd)
- clif_displaymessage(pl_sd->fd, "Target player is no longer immune to attacks.");
-
- }
-
- return 0;
-}
-
-/*==========================================
- * Change target's size [HiddenDragon]
- *------------------------------------------*/
-int charcommand_size(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int size=0;
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &size, character) < 2) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #size <0-2> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if(pl_sd->state.size) {
- pl_sd->state.size=0;
- pc_setpos(pl_sd, pl_sd->mapindex, pl_sd->bl.x, pl_sd->bl.y, 3);
- }
-
- if(size==1) {
- pl_sd->state.size=1;
- clif_specialeffect(&pl_sd->bl,420,AREA);
- clif_displaymessage(fd, "Size changed.");
- if (fd != pl_sd->fd)
- clif_displaymessage(pl_sd->fd, "Size changed.");
- } else if(size==2) {
- pl_sd->state.size=2;
- clif_specialeffect(&pl_sd->bl,422,AREA);
- clif_displaymessage(fd, "Size changed.");
- if (fd != pl_sd->fd)
- clif_displaymessage(pl_sd->fd, "Size changed.");
- }
- else
- {
- clif_displaymessage(fd, "Size restored.");
- if (fd != pl_sd->fd)
- clif_displaymessage(pl_sd->fd, "Size restored.");
- }
-
-
- return 0;
-}
-
-/*==========================================
- * Level up target's homunculus [HiddenDragon]
- *------------------------------------------*/
-int charcommand_homlevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- TBL_HOM * hd;
- int level = 0, i = 0;
-
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, character) < 2) {
- clif_displaymessage(fd, "Please, enter a player name and level (usage: #homlevel <# of levels> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if ( !merc_is_hom_active(pl_sd->hd) )
- {
- clif_displaymessage(fd, "Target player does not have a homunculus.");
- return 1;
- }
-
- hd = pl_sd->hd;
-
- for (i = 1; i <= level && hd->exp_next; i++){
- hd->homunculus.exp += hd->exp_next;
- merc_hom_levelup(hd);
- }
- status_calc_homunculus(hd,0);
- status_percent_heal(&hd->bl, 100, 100);
- clif_misceffect2(&hd->bl,568);
- clif_displaymessage(pl_sd->fd, "Homunculus level changed.");
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Player's homunculus level changed.");
-
- return 0;
-}
-
-/*==========================================
- * Evolve target's homunculus [HiddenDragon]
- *------------------------------------------*/
-int charcommand_homevolution(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #homevolution <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if ( !merc_is_hom_active(pl_sd->hd) ) {
- clif_displaymessage(fd, "Target player does not have a homunculus.");
- return -1;
- }
-
- if ( !merc_hom_evolution(pl_sd->hd) ) {
- clif_displaymessage(fd, "Target homunculus cannot evolve.");
- return -1;
- }
-
- clif_displaymessage(pl_sd->fd, "Homunculus evolution initiated.");
- if (pl_sd->fd != fd)
- clif_displaymessage(fd, "Homunculus evolution initiated.");
- return 0;
-}
-
-/*==========================================
- * Create a homunculus for target [HiddenDragon]
- *------------------------------------------*/
-int charcommand_makehomun(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int homunid;
-
- char character[NAME_LENGTH];
- char output[200];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &homunid, character) < 2) {
- sprintf(output, "Please, enter a player name (usage: #makehomun <homunculus id: %d-%d> <player>).", HM_CLASS_BASE, HM_CLASS_BASE + MAX_HOMUNCULUS_CLASS - 1);
- clif_displaymessage(fd, output);
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if( homunid < HM_CLASS_BASE || homunid > HM_CLASS_BASE + MAX_HOMUNCULUS_CLASS - 1 )
- {
- clif_displaymessage(fd, "Invalid homunculus ID.");
- return -1;
- }
-
- if(pl_sd->status.hom_id == 0)
- {
- merc_create_homunculus_request(pl_sd,homunid);
- }
- else
- {
- clif_displaymessage(fd, "Target player already has a homunculus.");
- }
- return 0;
-}
-
-/*==========================================
- * Change Target's homunculus' friendlyness [HiddenDragon]
- *------------------------------------------*/
-int charcommand_homfriendly(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int friendly = 0;
-
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &friendly, character) < 2) {
- clif_displaymessage(fd, "Please, enter a player name and friendly value (usage: #homfriendly <0-1000> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (merc_is_hom_active(pl_sd->hd)) {
- if (friendly > 0 && friendly <= 1000) {
- pl_sd->hd->homunculus.intimacy = friendly * 100 ;
- clif_send_homdata(pl_sd,SP_INTIMATE,friendly);
- clif_displaymessage(pl_sd->fd, "Homunculus friendly value changed.");
- if (fd != pl_sd->fd)
- clif_displaymessage(fd, "Homunculus friendly value changed.");
- } else {
- clif_displaymessage(fd, "Invalid friendly value.");
- }
- }
- else
- {
- clif_displaymessage(fd, "Target player's homunculus does not exist.");
- return -1;
- }
-
- return 0;
-}
-
-/*==========================================
- * Modify target's homunculus hunger [HiddenDragon]
- *------------------------------------------*/
-int charcommand_homhungry(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- int hungry = 0;
-
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
-
- if (!message || !*message || sscanf(message, "%d %23[^\n]", &hungry, character) < 2) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #homhungry <0-100> <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if (pl_sd->status.hom_id > 0 && pl_sd->hd) {
- struct homun_data *hd = pl_sd->hd;
- if (hungry >= 0 && hungry <= 100) {
- hd->homunculus.hunger = hungry;
- clif_send_homdata(pl_sd,SP_HUNGRY,hd->homunculus.hunger);
- clif_displaymessage(pl_sd->fd, "Homunculus hungry value changed.");
- if (fd != pl_sd->fd)
- clif_displaymessage(fd, "Homunculus hungry value changed.");
- } else {
- clif_displaymessage(fd, "Invalid hungry value.");
- return -1;
- }
- }
- else
- {
- clif_displaymessage(fd, "Target player does not have a homunculus.");
- return -1;
- }
-
-
- return 0;
-}
-
-/*==========================================
- * Show target's homunculus stats [HiddenDragon]
- *------------------------------------------*/
-int charcommand_hominfo(const int fd, struct map_session_data* sd, const char* command, const char* message)
-{
- struct homun_data *hd;
- struct status_data *status;
- char output[200];
- char character[NAME_LENGTH];
- struct map_session_data *pl_sd;
- memset(character, '\0', sizeof(character));
- memset(output, '\0', sizeof(output));
-
- if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
- clif_displaymessage(fd, "Please, enter a player name (usage: #hominfo <player>).");
- return -1;
- }
-
- if ( (pl_sd = map_nick2sd(character)) == NULL )
- {
- clif_displaymessage(fd, msg_txt(3)); // Character not found.
- return -1;
- }
-
- if ( pc_isGM(sd) < pc_isGM(pl_sd) )
- {
- clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
- return -1;
- }
-
- if(!merc_is_hom_active(pl_sd->hd))
- return -1;
-
- hd = pl_sd->hd;
- status = status_get_status_data(&hd->bl);
- clif_displaymessage(fd, "Homunculus stats :");
-
- snprintf(output, sizeof(output), "HP : %d/%d - SP : %d/%d", status->hp, status->max_hp, status->sp, status->max_sp);
- clif_displaymessage(fd, output);
-
- snprintf(output, sizeof(output), "ATK : %d - MATK : %d~%d", status->rhw.atk2 +status->batk, status->matk_min, status->matk_max);
- clif_displaymessage(fd, output);
-
- snprintf(output, sizeof(output), "Hungry : %d - Intimacy : %u", hd->homunculus.hunger, hd->homunculus.intimacy/100);
- clif_displaymessage(fd, output);
-
- snprintf(output, sizeof(output), "Stats: Str %d / Agi %d / Vit %d / Int %d / Dex %d / Luk %d", status->str, status->agi, status->vit, status->int_, status->dex, status->luk);
- clif_displaymessage(fd, output);
-
- return 0;
-}
-
-
-/*==========================================
- * charcommand_info[] structure definition
- *------------------------------------------*/
-
-CharCommandInfo charcommand_info[] = {
- { "job", 60, charcommand_jobchange },
- { "jobchange", 60, charcommand_jobchange },
- { "petrename", 50, charcommand_petrename },
- { "petfriendly", 50, charcommand_petfriendly },
- { "stats", 40, charcommand_stats },
- { "option", 60, charcommand_option },
- { "reset", 60, charcommand_reset },
- { "save", 60, charcommand_save },
- { "spiritball", 40, charcommand_spiritball },
- { "itemlist", 40, charcommand_itemlist },
- { "effect", 40, charcommand_effect },
- { "storagelist", 40, charcommand_storagelist },
- { "item", 60, charcommand_item },
- { "warp", 60, charcommand_warp },
- { "rura", 60, charcommand_warp },
- { "rura+", 60, charcommand_warp },
- { "zeny", 60, charcommand_zeny },
- { "fakename", 50, charcommand_fakename },
- { "baselvl", 60, charcommand_baselevel },
- { "baselevel", 60, charcommand_baselevel },
- { "blvl", 60, charcommand_baselevel },
- { "blevel", 60, charcommand_baselevel },
- { "joblvl", 60, charcommand_joblevel },
- { "joblevel", 60, charcommand_joblevel },
- { "jlvl", 60, charcommand_joblevel },
- { "jlevel", 60, charcommand_joblevel },
- { "questskill", 60, charcommand_questskill },
- { "lostskill", 60, charcommand_lostskill },
- { "skreset", 60, charcommand_skreset },
- { "streset", 60, charcommand_streset },
- { "model", 50, charcommand_model },
- { "skpoint", 60, charcommand_skpoint },
- { "stpoint", 60, charcommand_stpoint },
- { "changesex", 60, charcommand_changesex },
- { "feelreset", 60, charcommand_feelreset },
- { "help", 20, charcommand_help },
- { "load", 60, charcommand_load },
- { "speed", 60, charcommand_speed },
- { "storage", 60, charcommand_storage },
- { "gstorage", 60, charcommand_guildstorage },
- { "hide", 60, charcommand_hide },
- { "alive", 60, charcommand_alive },
- { "revive", 60, charcommand_alive },
- { "heal", 60, charcommand_heal },
- { "item2", 60, charcommand_item2 },
- { "itemreset", 60, charcommand_itemreset },
- { "refine", 60, charcommand_refine },
- { "produce", 60, charcommand_produce },
- { "str", 60, charcommand_param },
- { "agi", 60, charcommand_param },
- { "vit", 60, charcommand_param },
- { "int", 60, charcommand_param },
- { "dex", 60, charcommand_param },
- { "luk", 60, charcommand_param },
- { "glvl", 60, charcommand_guildlevelup },
- { "glevel", 60, charcommand_guildlevelup },
- { "guildlvl", 60, charcommand_guildlevelup },
- { "guildlevel", 60, charcommand_guildlevelup },
- { "hatch", 50, charcommand_hatch },
- { "pethungry", 60, charcommand_pethungry },
- { "allskill", 60, charcommand_allskill },
- { "allskills", 60, charcommand_allskill },
- { "skillall", 60, charcommand_allskill },
- { "skillsall", 60, charcommand_allskill },
- { "dye", 50, charcommand_dye },
- { "hairstyle", 50, charcommand_hair_style },
- { "hstyle", 50, charcommand_hair_style },
- { "haircolor", 50, charcommand_hair_color },
- { "hcolor", 50, charcommand_hair_color },
- { "allstat", 60, charcommand_allstats },
- { "allstats", 60, charcommand_allstats },
- { "statall", 60, charcommand_allstats },
- { "statsall", 60, charcommand_allstats },
- { "mount", 50, charcommand_mount_peco },
- { "mountpeco", 50, charcommand_mount_peco },
- { "delitem", 60, charcommand_delitem },
- { "jailtime", 40, charcommand_jailtime },
- { "disguise", 60, charcommand_disguise },
- { "undisguise", 60, charcommand_undisguise },
- { "cartlist", 40, charcommand_cart_list },
- { "killer", 60, charcommand_killer },
- { "killable", 60, charcommand_killable },
- { "dropall", 60, charcommand_dropall },
- { "storeall", 60, charcommand_storeall },
- { "refresh", 40, charcommand_refresh },
- { "exp", 1, charcommand_exp },
- { "monsterignore", 60, charcommand_monsterignore },
- { "size", 50, charcommand_size },
- { "hlvl", 60, charcommand_homlevel },
- { "hlevel", 60, charcommand_homlevel },
- { "homlvl", 60, charcommand_homlevel },
- { "homlevel", 60, charcommand_homlevel },
- { "homevolve", 60, charcommand_homevolution },
- { "homevolution", 60, charcommand_homevolution },
- { "homfriendly", 60, charcommand_homfriendly },
- { "homhungry", 60, charcommand_homhungry },
- { "hominfo", 40, charcommand_hominfo },
- { "cash", 60, charcommand_cash },
- { "points", 60, charcommand_cash },
-};
-
-
-/*==========================================
- * Command lookup functions
- *------------------------------------------*/
-static CharCommandInfo* get_charcommandinfo_byname(const char* name)
-{
- int i;
- if( *name == charcommand_symbol ) name++; // for backwards compatibility
- ARR_FIND( 0, ARRAYLENGTH(charcommand_info), i, strcmpi(charcommand_info[i].command, name) == 0 );
- return ( i < ARRAYLENGTH(charcommand_info) ) ? &charcommand_info[i] : NULL;
-}
-
-static CharCommandInfo* get_charcommandinfo_byfunc(const CharCommandFunc func)
-{
- int i;
- ARR_FIND( 0, ARRAYLENGTH(charcommand_info), i, charcommand_info[i].func == func );
- return ( i < ARRAYLENGTH(charcommand_info) ) ? &charcommand_info[i] : NULL;
-}
-
-
-/*==========================================
- * Retrieve the command's required gm level
- *------------------------------------------*/
-int get_charcommand_level(const CharCommandFunc func)
-{
- CharCommandInfo* info = get_charcommandinfo_byfunc(func);
- return ( info != NULL ) ? info->level : 100; // 100: command can not be used
-}
-
-
-/// Executes a char-command.
-/// To be called by internal server code (bypasses various restrictions).
-bool is_charcommand_sub(const int fd, struct map_session_data* sd, const char* str, int gmlvl)
-{
- CharCommandInfo* info;
- char command[100];
- char args[100];
- char output[200];
-
- if( !str || !*str )
- return false;
-
- if( *str != charcommand_symbol ) // check first char
- return false;
-
- if( sscanf(str, "%99s %99[^\n]", command, args) < 2 )
- args[0] = '\0';
-
- info = get_charcommandinfo_byname(command);
- if( info == NULL || info->func == NULL || gmlvl < info->level )
- {
- if( gmlvl == 0 )
- return false; // will just display as normal text
- else
- {
- sprintf(output, msg_txt(153), command); // "%s is Unknown Command."
- clif_displaymessage(fd, output);
- return true;
- }
- }
-
- if( log_config.gm && info->level >= log_config.gm )
- log_atcommand(sd, str);
-
- if( info->func(fd, sd, command, args) != 0 )
- {
- sprintf(output, msg_txt(154), command); // "%s failed."
- clif_displaymessage(fd, output);
- }
-
- return true;
-}
-
-/// Executes a char-command.
-/// To be used by player-invoked code (restrictions will be applied)
-bool is_charcommand(const int fd, struct map_session_data* sd, const char* message)
-{
- int gmlvl = pc_isGM(sd);
-
- nullpo_retr(false, sd);
-
- if( !message || !*message )
- return false;
-
- if( sd->sc.data[SC_NOCHAT] && sd->sc.data[SC_NOCHAT]->val1&MANNER_NOCOMMAND )
- return true; // so that it won't display as normal message
-
- if( battle_config.atc_gmonly != 0 && gmlvl == 0 )
- return false;
-
- if( map[sd->bl.m].nocommand && gmlvl < map[sd->bl.m].nocommand )
- {
- clif_displaymessage(fd, msg_txt(143)); // "Commands are disabled on this map."
- return false;
- }
-
- // skip 10/11-langtype's codepage indicator, if detected
- if( message[0] == '|' && strlen(message) >= 4 && message[3] == charcommand_symbol )
- message += 3;
-
- return is_charcommand_sub(fd,sd,message,gmlvl);
-}
-
-
-/*==========================================
- *
- *------------------------------------------*/
-int charcommand_config_read(const char* cfgName)
-{
- char line[1024], w1[1024], w2[1024];
- CharCommandInfo* p;
- FILE* fp;
-
- if( (fp = fopen(cfgName, "r")) == NULL )
- {
- ShowError("CharCommand configuration file not found: %s\n", cfgName);
- return 1;
- }
-
- while( fgets(line, sizeof(line), fp) )
- {
- if( line[0] == '/' && line[1] == '/' )
- continue;
-
- if( sscanf(line, "%1023[^:]:%1023s", w1, w2) != 2 )
- continue;
-
- p = get_charcommandinfo_byname(w1);
- if( p != NULL )
- {
- p->level = atoi(w2);
- p->level = cap_value(p->level, 0, 100);
- }
- else
- if( strcmpi(w1, "import") == 0 )
- charcommand_config_read(w2);
- else
- if( strcmpi(w1, "command_symbol") == 0 &&
- w2[0] > 31 && // control characters
- w2[0] != '/' && // symbol of standard ragnarok GM commands
- w2[0] != '%' && // symbol of party chat speaking
- w2[0] != '$' && // symbol of guild chat speaking
- w2[0] != '@' ) // symbol of atcommand
- charcommand_symbol = w2[0];
- else
- ShowWarning("Unknown setting '%s' in file %s\n", w1, cfgName);
- }
- fclose(fp);
-
- return 0;
-}
+// Copyright (c) Athena Dev Teams - Licensed under GNU GPL
+// For more information, see LICENCE in the main folder
+
+#include "../common/cbasetypes.h"
+#include "../common/mmo.h"
+#include "../common/timer.h"
+#include "../common/nullpo.h"
+#include "../common/showmsg.h"
+#include "../common/strlib.h"
+#include "../common/utils.h"
+
+#include "atcommand.h" // msg_txt()
+#include "charcommand.h"
+#include "battle.h"
+#include "clif.h"
+#include "chrif.h"
+#include "intif.h"
+#include "itemdb.h"
+#include "log.h"
+#include "map.h"
+#include "pc.h"
+#include "status.h"
+#include "skill.h"
+#include "mob.h"
+#include "npc.h"
+#include "pet.h"
+#include "homunculus.h"
+#include "party.h"
+#include "guild.h"
+#include "script.h"
+#include "trade.h"
+#include "unit.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <math.h>
+
+char charcommand_symbol = '#';
+
+extern char *msg_table[1000]; // Server messages (0-499 reserved for GM commands, 500-999 reserved for others)
+
+#define CCMD_FUNC(x) int charcommand_ ## x (const int fd, struct map_session_data* sd, const char* command, const char* message)
+
+typedef struct CharCommandInfo {
+ const char* command;
+ int level;
+ CharCommandFunc func;
+} CharCommandInfo;
+
+static CharCommandInfo* get_charcommandinfo_byname(const char* name);
+static CharCommandInfo* get_charcommandinfo_byfunc(const CharCommandFunc func);
+
+
+/*==========================================
+ * 対象キャラクターを転職させる upper指定で転生や養子も可能
+ *------------------------------------------*/
+int charcommand_jobchange(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[100];
+ struct map_session_data* pl_sd;
+ int job = 0, upper = -1;
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &job, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a job and a player name (usage: #job/#jobchange <job ID> <player>).");
+ clif_displaymessage(fd, " 0 Novice 7 Knight 14 Crusader 21 Peco Crusader");
+ clif_displaymessage(fd, " 1 Swordman 8 Priest 15 Monk 22 N/A");
+ clif_displaymessage(fd, " 2 Mage 9 Wizard 16 Sage 23 Super Novice");
+ clif_displaymessage(fd, " 3 Archer 10 Blacksmith 17 Rogue 24 Gunslinger");
+ clif_displaymessage(fd, " 4 Acolyte 11 Hunter 18 Alchemist 25 Ninja");
+ clif_displaymessage(fd, " 5 Merchant 12 Assassin 19 Bard 26 N/A");
+ clif_displaymessage(fd, " 6 Thief 13 Peco Knight 20 Dancer");
+ clif_displaymessage(fd, "4001 Novice High 4008 Lord Knight 4015 Paladin 4022 Peco Paladin");
+ clif_displaymessage(fd, "4002 Swordman High 4009 High Priest 4016 Champion");
+ clif_displaymessage(fd, "4003 Mage High 4010 High Wizard 4017 Professor");
+ clif_displaymessage(fd, "4004 Archer High 4011 Whitesmith 4018 Stalker");
+ clif_displaymessage(fd, "4005 Acolyte High 4012 Sniper 4019 Creator");
+ clif_displaymessage(fd, "4006 Merchant High 4013 Assassin Cross 4020 Clown");
+ clif_displaymessage(fd, "4007 Thief High 4014 Peco Lord Knight 4021 Gypsy");
+ clif_displaymessage(fd, "4023 Baby Novice 4030 Baby Knight 4037 Baby Crusader 4044 Baby Peco Crusader");
+ clif_displaymessage(fd, "4024 Baby Swordsman 4031 Baby Priest 4038 Baby Monk 4045 Super Baby");
+ clif_displaymessage(fd, "4025 Baby Mage 4032 Baby Wizard 4039 Baby Sage 4046 Taekwon Kid");
+ clif_displaymessage(fd, "4026 Baby Archer 4033 Baby Blacksmith 4040 Baby Rogue 4047 Taekwon Master");
+ clif_displaymessage(fd, "4027 Baby Acolyte 4034 Baby Hunter 4041 Baby Alchemist 4048 N/A");
+ clif_displaymessage(fd, "4028 Baby Merchant 4035 Baby Assassin 4042 Baby Bard 4049 Soul Linker");
+ clif_displaymessage(fd, "4029 Baby Thief 4036 Baby Peco-Knight 4043 Baby Dancer");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) == NULL) {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!pcdb_checkid(job)) {
+ clif_displaymessage(fd, msg_txt(49)); // Invalid job ID.
+ return -1;
+ }
+
+ if (pc_jobchange(pl_sd, job, upper) != 0) {
+ clif_displaymessage(fd, msg_txt(192)); // Unable to change the specified character's job.
+ return -1;
+ }
+
+ clif_displaymessage(fd, msg_txt(48)); // Character's job changed.
+ return 0;
+}
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_petrename(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ struct pet_data *pd;
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #petrename <player>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) == NULL) {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if (!pl_sd->status.pet_id || !pl_sd->pd) {
+ clif_displaymessage(fd, msg_txt(191)); // Sorry, but this player has no pet.
+ return -1;
+ }
+
+ pd = pl_sd->pd;
+
+ if (pd->pet.rename_flag) {
+ clif_displaymessage(fd, msg_txt(190)); // This player can already rename his/her pet.
+ return -1;
+ }
+ pd->pet.rename_flag = 0;
+ intif_save_petdata(pl_sd->status.account_id, &pd->pet);
+ clif_send_petstatus(pl_sd);
+ clif_displaymessage(fd, msg_txt(189)); // This player can now rename his/her pet.
+ return 0;
+}
+
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_petfriendly(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int friendly = 0;
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ struct pet_data *pd;
+
+ memset(character, '\0', sizeof(character));
+ if (!message || !*message || sscanf(message,"%d %23s",&friendly,character) < 2) {
+ clif_displaymessage(fd, "Please, enter a valid value (usage: #petfriendly <0-1000> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!pl_sd->status.pet_id || !pl_sd->pd) {
+ clif_displaymessage(fd, msg_txt(191)); // Sorry, but this player has no pet.
+ return -1;
+ }
+
+ friendly = cap_value(friendly, 0, 1000);
+
+ pd = pl_sd->pd;
+ if (friendly == pd->pet.intimate) {
+ clif_displaymessage(fd, msg_txt(183)); // Pet friendly is already the good value.
+ return -1;
+ }
+
+ pd->pet.intimate = friendly;
+ clif_send_petstatus(pl_sd);
+ clif_pet_emotion(pd,0);
+ clif_displaymessage(pl_sd->fd, msg_txt(182)); // Pet friendly value changed!
+ clif_displaymessage(sd->fd, msg_txt(182)); // Pet friendly value changed!
+ return 0;
+}
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_stats(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ char job_jobname[100];
+ char output[200];
+ struct map_session_data *pl_sd;
+ int i;
+ struct {
+ const char* format;
+ int value;
+ } output_table[] = {
+ { "Base Level - %d", 0 },
+ { NULL, 0 },
+ { "Hp - %d", 0 },
+ { "MaxHp - %d", 0 },
+ { "Sp - %d", 0 },
+ { "MaxSp - %d", 0 },
+ { "Str - %3d", 0 },
+ { "Agi - %3d", 0 },
+ { "Vit - %3d", 0 },
+ { "Int - %3d", 0 },
+ { "Dex - %3d", 0 },
+ { "Luk - %3d", 0 },
+ { "Zeny - %d", 0 },
+ { "Free SK Points - %d", 0 },
+ { "JobChangeLvl - %d", 0 },
+ { NULL, 0 }
+ };
+
+ memset(character, '\0', sizeof(character));
+ memset(job_jobname, '\0', sizeof(job_jobname));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #stats <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ //direct array initialization with variables is not standard C compliant.
+ output_table[0].value = pl_sd->status.base_level;
+ output_table[1].format = job_jobname;
+ output_table[1].value = pl_sd->status.job_level;
+ output_table[2].value = pl_sd->status.hp;
+ output_table[3].value = pl_sd->status.max_hp;
+ output_table[4].value = pl_sd->status.sp;
+ output_table[5].value = pl_sd->status.max_sp;
+ output_table[6].value = pl_sd->status.str;
+ output_table[7].value = pl_sd->status.agi;
+ output_table[8].value = pl_sd->status.vit;
+ output_table[9].value = pl_sd->status.int_;
+ output_table[10].value = pl_sd->status.dex;
+ output_table[11].value = pl_sd->status.luk;
+ output_table[12].value = pl_sd->status.zeny;
+ output_table[13].value = pl_sd->status.skill_point;
+ output_table[14].value = pl_sd->change_level;
+
+ sprintf(job_jobname, "Job - %s %s", job_name(pl_sd->status.class_), "(level %d)");
+ sprintf(output, msg_txt(53), pl_sd->status.name); // '%s' stats:
+
+ clif_displaymessage(fd, output);
+
+ for (i = 0; output_table[i].format != NULL; i++) {
+ sprintf(output, output_table[i].format, output_table[i].value);
+ clif_displaymessage(fd, output);
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Character Reset
+ *------------------------------------------*/
+int charcommand_reset(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #reset <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pc_resetstate(pl_sd);
+ pc_resetskill(pl_sd,1);
+ sprintf(output, msg_txt(208), character); // '%s' skill and stat points have been reset.
+ clif_displaymessage(fd, output);
+
+ return 0;
+}
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_option(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ int opt1 = 0, opt2 = 0, opt3 = 0;
+ struct map_session_data* pl_sd;
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message ||
+ sscanf(message, "%d %d %d %23[^\n]", &opt1, &opt2, &opt3, character) < 4 ||
+ opt1 < 0 || opt2 < 0 || opt3 < 0) {
+ clif_displaymessage(fd, "Please, enter valid options and a player name (usage: #option <param1> <param2> <param3> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pl_sd->sc.opt1 = opt1;
+ pl_sd->sc.opt2 = opt2;
+ pc_setoption(pl_sd, opt3);
+ clif_displaymessage(fd, msg_txt(58)); // Character's options changed.
+
+ return 0;
+}
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_save(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char map_name[MAP_NAME_LENGTH_EXT];
+ char character[NAME_LENGTH];
+ struct map_session_data* pl_sd;
+ int x = 0, y = 0;
+ int m;
+
+ memset(map_name, '\0', sizeof(map_name));
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%15s %d %d %23[^\n]", map_name, &x, &y, character) < 4 || x < 0 || y < 0) {
+ clif_displaymessage(fd, "Please, enter a valid save point and a player name (usage: #save <map> <x> <y> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ m = map_mapname2mapid(map_name);
+ if (m < 0 && !mapindex_name2id(map_name)) {
+ clif_displaymessage(fd, msg_txt(1)); // Map not found.
+ return -1;
+ }
+
+ //FIXME: What do you do if the map is in another map server with the nowarpto flag?
+ if (m>=0 && map[m].flag.nosave && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
+ clif_displaymessage(fd, "You are not authorised to set this map as a save map.");
+ return -1;
+ }
+
+ if (m>=0)
+ pc_setsavepoint(pl_sd, map[m].index, x, y);
+ else
+ pc_setsavepoint(pl_sd, mapindex_name2id(map_name), x, y);
+ clif_displaymessage(fd, msg_txt(57)); // Character's save point changed.
+
+ return 0;
+}
+
+/*==========================================
+ * CharSpiritBall Function by PalasX
+ *------------------------------------------*/
+int charcommand_spiritball(const int fd, struct map_session_data* sd,const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char character[NAME_LENGTH];
+ int spirit = 0;
+
+ memset(character, '\0', sizeof(character));
+
+ if(!message || !*message || sscanf(message, "%d %23[^\n]", &spirit, character) < 2 || spirit < 0 || spirit > 1000) {
+ clif_displaymessage(fd, "Usage: @spiritball <number: 0-1000> <player>.");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if (spirit >= 0 && spirit <= 0x7FFF) {
+ if (pl_sd->spiritball != spirit || spirit > 999) {
+ if (pl_sd->spiritball > 0)
+ pc_delspiritball(pl_sd, pl_sd->spiritball, 1);
+ }
+ pl_sd->spiritball = spirit;
+ clif_spiritball(pl_sd);
+ // no message, player can look the difference
+ if (spirit > 1000)
+ clif_displaymessage(fd, msg_txt(204)); // WARNING: more than 1000 spiritballs can CRASH your server and/or client!
+ } else {
+ clif_displaymessage(fd, msg_txt(205)); // You already have that number of spiritballs.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * #itemlist <character>: Displays the list of a player's items.
+ *------------------------------------------*/
+int charcommand_itemlist(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ struct item_data *item_data, *item_temp;
+ int i, j, equip, count, counter, counter2;
+ char character[NAME_LENGTH], output[200], equipstr[100], outputtmp[200];
+ struct item *i_item; //Current inventory item.
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+ memset(equipstr, '\0', sizeof(equipstr));
+ memset(outputtmp, '\0', sizeof(outputtmp));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #itemlist <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ counter = 0;
+ count = 0;
+ for (i = 0; i < MAX_INVENTORY; i++) {
+ i_item = &pl_sd->status.inventory[i];
+ if (pl_sd->status.inventory[i].nameid > 0 && (item_data = itemdb_exists(i_item->nameid)) != NULL) {
+ counter = counter + i_item->amount;
+ count++;
+ if (count == 1) {
+ sprintf(output, "------ Items list of '%s' ------", pl_sd->status.name);
+ clif_displaymessage(fd, output);
+ }
+ if ((equip = i_item->equip)) {
+ strcpy(equipstr, "| equiped: ");
+ if (equip & EQP_GARMENT)
+ strcat(equipstr, "robe/gargment, ");
+ if (equip & EQP_ACC_L)
+ strcat(equipstr, "left accessory, ");
+ if (equip & EQP_ARMOR)
+ strcat(equipstr, "body/armor, ");
+ if ((equip & EQP_ARMS) == EQP_HAND_R)
+ strcat(equipstr, "right hand, ");
+ if ((equip & EQP_ARMS) == EQP_HAND_L)
+ strcat(equipstr, "left hand, ");
+ if ((equip & EQP_ARMS) == EQP_ARMS)
+ strcat(equipstr, "both hands, ");
+ if (equip & EQP_SHOES)
+ strcat(equipstr, "feet, ");
+ if (equip & EQP_ACC_R)
+ strcat(equipstr, "right accessory, ");
+ if ((equip & EQP_HELM) == EQP_HEAD_LOW)
+ strcat(equipstr, "lower head, ");
+ if ((equip & EQP_HELM) == EQP_HEAD_TOP)
+ strcat(equipstr, "top head, ");
+ if ((equip & EQP_HELM) == (EQP_HEAD_LOW|EQP_HEAD_TOP))
+ strcat(equipstr, "lower/top head, ");
+ if ((equip & EQP_HELM) == EQP_HEAD_MID)
+ strcat(equipstr, "mid head, ");
+ if ((equip & EQP_HELM) == (EQP_HEAD_LOW|EQP_HEAD_MID))
+ strcat(equipstr, "lower/mid head, ");
+ if ((equip & EQP_HELM) == EQP_HELM)
+ strcat(equipstr, "lower/mid/top head, ");
+ // remove final ', '
+ equipstr[strlen(equipstr) - 2] = '\0';
+ } else
+ memset(equipstr, '\0', sizeof(equipstr));
+ if (i_item->refine)
+ sprintf(output, "%d %s %+d (%s %+d, id: %d) %s", i_item->amount, item_data->name, i_item->refine, item_data->jname, i_item->refine, i_item->nameid, equipstr);
+ else
+ sprintf(output, "%d %s (%s, id: %d) %s", i_item->amount, item_data->name, item_data->jname, i_item->nameid, equipstr);
+ clif_displaymessage(fd, output);
+ memset(output, '\0', sizeof(output));
+ counter2 = 0;
+
+ if(i_item->card[0]==CARD0_PET) { //pet eggs
+ if (i_item->card[3])
+ sprintf(outputtmp, " -> (pet egg, pet id: %u, named)", (unsigned int)MakeDWord(i_item->card[1], i_item->card[2]));
+ else
+ sprintf(outputtmp, " -> (pet egg, pet id: %u, unnamed)", (unsigned int)MakeDWord(i_item->card[1], i_item->card[2]));
+ strcat(output, outputtmp);
+ } else
+ if(i_item->card[0]==CARD0_FORGE) { //forged items.
+ sprintf(outputtmp, " -> (crafted item, creator id: %u, star crumbs %d, element %d)", (unsigned int)MakeDWord(i_item->card[2], i_item->card[3]), i_item->card[1]>>8, i_item->card[1]&0x0f);
+ } else
+ if(i_item->card[0]==CARD0_CREATE) { //created items.
+ sprintf(outputtmp, " -> (produced item, creator id: %u)", (unsigned int)MakeDWord(i_item->card[2], i_item->card[3]));
+ strcat(output, outputtmp);
+ } else //Normal slots
+ for (j = 0; j < item_data->slot; j++) {
+ if (pl_sd->status.inventory[i].card[j]) {
+ if ((item_temp = itemdb_exists(i_item->card[j])) != NULL) {
+ if (output[0] == '\0')
+ sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ else
+ sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ strcat(output, outputtmp);
+ }
+ }
+ }
+ if (output[0] != '\0') {
+ output[strlen(output) - 2] = ')';
+ output[strlen(output) - 1] = '\0';
+ clif_displaymessage(fd, output);
+ }
+ }
+ }
+ if (count == 0)
+ {
+ clif_displaymessage(fd, "No item found on this player.");
+ return -1;
+ }
+
+ sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
+ clif_displaymessage(fd, output);
+ return 0;
+}
+
+/*==========================================
+ * #effect by [MouseJstr]
+ *
+ * Create a effect localized on another character
+ *------------------------------------------*/
+int charcommand_effect(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd = NULL;
+ char character[NAME_LENGTH];
+ int type = 0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &type, character) != 2) {
+ clif_displaymessage(fd, "usage: #effect <type+> <target>.");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ clif_specialeffect(&pl_sd->bl, type, AREA);
+ clif_displaymessage(fd, msg_txt(229)); // Your effect has changed.
+
+ return 0;
+}
+
+/*==========================================
+ * #storagelist <character>: Displays the items list of a player's storage.
+ *------------------------------------------*/
+int charcommand_storagelist(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ struct item_data *item_data, *item_temp;
+ int i, j, count = 0, counter = 0, counter2 = 0;
+ char character[NAME_LENGTH], output[200], outputtmp[200];
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+ memset(outputtmp, '\0', sizeof(outputtmp));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #itemlist <char name>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ for (i = 0; i < MAX_STORAGE; i++)
+ {
+ struct item* it = &pl_sd->status.storage.items[i];
+ if( it->nameid > 0 && (item_data = itemdb_search(it->nameid)) != NULL )
+ {
+ counter = counter + it->amount;
+ count++;
+ if (count == 1) {
+ sprintf(output, "------ Storage items list of '%s' ------", pl_sd->status.name);
+ clif_displaymessage(fd, output);
+ }
+ if (it->refine)
+ sprintf(output, "%d %s %+d (%s %+d, id: %d)", it->amount, item_data->name, it->refine, item_data->jname, it->refine, it->nameid);
+ else
+ sprintf(output, "%d %s (%s, id: %d)", it->amount, item_data->name, item_data->jname, it->nameid);
+ clif_displaymessage(fd, output);
+
+ memset(output, '\0', sizeof(output));
+ counter2 = 0;
+ for (j = 0; j < item_data->slot; j++) {
+ if (it->card[j]) {
+ if ((item_temp = itemdb_search(it->card[j])) != NULL) {
+ if (output[0] == '\0')
+ sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ else
+ sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ strcat(output, outputtmp);
+ }
+ }
+ }
+ if (output[0] != '\0') {
+ output[strlen(output) - 2] = ')';
+ output[strlen(output) - 1] = '\0';
+ clif_displaymessage(fd, output);
+ }
+ }
+ }
+
+ if (count == 0)
+ clif_displaymessage(fd, "No item found in the storage of this player.");
+ else {
+ sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
+ clif_displaymessage(fd, output);
+ }
+
+ return 0;
+}
+
+static void charcommand_item_sub(struct map_session_data *sd,struct item_data *item_data,int number)
+{
+ int loop, get_count, pet_id, i;
+
+ if( sd == NULL || item_data == NULL )
+ return;
+
+ if( !itemdb_isstackable2(item_data) ) {
+ loop = number; get_count = 1;
+ } else {
+ loop = 1; get_count = number;
+ }
+
+ for (i = 0; i < loop; i++)
+ {
+ if( (pet_id = search_petDB_index(item_data->nameid, PET_EGG)) >= 0 )
+ {// if pet egg
+ sd->catch_target_class = pet_db[pet_id].class_;
+ intif_create_pet(sd->status.account_id, sd->status.char_id,
+ (short)pet_db[pet_id].class_, (short)mob_db(pet_db[pet_id].class_)->lv,
+ (short)pet_db[pet_id].EggID, 0, (short)pet_db[pet_id].intimate,
+ 100, 0, 1, pet_db[pet_id].jname);
+ }
+ else
+ {// if not pet egg
+ int flag = 0;
+ struct item item_tmp;
+ memset(&item_tmp, 0, sizeof(item_tmp));
+ item_tmp.nameid = item_data->nameid;
+ item_tmp.identify = 1;
+
+ if ((flag = pc_additem(sd, &item_tmp, get_count)))
+ clif_additem(sd, 0, 0, flag);
+
+ //Logs (A)dmins items [Lupus]
+ if(log_config.enable_logs&0x400)
+ log_pick_pc(sd, "A", item_tmp.nameid, number, &item_tmp);
+ }
+ }
+}
+
+/*==========================================
+ * #item command (usage: #item <name/id_of_item> <quantity> <player>)
+ * by MC Cameri
+ *------------------------------------------*/
+int charcommand_item(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char item_name[100];
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ int number = 0, item_id;
+ struct item_data *item_data;
+ int gmlvl;
+ char tmp_cmdoutput[1024];
+ nullpo_retr(-1, sd);
+
+ memset(item_name, '\0', sizeof(item_name));
+
+ if (!message || !*message || (
+ sscanf(message, "\"%99[^\"]\" %d %23[^\n]", item_name, &number, character) < 3 &&
+ sscanf(message, "%99s %d %23[^\n]", item_name, &number, character) < 3
+ )) {
+ clif_displaymessage(fd, "Please, enter an item name/id (usage: #item <item name or ID> <quantity> <char name>).");
+ return -1;
+ }
+
+ if (number <= 0)
+ number = 1;
+
+ item_id = 0;
+ if ((item_data = itemdb_searchname(item_name)) != NULL ||
+ (item_data = itemdb_exists(atoi(item_name))) != NULL)
+ item_id = item_data->nameid;
+
+ if (item_id < 500) {
+ clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
+ return -1;
+ }
+
+ gmlvl = pc_isGM(sd);
+ if( !pc_can_give_items(gmlvl) )
+ {
+ clif_displaymessage(fd, msg_txt(246)); // GM is not allowed to trade
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) != NULL)
+ {
+ int pl_gmlvl = pc_isGM(pl_sd);
+ if( gmlvl < pl_gmlvl || !itemdb_cantrade_sub(item_data, gmlvl, pl_gmlvl) )
+ {// you can give items only to lower or same level
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ charcommand_item_sub(pl_sd,item_data,number);
+ clif_displaymessage(fd, msg_txt(18)); // Item created.
+ }
+ else if (strcmpi(character,"all")==0 || strcmpi(character,"everyone")==0)
+ {
+ struct s_mapiterator* iter = mapit_getallusers();
+ for( pl_sd = (TBL_PC*)mapit_first(iter); mapit_exists(iter); pl_sd = (TBL_PC*)mapit_next(iter) )
+ {
+ int pl_gmlvl = pc_isGM(pl_sd);
+ if( gmlvl < pl_gmlvl || !itemdb_cantrade_sub(item_data, gmlvl, pl_gmlvl) )
+ continue;
+
+ charcommand_item_sub(pl_sd,item_data,number);
+ clif_displaymessage(pl_sd->fd, msg_txt(18)); // Item created.
+ }
+ mapit_free(iter);
+
+ snprintf(tmp_cmdoutput, sizeof(tmp_cmdoutput), "Everyone received %s %d.",item_name,number);
+ clif_displaymessage(fd, tmp_cmdoutput);
+ }
+ else
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * #warp/#rura/#rura+ <mapname> <x> <y> <char name>
+ *------------------------------------------*/
+int charcommand_warp(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char map_name[MAP_NAME_LENGTH_EXT];
+ char character[NAME_LENGTH];
+ int x = 0, y = 0;
+ struct map_session_data *pl_sd;
+ int m;
+
+ nullpo_retr(-1, sd);
+
+ memset(map_name, '\0', sizeof(map_name));
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%15s %d %d %23[^\n]", map_name, &x, &y, character) < 4) {
+ clif_displaymessage(fd, "Usage: #warp/#rura/#rura+ <mapname> <x> <y> <char name>");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) == NULL) {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+ if (pc_isGM(sd) < pc_isGM(pl_sd)) { // you can rura+ only lower or same GM level
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ m = map_mapname2mapid(map_name);
+ if (m < 0) {
+ clif_displaymessage(fd, msg_txt(1)); // Map not found.
+ return -1;
+ }
+ if ((x || y) && map_getcell(m, x, y, CELL_CHKNOREACH)) {
+ clif_displaymessage(fd, msg_txt(2)); // Coordinates out of range.
+ x = y = 0;
+ }
+ if (map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
+ clif_displaymessage(fd, "You are not authorised to warp someone to this map.");
+ return -1;
+ }
+ if (pl_sd->bl.m >= 0 && map[pl_sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) {
+ clif_displaymessage(fd, "You are not authorised to warp this player from its actual map.");
+ return -1;
+ }
+ if (pc_setpos(pl_sd, map[m].index, x, y, 3) == 0) {
+ clif_displaymessage(pl_sd->fd, msg_txt(0)); // Warped.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(15)); // Player warped (message sends to player too).
+ return 0;
+ }
+ //No error message specified...?
+ return -1;
+}
+
+/*==========================================
+ * #zeny <charname>
+ *------------------------------------------*/
+int charcommand_zeny(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char character[NAME_LENGTH];
+ int zeny = 0, new_zeny;
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &zeny, character) < 2 || zeny == 0) {
+ clif_displaymessage(fd, "Please, enter a number and a player name (usage: #zeny <zeny> <name>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) != NULL) {
+ new_zeny = pl_sd->status.zeny + zeny;
+ if (zeny > 0 && (zeny > MAX_ZENY || new_zeny > MAX_ZENY)) // fix positiv overflow
+ new_zeny = MAX_ZENY;
+ else if (zeny < 0 && (zeny < -MAX_ZENY || new_zeny < 0)) // fix negativ overflow
+ new_zeny = 0;
+ if (new_zeny != pl_sd->status.zeny) {
+ pl_sd->status.zeny = new_zeny;
+ clif_updatestatus(pl_sd, SP_ZENY);
+ clif_displaymessage(fd, msg_txt(211)); // Character's current zeny changed.
+ } else {
+ if (zeny < 0)
+ clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
+ else
+ clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * #cash or #points <amount> <charname>
+ *------------------------------------------*/
+int charcommand_cash(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char character[NAME_LENGTH];
+ int value = 0;
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+
+ if( !message || !*message || sscanf(message, "%d %23[^\n]", &value, character) < 2 || value == 0 )
+ {
+ clif_displaymessage(fd, "Please, enter a number and a player name (usage: #cash|#points <points> <name>).");
+ return -1;
+ }
+
+ if( (pl_sd = map_nick2sd(character)) != NULL )
+ {
+ if( !strcmpi(command+1,"cash") )
+ {
+ if( value > 0 )
+ pc_getcash(pl_sd, value, 0);
+ else
+ pc_paycash(pl_sd, -value, 0);
+
+ clif_displaymessage(fd, "Character's Cash Points changed!.");
+ }
+ else
+ { // @points
+ if( value > 0 )
+ pc_getcash(pl_sd, 0, value);
+ else
+ pc_paycash(pl_sd, -value, -value);
+
+ clif_displaymessage(fd, "Character's Kafra Points changed!.");
+ }
+ }
+ else
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * #fakename <char name> <fake name>
+ *------------------------------------------*/
+int charcommand_fakename(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char name[NAME_LENGTH];
+ char char_name[NAME_LENGTH];
+
+ nullpo_retr(-1, sd);
+
+ name[0] = '\0'; //If you don't pass a second word, name is left as garbage, most definitely not a blank name! [Skotlex]
+ if (!message || !*message || sscanf(message, "%23s %23[^\n]", char_name, name) < 1) {
+ clif_displaymessage(sd->fd,"Usage: #fakename <char name> <fake name>.");
+ clif_displaymessage(sd->fd,"Or: #fakename <char name> to disable.");
+ return 0;
+ }
+
+ if(!(pl_sd = map_nick2sd(char_name))) {
+ clif_displaymessage(sd->fd,"Character not found.");
+ return -1;
+ }
+
+ if(!name[0]) {
+ if(strlen(pl_sd->fakename) > 1) {
+ pl_sd->fakename[0]='\0';
+ clif_charnameack(0, &pl_sd->bl);
+ clif_displaymessage(sd->fd,"Returned to real name.");
+ } else {
+ clif_displaymessage(sd->fd,"Character does not has a fake name.");
+ }
+ return 0;
+ }
+
+ if(strlen(name) < 2) {
+ clif_displaymessage(sd->fd,"Fake name must be at least two characters.");
+ return 0;
+ }
+
+ memcpy(pl_sd->fakename, name, NAME_LENGTH);
+ clif_charnameack(0, &pl_sd->bl);
+ clif_displaymessage(sd->fd,"Fake name enabled.");
+
+ return 0;
+}
+
+
+/*==========================================
+ * #baselvl <#> <nickname>
+ * Transferred by: Kevin
+ *------------------------------------------*/
+int charcommand_baselevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int level = 0, i, status_point=0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, player) < 2 || level == 0) {
+ clif_displaymessage(fd, "Please, enter a level adjustment and a player name (usage: #baselvl <#> <nickname>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) == NULL) {
+ clif_displaymessage(fd, msg_table[3]); // Character not found.
+ return -1;
+ }
+ if (pc_isGM(sd) < pc_isGM(pl_sd)) { // you can change base level only lower or same gm level
+ clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (level > 0) {
+ if (pl_sd->status.base_level == pc_maxbaselv(pl_sd)) { // check for max level by Valaris
+ clif_displaymessage(fd, msg_table[91]); // Character's base level can't go any higher.
+ return 0;
+ } // End Addition
+ if ((unsigned int)level > pc_maxbaselv(pl_sd) ||
+ pl_sd->status.base_level > pc_maxbaselv(pl_sd) -level)
+ level = pc_maxbaselv(pl_sd) - pl_sd->status.base_level;
+ for (i = 1; i <= level; i++)
+ status_point += (pl_sd->status.base_level + i + 14) / 5;
+
+ if (pl_sd->status.status_point > USHRT_MAX - status_point)
+ pl_sd->status.status_point = USHRT_MAX;
+ else
+ pl_sd->status.status_point += status_point;
+ pl_sd->status.base_level += (unsigned int)level;
+ status_percent_heal(&pl_sd->bl, 100, 100);
+ clif_misceffect(&pl_sd->bl, 0);
+ clif_displaymessage(fd, msg_table[65]); // Character's base level raised.
+ } else {
+ if (pl_sd->status.base_level == 1) {
+ clif_displaymessage(fd, msg_table[193]); // Character's base level can't go any lower.
+ return -1;
+ }
+ level *= -1;
+ if ((unsigned int)level >= pl_sd->status.base_level)
+ level = pl_sd->status.base_level -1;
+ for (i = 0; i > -level; i--)
+ status_point += (pl_sd->status.base_level +i + 14) / 5;
+ if (pl_sd->status.status_point < status_point)
+ pc_resetstate(pl_sd);
+ if (pl_sd->status.status_point < status_point)
+ pl_sd->status.status_point = 0;
+ else
+ pl_sd->status.status_point -= status_point;
+ pl_sd->status.base_level -= (unsigned int)level;
+ clif_displaymessage(fd, msg_table[66]); // Character's base level lowered.
+ }
+ clif_updatestatus(pl_sd, SP_BASELEVEL);
+ clif_updatestatus(pl_sd, SP_NEXTBASEEXP);
+ clif_updatestatus(pl_sd, SP_STATUSPOINT);
+ status_calc_pc(pl_sd, 0);
+ if(pl_sd->status.party_id)
+ party_send_levelup(pl_sd);
+ return 0; //正常終了
+}
+
+/*==========================================
+ * #jlvl <#> <nickname>
+ * Transferred by: Kevin
+ *------------------------------------------*/
+int charcommand_joblevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int level = 0;
+ //転生や養子の場合の元の職業を算出する
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, player) < 2 || level == 0) {
+ clif_displaymessage(fd, "Please, enter a level adjustment and a player name (usage: #joblvl <#> <nickname>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can change job level only lower or same gm level
+ if (level > 0) {
+ if (pl_sd->status.job_level == pc_maxjoblv(pl_sd)) {
+ clif_displaymessage(fd, msg_txt(67)); // Character's job level can't go any higher.
+ return -1;
+ }
+ if ((unsigned int)level > pc_maxjoblv(pl_sd) ||
+ pl_sd->status.job_level > pc_maxjoblv(pl_sd) -level)
+ level = pc_maxjoblv(pl_sd) - pl_sd->status.job_level;
+ pl_sd->status.job_level += (unsigned int)level;
+ clif_updatestatus(pl_sd, SP_JOBLEVEL);
+ clif_updatestatus(pl_sd, SP_NEXTJOBEXP);
+
+ if (pl_sd->status.skill_point > USHRT_MAX - level)
+ pl_sd->status.skill_point = USHRT_MAX;
+ else
+ pl_sd->status.skill_point += level;
+ clif_updatestatus(pl_sd, SP_SKILLPOINT);
+ status_calc_pc(pl_sd, 0);
+ clif_misceffect(&pl_sd->bl, 1);
+ clif_displaymessage(fd, msg_txt(68)); // character's job level raised.
+ } else {
+ if (pl_sd->status.job_level == 1) {
+ clif_displaymessage(fd, msg_txt(194)); // Character's job level can't go any lower.
+ return -1;
+ }
+ level*=-1;
+ if ((unsigned int)level >= pl_sd->status.job_level)
+ level = pl_sd->status.job_level-1;
+ pl_sd->status.job_level -= (unsigned int)level;
+ clif_updatestatus(pl_sd, SP_JOBLEVEL);
+ clif_updatestatus(pl_sd, SP_NEXTJOBEXP);
+ if (pl_sd->status.skill_point < level)
+ pc_resetskill(pl_sd, 0); //Need more skill points to substract
+ if (pl_sd->status.skill_point < level)
+ pl_sd->status.skill_point = 0;
+ else
+ pl_sd->status.skill_point -= level;
+ clif_updatestatus(pl_sd, SP_SKILLPOINT);
+ status_calc_pc(pl_sd, 0);
+ clif_displaymessage(fd, msg_txt(69)); // Character's job level lowered.
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+
+/*==========================================
+ * #questskill <skill_#> <nickname>
+ * Transferred by: Kevin
+ *------------------------------------------*/
+int charcommand_questskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int skill_id = 0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &skill_id, player) < 2 || skill_id < 0) {
+ clif_displaymessage(fd, "Please, enter a quest skill number and a player name (usage: #questskill <#:0+> <nickname>).");
+ return -1;
+ }
+
+ if (skill_id < 0 && skill_id >= MAX_SKILL_DB) {
+ clif_displaymessage(fd, msg_txt(198)); // This skill number doesn't exist.
+ return -1;
+ }
+ if (!(skill_get_inf2(skill_id) & INF2_QUEST_SKILL)) {
+ clif_displaymessage(fd, msg_txt(197)); // This skill number doesn't exist or isn't a quest skill.
+ return -1;
+ }
+ if ((pl_sd = map_nick2sd(player)) == NULL) {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+ if (pc_checkskill(pl_sd, skill_id) > 0) {
+ clif_displaymessage(fd, msg_txt(200)); // This player already has this quest skill.
+ return -1;
+ }
+
+ pc_skill(pl_sd, skill_id, 1, 0);
+ clif_displaymessage(fd, msg_txt(199)); // This player has learned the skill.
+
+ return 0;
+}
+
+
+/*==========================================
+ * #lostskill <skill_#> <nickname>
+ * Transferred by: Kevin
+ *------------------------------------------*/
+int charcommand_lostskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int skill_id = 0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &skill_id, player) < 2 || skill_id < 0) {
+ clif_displaymessage(fd, "Please, enter a quest skill number and a player name (usage: @charlostskill <#:0+> <char_name>).");
+ return -1;
+ }
+
+ if (skill_id < 0 && skill_id >= MAX_SKILL) {
+ clif_displaymessage(fd, msg_txt(198)); // This skill number doesn't exist.
+ return -1;
+ }
+ if (!(skill_get_inf2(skill_id) & INF2_QUEST_SKILL)) {
+ clif_displaymessage(fd, msg_txt(197)); // This skill number doesn't exist or isn't a quest skill.
+ return -1;
+ }
+ if ((pl_sd = map_nick2sd(player)) == NULL) {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+ if (pc_checkskill(pl_sd, skill_id) == 0) {
+ clif_displaymessage(fd, msg_txt(203)); // This player doesn't have this quest skill.
+ return -1;
+ }
+
+ pl_sd->status.skill[skill_id].lv = 0;
+ pl_sd->status.skill[skill_id].flag = 0;
+ clif_skillinfoblock(pl_sd);
+ clif_displaymessage(fd, msg_txt(202)); // This player has forgotten the skill.
+
+ return 0;
+}
+
+/*==========================================
+ * Character Skill Reset
+ *------------------------------------------*/
+int charcommand_skreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ char tmp_cmdoutput[1024];
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: @charskreset <charname>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset skill points only lower or same gm level
+ pc_resetskill(pl_sd,1);
+ sprintf(tmp_cmdoutput, msg_txt(206), player); // '%s' skill points reset.
+ clif_displaymessage(fd, tmp_cmdoutput);
+ } else {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Character Stat Reset
+ *------------------------------------------*/
+int charcommand_streset(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ char tmp_cmdoutput[1024];
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: @charstreset <charname>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset stats points only lower or same gm level
+ pc_resetstate(pl_sd);
+ sprintf(tmp_cmdoutput, msg_txt(207), player); // '%s' stats points reset.
+ clif_displaymessage(fd, tmp_cmdoutput);
+ } else {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Character Model by chbrules
+ *------------------------------------------*/
+int charcommand_model(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hair_style = 0, hair_color = 0, cloth_color = 0;
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ char tmp_cmdoutput[1024];
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %d %d %23[^\n]", &hair_style, &hair_color, &cloth_color, player) < 4 || hair_style < 0 || hair_color < 0 || cloth_color < 0) {
+ sprintf(tmp_cmdoutput, "Please, enter a valid model and a player name (usage: @charmodel <hair ID: %d-%d> <hair color: %d-%d> <clothes color: %d-%d> <name>).",
+ MIN_HAIR_STYLE, MAX_HAIR_STYLE, MIN_HAIR_COLOR, MAX_HAIR_COLOR, MIN_CLOTH_COLOR, MAX_CLOTH_COLOR);
+ clif_displaymessage(fd, tmp_cmdoutput);
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (hair_style >= MIN_HAIR_STYLE && hair_style <= MAX_HAIR_STYLE &&
+ hair_color >= MIN_HAIR_COLOR && hair_color <= MAX_HAIR_COLOR &&
+ cloth_color >= MIN_CLOTH_COLOR && cloth_color <= MAX_CLOTH_COLOR) {
+ pc_changelook(pl_sd, LOOK_HAIR, hair_style);
+ pc_changelook(pl_sd, LOOK_HAIR_COLOR, hair_color);
+ pc_changelook(pl_sd, LOOK_CLOTHES_COLOR, cloth_color);
+ clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
+ } else {
+ clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Character Skill Point (Rewritten by [Yor])
+ *------------------------------------------*/
+int charcommand_skpoint(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int new_skill_point;
+ int point = 0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &point, player) < 2 || point == 0) {
+ clif_displaymessage(fd, "Please, enter a number and a player name (usage: @charskpoint <amount> <name>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (point > 0 && pl_sd->status.skill_point > USHRT_MAX - point)
+ new_skill_point = USHRT_MAX;
+ else if (point < 0 && pl_sd->status.skill_point < -point)
+ new_skill_point = 0;
+ else
+ new_skill_point = pl_sd->status.skill_point + point;
+ if (new_skill_point != (int)pl_sd->status.skill_point) {
+ pl_sd->status.skill_point = new_skill_point;
+ clif_updatestatus(pl_sd, SP_SKILLPOINT);
+ clif_displaymessage(fd, msg_txt(209)); // Character's skill points changed.
+ } else {
+ if (point < 0)
+ clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
+ else
+ clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Character Status Point (rewritten by [Yor])
+ *------------------------------------------*/
+int charcommand_stpoint(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ int new_status_point;
+ int point = 0;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &point, player) < 2 || point == 0) {
+ clif_displaymessage(fd, "Please, enter a number and a player name (usage: @charstpoint <amount> <name>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) != NULL) {
+ if (point > 0 && pl_sd->status.status_point > USHRT_MAX - point)
+ new_status_point = USHRT_MAX;
+ else if (point < 0 && pl_sd->status.status_point < -point)
+ new_status_point = 0;
+ else
+ new_status_point = pl_sd->status.status_point + point;
+ if (new_status_point != (int)pl_sd->status.status_point) {
+ pl_sd->status.status_point = new_status_point;
+ clif_updatestatus(pl_sd, SP_STATUSPOINT);
+ clif_displaymessage(fd, msg_txt(210)); // Character's status points changed.
+ } else {
+ if (point < 0)
+ clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
+ else
+ clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * charchangesex command (usage: charchangesex <player_name>)
+ *------------------------------------------*/
+int charcommand_changesex(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char player[NAME_LENGTH];
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", player) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: @charchangesex <name>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(player)) == NULL)
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+ if (pc_isGM(sd) < pc_isGM(pl_sd)) {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ clif_displaymessage(fd, msg_table[88]); // Character name sent to char-server to ask it.
+ chrif_changesex(pl_sd);
+ return 0;
+}
+
+/*==========================================
+ * Feel (SG save map) Reset
+ *------------------------------------------*/
+int charcommand_feelreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #feelreset <charname>).");
+ return -1;
+ }
+
+ if ((pl_sd = map_nick2sd(character)) != NULL) {
+ if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can reset a character only for lower or same GM level
+ pc_resetfeel(pl_sd);
+ sprintf(output, msg_txt(267), character); // '%s' designated maps reset.
+ clif_displaymessage(fd, output);
+ } else {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ } else {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * #help - Char commands [Kayla]
+ *------------------------------------------*/
+int charcommand_help(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char buf[2048], w1[2048], w2[2048];
+ int i, gm_level;
+ FILE* fp;
+ nullpo_retr(-1, sd);
+
+ memset(buf, '\0', sizeof(buf));
+
+ if ((fp = fopen(charhelp_txt, "r")) != NULL) {
+ clif_displaymessage(fd, msg_txt(26)); /* Help commands: */
+ gm_level = pc_isGM(sd);
+ while(fgets(buf, sizeof(buf), fp) != NULL)
+ {
+ if (buf[0] == '/' && buf[1] == '/')
+ continue;
+ for (i = 0; buf[i] != '\0'; i++) {
+ if (buf[i] == '\r' || buf[i] == '\n') {
+ buf[i] = '\0';
+ break;
+ }
+ }
+ if (sscanf(buf, "%2047[^:]:%2047[^\n]", w1, w2) < 2)
+ clif_displaymessage(fd, buf);
+ else if (gm_level >= atoi(w1))
+ clif_displaymessage(fd, w2);
+ }
+ fclose(fp);
+ } else {
+ clif_displaymessage(fd, msg_txt(27)); /* File help.txt not found. */
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Loads a character back to their save point [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_load(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int m;
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #load <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ m = map_mapindex2mapid(pl_sd->status.save_point.map);
+ if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(pl_sd)) {
+ clif_displaymessage(fd, "Not authorized to warp to target map.");
+ return -1;
+ }
+ if (pl_sd->bl.m >= 0 && map[pl_sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(pl_sd)) {
+ clif_displaymessage(fd, "Not authorized to warp from current map.");
+ return -1;
+ }
+
+ pc_setpos(pl_sd, pl_sd->status.save_point.map, pl_sd->status.save_point.x, pl_sd->status.save_point.y, 0);
+ clif_displaymessage(pl_sd->fd, msg_txt(7)); // Warping to respawn point.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(7)); // Warping to respawn point.
+
+ return 0;
+}
+
+/*==========================================
+ * Changes the targets speed [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_speed(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int speed;
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &speed, character) < 2) {
+ sprintf(output, "Please, enter proper values (usage: #speed <%d-%d> <player>).", MIN_WALK_SPEED, MAX_WALK_SPEED);
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pl_sd->base_status.speed = cap_value(speed, MIN_WALK_SPEED, MAX_WALK_SPEED);
+ status_calc_bl(&pl_sd->bl, SCB_SPEED);
+ clif_displaymessage(pl_sd->fd, msg_txt(8)); // Speed changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(8)); // Speed changed.
+ return 0;
+}
+
+/*==========================================
+ * Opens their storage [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_storage(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #storage <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->npc_id || pl_sd->vender_id || pl_sd->state.trading || pl_sd->state.storage_flag)
+ return -1;
+
+ if (storage_storageopen(pl_sd) == 1)
+ { //Already open.
+ clif_displaymessage(fd, "Players storage already open.");
+ return -1;
+ }
+
+ clif_displaymessage(pl_sd->fd, "Storage opened.");
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player's storage opened.");
+
+ return 0;
+}
+
+
+/*==========================================
+ * Opens their guild storage
+ *------------------------------------------*/
+int charcommand_guildstorage(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #gstorage <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->npc_id || pl_sd->vender_id || pl_sd->state.trading)
+ return -1;
+
+ if (pl_sd->status.guild_id == 0) {
+ clif_displaymessage(fd, "Target player is not in a guild.");
+ return -1;
+ }
+
+ if (pl_sd->state.storage_flag) {
+ clif_displaymessage(fd, "Guild storage is currently in use.");
+ return -1;
+ }
+
+ storage_guild_storageopen(pl_sd);
+
+ clif_displaymessage(pl_sd->fd, "Guild storage opened.");
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player's guild storage opened.");
+
+ return 0;
+}
+
+/*==========================================
+ * Applies GM Hide to a character [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_hide(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #hide <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->sc.option & OPTION_INVISIBLE) {
+ pl_sd->sc.option &= ~OPTION_INVISIBLE;
+ if (pl_sd->disguise)
+ status_set_viewdata(&pl_sd->bl, pl_sd->disguise);
+ else
+ status_set_viewdata(&pl_sd->bl, pl_sd->status.class_);
+ clif_changeoption(&pl_sd->bl);
+ clif_displaymessage(pl_sd->fd, msg_txt(10)); // Invisible: Off
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(10)); // Invisible: Off
+ } else {
+ pl_sd->sc.option |= OPTION_INVISIBLE;
+ pl_sd->vd.class_ = INVISIBLE_CLASS;
+ clif_changeoption(&pl_sd->bl);
+ clif_displaymessage(pl_sd->fd, msg_txt(11)); // Invisible: On
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(11)); // Invisible: On
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Resurrects a dead character [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_alive(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #alive <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!status_revive(&pl_sd->bl, 100, 100))
+ {
+ clif_displaymessage(fd, "Target player is not dead.");
+ return -1;
+ }
+ clif_skill_nodamage(&pl_sd->bl,&pl_sd->bl,ALL_RESURRECTION,4,1);
+ clif_displaymessage(pl_sd->fd, msg_txt(16)); // You've been revived! It's a miracle!
+ return 0;
+}
+
+/*==========================================
+ * Heals someone's HP and SP [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_heal(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hp = 0, sp = 0; // [Valaris] thanks to fov
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%d %d %23[^\n]", &hp, &sp, character) < 3) {
+ clif_displaymessage(fd, "Please, enter proper values (usage: #heal <hp> <sp> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ // some overflow checks
+ if( hp == INT_MIN ) hp++;
+ if( sp == INT_MIN ) sp++;
+
+ if ( hp == 0 && sp == 0 ) {
+ if (!status_percent_heal(&pl_sd->bl, 100, 100))
+ clif_displaymessage(fd, msg_txt(157)); // HP and SP are already with the good value.
+ else
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(17)); // HP, SP recovered.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(17)); // HP, SP recovered.
+ }
+ return 0;
+ }
+
+ if(hp > 0 && sp >= 0) {
+ if( !status_heal(&pl_sd->bl, hp, sp, 2) )
+ clif_displaymessage(fd, msg_txt(157)); // HP and SP are already with the good value.
+ else
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(17)); // HP, SP recovered.
+ if ( pl_sd->fd != fd )
+ clif_displaymessage(fd, msg_txt(17)); // HP, SP recovered.
+ }
+ return 0;
+ }
+
+ if( hp < 0 && sp <= 0 ) {
+ status_damage(NULL, &pl_sd->bl, -hp, -sp, 0, 0);
+ clif_damage(&pl_sd->bl,&pl_sd->bl, gettick(), 0, 0, -hp, 0 , 4, 0);
+ clif_displaymessage(pl_sd->fd, msg_txt(156)); // HP or/and SP modified.
+ if ( pl_sd->fd != fd )
+ clif_displaymessage(fd, msg_txt(156)); // HP or/and SP modified.
+ return 0;
+ }
+
+ //Opposing signs.
+ if ( hp ) {
+ if ( hp > 0 )
+ status_heal(&pl_sd->bl, hp, 0, 2);
+ else {
+ status_damage(NULL, &pl_sd->bl, -hp, 0, 0, 0);
+ clif_damage(&pl_sd->bl,&pl_sd->bl, gettick(), 0, 0, -hp, 0 , 4, 0);
+ }
+ }
+
+ if ( sp ) {
+ if ( sp > 0 )
+ status_heal(&pl_sd->bl, 0, sp, 2);
+ else
+ status_damage(NULL, &pl_sd->bl, 0, -sp, 0, 0);
+ }
+
+ clif_displaymessage(pl_sd->fd, msg_txt(156)); // HP or/and SP modified.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(156)); // HP or/and SP modified.
+ return 0;
+}
+
+/*==========================================
+ * Creates items as specified [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_item2(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct item item_tmp;
+ struct item_data *item_data;
+ char item_name[100];
+ int item_id, number = 0;
+ int identify = 0, refine = 0, attr = 0;
+ int c1 = 0, c2 = 0, c3 = 0, c4 = 0;
+ int flag;
+ int loop, get_count, i;
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || (
+ sscanf(message, "\"%99[^\"]\" %d %d %d %d %d %d %d %d %23[^\n]", item_name, &number, &identify, &refine, &attr, &c1, &c2, &c3, &c4, character) < 10 &&
+ sscanf(message, "%99s %d %d %d %d %d %d %d %d %23[^\n]", item_name, &number, &identify, &refine, &attr, &c1, &c2, &c3, &c4, character) < 10
+ )) {
+ clif_displaymessage(fd, "Please, enter all informations (usage: @item2 <item name or ID> <quantity>");
+ clif_displaymessage(fd, " <Identify_flag[1|0]> <refine> <attribut> <Card1> <Card2> <Card3> <Card4> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+ if (number <= 0)
+ number = 1;
+
+ item_id = 0;
+ if ((item_data = itemdb_searchname(item_name)) != NULL ||
+ (item_data = itemdb_exists(atoi(item_name))) != NULL)
+ item_id = item_data->nameid;
+
+ if (item_id > 500) {
+ loop = 1;
+ get_count = number;
+ if (item_data->type == 4 || item_data->type == 5 ||
+ item_data->type == 7 || item_data->type == 8) {
+ loop = number;
+ get_count = 1;
+ if (item_data->type == 7) {
+ identify = 1;
+ refine = 0;
+ }
+ if (item_data->type == 8)
+ refine = 0;
+ if (refine > 10)
+ refine = 10;
+ } else {
+ identify = 1;
+ refine = attr = 0;
+ }
+ for (i = 0; i < loop; i++) {
+ memset(&item_tmp, 0, sizeof(item_tmp));
+ item_tmp.nameid = item_id;
+ item_tmp.identify = identify;
+ item_tmp.refine = refine;
+ item_tmp.attribute = attr;
+ item_tmp.card[0] = c1;
+ item_tmp.card[1] = c2;
+ item_tmp.card[2] = c3;
+ item_tmp.card[3] = c4;
+ if ((flag = pc_additem(pl_sd, &item_tmp, get_count)))
+ clif_additem(pl_sd, 0, 0, flag);
+ }
+
+ //Logs (A)dmins items [Lupus]
+ if(log_config.enable_logs&0x400)
+ log_pick_pc(pl_sd, "A", item_tmp.nameid, number, &item_tmp);
+
+ clif_displaymessage(pl_sd->fd, msg_txt(18)); // Item created.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(18)); // Item created.
+ } else {
+ clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Reset a character's items [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_itemreset(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int i, count = 0;
+ char character[NAME_LENGTH];
+ char output[200];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #itemreset <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ for (i = 0; i < MAX_INVENTORY; i++) {
+ if (pl_sd->status.inventory[i].amount && pl_sd->status.inventory[i].equip == 0) {
+
+ //Logs (A)dmins items [Lupus]
+ if(log_config.enable_logs&0x400)
+ log_pick_pc(pl_sd, "A", pl_sd->status.inventory[i].nameid, -pl_sd->status.inventory[i].amount, &pl_sd->status.inventory[i]);
+
+ pc_delitem(pl_sd, i, pl_sd->status.inventory[i].amount, 0);
+ count++;
+ }
+ }
+
+ sprintf(output, msg_txt(114), count);
+ if (pl_sd->fd != fd)
+ clif_displaymessage(pl_sd->fd, output); // %d item(s) removed from the player.
+ clif_displaymessage(fd, msg_txt(20)); // All of your items have been removed.
+
+ return 0;
+}
+
+/*==========================================
+ * Refine their items [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_refine(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int i,j, position = 0, refine = 0, current_position, final_refine;
+ int count;
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%d %d %23[^\n]", &position, &refine, character) < 3) {
+ clif_displaymessage(fd, "Please, enter a position and a amount (usage: #refine <equip position> <+/- amount> <player>).");
+ sprintf(output, "%d: Left Accessory", EQI_ACC_L);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Right Accessory", EQI_ACC_R);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Shoes", EQI_SHOES);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Garment", EQI_GARMENT);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Lower Headgear", EQI_HEAD_LOW);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Mid Headgear", EQI_HEAD_MID);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Top Headgear", EQI_HEAD_TOP);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Body Armor", EQI_ARMOR);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Left Hand", EQI_HAND_L);
+ clif_displaymessage(fd, output);
+ sprintf(output, "%d: Right Hand", EQI_HAND_R);
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (refine < -MAX_REFINE)
+ refine = -MAX_REFINE;
+ else if (refine > MAX_REFINE)
+ refine = MAX_REFINE;
+ else if (refine == 0)
+ refine = 1;
+
+ count = 0;
+ for (j = 0; j < EQI_MAX-1; j++) {
+ if ((i = pl_sd->equip_index[j]) < 0)
+ continue;
+ if(j == EQI_HAND_R && pl_sd->equip_index[EQI_HAND_L] == i)
+ continue;
+ if(j == EQI_HEAD_MID && pl_sd->equip_index[EQI_HEAD_LOW] == i)
+ continue;
+ if(j == EQI_HEAD_TOP && (pl_sd->equip_index[EQI_HEAD_MID] == i || pl_sd->equip_index[EQI_HEAD_LOW] == i))
+ continue;
+
+ if(position && !(pl_sd->status.inventory[i].equip & position))
+ continue;
+
+ final_refine = pl_sd->status.inventory[i].refine + refine;
+ if (final_refine > MAX_REFINE)
+ final_refine = MAX_REFINE;
+ else if (final_refine < 0)
+ final_refine = 0;
+ if (pl_sd->status.inventory[i].refine != final_refine) {
+ pl_sd->status.inventory[i].refine = final_refine;
+ current_position = pl_sd->status.inventory[i].equip;
+ pc_unequipitem(pl_sd, i, 3);
+ clif_refine(fd, 0, i, pl_sd->status.inventory[i].refine);
+ clif_delitem(pl_sd, i, 1);
+ clif_additem(pl_sd, i, 1, 0);
+ pc_equipitem(pl_sd, i, current_position);
+ clif_misceffect(&pl_sd->bl, 3);
+ count++;
+ }
+ }
+
+ if (count == 0)
+ clif_displaymessage(fd, msg_txt(166)); // No item has been refined!
+ else if (count == 1)
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(167)); // 1 item has been refined!
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(167)); // 1 item has been refined!
+ }
+ else {
+ sprintf(output, msg_txt(168), count); // %d items have been refined!
+ clif_displaymessage(pl_sd->fd, output);
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, output);
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Produce a manufactured item in their inventory [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_produce(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char item_name[100];
+ int item_id, attribute = 0, star = 0;
+ int flag = 0;
+ struct item_data *item_data;
+ struct item tmp_item;
+ char character[NAME_LENGTH];
+ char output[200];
+
+ struct map_session_data *pl_sd;
+
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || (
+ sscanf(message, "\"%99[^\"]\" %d %d %23[^\n]", item_name, &attribute, &star, character) < 4 &&
+ sscanf(message, "%99s %d %d %23[^\n]", item_name, &attribute, &star, character) < 4
+ )) {
+ clif_displaymessage(fd, "Please, enter at least an item name/id (usage: #produce <equip name or equip ID> <element> <# of very's> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ item_id = 0;
+ if ((item_data = itemdb_searchname(item_name)) == NULL &&
+ (item_data = itemdb_exists(atoi(item_name))) == NULL)
+ {
+ sprintf(output, msg_txt(170)); // This item is not an equipment.
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+ item_id = item_data->nameid;
+ if (itemdb_isequip2(item_data)) {
+ if (attribute < MIN_ATTRIBUTE || attribute > MAX_ATTRIBUTE)
+ attribute = ATTRIBUTE_NORMAL;
+ if (star < MIN_STAR || star > MAX_STAR)
+ star = 0;
+ memset(&tmp_item, 0, sizeof tmp_item);
+ tmp_item.nameid = item_id;
+ tmp_item.amount = 1;
+ tmp_item.identify = 1;
+ tmp_item.card[0] = CARD0_FORGE;
+ tmp_item.card[1] = item_data->type==IT_WEAPON?
+ ((star*5) << 8) + attribute:0;
+ tmp_item.card[2] = GetWord(pl_sd->status.char_id, 0);
+ tmp_item.card[3] = GetWord(pl_sd->status.char_id, 1);
+ clif_produceeffect(pl_sd, 0, item_id);
+ clif_misceffect(&pl_sd->bl, 3);
+
+ //Logs (A)dmins items [Lupus]
+ if(log_config.enable_logs&0x400)
+ log_pick_pc(pl_sd, "A", tmp_item.nameid, 1, &tmp_item);
+
+ if ((flag = pc_additem(pl_sd, &tmp_item, 1)))
+ {
+ clif_additem(pl_sd, 0, 0, flag);
+ clif_displaymessage(fd, msg_txt(18));
+ }
+ } else {
+ sprintf(output, msg_txt(169), item_id, item_data->name); // This item (%d: '%s') is not an equipment.
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Changes a character's stats [HiddenDragon
+ *------------------------------------------*/
+int charcommand_param(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int index, value = 0, new_value;
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+ const char* param[] = { "#str", "#agi", "#vit", "#int", "#dex", "#luk", NULL };
+ short* status[6];
+
+
+ if (!message || !*message || sscanf(message, "%d %s", &value, character) < 2 || value == 0) {
+ sprintf(output, "Please, enter a valid value (usage: #str,#agi,#vit,#int,#dex,#luk <+/-adjustment> <player>).");
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ status[0] = &pl_sd->status.str;
+ status[1] = &pl_sd->status.agi;
+ status[2] = &pl_sd->status.vit;
+ status[3] = &pl_sd->status.int_;
+ status[4] = &pl_sd->status.dex;
+ status[5] = &pl_sd->status.luk;
+
+ index = -1;
+ for (index = 0; index < ARRAYLENGTH(param); index++) {
+ if (strcmpi(command, param[index]) == 0)
+ break;
+ }
+ if (index == ARRAYLENGTH(param) || index > MAX_STATUS_TYPE) {
+ // normaly impossible...
+ sprintf(output, "Please, enter a valid value (usage: #str,#agi,#vit,#int,#dex,#luk <+/-adjustment> <player>).");
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if (value > 0 && *status[index] > 999 - value)
+ new_value = 999;
+ else if (value < 0 && *status[index] <= -value)
+ new_value = 1;
+ else
+ new_value = *status[index] + value;
+
+ if (new_value != (int)*status[index]) {
+ *status[index] = new_value;
+ clif_updatestatus(pl_sd, SP_STR + index);
+ clif_updatestatus(pl_sd, SP_USTR + index);
+ status_calc_pc(pl_sd, 0);
+ clif_displaymessage(pl_sd->fd, msg_txt(42)); // Stat changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(42)); // Stat changed.
+ } else {
+ if (value < 0)
+ clif_displaymessage(fd, msg_txt(41)); // Unable to decrease the number/value.
+ else
+ clif_displaymessage(fd, msg_txt(149)); // Unable to increase the number/value.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Levels up a character's guild [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_guildlevelup(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int level = 0;
+ short added_level;
+ struct guild *guild_info;
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %s", &level, character) < 2 || level == 0) {
+ clif_displaymessage(fd, "Please, enter a valid level and player (usage: #guildlvup/@guildlvlup <# of levels> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->status.guild_id <= 0 || (guild_info = guild_search(pl_sd->status.guild_id)) == NULL) {
+ clif_displaymessage(fd, "Target player is not in a guild"); // You're not in a guild.
+ return -1;
+ }
+ //if (strcmp(sd->status.name, guild_info->master) != 0) {
+ // clif_displaymessage(fd, msg_txt(44)); // You're not the master of your guild.
+ // return -1;
+ //}
+
+ added_level = (short)level;
+ if (level > 0 && (level > MAX_GUILDLEVEL || added_level > ((short)MAX_GUILDLEVEL - guild_info->guild_lv))) // fix positiv overflow
+ added_level = (short)MAX_GUILDLEVEL - guild_info->guild_lv;
+ else if (level < 0 && (level < -MAX_GUILDLEVEL || added_level < (1 - guild_info->guild_lv))) // fix negativ overflow
+ added_level = 1 - guild_info->guild_lv;
+
+ if (added_level != 0) {
+ intif_guild_change_basicinfo(guild_info->guild_id, GBI_GUILDLV, &added_level, 2);
+ clif_displaymessage(pl_sd->fd, msg_txt(179)); // Guild level changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(179));
+ } else {
+ clif_displaymessage(fd, msg_txt(45)); // Guild level change failed.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Opens a hatch window for them [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_hatch(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #hatch <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->status.pet_id <= 0)
+ clif_sendegg(sd);
+ else {
+ clif_displaymessage(fd, "Target player already has a pet"); // You already have a pet.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Change target pet's hunger [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_pethungry(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hungry;
+ struct pet_data *pd;
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &hungry, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a valid number and player (usage: #pethungry <0-100> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pd = pl_sd->pd;
+ if (!pl_sd->status.pet_id || !pd) {
+ clif_displaymessage(fd, "Target has no pet"); // Sorry, but you have no pet.
+ return -1;
+ }
+ if (hungry < 0 || hungry > 100) {
+ clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
+ return -1;
+ }
+ if (hungry == pd->pet.hungry) {
+ clif_displaymessage(fd, msg_txt(186)); // Pet hungry is already the good value.
+ return -1;
+ }
+
+ pd->pet.hungry = hungry;
+ clif_send_petstatus(pl_sd);
+ clif_displaymessage(pl_sd->fd, msg_txt(185)); // Pet hungry value changed!
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(185)); // Pet hungry value changed!
+
+ return 0;
+}
+
+/*==========================================
+ * Give all skills to target [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_allskill(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #allskill <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pc_allskillup(pl_sd); // all skills
+ pl_sd->status.skill_point = 0; // 0 skill points
+ clif_updatestatus(pl_sd, SP_SKILLPOINT); // update
+ clif_displaymessage(pl_sd->fd, msg_txt(76)); // You have received all skills.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player has received all skills for his/her class.");
+
+ return 0;
+}
+
+
+/*==========================================
+ * Change target's clothing color [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_dye(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int cloth_color = 0;
+ char character[NAME_LENGTH];
+ char output[200];
+
+ struct map_session_data *pl_sd;
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &cloth_color, character) < 2) {
+ sprintf(output, "Please, enter a clothes color (usage: #dye/@ccolor <clothes color: %d-%d> <player>).", MIN_CLOTH_COLOR, MAX_CLOTH_COLOR);
+ clif_displaymessage(fd,output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (cloth_color >= MIN_CLOTH_COLOR && cloth_color <= MAX_CLOTH_COLOR) {
+ pc_changelook(pl_sd, LOOK_CLOTHES_COLOR, cloth_color);
+ clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
+ } else {
+ clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Change target's hair style [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_hair_style(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hair_style = 0;
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &hair_style, character) < 2) {
+ sprintf(output, "Please, enter a hair style (usage: #hairstyle/#hstyle <hair ID: %d-%d> <player>.", MIN_HAIR_STYLE, MAX_HAIR_STYLE);
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (hair_style >= MIN_HAIR_STYLE && hair_style <= MAX_HAIR_STYLE) {
+ pc_changelook(pl_sd, LOOK_HAIR, hair_style);
+ clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
+ } else {
+ clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Change target's hair color [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_hair_color(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hair_color = 0;
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+ nullpo_retr(-1, sd);
+
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &hair_color, character) < 2) {
+ sprintf(output, "Please, enter a hair color (usage: #haircolor/#hcolor <hair color: %d-%d> <player>).", MIN_HAIR_COLOR, MAX_HAIR_COLOR);
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (hair_color >= MIN_HAIR_COLOR && hair_color <= MAX_HAIR_COLOR) {
+ pc_changelook(pl_sd, LOOK_HAIR_COLOR, hair_color);
+ clif_displaymessage(pl_sd->fd, msg_txt(36)); // Appearence changed.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(36)); // Appearence changed.
+ } else {
+ clif_displaymessage(fd, msg_txt(37)); // An invalid number was specified.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Change all target's stats [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_allstats(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int index, count, value = 0, max, new_value;
+ short* status[6];
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+
+ //we don't use direct initialization because it isn't part of the c standard.
+ nullpo_retr(-1, sd);
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #statall/#statsall/#allstat/#allstats <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ status[0] = &pl_sd->status.str;
+ status[1] = &pl_sd->status.agi;
+ status[2] = &pl_sd->status.vit;
+ status[3] = &pl_sd->status.int_;
+ status[4] = &pl_sd->status.dex;
+ status[5] = &pl_sd->status.luk;
+
+ count = 0;
+ max = pc_maxparameter(pl_sd);
+ for (index = 0; index < ARRAYLENGTH(status); index++) {
+
+ if (value > 0 && *status[index] > max - value)
+ new_value = max;
+ else if (value < 0 && *status[index] <= -value)
+ new_value = 1;
+ else
+ new_value = *status[index] +value;
+
+ if (new_value != (int)*status[index]) {
+ *status[index] = new_value;
+ clif_updatestatus(pl_sd, SP_STR + index);
+ clif_updatestatus(pl_sd, SP_USTR + index);
+ status_calc_pc(pl_sd, 0);
+ count++;
+ }
+ }
+
+ if (count > 0) // if at least 1 stat modified
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(84)); // All stats changed!
+ if (fd != pl_sd->fd)
+ clif_displaymessage(fd, "Player's stats changed"); // All stats changed!
+ }
+ else {
+ if (value < 0)
+ clif_displaymessage(fd, msg_txt(177)); // Impossible to decrease a stat.
+ else
+ clif_displaymessage(fd, msg_txt(178)); // Impossible to increase a stat.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Gives/Removes a peco from a player [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_mount_peco(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char character[NAME_LENGTH];
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #mount/#mountpeco <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!pc_isriding(pl_sd))
+ { // if actually no peco
+ if (!pc_checkskill(pl_sd, KN_RIDING))
+ {
+ clif_displaymessage(fd, msg_txt(217)); // This player cannot mount a Peco Peco with his/her current job.
+ return -1;
+ }
+
+ if (pl_sd->disguise)
+ {
+ clif_displaymessage(fd, msg_txt(215)); // This player cannot mount a Peco Peco while in disguise.
+ return -1;
+ }
+
+ pc_setoption(pl_sd, pl_sd->sc.option | OPTION_RIDING);
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player mounted a peco.");
+ clif_displaymessage(pl_sd->fd, msg_txt(216)); // This player has mounted a Peco Peco.
+ }
+ else
+ { //Dismount
+ pc_setoption(pl_sd, pl_sd->sc.option & ~OPTION_RIDING);
+ clif_displaymessage(pl_sd->fd, msg_txt(218)); // This player's Peco Peco has been released.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player unmounted a peco.");
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Remove items from a player (now a char command) [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_delitem(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data *pl_sd;
+ char item_name[100];
+ int i, number = 0, item_id, item_position, count;
+ struct item_data *item_data;
+ char character[NAME_LENGTH];
+ char output[200];
+
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+ memset(item_name, '\0', sizeof(item_name));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || (
+ sscanf(message, "\"%99[^\"]\" %d %23[^\n]", item_name, &number, character) < 3 &&
+ sscanf(message, "%s %d %23[^\n]", item_name, &number, character) < 3
+ ) || number < 1) {
+ clif_displaymessage(fd, "Please, enter an item name/id, a quantity and a player name (usage: #delitem <item_name_or_ID> <quantity> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ item_id = 0;
+ if ((item_data = itemdb_searchname(item_name)) != NULL ||
+ (item_data = itemdb_exists(atoi(item_name))) != NULL)
+ item_id = item_data->nameid;
+
+ if (item_id > 500) {
+ item_position = pc_search_inventory(pl_sd, item_id);
+ if (item_position >= 0) {
+ count = 0;
+ for(i = 0; i < number && item_position >= 0; i++) {
+
+ //Logs (A)dmins items [Lupus]
+ if(log_config.enable_logs&0x400)
+ log_pick_pc(pl_sd, "A", pl_sd->status.inventory[item_position].nameid, -1, &pl_sd->status.inventory[item_position]);
+
+ pc_delitem(pl_sd, item_position, 1, 0);
+ count++;
+ item_position = pc_search_inventory(pl_sd, item_id); // for next loop
+ }
+ sprintf(output, msg_txt(113), count); // %d item(s) removed by a GM.
+ clif_displaymessage(pl_sd->fd, output);
+ if (number == count)
+ sprintf(output, msg_txt(114), count); // %d item(s) removed from the player.
+ else
+ sprintf(output, msg_txt(115), count, count, number); // %d item(s) removed. Player had only %d on %d items.
+ clif_displaymessage(fd, output);
+ } else {
+ clif_displaymessage(fd, msg_txt(116)); // Character does not have the specified item.
+ return -1;
+ }
+ }
+ else
+ {
+ clif_displaymessage(fd, msg_txt(19)); // Invalid item ID or name.
+ return -1;
+ }
+
+ return 0;
+}
+
+//Added by Coltaro
+//We're using this function here instead of using time_t so that it only counts player's jail time when he/she's online (and since the idea is to reduce the amount of minutes one by one in status_change_timer...).
+//Well, using time_t could still work but for some reason that looks like more coding x_x
+static void get_jail_time(int jailtime, int* year, int* month, int* day, int* hour, int* minute) {
+ const int factor_year = 518400; //12*30*24*60 = 518400
+ const int factor_month = 43200; //30*24*60 = 43200
+ const int factor_day = 1440; //24*60 = 1440
+ const int factor_hour = 60;
+
+ *year = jailtime/factor_year;
+ jailtime -= *year*factor_year;
+ *month = jailtime/factor_month;
+ jailtime -= *month*factor_month;
+ *day = jailtime/factor_day;
+ jailtime -= *day*factor_day;
+ *hour = jailtime/factor_hour;
+ jailtime -= *hour*factor_hour;
+ *minute = jailtime;
+
+ *year = *year > 0? *year : 0;
+ *month = *month > 0? *month : 0;
+ *day = *day > 0? *day : 0;
+ *hour = *hour > 0? *hour : 0;
+ *minute = *minute > 0? *minute : 0;
+ return;
+}
+
+/*==========================================
+ * Jail a player for a certain amount of time [Coltaro]
+ *------------------------------------------*/
+int charcommand_jailtime(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct map_session_data* pl_sd;
+ int year, month, day, hour, minute;
+ char character[NAME_LENGTH];
+ char output[200];
+ memset(character, '\0', sizeof(character));
+
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #jailtime <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!pl_sd->sc.data[SC_JAILED]) {
+ clif_displaymessage(fd, "This player is not in jail.");
+ return -1;
+ }
+
+ if (pl_sd->sc.data[SC_JAILED]->val1 == INT_MAX) {
+ clif_displaymessage(fd, "This player has been jailed indefinitely.");
+ return 0;
+ }
+
+ if (pl_sd->sc.data[SC_JAILED]->val1 <= 0) { // Was not jailed with @jailfor (maybe @jail? or warped there? or got recalled?)
+ clif_displaymessage(fd, "This player has been jailed for an unknown amount of time.");
+ return -1;
+ }
+ //Get remaining jail time
+ get_jail_time(pl_sd->sc.data[SC_JAILED]->val1,&year,&month,&day,&hour,&minute);
+ sprintf(output,msg_txt(402),"This player will remain",year,month,day,hour,minute);
+ clif_displaymessage(fd, output);
+
+ return 0;
+}
+
+/*==========================================
+ * Disguises a player [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_disguise(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int mob_id;
+ char mob_name[NAME_LENGTH];
+ struct map_session_data* pl_sd;
+ char character[NAME_LENGTH];
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+ memset(mob_name, '\0', sizeof(mob_name));
+
+ if (!message || !*message || sscanf(message, "%s %23[^\n]", mob_name, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a Monster/NPC name/id and a player name (usage: #disguise <monster_name_or_monster_ID> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if ((mob_id = atoi(mob_name)) > 0)
+ { //Acquired an ID
+ if (!mobdb_checkid(mob_id) && !npcdb_checkid(mob_id))
+ mob_id = 0; //Invalid id for either mobs or npcs.
+ } else { //Acquired a Name
+ if ((mob_id = mobdb_searchname(mob_name)) == 0)
+ {
+ struct npc_data* nd = npc_name2id(mob_name);
+ if (nd != NULL)
+ mob_id = nd->class_;
+ }
+ }
+
+ if (mob_id == 0)
+ {
+ clif_displaymessage(fd, msg_txt(123)); // Monster/NPC name/id hasn't been found.
+ return -1;
+ }
+
+ if(pc_isriding(pl_sd))
+ {
+ //FIXME: wrong message [ultramage]
+ //clif_displaymessage(fd, msg_txt(228)); // Character cannot wear disguise while riding a PecoPeco.
+ return -1;
+ }
+
+ pc_disguise(pl_sd, mob_id);
+ clif_displaymessage(pl_sd->fd, msg_txt(122)); // Disguise applied.
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(140)); // Character's disguise applied.
+
+
+ return 0;
+}
+
+/*==========================================
+ * Undisguises a player [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_undisguise(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data* pl_sd;
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #undisguise <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->disguise)
+ {
+ pc_disguise(pl_sd, 0);
+ clif_displaymessage(pl_sd->fd, msg_txt(124)); // Disguise removed from character
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(141)); // Undisguise applied
+ }
+ else {
+ clif_displaymessage(fd, msg_txt(142)); // Character is not disguised.
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Displays contents of target's cart [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_cart_list(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char outputtmp[200];
+ char output[200];
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ struct item_data *item_data, *item_temp;
+ int i, j, count = 0, counter = 0, counter2;
+ nullpo_retr(-1, sd);
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+ memset(outputtmp, '\0', sizeof(outputtmp));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #cartlist <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ for (i = 0; i < MAX_CART; i++) {
+ if (pl_sd->status.cart[i].nameid > 0 && (item_data = itemdb_search(pl_sd->status.cart[i].nameid)) != NULL) {
+ counter = counter + pl_sd->status.cart[i].amount;
+ count++;
+ if (count == 1) {
+ sprintf(output, "------ Cart items list of '%s' ------", pl_sd->status.name);
+ clif_displaymessage(fd, output);
+ }
+ if (pl_sd->status.cart[i].refine)
+ sprintf(output, "%d %s %+d (%s %+d, id: %d)", pl_sd->status.cart[i].amount, item_data->name, pl_sd->status.cart[i].refine, item_data->jname, pl_sd->status.cart[i].refine, pl_sd->status.cart[i].nameid);
+ else
+ sprintf(output, "%d %s (%s, id: %d)", pl_sd->status.cart[i].amount, item_data->name, item_data->jname, pl_sd->status.cart[i].nameid);
+ clif_displaymessage(fd, output);
+ memset(output, '\0', sizeof(output));
+ counter2 = 0;
+ for (j = 0; j < item_data->slot; j++) {
+ if (pl_sd->status.cart[i].card[j]) {
+ if ( (item_temp = itemdb_search(pl_sd->status.cart[i].card[j])) != NULL) {
+ if (output[0] == '\0')
+ sprintf(outputtmp, " -> (card(s): #%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ else
+ sprintf(outputtmp, "#%d %s (%s), ", ++counter2, item_temp->name, item_temp->jname);
+ strcat(output, outputtmp);
+ }
+ }
+ }
+ if (output[0] != '\0') {
+ output[strlen(output) - 2] = ')';
+ output[strlen(output) - 1] = '\0';
+ clif_displaymessage(fd, output);
+ }
+ }
+ }
+ if (count == 0)
+ clif_displaymessage(fd, "No item found in the cart of this player.");
+ else {
+ sprintf(output, "%d item(s) found in %d kind(s) of items.", counter, count);
+ clif_displaymessage(fd, output);
+ }
+
+ return 0;
+}
+
+static int charcommand_stopattack(struct block_list *bl,va_list ap)
+{
+ struct unit_data *ud = unit_bl2ud(bl);
+ int id = va_arg(ap, int);
+ if (ud && ud->attacktimer != INVALID_TIMER && (!id || id == ud->target))
+ {
+ unit_stop_attack(bl);
+ return 1;
+ }
+ return 0;
+}
+
+/*==========================================
+ * Enable a player to kill players even when not in pvp [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_killer(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #killer <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pl_sd->state.killer = !pl_sd->state.killer;
+
+ if(pl_sd->state.killer)
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(241));
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Target player can now kill anybody.");
+ }
+ else
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(287));
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(287));
+ pc_stop_attack(pl_sd);
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Enable other players to kill target even when not in pvp [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_killable(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #killable <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ pl_sd->state.killable = !pl_sd->state.killable;
+
+ if(pl_sd->state.killable)
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(242));
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(289));
+ }
+ else
+ {
+ clif_displaymessage(pl_sd->fd, msg_txt(288));
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, msg_txt(290));
+ map_foreachinrange(charcommand_stopattack,&pl_sd->bl, AREA_SIZE, BL_CHAR, pl_sd->bl.id);
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Drop all of the target's possessions on the ground
+ *------------------------------------------*/
+int charcommand_dropall(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int i;
+ struct map_session_data *pl_sd = NULL;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message)
+ return -1;
+ if((pl_sd=map_nick2sd((char *) message)) == NULL)
+ return -1;
+ for (i = 0; i < MAX_INVENTORY; i++) {
+ if (pl_sd->status.inventory[i].amount) {
+ if(pl_sd->status.inventory[i].equip != 0)
+ pc_unequipitem(pl_sd, i, 3);
+ pc_dropitem(pl_sd, i, pl_sd->status.inventory[i].amount);
+ }
+ }
+
+ clif_displaymessage(pl_sd->fd, "All items dropped");
+ clif_displaymessage(fd, "It is done");
+
+ return 0;
+}
+
+/*==========================================
+ * Put all of the target's possessions into storage
+ *------------------------------------------*/
+int charcommand_storeall(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int i;
+ struct map_session_data *pl_sd = NULL;
+ nullpo_retr(-1, sd);
+
+ if (!message || !*message)
+ return -1;
+ if((pl_sd=map_nick2sd((char *) message)) == NULL)
+ return -1;
+
+ if (pl_sd->state.storage_flag != 1)
+ { //Open storage.
+ if( storage_storageopen(pl_sd) == 1 ) {
+ clif_displaymessage(fd, "The character currently can't use the storage.");
+ return 1;
+ }
+ }
+
+ for (i = 0; i < MAX_INVENTORY; i++) {
+ if (pl_sd->status.inventory[i].amount) {
+ if(pl_sd->status.inventory[i].equip != 0)
+ pc_unequipitem(pl_sd, i, 3);
+ storage_storageadd(pl_sd, i, sd->status.inventory[i].amount);
+ }
+ }
+ storage_storageclose(pl_sd);
+
+ clif_displaymessage(pl_sd->fd, "Everything you own has been put away for safe keeping.");
+ clif_displaymessage(pl_sd->fd, "go to the nearest kafka to retrieve it..");
+ clif_displaymessage(pl_sd->fd, " -- the management");
+
+ clif_displaymessage(fd, "It is done");
+
+ return 0;
+}
+
+/*==========================================
+ * Refreshes target [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_refresh(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #refresh <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ clif_refresh(pl_sd);
+ return 0;
+}
+
+
+/*==========================================
+ * View target's exp [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_exp(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char output[200];
+ double nextb, nextj;
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #exp <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ nextb = pc_nextbaseexp(pl_sd);
+ if (nextb)
+ nextb = pl_sd->status.base_exp*100.0/nextb;
+
+ nextj = pc_nextjobexp(pl_sd);
+ if (nextj)
+ nextj = pl_sd->status.job_exp*100.0/nextj;
+
+ sprintf(output, "Base Level: %d (%.3f%%) | Job Level: %d (%.3f%%)", pl_sd->status.base_level, nextb, pl_sd->status.job_level, nextj);
+ clif_displaymessage(fd, output);
+ return 0;
+}
+
+/*==========================================
+ * Makes monsters ignore target [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_monsterignore(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #monsterignore/#battleignore <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (!pl_sd->state.monster_ignore) {
+ pl_sd->state.monster_ignore = 1;
+ clif_displaymessage(pl_sd->fd, "You are now immune to attacks.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(pl_sd->fd, "Target player is now immune to attacks.");
+ } else {
+ pl_sd->state.monster_ignore = 0;
+ clif_displaymessage(sd->fd, "You are no longer immune to attacks.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(pl_sd->fd, "Target player is no longer immune to attacks.");
+
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Change target's size [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_size(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int size=0;
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &size, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #size <0-2> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if(pl_sd->state.size) {
+ pl_sd->state.size=0;
+ pc_setpos(pl_sd, pl_sd->mapindex, pl_sd->bl.x, pl_sd->bl.y, 3);
+ }
+
+ if(size==1) {
+ pl_sd->state.size=1;
+ clif_specialeffect(&pl_sd->bl,420,AREA);
+ clif_displaymessage(fd, "Size changed.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(pl_sd->fd, "Size changed.");
+ } else if(size==2) {
+ pl_sd->state.size=2;
+ clif_specialeffect(&pl_sd->bl,422,AREA);
+ clif_displaymessage(fd, "Size changed.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(pl_sd->fd, "Size changed.");
+ }
+ else
+ {
+ clif_displaymessage(fd, "Size restored.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(pl_sd->fd, "Size restored.");
+ }
+
+
+ return 0;
+}
+
+/*==========================================
+ * Level up target's homunculus [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_homlevel(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ TBL_HOM * hd;
+ int level = 0, i = 0;
+
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &level, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a player name and level (usage: #homlevel <# of levels> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if ( !merc_is_hom_active(pl_sd->hd) )
+ {
+ clif_displaymessage(fd, "Target player does not have a homunculus.");
+ return 1;
+ }
+
+ hd = pl_sd->hd;
+
+ for (i = 1; i <= level && hd->exp_next; i++){
+ hd->homunculus.exp += hd->exp_next;
+ merc_hom_levelup(hd);
+ }
+ status_calc_homunculus(hd,0);
+ status_percent_heal(&hd->bl, 100, 100);
+ clif_misceffect2(&hd->bl,568);
+ clif_displaymessage(pl_sd->fd, "Homunculus level changed.");
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Player's homunculus level changed.");
+
+ return 0;
+}
+
+/*==========================================
+ * Evolve target's homunculus [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_homevolution(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #homevolution <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if ( !merc_is_hom_active(pl_sd->hd) ) {
+ clif_displaymessage(fd, "Target player does not have a homunculus.");
+ return -1;
+ }
+
+ if ( !merc_hom_evolution(pl_sd->hd) ) {
+ clif_displaymessage(fd, "Target homunculus cannot evolve.");
+ return -1;
+ }
+
+ clif_displaymessage(pl_sd->fd, "Homunculus evolution initiated.");
+ if (pl_sd->fd != fd)
+ clif_displaymessage(fd, "Homunculus evolution initiated.");
+ return 0;
+}
+
+/*==========================================
+ * Create a homunculus for target [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_makehomun(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int homunid;
+
+ char character[NAME_LENGTH];
+ char output[200];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &homunid, character) < 2) {
+ sprintf(output, "Please, enter a player name (usage: #makehomun <homunculus id: %d-%d> <player>).", HM_CLASS_BASE, HM_CLASS_BASE + MAX_HOMUNCULUS_CLASS - 1);
+ clif_displaymessage(fd, output);
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if( homunid < HM_CLASS_BASE || homunid > HM_CLASS_BASE + MAX_HOMUNCULUS_CLASS - 1 )
+ {
+ clif_displaymessage(fd, "Invalid homunculus ID.");
+ return -1;
+ }
+
+ if(pl_sd->status.hom_id == 0)
+ {
+ merc_create_homunculus_request(pl_sd,homunid);
+ }
+ else
+ {
+ clif_displaymessage(fd, "Target player already has a homunculus.");
+ }
+ return 0;
+}
+
+/*==========================================
+ * Change Target's homunculus' friendlyness [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_homfriendly(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int friendly = 0;
+
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &friendly, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a player name and friendly value (usage: #homfriendly <0-1000> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (merc_is_hom_active(pl_sd->hd)) {
+ if (friendly > 0 && friendly <= 1000) {
+ pl_sd->hd->homunculus.intimacy = friendly * 100 ;
+ clif_send_homdata(pl_sd,SP_INTIMATE,friendly);
+ clif_displaymessage(pl_sd->fd, "Homunculus friendly value changed.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(fd, "Homunculus friendly value changed.");
+ } else {
+ clif_displaymessage(fd, "Invalid friendly value.");
+ }
+ }
+ else
+ {
+ clif_displaymessage(fd, "Target player's homunculus does not exist.");
+ return -1;
+ }
+
+ return 0;
+}
+
+/*==========================================
+ * Modify target's homunculus hunger [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_homhungry(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ int hungry = 0;
+
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+
+ if (!message || !*message || sscanf(message, "%d %23[^\n]", &hungry, character) < 2) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #homhungry <0-100> <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if (pl_sd->status.hom_id > 0 && pl_sd->hd) {
+ struct homun_data *hd = pl_sd->hd;
+ if (hungry >= 0 && hungry <= 100) {
+ hd->homunculus.hunger = hungry;
+ clif_send_homdata(pl_sd,SP_HUNGRY,hd->homunculus.hunger);
+ clif_displaymessage(pl_sd->fd, "Homunculus hungry value changed.");
+ if (fd != pl_sd->fd)
+ clif_displaymessage(fd, "Homunculus hungry value changed.");
+ } else {
+ clif_displaymessage(fd, "Invalid hungry value.");
+ return -1;
+ }
+ }
+ else
+ {
+ clif_displaymessage(fd, "Target player does not have a homunculus.");
+ return -1;
+ }
+
+
+ return 0;
+}
+
+/*==========================================
+ * Show target's homunculus stats [HiddenDragon]
+ *------------------------------------------*/
+int charcommand_hominfo(const int fd, struct map_session_data* sd, const char* command, const char* message)
+{
+ struct homun_data *hd;
+ struct status_data *status;
+ char output[200];
+ char character[NAME_LENGTH];
+ struct map_session_data *pl_sd;
+ memset(character, '\0', sizeof(character));
+ memset(output, '\0', sizeof(output));
+
+ if (!message || !*message || sscanf(message, "%23[^\n]", character) < 1) {
+ clif_displaymessage(fd, "Please, enter a player name (usage: #hominfo <player>).");
+ return -1;
+ }
+
+ if ( (pl_sd = map_nick2sd(character)) == NULL )
+ {
+ clif_displaymessage(fd, msg_txt(3)); // Character not found.
+ return -1;
+ }
+
+ if ( pc_isGM(sd) < pc_isGM(pl_sd) )
+ {
+ clif_displaymessage(fd, msg_txt(81)); // Your GM level don't authorise you to do this action on this player.
+ return -1;
+ }
+
+ if(!merc_is_hom_active(pl_sd->hd))
+ return -1;
+
+ hd = pl_sd->hd;
+ status = status_get_status_data(&hd->bl);
+ clif_displaymessage(fd, "Homunculus stats :");
+
+ snprintf(output, sizeof(output), "HP : %d/%d - SP : %d/%d", status->hp, status->max_hp, status->sp, status->max_sp);
+ clif_displaymessage(fd, output);
+
+ snprintf(output, sizeof(output), "ATK : %d - MATK : %d~%d", status->rhw.atk2 +status->batk, status->matk_min, status->matk_max);
+ clif_displaymessage(fd, output);
+
+ snprintf(output, sizeof(output), "Hungry : %d - Intimacy : %u", hd->homunculus.hunger, hd->homunculus.intimacy/100);
+ clif_displaymessage(fd, output);
+
+ snprintf(output, sizeof(output), "Stats: Str %d / Agi %d / Vit %d / Int %d / Dex %d / Luk %d", status->str, status->agi, status->vit, status->int_, status->dex, status->luk);
+ clif_displaymessage(fd, output);
+
+ return 0;
+}
+
+
+/*==========================================
+ * charcommand_info[] structure definition
+ *------------------------------------------*/
+
+CharCommandInfo charcommand_info[] = {
+ { "job", 60, charcommand_jobchange },
+ { "jobchange", 60, charcommand_jobchange },
+ { "petrename", 50, charcommand_petrename },
+ { "petfriendly", 50, charcommand_petfriendly },
+ { "stats", 40, charcommand_stats },
+ { "option", 60, charcommand_option },
+ { "reset", 60, charcommand_reset },
+ { "save", 60, charcommand_save },
+ { "spiritball", 40, charcommand_spiritball },
+ { "itemlist", 40, charcommand_itemlist },
+ { "effect", 40, charcommand_effect },
+ { "storagelist", 40, charcommand_storagelist },
+ { "item", 60, charcommand_item },
+ { "warp", 60, charcommand_warp },
+ { "rura", 60, charcommand_warp },
+ { "rura+", 60, charcommand_warp },
+ { "zeny", 60, charcommand_zeny },
+ { "fakename", 50, charcommand_fakename },
+ { "baselvl", 60, charcommand_baselevel },
+ { "baselevel", 60, charcommand_baselevel },
+ { "blvl", 60, charcommand_baselevel },
+ { "blevel", 60, charcommand_baselevel },
+ { "joblvl", 60, charcommand_joblevel },
+ { "joblevel", 60, charcommand_joblevel },
+ { "jlvl", 60, charcommand_joblevel },
+ { "jlevel", 60, charcommand_joblevel },
+ { "questskill", 60, charcommand_questskill },
+ { "lostskill", 60, charcommand_lostskill },
+ { "skreset", 60, charcommand_skreset },
+ { "streset", 60, charcommand_streset },
+ { "model", 50, charcommand_model },
+ { "skpoint", 60, charcommand_skpoint },
+ { "stpoint", 60, charcommand_stpoint },
+ { "changesex", 60, charcommand_changesex },
+ { "feelreset", 60, charcommand_feelreset },
+ { "help", 20, charcommand_help },
+ { "load", 60, charcommand_load },
+ { "speed", 60, charcommand_speed },
+ { "storage", 60, charcommand_storage },
+ { "gstorage", 60, charcommand_guildstorage },
+ { "hide", 60, charcommand_hide },
+ { "alive", 60, charcommand_alive },
+ { "revive", 60, charcommand_alive },
+ { "heal", 60, charcommand_heal },
+ { "item2", 60, charcommand_item2 },
+ { "itemreset", 60, charcommand_itemreset },
+ { "refine", 60, charcommand_refine },
+ { "produce", 60, charcommand_produce },
+ { "str", 60, charcommand_param },
+ { "agi", 60, charcommand_param },
+ { "vit", 60, charcommand_param },
+ { "int", 60, charcommand_param },
+ { "dex", 60, charcommand_param },
+ { "luk", 60, charcommand_param },
+ { "glvl", 60, charcommand_guildlevelup },
+ { "glevel", 60, charcommand_guildlevelup },
+ { "guildlvl", 60, charcommand_guildlevelup },
+ { "guildlevel", 60, charcommand_guildlevelup },
+ { "hatch", 50, charcommand_hatch },
+ { "pethungry", 60, charcommand_pethungry },
+ { "allskill", 60, charcommand_allskill },
+ { "allskills", 60, charcommand_allskill },
+ { "skillall", 60, charcommand_allskill },
+ { "skillsall", 60, charcommand_allskill },
+ { "dye", 50, charcommand_dye },
+ { "hairstyle", 50, charcommand_hair_style },
+ { "hstyle", 50, charcommand_hair_style },
+ { "haircolor", 50, charcommand_hair_color },
+ { "hcolor", 50, charcommand_hair_color },
+ { "allstat", 60, charcommand_allstats },
+ { "allstats", 60, charcommand_allstats },
+ { "statall", 60, charcommand_allstats },
+ { "statsall", 60, charcommand_allstats },
+ { "mount", 50, charcommand_mount_peco },
+ { "mountpeco", 50, charcommand_mount_peco },
+ { "delitem", 60, charcommand_delitem },
+ { "jailtime", 40, charcommand_jailtime },
+ { "disguise", 60, charcommand_disguise },
+ { "undisguise", 60, charcommand_undisguise },
+ { "cartlist", 40, charcommand_cart_list },
+ { "killer", 60, charcommand_killer },
+ { "killable", 60, charcommand_killable },
+ { "dropall", 60, charcommand_dropall },
+ { "storeall", 60, charcommand_storeall },
+ { "refresh", 40, charcommand_refresh },
+ { "exp", 1, charcommand_exp },
+ { "monsterignore", 60, charcommand_monsterignore },
+ { "size", 50, charcommand_size },
+ { "hlvl", 60, charcommand_homlevel },
+ { "hlevel", 60, charcommand_homlevel },
+ { "homlvl", 60, charcommand_homlevel },
+ { "homlevel", 60, charcommand_homlevel },
+ { "homevolve", 60, charcommand_homevolution },
+ { "homevolution", 60, charcommand_homevolution },
+ { "homfriendly", 60, charcommand_homfriendly },
+ { "homhungry", 60, charcommand_homhungry },
+ { "hominfo", 40, charcommand_hominfo },
+ { "cash", 60, charcommand_cash },
+ { "points", 60, charcommand_cash },
+};
+
+
+/*==========================================
+ * Command lookup functions
+ *------------------------------------------*/
+static CharCommandInfo* get_charcommandinfo_byname(const char* name)
+{
+ int i;
+ if( *name == charcommand_symbol ) name++; // for backwards compatibility
+ ARR_FIND( 0, ARRAYLENGTH(charcommand_info), i, strcmpi(charcommand_info[i].command, name) == 0 );
+ return ( i < ARRAYLENGTH(charcommand_info) ) ? &charcommand_info[i] : NULL;
+}
+
+static CharCommandInfo* get_charcommandinfo_byfunc(const CharCommandFunc func)
+{
+ int i;
+ ARR_FIND( 0, ARRAYLENGTH(charcommand_info), i, charcommand_info[i].func == func );
+ return ( i < ARRAYLENGTH(charcommand_info) ) ? &charcommand_info[i] : NULL;
+}
+
+
+/*==========================================
+ * Retrieve the command's required gm level
+ *------------------------------------------*/
+int get_charcommand_level(const CharCommandFunc func)
+{
+ CharCommandInfo* info = get_charcommandinfo_byfunc(func);
+ return ( info != NULL ) ? info->level : 100; // 100: command can not be used
+}
+
+
+/// Executes a char-command.
+/// To be called by internal server code (bypasses various restrictions).
+bool is_charcommand_sub(const int fd, struct map_session_data* sd, const char* str, int gmlvl)
+{
+ CharCommandInfo* info;
+ char command[100];
+ char args[100];
+ char output[200];
+
+ if( !str || !*str )
+ return false;
+
+ if( *str != charcommand_symbol ) // check first char
+ return false;
+
+ if( sscanf(str, "%99s %99[^\n]", command, args) < 2 )
+ args[0] = '\0';
+
+ info = get_charcommandinfo_byname(command);
+ if( info == NULL || info->func == NULL || gmlvl < info->level )
+ {
+ if( gmlvl == 0 )
+ return false; // will just display as normal text
+ else
+ {
+ sprintf(output, msg_txt(153), command); // "%s is Unknown Command."
+ clif_displaymessage(fd, output);
+ return true;
+ }
+ }
+
+ if( log_config.gm && info->level >= log_config.gm )
+ log_atcommand(sd, str);
+
+ if( info->func(fd, sd, command, args) != 0 )
+ {
+ sprintf(output, msg_txt(154), command); // "%s failed."
+ clif_displaymessage(fd, output);
+ }
+
+ return true;
+}
+
+/// Executes a char-command.
+/// To be used by player-invoked code (restrictions will be applied)
+bool is_charcommand(const int fd, struct map_session_data* sd, const char* message)
+{
+ int gmlvl = pc_isGM(sd);
+
+ nullpo_retr(false, sd);
+
+ if( !message || !*message )
+ return false;
+
+ if( sd->sc.data[SC_NOCHAT] && sd->sc.data[SC_NOCHAT]->val1&MANNER_NOCOMMAND )
+ return true; // so that it won't display as normal message
+
+ if( battle_config.atc_gmonly != 0 && gmlvl == 0 )
+ return false;
+
+ if( map[sd->bl.m].nocommand && gmlvl < map[sd->bl.m].nocommand )
+ {
+ clif_displaymessage(fd, msg_txt(143)); // "Commands are disabled on this map."
+ return false;
+ }
+
+ // skip 10/11-langtype's codepage indicator, if detected
+ if( message[0] == '|' && strlen(message) >= 4 && message[3] == charcommand_symbol )
+ message += 3;
+
+ return is_charcommand_sub(fd,sd,message,gmlvl);
+}
+
+
+/*==========================================
+ *
+ *------------------------------------------*/
+int charcommand_config_read(const char* cfgName)
+{
+ char line[1024], w1[1024], w2[1024];
+ CharCommandInfo* p;
+ FILE* fp;
+
+ if( (fp = fopen(cfgName, "r")) == NULL )
+ {
+ ShowError("CharCommand configuration file not found: %s\n", cfgName);
+ return 1;
+ }
+
+ while( fgets(line, sizeof(line), fp) )
+ {
+ if( line[0] == '/' && line[1] == '/' )
+ continue;
+
+ if( sscanf(line, "%1023[^:]:%1023s", w1, w2) != 2 )
+ continue;
+
+ p = get_charcommandinfo_byname(w1);
+ if( p != NULL )
+ {
+ p->level = atoi(w2);
+ p->level = cap_value(p->level, 0, 100);
+ }
+ else
+ if( strcmpi(w1, "import") == 0 )
+ charcommand_config_read(w2);
+ else
+ if( strcmpi(w1, "command_symbol") == 0 &&
+ w2[0] > 31 && // control characters
+ w2[0] != '/' && // symbol of standard ragnarok GM commands
+ w2[0] != '%' && // symbol of party chat speaking
+ w2[0] != '$' && // symbol of guild chat speaking
+ w2[0] != '@' ) // symbol of atcommand
+ charcommand_symbol = w2[0];
+ else
+ ShowWarning("Unknown setting '%s' in file %s\n", w1, cfgName);
+ }
+ fclose(fp);
+
+ return 0;
+}