// $Id: atcommand.c 148 2004-09-30 14:05:37Z MouseJstr $ #include #include #include #include #include #include #include #include #include #include #include "socket.h" #include "timer.h" #include "nullpo.h" #include "clif.h" #include "chrif.h" #include "intif.h" #include "itemdb.h" #include "map.h" #include "pc.h" #include "skill.h" #include "mob.h" #include "pet.h" #include "battle.h" #include "party.h" #include "guild.h" #include "atcommand.h" #include "script.h" #include "npc.h" #include "trade.h" #include "core.h" #ifndef TXT_ONLY #include "mail.h" #endif #define STATE_BLIND 0x10 static char command_symbol = '@'; // first char of the commands (by [Yor]) static char msg_table[1000][1024]; // Server messages (0-499 reserved for GM commands, 500-999 reserved for others) #define ATCOMMAND_FUNC(x) int atcommand_ ## x (const int fd, struct map_session_data* sd, const char* command, const char* message) ATCOMMAND_FUNC(broadcast); ATCOMMAND_FUNC(localbroadcast); ATCOMMAND_FUNC(rurap); ATCOMMAND_FUNC(rura); ATCOMMAND_FUNC(where); ATCOMMAND_FUNC(jumpto); ATCOMMAND_FUNC(jump); ATCOMMAND_FUNC(who); ATCOMMAND_FUNC(who2); ATCOMMAND_FUNC(who3); ATCOMMAND_FUNC(whomap); ATCOMMAND_FUNC(whomap2); ATCOMMAND_FUNC(whomap3); ATCOMMAND_FUNC(whogm); // by Yor ATCOMMAND_FUNC(save); ATCOMMAND_FUNC(load); ATCOMMAND_FUNC(speed); ATCOMMAND_FUNC(storage); ATCOMMAND_FUNC(guildstorage); ATCOMMAND_FUNC(option); ATCOMMAND_FUNC(hide); ATCOMMAND_FUNC(jobchange); ATCOMMAND_FUNC(die); ATCOMMAND_FUNC(kill); ATCOMMAND_FUNC(alive); ATCOMMAND_FUNC(kami); ATCOMMAND_FUNC(heal); ATCOMMAND_FUNC(item); ATCOMMAND_FUNC(item2); ATCOMMAND_FUNC(itemreset); ATCOMMAND_FUNC(itemcheck); ATCOMMAND_FUNC(baselevelup); ATCOMMAND_FUNC(joblevelup); ATCOMMAND_FUNC(help); ATCOMMAND_FUNC(gm); ATCOMMAND_FUNC(pvpoff); ATCOMMAND_FUNC(pvpon); ATCOMMAND_FUNC(gvgoff); ATCOMMAND_FUNC(gvgon); ATCOMMAND_FUNC(model); ATCOMMAND_FUNC(go); ATCOMMAND_FUNC(monster); ATCOMMAND_FUNC(spawn); ATCOMMAND_FUNC(killmonster); ATCOMMAND_FUNC(killmonster2); ATCOMMAND_FUNC(refine); ATCOMMAND_FUNC(produce); ATCOMMAND_FUNC(memo); ATCOMMAND_FUNC(gat); ATCOMMAND_FUNC(packet); ATCOMMAND_FUNC(statuspoint); ATCOMMAND_FUNC(skillpoint); ATCOMMAND_FUNC(zeny); ATCOMMAND_FUNC(param); ATCOMMAND_FUNC(guildlevelup); ATCOMMAND_FUNC(makeegg); ATCOMMAND_FUNC(hatch); ATCOMMAND_FUNC(petfriendly); ATCOMMAND_FUNC(pethungry); ATCOMMAND_FUNC(petrename); ATCOMMAND_FUNC(charpetrename); // by Yor ATCOMMAND_FUNC(recall); ATCOMMAND_FUNC(recallall); ATCOMMAND_FUNC(character_job); ATCOMMAND_FUNC(revive); ATCOMMAND_FUNC(character_stats); ATCOMMAND_FUNC(character_stats_all); ATCOMMAND_FUNC(character_option); ATCOMMAND_FUNC(character_save); ATCOMMAND_FUNC(night); ATCOMMAND_FUNC(day); ATCOMMAND_FUNC(doom); ATCOMMAND_FUNC(doommap); ATCOMMAND_FUNC(raise); ATCOMMAND_FUNC(raisemap); ATCOMMAND_FUNC(character_baselevel); ATCOMMAND_FUNC(character_joblevel); ATCOMMAND_FUNC(kick); ATCOMMAND_FUNC(kickall); ATCOMMAND_FUNC(allskill); ATCOMMAND_FUNC(questskill); ATCOMMAND_FUNC(charquestskill); ATCOMMAND_FUNC(lostskill); ATCOMMAND_FUNC(charlostskill); ATCOMMAND_FUNC(spiritball); ATCOMMAND_FUNC(party); ATCOMMAND_FUNC(guild); ATCOMMAND_FUNC(charskreset); ATCOMMAND_FUNC(charstreset); ATCOMMAND_FUNC(charreset); ATCOMMAND_FUNC(charstpoint); ATCOMMAND_FUNC(charmodel); ATCOMMAND_FUNC(charskpoint); ATCOMMAND_FUNC(charzeny); ATCOMMAND_FUNC(agitstart); ATCOMMAND_FUNC(agitend); ATCOMMAND_FUNC(reloaditemdb); ATCOMMAND_FUNC(reloadmobdb); ATCOMMAND_FUNC(reloadskilldb); #ifndef TXT_ONLY ATCOMMAND_FUNC(rehash);// by Fr3DBr #else /* TXT_ONLY */ ATCOMMAND_FUNC(reloadscript); #endif /* TXT_ONLY */ ATCOMMAND_FUNC(reloadgmdb); // by Yor ATCOMMAND_FUNC(mapexit); ATCOMMAND_FUNC(idsearch); ATCOMMAND_FUNC(mapinfo); ATCOMMAND_FUNC(dye); //** by fritz ATCOMMAND_FUNC(hair_style); //** by fritz ATCOMMAND_FUNC(hair_color); //** by fritz ATCOMMAND_FUNC(stat_all); //** by fritz ATCOMMAND_FUNC(char_change_sex); // by Yor ATCOMMAND_FUNC(char_block); // by Yor ATCOMMAND_FUNC(char_ban); // by Yor ATCOMMAND_FUNC(char_unblock); // by Yor ATCOMMAND_FUNC(char_unban); // by Yor ATCOMMAND_FUNC(mount_peco); // by Valaris ATCOMMAND_FUNC(char_mount_peco); // by Yor ATCOMMAND_FUNC(guildspy); // [Syrus22] ATCOMMAND_FUNC(partyspy); // [Syrus22] ATCOMMAND_FUNC(repairall); // [Valaris] ATCOMMAND_FUNC(guildrecall); // by Yor ATCOMMAND_FUNC(partyrecall); // by Yor //ATCOMMAND_FUNC(nuke); // [Valaris] ATCOMMAND_FUNC(enablenpc); ATCOMMAND_FUNC(disablenpc); ATCOMMAND_FUNC(servertime); // by Yor ATCOMMAND_FUNC(chardelitem); // by Yor ATCOMMAND_FUNC(jail); // by Yor ATCOMMAND_FUNC(unjail); // by Yor ATCOMMAND_FUNC(disguise); // [Valaris] ATCOMMAND_FUNC(undisguise); // by Yor ATCOMMAND_FUNC(ignorelist); // by Yor ATCOMMAND_FUNC(charignorelist); // by Yor ATCOMMAND_FUNC(inall); // by Yor ATCOMMAND_FUNC(exall); // by Yor ATCOMMAND_FUNC(chardisguise); // Kalaspuff ATCOMMAND_FUNC(charundisguise); // Kalaspuff ATCOMMAND_FUNC(email); // by Yor ATCOMMAND_FUNC(effect);//by Apple ATCOMMAND_FUNC(character_item_list); // by Yor ATCOMMAND_FUNC(character_storage_list); // by Yor ATCOMMAND_FUNC(character_cart_list); // by Yor ATCOMMAND_FUNC(addwarp); // by MouseJstr ATCOMMAND_FUNC(follow); // by MouseJstr ATCOMMAND_FUNC(skillon); // by MouseJstr ATCOMMAND_FUNC(skilloff); // by MouseJstr ATCOMMAND_FUNC(killer); // by MouseJstr ATCOMMAND_FUNC(npcmove); // by MouseJstr ATCOMMAND_FUNC(killable); // by MouseJstr ATCOMMAND_FUNC(charkillable); // by MouseJstr ATCOMMAND_FUNC(chareffect); // by MouseJstr ATCOMMAND_FUNC(chardye); // by MouseJstr ATCOMMAND_FUNC(charhairstyle); // by MouseJstr ATCOMMAND_FUNC(charhaircolor); // by MouseJstr ATCOMMAND_FUNC(dropall); // by MouseJstr ATCOMMAND_FUNC(chardropall); // by MouseJstr ATCOMMAND_FUNC(storeall); // by MouseJstr ATCOMMAND_FUNC(charstoreall); // by MouseJstr ATCOMMAND_FUNC(skillid); // by MouseJstr ATCOMMAND_FUNC(useskill); // by MouseJstr ATCOMMAND_FUNC(summon); ATCOMMAND_FUNC(rain); ATCOMMAND_FUNC(snow); ATCOMMAND_FUNC(sakura); ATCOMMAND_FUNC(fog); ATCOMMAND_FUNC(leaves); ATCOMMAND_FUNC(adjgmlvl); // by MouseJstr ATCOMMAND_FUNC(adjcmdlvl); // by MouseJstr ATCOMMAND_FUNC(trade); // by MouseJstr ATCOMMAND_FUNC(unmute); // [Valaris] ATCOMMAND_FUNC(char_wipe); // [Fate] ATCOMMAND_FUNC(set_magic); // [Fate] ATCOMMAND_FUNC(magic_info); // [Fate] ATCOMMAND_FUNC(log); // [Fate] ATCOMMAND_FUNC(tee); // [Fate] #ifndef TXT_ONLY ATCOMMAND_FUNC(checkmail); // [Valaris] ATCOMMAND_FUNC(listmail); // [Valaris] ATCOMMAND_FUNC(listnewmail); // [Valaris] ATCOMMAND_FUNC(readmail); // [Valaris] ATCOMMAND_FUNC(sendmail); // [Valaris] ATCOMMAND_FUNC(sendprioritymail); // [Valaris] ATCOMMAND_FUNC(deletemail); // [Valaris] ATCOMMAND_FUNC(sound); // [Valaris] ATCOMMAND_FUNC(refreshonline); // [Valaris] #endif /* TXT_ONLY */ /*========================================== *AtCommandInfo atcommand_info[]構造体の定義 *------------------------------------------ */ // First char of commands is configured in atcommand_athena.conf. Leave @ in this list for default value. // to set default level, read atcommand_athena.conf first please. static AtCommandInfo atcommand_info[] = { { AtCommand_RuraP, "@rura+", 60, atcommand_rurap }, { AtCommand_RuraP, "@charwarp", 60, atcommand_rurap }, { AtCommand_Rura, "@rura", 40, atcommand_rura }, { AtCommand_Warp, "@warp", 40, atcommand_rura }, { AtCommand_Where, "@where", 1, atcommand_where }, { AtCommand_JumpTo, "@jumpto", 20, atcommand_jumpto }, // + /shift { AtCommand_JumpTo, "@warpto", 20, atcommand_jumpto }, { AtCommand_JumpTo, "@goto", 20, atcommand_jumpto }, { AtCommand_Jump, "@jump", 40, atcommand_jump }, { AtCommand_Who, "@who", 20, atcommand_who }, { AtCommand_Who, "@whois", 20, atcommand_who }, { AtCommand_Who2, "@who2", 20, atcommand_who2 }, { AtCommand_Who3, "@who3", 20, atcommand_who3 }, { AtCommand_WhoMap, "@whomap", 20, atcommand_whomap }, { AtCommand_WhoMap2, "@whomap2", 20, atcommand_whomap2 }, { AtCommand_WhoMap3, "@whomap3", 20, atcommand_whomap3 }, { AtCommand_WhoGM, "@whogm", 20, atcommand_whogm }, // by Yor { AtCommand_Save, "@save", 40, atcommand_save }, { AtCommand_Load, "@return", 40, atcommand_load }, { AtCommand_Load, "@load", 40, atcommand_load }, { AtCommand_Speed, "@speed", 40, atcommand_speed }, { AtCommand_Storage, "@storage", 1, atcommand_storage }, { AtCommand_GuildStorage, "@gstorage", 50, atcommand_guildstorage }, { AtCommand_Option, "@option", 40, atcommand_option }, { AtCommand_Hide, "@hide", 40, atcommand_hide }, // + /hide { AtCommand_JobChange, "@jobchange", 40, atcommand_jobchange }, { AtCommand_JobChange, "@job", 40, atcommand_jobchange }, { AtCommand_Die, "@die", 1, atcommand_die }, { AtCommand_Kill, "@kill", 60, atcommand_kill }, { AtCommand_Alive, "@alive", 60, atcommand_alive }, { AtCommand_Kami, "@kami", 40, atcommand_kami }, { AtCommand_KamiB, "@kamib", 40, atcommand_kami }, { AtCommand_Heal, "@heal", 40, atcommand_heal }, { AtCommand_Item, "@item", 60, atcommand_item }, { AtCommand_Item2, "@item2", 60, atcommand_item2 }, { AtCommand_ItemReset, "@itemreset", 40, atcommand_itemreset }, { AtCommand_ItemCheck, "@itemcheck", 60, atcommand_itemcheck }, { AtCommand_BaseLevelUp, "@lvup", 60, atcommand_baselevelup }, { AtCommand_BaseLevelUp, "@blevel", 60, atcommand_baselevelup }, { AtCommand_BaseLevelUp, "@baselvlup", 60, atcommand_baselevelup }, { AtCommand_JobLevelUp, "@jlevel", 60, atcommand_joblevelup }, { AtCommand_JobLevelUp, "@joblvup", 60, atcommand_joblevelup }, { AtCommand_JobLevelUp, "@joblvlup", 60, atcommand_joblevelup }, { AtCommand_H, "@h", 20, atcommand_help }, { AtCommand_Help, "@help", 20, atcommand_help }, { AtCommand_GM, "@gm", 100, atcommand_gm }, { AtCommand_PvPOff, "@pvpoff", 40, atcommand_pvpoff }, { AtCommand_PvPOn, "@pvpon", 40, atcommand_pvpon }, { AtCommand_GvGOff, "@gvgoff", 40, atcommand_gvgoff }, { AtCommand_GvGOff, "@gpvpoff", 40, atcommand_gvgoff }, { AtCommand_GvGOn, "@gvgon", 40, atcommand_gvgon }, { AtCommand_GvGOn, "@gpvpon", 40, atcommand_gvgon }, { AtCommand_Model, "@model", 20, atcommand_model }, { AtCommand_Go, "@go", 10, atcommand_go }, { AtCommand_Spawn, "@monster", 50, atcommand_spawn }, { AtCommand_Spawn, "@spawn", 50, atcommand_spawn }, //{ AtCommand_Spawn, "@summon", 50, atcommand_spawn }, { AtCommand_Monster, "@monster2", 50, atcommand_monster }, { AtCommand_KillMonster, "@killmonster", 60, atcommand_killmonster }, { AtCommand_KillMonster2, "@killmonster2", 40, atcommand_killmonster2 }, { AtCommand_Refine, "@refine", 60, atcommand_refine }, { AtCommand_Produce, "@produce", 60, atcommand_produce }, { AtCommand_Memo, "@memo", 40, atcommand_memo }, { AtCommand_GAT, "@gat", 99, atcommand_gat }, // debug function { AtCommand_Packet, "@packet", 99, atcommand_packet }, // debug function { AtCommand_StatusPoint, "@stpoint", 60, atcommand_statuspoint }, { AtCommand_SkillPoint, "@skpoint", 60, atcommand_skillpoint }, { AtCommand_Zeny, "@zeny", 60, atcommand_zeny }, { AtCommand_Strength, "@str", 60, atcommand_param }, { AtCommand_Agility, "@agi", 60, atcommand_param }, { AtCommand_Vitality, "@vit", 60, atcommand_param }, { AtCommand_Intelligence, "@int", 60, atcommand_param }, { AtCommand_Dexterity, "@dex", 60, atcommand_param }, { AtCommand_Luck, "@luk", 60, atcommand_param }, { AtCommand_GuildLevelUp, "@guildlvup", 60, atcommand_guildlevelup }, { AtCommand_GuildLevelUp, "@guildlvlup", 60, atcommand_guildlevelup }, { AtCommand_MakeEgg, "@makeegg", 60, atcommand_makeegg }, { AtCommand_Hatch, "@hatch", 60, atcommand_hatch }, { AtCommand_PetFriendly, "@petfriendly", 40, atcommand_petfriendly }, { AtCommand_PetHungry, "@pethungry", 40, atcommand_pethungry }, { AtCommand_PetRename, "@petrename", 1, atcommand_petrename }, { AtCommand_CharPetRename, "@charpetrename", 50, atcommand_charpetrename }, // by Yor { AtCommand_Recall, "@recall", 60, atcommand_recall }, // + /recall { AtCommand_CharacterJob, "@charjob", 60, atcommand_character_job }, { AtCommand_CharacterJob, "@charjobchange", 60, atcommand_character_job }, { AtCommand_Revive, "@revive", 60, atcommand_revive }, { AtCommand_CharacterStats, "@charstats", 40, atcommand_character_stats }, { AtCommand_CharacterStatsAll, "@charstatsall", 40, atcommand_character_stats_all }, { AtCommand_CharacterOption, "@charoption", 60, atcommand_character_option }, { AtCommand_CharacterSave, "@charsave", 60, atcommand_character_save }, { AtCommand_Night, "@night", 80, atcommand_night }, { AtCommand_Day, "@day", 80, atcommand_day }, { AtCommand_Doom, "@doom", 80, atcommand_doom }, { AtCommand_DoomMap, "@doommap", 80, atcommand_doommap }, { AtCommand_Raise, "@raise", 80, atcommand_raise }, { AtCommand_RaiseMap, "@raisemap", 80, atcommand_raisemap }, { AtCommand_CharacterBaseLevel, "@charbaselvl", 60, atcommand_character_baselevel }, { AtCommand_CharacterJobLevel, "@charjlvl", 60, atcommand_character_joblevel }, { AtCommand_Kick, "@kick", 20, atcommand_kick }, // + right click menu for GM "(name) force to quit" { AtCommand_KickAll, "@kickall", 99, atcommand_kickall }, { AtCommand_AllSkill, "@allskill", 60, atcommand_allskill }, { AtCommand_AllSkill, "@allskills", 60, atcommand_allskill }, { AtCommand_AllSkill, "@skillall", 60, atcommand_allskill }, { AtCommand_AllSkill, "@skillsall", 60, atcommand_allskill }, { AtCommand_QuestSkill, "@questskill", 40, atcommand_questskill }, { AtCommand_CharQuestSkill, "@charquestskill", 60, atcommand_charquestskill }, { AtCommand_LostSkill, "@lostskill", 40, atcommand_lostskill }, { AtCommand_CharLostSkill, "@charlostskill", 60, atcommand_charlostskill }, { AtCommand_SpiritBall, "@spiritball", 40, atcommand_spiritball }, { AtCommand_Party, "@party", 1, atcommand_party }, { AtCommand_Guild, "@guild", 50, atcommand_guild }, { AtCommand_AgitStart, "@agitstart", 60, atcommand_agitstart }, { AtCommand_AgitEnd, "@agitend", 60, atcommand_agitend }, { AtCommand_MapExit, "@mapexit", 99, atcommand_mapexit }, { AtCommand_IDSearch, "@idsearch", 60, atcommand_idsearch }, { AtCommand_MapMove, "@mapmove", 40, atcommand_rura }, // /mm command { AtCommand_Broadcast, "@broadcast", 40, atcommand_broadcast }, // /b and /nb command { AtCommand_LocalBroadcast, "@localbroadcast", 40, atcommand_localbroadcast }, // /lb and /nlb command { AtCommand_RecallAll, "@recallall", 80, atcommand_recallall }, { AtCommand_CharSkReset, "@charskreset", 60, atcommand_charskreset }, { AtCommand_CharStReset, "@charstreset", 60, atcommand_charstreset }, { AtCommand_ReloadItemDB, "@reloaditemdb", 99, atcommand_reloaditemdb }, // admin command { AtCommand_ReloadMobDB, "@reloadmobdb", 99, atcommand_reloadmobdb }, // admin command { AtCommand_ReloadSkillDB, "@reloadskilldb", 99, atcommand_reloadskilldb }, // admin command #ifndef TXT_ONLY { AtCommand_Rehash, "@rehash", 99, atcommand_rehash }, // admin command #else /* TXT_ONLY */ { AtCommand_ReloadScript, "@reloadscript", 99, atcommand_reloadscript }, // admin command #endif /* TXT_ONLY */ { AtCommand_ReloadGMDB, "@reloadgmdb", 99, atcommand_reloadgmdb }, // admin command { AtCommand_CharReset, "@charreset", 60, atcommand_charreset }, { AtCommand_CharModel, "@charmodel", 50, atcommand_charmodel }, { AtCommand_CharSKPoint, "@charskpoint", 60, atcommand_charskpoint }, { AtCommand_CharSTPoint, "@charstpoint", 60, atcommand_charstpoint }, { AtCommand_CharZeny, "@charzeny", 60, atcommand_charzeny }, { AtCommand_MapInfo, "@mapinfo", 99, atcommand_mapinfo }, { AtCommand_Dye, "@dye", 40, atcommand_dye }, // by fritz { AtCommand_Dye, "@ccolor", 40, atcommand_dye }, // by fritz { AtCommand_Hstyle, "@hairstyle", 40, atcommand_hair_style }, // by fritz { AtCommand_Hstyle, "@hstyle", 40, atcommand_hair_style }, // by fritz { AtCommand_Hcolor, "@haircolor", 40, atcommand_hair_color }, // by fritz { AtCommand_Hcolor, "@hcolor", 40, atcommand_hair_color }, // by fritz { AtCommand_StatAll, "@statall", 60, atcommand_stat_all }, // by fritz { AtCommand_StatAll, "@statsall", 60, atcommand_stat_all }, { AtCommand_StatAll, "@allstats", 60, atcommand_stat_all }, // by fritz { AtCommand_StatAll, "@allstat", 60, atcommand_stat_all }, // by fritz { AtCommand_CharChangeSex, "@charchangesex", 60, atcommand_char_change_sex }, // by Yor { AtCommand_CharBlock, "@block", 60, atcommand_char_block }, // by Yor { AtCommand_CharBlock, "@charblock", 60, atcommand_char_block }, // by Yor { AtCommand_CharBan, "@ban", 60, atcommand_char_ban }, // by Yor { AtCommand_CharBan, "@banish", 60, atcommand_char_ban }, // by Yor { AtCommand_CharBan, "@charban", 60, atcommand_char_ban }, // by Yor { AtCommand_CharBan, "@charbanish", 60, atcommand_char_ban }, // by Yor { AtCommand_CharUnBlock, "@unblock", 60, atcommand_char_unblock }, // by Yor { AtCommand_CharUnBlock, "@charunblock", 60, atcommand_char_unblock }, // by Yor { AtCommand_CharUnBan, "@unban", 60, atcommand_char_unban }, // by Yor { AtCommand_CharUnBan, "@unbanish", 60, atcommand_char_unban }, // by Yor { AtCommand_CharUnBan, "@charunban", 60, atcommand_char_unban }, // by Yor { AtCommand_CharUnBan, "@charunbanish", 60, atcommand_char_unban }, // by Yor { AtCommand_MountPeco, "@mountpeco", 20, atcommand_mount_peco }, // by Valaris { AtCommand_CharMountPeco, "@charmountpeco", 50, atcommand_char_mount_peco }, // by Yor { AtCommand_GuildSpy, "@guildspy", 60, atcommand_guildspy }, // [Syrus22] { AtCommand_PartySpy, "@partyspy", 60, atcommand_partyspy }, // [Syrus22] { AtCommand_RepairAll, "@repairall", 60, atcommand_repairall }, // [Valaris] { AtCommand_GuildRecall, "@guildrecall", 60, atcommand_guildrecall }, // by Yor { AtCommand_PartyRecall, "@partyrecall", 60, atcommand_partyrecall }, // by Yor // { AtCommand_Nuke, "@nuke", 60, atcommand_nuke }, // [Valaris] { AtCommand_Enablenpc, "@enablenpc", 80, atcommand_enablenpc }, // [] { AtCommand_Disablenpc, "@disablenpc", 80, atcommand_disablenpc }, // [] { AtCommand_ServerTime, "@time", 0, atcommand_servertime }, // by Yor { AtCommand_ServerTime, "@date", 0, atcommand_servertime }, // by Yor { AtCommand_ServerTime, "@server_date", 0, atcommand_servertime }, // by Yor { AtCommand_ServerTime, "@serverdate", 0, atcommand_servertime }, // by Yor { AtCommand_ServerTime, "@server_time", 0, atcommand_servertime }, // by Yor { AtCommand_ServerTime, "@servertime", 0, atcommand_servertime }, // by Yor { AtCommand_CharDelItem, "@chardelitem", 60, atcommand_chardelitem }, // by Yor { AtCommand_Jail, "@jail", 60, atcommand_jail }, // by Yor { AtCommand_UnJail, "@unjail", 60, atcommand_unjail }, // by Yor { AtCommand_UnJail, "@discharge", 60, atcommand_unjail }, // by Yor { AtCommand_Disguise, "@disguise", 20, atcommand_disguise }, // [Valaris] { AtCommand_UnDisguise, "@undisguise", 20, atcommand_undisguise }, // by Yor { AtCommand_IgnoreList, "@ignorelist", 0, atcommand_ignorelist }, // by Yor { AtCommand_CharIgnoreList, "@charignorelist", 20, atcommand_charignorelist }, // by Yor { AtCommand_IgnoreList, "@inall", 20, atcommand_inall }, // by Yor { AtCommand_ExAll, "@exall", 20, atcommand_exall }, // by Yor { AtCommand_CharDisguise, "@chardisguise", 60, atcommand_chardisguise }, // Kalaspuff { AtCommand_CharUnDisguise, "@charundisguise", 60, atcommand_charundisguise }, // Kalaspuff { AtCommand_EMail, "@email", 0, atcommand_email }, // by Yor { AtCommand_Effect, "@effect", 40, atcommand_effect }, // by Apple { AtCommand_Char_Item_List, "@charitemlist", 40, atcommand_character_item_list }, // by Yor { AtCommand_Char_Storage_List, "@charstoragelist", 40, atcommand_character_storage_list }, // by Yor { AtCommand_Char_Cart_List, "@charcartlist", 40, atcommand_character_cart_list }, // by Yor { AtCommand_Follow, "@follow", 10, atcommand_follow }, // by MouseJstr { AtCommand_AddWarp, "@addwarp", 20, atcommand_addwarp }, // by MouseJstr { AtCommand_SkillOn, "@skillon", 20, atcommand_skillon }, // by MouseJstr { AtCommand_SkillOff, "@skilloff", 20, atcommand_skilloff }, // by MouseJstr { AtCommand_Killer, "@killer", 60, atcommand_killer }, // by MouseJstr { AtCommand_NpcMove, "@npcmove", 20, atcommand_npcmove }, // by MouseJstr { AtCommand_Killable, "@killable", 40, atcommand_killable }, // by MouseJstr { AtCommand_CharKillable, "@charkillable", 40, atcommand_charkillable }, // by MouseJstr { AtCommand_Chareffect, "@chareffect", 40, atcommand_chareffect }, // MouseJstr //{ AtCommand_Chardye, "@chardye", 40, atcommand_chardye }, // MouseJstr //{ AtCommand_Charhairstyle, "@charhairstyle", 40, atcommand_charhairstyle }, // MouseJstr //{ AtCommand_Charhaircolor, "@charhaircolor", 40, atcommand_charhaircolor }, // MouseJstr { AtCommand_Dropall, "@dropall", 40, atcommand_dropall }, // MouseJstr { AtCommand_Chardropall, "@chardropall", 40, atcommand_chardropall }, // MouseJstr { AtCommand_Storeall, "@storeall", 40, atcommand_storeall }, // MouseJstr { AtCommand_Charstoreall, "@charstoreall", 40, atcommand_charstoreall }, // MouseJstr { AtCommand_Skillid, "@skillid", 40, atcommand_skillid }, // MouseJstr { AtCommand_Useskill, "@useskill", 40, atcommand_useskill }, // MouseJstr { AtCommand_Rain, "@rain", 99, atcommand_rain }, { AtCommand_Snow, "@snow", 99, atcommand_snow }, { AtCommand_Sakura, "@sakura", 99, atcommand_sakura }, { AtCommand_Fog, "@fog", 99, atcommand_fog }, { AtCommand_Leaves, "@leaves", 99, atcommand_leaves }, //{ AtCommand_Shuffle, "@shuffle", 99, atcommand_shuffle }, //{ AtCommand_Maintenance, "@maintenance", 99, atcommand_maintenance }, //{ AtCommand_Misceffect, "@misceffect", 60, atcommand_misceffect }, { AtCommand_Summon, "@summon", 60, atcommand_summon }, { AtCommand_AdjGmLvl, "@adjgmlvl", 99, atcommand_adjgmlvl }, { AtCommand_AdjCmdLvl, "@adjcmdlvl", 99, atcommand_adjcmdlvl }, { AtCommand_Trade, "@trade", 60, atcommand_trade }, { AtCommand_UnMute, "@unmute", 60, atcommand_unmute }, // [Valaris] { AtCommand_UnMute, "@charwipe", 60, atcommand_char_wipe }, // [Fate] { AtCommand_SetMagic, "@setmagic", 99, atcommand_set_magic }, // [Fate] { AtCommand_MagicInfo, "@magicinfo", 60, atcommand_magic_info }, // [Fate] { AtCommand_Log, "@log", 60, atcommand_log }, // [Fate] { AtCommand_Log, "@l", 60, atcommand_log }, // [Fate] { AtCommand_Tee, "@tee", 60, atcommand_tee }, // [Fate] { AtCommand_Tee, "@t", 60, atcommand_tee }, // [Fate] #ifndef TXT_ONLY // sql-only commands { AtCommand_CheckMail, "@checkmail", 1, atcommand_listmail }, // [Valaris] { AtCommand_ListMail, "@listmail", 1, atcommand_listmail }, // [Valaris] { AtCommand_ListNewMail, "@listnewmail", 1, atcommand_listmail }, // [Valaris] { AtCommand_ReadMail, "@readmail", 1, atcommand_readmail }, // [Valaris] { AtCommand_DeleteMail, "@deletemail", 1, atcommand_readmail }, // [Valaris] { AtCommand_SendMail, "@sendmail", 1, atcommand_sendmail }, // [Valaris] { AtCommand_SendPriorityMail, "@sendprioritymail",80, atcommand_sendmail }, // [Valaris] { AtCommand_RefreshOnline, "@refreshonline", 99, atcommand_refreshonline }, // [Valaris] #endif /* TXT_ONLY */ // add new commands before this line { AtCommand_Unknown, NULL, 1, NULL } }; /*==================================================== * This function return the name of the job (by [Yor]) *---------------------------------------------------- */ char * job_name(int class) { switch (class) { case 0: return "Novice"; case 1: return "Swordsman"; case 2: return "Mage"; case 3: return "Archer"; case 4: return "Acolyte"; case 5: return "Merchant"; case 6: return "Thief"; case 7: return "Knight"; case 8: return "Priest"; case 9: return "Wizard"; case 10: return "Blacksmith"; case 11: return "Hunter"; case 12: return "Assassin"; case 13: return "Knight 2"; case 14: return "Crusader"; case 15: return "Monk"; case 16: return "Sage"; case 17: return "Rogue"; case 18: return "Alchemist"; case 19: return "Bard"; case 20: return "Dancer"; case 21: return "Crusader 2"; case 22: return "Wedding"; case 23: return "Super Novice"; case 4001: return "Novice High"; case 4002: return "Swordsman High"; case 4003: return "Mage High"; case 4004: return "Archer High"; case 4005: return "Acolyte High"; case 4006: return "Merchant High"; case 4007: return "Thief High"; case 4008: return "Lord Knight"; case 4009: return "High Priest"; case 4010: return "High Wizard"; case 4011: return "Whitesmith"; case 4012: return "Sniper"; case 4013: return "Assassin Cross"; case 4014: return "Peko Knight"; case 4015: return "Paladin"; case 4016: return "Champion"; case 4017: return "Professor"; case 4018: return "Stalker"; case 4019: return "Creator"; case 4020: return "Clown"; case 4021: return "Gypsy"; case 4022: return "Peko Paladin"; case 4023: return "Baby Novice"; case 4024: return "Baby Swordsman"; case 4025: return "Baby Mage"; case 4026: return "Baby Archer"; case 4027: return "Baby Acolyte"; case 4028: return "Baby Merchant"; case 4029: return "Baby Thief"; case 4030: return "Baby Knight"; case 4031: return "Baby Priest"; case 4032: return "Baby Wizard"; case 4033: return "Baby Blacksmith"; case 4034: return "Baby Hunter"; case 4035: return "Baby Assassin"; case 4036: return "Baby Peco Knight"; case 4037: return "Baby Crusader"; case 4038: return "Baby Monk"; case 4039: return "Baby Sage"; case 4040: return "Baby Rogue"; case 4041: return "Baby Alchemist"; case 4042: return "Baby Bard"; case 4043: return "Baby Dancer"; case 4044: return "Baby Peco Crusader"; case 4045: return "Super Baby"; } return "Unknown Job"; } //----------------------------------------------------------- // Return the message string of the specified number by [Yor] //----------------------------------------------------------- char * msg_txt(int msg_number) { if (msg_number >= 0 && msg_number < (int)(sizeof(msg_table) / sizeof(msg_table[0])) && msg_table[msg_number] != NULL && msg_table[msg_number][0] != '\0') return msg_table[msg_number]; return "??"; } //------------------------------------------------------------ // E-mail check: return 0 (not correct) or 1 (valid). by [Yor] //------------------------------------------------------------ int e_mail_check(unsigned char *email) { char ch; unsigned char* last_arobas; // athena limits if (strlen(email) < 3 || strlen(email) > 39) return 0; // part of RFC limits (official reference of e-mail description) if (strchr(email, '@') == NULL || email[strlen(email)-1] == '@') return 0; if (email[strlen(email)-1] == '.') return 0; last_arobas = strrchr(email, '@'); if (strstr(last_arobas, "@.") != NULL || strstr(last_arobas, "..") != NULL) return 0; for(ch = 1; ch < 32; ch++) { if (strchr(last_arobas, ch) != NULL) { return 0; break; } } if (strchr(last_arobas, ' ') != NULL || strchr(last_arobas, ';') != NULL) return 0; // all correct return 1; } /*========================================== * get_atcommand_level @コマンドの必要レベルを取得 *------------------------------------------ */ int get_atcommand_level(const AtCommandType type) { int i; for (i = 0; atcommand_info[i].type != AtCommand_None; i++) if (atcommand_info[i].type == type) return atcommand_info[i].level; return 100; // 100: command can not be used } /*======================================== * At-command logging */ int last_logfile_nr = 0; char *gm_logfile_name = NULL; static FILE *gm_logfile = NULL; static void log_atcommand(struct map_session_data *sd, const char *message) { if (gm_logfile_name) { time_t time_v; struct tm ctime; int month, year, logfile_nr; time(&time_v); gmtime_r(&time_v, &ctime); year = ctime.tm_year + 1900; month = ctime.tm_mon + 1; logfile_nr = (year * 12) + month; if (logfile_nr != last_logfile_nr) { char *fullname = malloc(strlen(gm_logfile_name) + 10); sprintf(fullname, "%s.%04d-%02d", gm_logfile_name, year, month); if (gm_logfile) close(gm_logfile); gm_logfile = fopen(fullname, "a"); free(fullname); if (!gm_logfile) { perror("GM log file"); gm_logfile_name = NULL; } last_logfile_nr = logfile_nr; } if (gm_logfile && pc_isGM(sd)) { fprintf(gm_logfile, "[%04d-%02d-%02d %02d:%02d:%02d] %s(%d,%d) %s\n", year, month, ctime.tm_mday, ctime.tm_hour, ctime.tm_min, ctime.tm_sec, map[sd->bl.m].name, sd->bl.x, sd->bl.y, message); fflush(gm_logfile); } } } /*========================================== *is_atcommand @コマンドに存在するかどうか確認する *------------------------------------------ */ AtCommandType is_atcommand(const int fd, struct map_session_data* sd, const char* message, int gmlvl) { const char* str = message; int s_flag = 0; AtCommandInfo info; AtCommandType type; nullpo_retr(AtCommand_None, sd); if (!message || !*message) return AtCommand_None; memset(&info, 0, sizeof(info)); str += strlen(sd->status.name); while (*str && (isspace(*str) || (s_flag == 0 && *str == ':'))) { if (*str == ':') s_flag = 1; str++; } if (!*str) return AtCommand_None; type = atcommand(gmlvl > 0 ? gmlvl : pc_isGM(sd), str, &info); if (type != AtCommand_None) { char command[100]; char output[200]; const char* p = str; memset(command, '\0', sizeof(command)); memset(output, '\0', sizeof(output)); while (*p && !isspace(*p)) p++; if (p - str >= sizeof(command)) // too long return AtCommand_Unknown; strncpy(command, str, p - str); while (isspace(*p)) p++; if (type == AtCommand_Unknown || info.proc == NULL) { sprintf(output, msg_table[153], command); // %s is Unknown Command. clif_displaymessage(fd, output); } else { if (info.proc(fd, sd, command, p) != 0) { // Command can not be executed sprintf(output, msg_table[154], command); // %s failed. clif_displaymessage(fd, output); } else { log_atcommand(sd, message); } } return info.type; } return AtCommand_None; } /*========================================== * *------------------------------------------ */ AtCommandType atcommand(const int level, const char* message, struct AtCommandInfo* info) { char* p = (char *)message; // it's 'char' and not 'const char' to have possibility to modify the first character if necessary if (!info) return AtCommand_None; if (battle_config.atc_gmonly != 0 && !level) // level = pc_isGM(sd) return AtCommand_None; if (!p || !*p) { fprintf(stderr, "at command message is empty\n"); return AtCommand_None; } if (*p == command_symbol) { // check first char. char command[101]; int i = 0; memset(info, 0, sizeof(AtCommandInfo)); sscanf(p, "%100s", command); command[sizeof(command)-1] = '\0'; while (atcommand_info[i].type != AtCommand_Unknown) { if (strcmpi(command+1, atcommand_info[i].command+1) == 0 && level >= atcommand_info[i].level) { p[0] = atcommand_info[i].command[0]; // set correct first symbol for after. break; } i++; } if (atcommand_info[i].type == AtCommand_Unknown) { // doesn't return Unknown if player is normal player (display the text, not display: unknown command) if (level == 0) return AtCommand_None; else return AtCommand_Unknown; } memcpy(info, &atcommand_info[i], sizeof atcommand_info[i]); } else { return AtCommand_None; } return info->type; } /*========================================== * *------------------------------------------ */ static int atkillmonster_sub(struct block_list *bl, va_list ap) { int flag = va_arg(ap, int); nullpo_retr(0, bl); if (flag) mob_damage(NULL, (struct mob_data *)bl, ((struct mob_data *)bl)->hp, 2); else mob_delete((struct mob_data *)bl); return 0; } #ifndef TXT_ONLY static int atkillnpc_sub(struct block_list *bl, va_list ap) { int flag = va_arg(ap,int); nullpo_retr(0, bl); npc_delete((struct npc_data *)bl); flag = 0; return 0; } void rehash( const int fd, struct map_session_data* sd ) { int map_id = 0; int LOADED_MAPS = map_num; for (map_id = 0; map_id < LOADED_MAPS;map_id++) { if (map_id > LOADED_MAPS) break; map_foreachinarea(atkillmonster_sub, map_id, 0, 0, map[map_id].xs, map[map_id].ys, BL_MOB, 0); map_foreachinarea(atkillnpc_sub, map_id, 0, 0, map[map_id].xs, map[map_id].ys, BL_NPC, 0); } } #endif /* not TXT_ONLY */ /*========================================== * Read Message Data *------------------------------------------ */ int msg_config_read(const char *cfgName) { int msg_number; char line[1024], w1[1024], w2[1024]; FILE *fp; if ((fp = fopen(cfgName, "r")) == NULL) { printf("Messages file not found: %s\n", cfgName); return 1; } while(fgets(line, sizeof(line)-1, fp)) { if (line[0] == '/' && line[1] == '/') continue; if (sscanf(line, "%[^:]: %[^\r\n]", w1, w2) == 2) { if (strcmpi(w1, "import") == 0) { msg_config_read(w2); } else { msg_number = atoi(w1); if (msg_number >= 0 && msg_number < (int)(sizeof(msg_table) / sizeof(msg_table[0]))) strcpy(msg_table[msg_number], w2); // printf("message #%d: '%s'.\n", msg_number, msg_table[msg_number]); } } } fclose(fp); return 0; } /*========================================== * *------------------------------------------ */ static AtCommandInfo* get_atcommandinfo_byname(const char* name) { int i; for (i = 0; atcommand_info[i].type != AtCommand_Unknown; i++) if (strcmpi(atcommand_info[i].command + 1, name) == 0) return &atcommand_info[i]; return NULL; } /*========================================== * *------------------------------------------ */ int atcommand_config_read(const char *cfgName) { char line[1024], w1[1024], w2[1024]; AtCommandInfo* p; FILE* fp; if ((fp = fopen(cfgName, "r")) == NULL) { printf("At commands configuration file not found: %s\n", cfgName); return 1; } while (fgets(line, sizeof(line)-1, fp)) { if (line[0] == '/' && line[1] == '/') continue; if (sscanf(line, "%1023[^:]:%1023s", w1, w2) != 2) continue; p = get_atcommandinfo_byname(w1); if (p != NULL) { p->level = atoi(w2); if (p->level > 100) p->level = 100; else if (p->level < 0) p->level = 0; } if (strcmpi(w1, "import") == 0) atcommand_config_read(w2); else if (strcmpi(w1, "command_symbol") == 0 && w2[0] > 31 && w2[0] != '/' && // symbol of standard ragnarok GM commands w2[0] != '%') // symbol of party chat speaking command_symbol = w2[0]; } fclose(fp); return 0; } /*========================================== // @ command processing functions *------------------------------------------ */ /*========================================== * @rura+ *------------------------------------------ */ int atcommand_rurap( const int fd, struct map_session_data* sd, const char* command, const char* message) { char map_name[100]; char character[100]; int x = 0, y = 0; struct map_session_data *pl_sd; int m; memset(map_name, '\0', sizeof(map_name)); memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99s %d %d %99[^\n]", map_name, &x, &y, character) < 4) { clif_displaymessage(fd, "Usage: @charwarp/@rura+ "); return -1; } if (x <= 0) x = rand() % 399 + 1; if (y <= 0) y = rand() % 399 + 1; if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if ((pl_sd = map_nick2sd(character)) != NULL) { if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can rura+ only lower or same GM level if (x > 0 && x < 400 && y > 0 && y < 400) { m = map_mapname2mapid(map_name); if (m >= 0 && 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_name, x, y, 3) == 0) { clif_displaymessage(pl_sd->fd, msg_table[0]); // Warped. clif_displaymessage(fd, msg_table[15]); // Player warped (message sends to player too). } else { clif_displaymessage(fd, msg_table[1]); // Map not found. return -1; } } else { clif_displaymessage(fd, msg_table[2]); // Coordinates out of range. return -1; } } else { clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } // @rura /*========================================== * *------------------------------------------ */ int atcommand_rura( const int fd, struct map_session_data* sd, const char* command, const char* message) { char map_name[100]; int x = 0, y = 0; int m; memset(map_name, '\0', sizeof(map_name)); if (!message || !*message || sscanf(message, "%99s %d %d", map_name, &x, &y) < 1) { clif_displaymessage(fd, "Please, enter a map (usage: @warp/@rura/@mapmove )."); return -1; } if (x <= 0) x = rand() % 399 + 1; if (y <= 0) y = rand() % 399 + 1; if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if (x > 0 && x < 400 && y > 0 && y < 400) { m = map_mapname2mapid(map_name); if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to this map."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } if (pc_setpos(sd, map_name, x, y, 3) == 0) clif_displaymessage(fd, msg_table[0]); // Warped. else { clif_displaymessage(fd, msg_table[1]); // Map not found. return -1; } } else { clif_displaymessage(fd, msg_table[2]); // Coordinates out of range. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_where( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; char output[200]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); memset(output, '\0', sizeof(output)); if (sscanf(message, "%99[^\n]", character) < 1) strcpy(character, sd->status.name); if ((pl_sd = map_nick2sd(character)) != NULL && !((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pc_isGM(pl_sd) > pc_isGM(sd)))) { // you can look only lower or same level sprintf(output, "%s: %s (%d,%d)", pl_sd->status.name, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_jumpto( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; char output[200]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @jumpto/@warpto/@goto )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pl_sd->bl.m >= 0 && map[pl_sd->bl.m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to the map of this player."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } pc_setpos(sd, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y, 3); sprintf(output, msg_table[4], character); // Jump to %s clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_jump( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; int x = 0, y = 0; memset(output, '\0', sizeof(output)); sscanf(message, "%d %d", &x, &y); if (x <= 0) x = rand() % 399 + 1; if (y <= 0) y = rand() % 399 + 1; if (x > 0 && x < 400 && y > 0 && y < 400) { if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to your actual map."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } pc_setpos(sd, sd->mapname, x, y, 3); sprintf(output, msg_table[5], x, y); // Jump to %d %d clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[2]); // Coordinates out of range. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_who( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; struct map_session_data *pl_sd; int i, j, count; int pl_GM_level, GM_level; char match_text[100]; char player_name[24]; memset(output, '\0', sizeof(output)); memset(match_text, '\0', sizeof(match_text)); memset(player_name, '\0', sizeof(player_name)); if (sscanf(message, "%99[^\n]", match_text) < 1) strcpy(match_text, ""); for (j = 0; match_text[j]; j++) match_text[j] = tolower(match_text[j]); count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level memcpy(player_name, pl_sd->status.name, 24); for (j = 0; player_name[j]; j++) player_name[j] = tolower(player_name[j]); if (strstr(player_name, match_text) != NULL) { // search with no case sensitive if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | Location: %s %d %d", pl_sd->status.name, pl_GM_level, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); else sprintf(output, "Name: %s | Location: %s %d %d", pl_sd->status.name, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); clif_displaymessage(fd, output); count++; } } } } if (count == 0) clif_displaymessage(fd, msg_table[28]); // No player found. else if (count == 1) clif_displaymessage(fd, msg_table[29]); // 1 player found. else { sprintf(output, msg_table[30], count); // %d players found. clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_who2( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; struct map_session_data *pl_sd; int i, j, count; int pl_GM_level, GM_level; char match_text[100]; char player_name[24]; memset(output, '\0', sizeof(output)); memset(match_text, '\0', sizeof(match_text)); memset(player_name, '\0', sizeof(player_name)); if (sscanf(message, "%99[^\n]", match_text) < 1) strcpy(match_text, ""); for (j = 0; match_text[j]; j++) match_text[j] = tolower(match_text[j]); count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level memcpy(player_name, pl_sd->status.name, 24); for (j = 0; player_name[j]; j++) player_name[j] = tolower(player_name[j]); if (strstr(player_name, match_text) != NULL) { // search with no case sensitive if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | BLvl: %d | Job: %s (Lvl: %d)", pl_sd->status.name, pl_GM_level, pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level); else sprintf(output, "Name: %s | BLvl: %d | Job: %s (Lvl: %d)", pl_sd->status.name, pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level); clif_displaymessage(fd, output); count++; } } } } if (count == 0) clif_displaymessage(fd, msg_table[28]); // No player found. else if (count == 1) clif_displaymessage(fd, msg_table[29]); // 1 player found. else { sprintf(output, msg_table[30], count); // %d players found. clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_who3( const int fd, struct map_session_data* sd, const char* command, const char* message) { char temp0[100]; char temp1[100]; char output[200]; struct map_session_data *pl_sd; int i, j, count; int pl_GM_level, GM_level; char match_text[100]; char player_name[24]; struct guild *g; struct party *p; memset(temp0, '\0', sizeof(temp0)); memset(temp1, '\0', sizeof(temp1)); memset(output, '\0', sizeof(output)); memset(match_text, '\0', sizeof(match_text)); memset(player_name, '\0', sizeof(player_name)); if (sscanf(message, "%99[^\n]", match_text) < 1) strcpy(match_text, ""); for (j = 0; match_text[j]; j++) match_text[j] = tolower(match_text[j]); count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level memcpy(player_name, pl_sd->status.name, 24); for (j = 0; player_name[j]; j++) player_name[j] = tolower(player_name[j]); if (strstr(player_name, match_text) != NULL) { // search with no case sensitive g = guild_search(pl_sd->status.guild_id); if (g == NULL) sprintf(temp1, "None"); else sprintf(temp1, "%s", g->name); p = party_search(pl_sd->status.party_id); if (p == NULL) sprintf(temp0, "None"); else sprintf(temp0, "%s", p->name); if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | Party: '%s' | Guild: '%s'", pl_sd->status.name, pl_GM_level, temp0, temp1); else sprintf(output, "Name: %s | Party: '%s' | Guild: '%s'", pl_sd->status.name, temp0, temp1); clif_displaymessage(fd, output); count++; } } } } if (count == 0) clif_displaymessage(fd, msg_table[28]); // No player found. else if (count == 1) clif_displaymessage(fd, msg_table[29]); // 1 player found. else { sprintf(output, msg_table[30], count); // %d players found. clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_whomap( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; struct map_session_data *pl_sd; int i, count; int pl_GM_level, GM_level; int map_id; char map_name[100]; memset(output, '\0', sizeof(output)); memset(map_name, '\0', sizeof(map_name)); if (!message || !*message) map_id = sd->bl.m; else { sscanf(message, "%99s", map_name); if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if ((map_id = map_mapname2mapid(map_name)) < 0) map_id = sd->bl.m; } count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level if (pl_sd->bl.m == map_id) { if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | Location: %s %d %d", pl_sd->status.name, pl_GM_level, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); else sprintf(output, "Name: %s | Location: %s %d %d", pl_sd->status.name, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); clif_displaymessage(fd, output); count++; } } } } if (count == 0) sprintf(output, msg_table[54], map[map_id].name); // No player found in map '%s'. else if (count == 1) sprintf(output, msg_table[55], map[map_id].name); // 1 player found in map '%s'. else { sprintf(output, msg_table[56], count, map[map_id].name); // %d players found in map '%s'. } clif_displaymessage(fd, output); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_whomap2( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; struct map_session_data *pl_sd; int i, count; int pl_GM_level, GM_level; int map_id = 0; char map_name[100]; memset(output, '\0', sizeof(output)); memset(map_name, '\0', sizeof(map_name)); if (!message || !*message) map_id = sd->bl.m; else { sscanf(message, "%99s", map_name); if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if ((map_id = map_mapname2mapid(map_name)) < 0) map_id = sd->bl.m; } count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level if (pl_sd->bl.m == map_id) { if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | BLvl: %d | Job: %s (Lvl: %d)", pl_sd->status.name, pl_GM_level, pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level); else sprintf(output, "Name: %s | BLvl: %d | Job: %s (Lvl: %d)", pl_sd->status.name, pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level); clif_displaymessage(fd, output); count++; } } } } if (count == 0) sprintf(output, msg_table[54], map[map_id].name); // No player found in map '%s'. else if (count == 1) sprintf(output, msg_table[55], map[map_id].name); // 1 player found in map '%s'. else { sprintf(output, msg_table[56], count, map[map_id].name); // %d players found in map '%s'. } clif_displaymessage(fd, output); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_whomap3( const int fd, struct map_session_data* sd, const char* command, const char* message) { char temp0[100]; char temp1[100]; char output[200]; struct map_session_data *pl_sd; int i, count; int pl_GM_level, GM_level; int map_id = 0; char map_name[100]; struct guild *g; struct party *p; memset(temp0, '\0', sizeof(temp0)); memset(temp1, '\0', sizeof(temp1)); memset(output, '\0', sizeof(output)); memset(map_name, '\0', sizeof(map_name)); if (!message || !*message) map_id = sd->bl.m; else { sscanf(message, "%99s", map_name); if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if ((map_id = map_mapname2mapid(map_name)) < 0) map_id = sd->bl.m; } count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level if (pl_sd->bl.m == map_id) { g = guild_search(pl_sd->status.guild_id); if (g == NULL) sprintf(temp1, "None"); else sprintf(temp1, "%s", g->name); p = party_search(pl_sd->status.party_id); if (p == NULL) sprintf(temp0, "None"); else sprintf(temp0, "%s", p->name); if (pl_GM_level > 0) sprintf(output, "Name: %s (GM:%d) | Party: '%s' | Guild: '%s'", pl_sd->status.name, pl_GM_level, temp0, temp1); else sprintf(output, "Name: %s | Party: '%s' | Guild: '%s'", pl_sd->status.name, temp0, temp1); clif_displaymessage(fd, output); count++; } } } } if (count == 0) sprintf(output, msg_table[54], map[map_id].name); // No player found in map '%s'. else if (count == 1) sprintf(output, msg_table[55], map[map_id].name); // 1 player found in map '%s'. else { sprintf(output, msg_table[56], count, map[map_id].name); // %d players found in map '%s'. } clif_displaymessage(fd, output); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_whogm( const int fd, struct map_session_data* sd, const char* command, const char* message) { char temp0[100]; char temp1[100]; char output[200]; struct map_session_data *pl_sd; int i, j, count; int pl_GM_level, GM_level; char match_text[100]; char player_name[24]; struct guild *g; struct party *p; memset(temp0, '\0', sizeof(temp0)); memset(temp1, '\0', sizeof(temp1)); memset(output, '\0', sizeof(output)); memset(match_text, '\0', sizeof(match_text)); memset(player_name, '\0', sizeof(player_name)); if (sscanf(message, "%99[^\n]", match_text) < 1) strcpy(match_text, ""); for (j = 0; match_text[j]; j++) match_text[j] = tolower(match_text[j]); count = 0; GM_level = pc_isGM(sd); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { pl_GM_level = pc_isGM(pl_sd); if (pl_GM_level > 0) { if (!((battle_config.hide_GM_session || (pl_sd->status.option & OPTION_HIDE)) && (pl_GM_level > GM_level))) { // you can look only lower or same level memcpy(player_name, pl_sd->status.name, 24); for (j = 0; player_name[j]; j++) player_name[j] = tolower(player_name[j]); if (strstr(player_name, match_text) != NULL) { // search with no case sensitive sprintf(output, "Name: %s (GM:%d) | Location: %s %d %d", pl_sd->status.name, pl_GM_level, pl_sd->mapname, pl_sd->bl.x, pl_sd->bl.y); clif_displaymessage(fd, output); sprintf(output, " BLvl: %d | Job: %s (Lvl: %d)", pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level); clif_displaymessage(fd, output); g = guild_search(pl_sd->status.guild_id); if (g == NULL) sprintf(temp1, "None"); else sprintf(temp1, "%s", g->name); p = party_search(pl_sd->status.party_id); if (p == NULL) sprintf(temp0, "None"); else sprintf(temp0, "%s", p->name); sprintf(output, " Party: '%s' | Guild: '%s'", temp0, temp1); clif_displaymessage(fd, output); count++; } } } } } if (count == 0) clif_displaymessage(fd, msg_table[150]); // No GM found. else if (count == 1) clif_displaymessage(fd, msg_table[151]); // 1 GM found. else { sprintf(output, msg_table[152], count); // %d GMs found. clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_save( const int fd, struct map_session_data* sd, const char* command, const char* message) { pc_setsavepoint(sd, sd->mapname, sd->bl.x, sd->bl.y); if (sd->status.pet_id > 0 && sd->pd) intif_save_petdata(sd->status.account_id, &sd->pet); pc_makesavestatus(sd); chrif_save(sd); storage_storage_save(sd); clif_displaymessage(fd, msg_table[6]); // Character data respawn point saved. return 0; } /*========================================== * *------------------------------------------ */ int atcommand_load( const int fd, struct map_session_data* sd, const char* command, const char* message) { int m; m = map_mapname2mapid(sd->status.save_point.map); if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to your save map."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } pc_setpos(sd, sd->status.save_point.map, sd->status.save_point.x, sd->status.save_point.y, 0); clif_displaymessage(fd, msg_table[7]); // Warping to respawn point. return 0; } /*========================================== * *------------------------------------------ */ int atcommand_speed( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; int speed; memset(output, '\0', sizeof(output)); if (!message || !*message) { sprintf(output, "Please, enter a speed value (usage: @speed <%d-%d>).", MIN_WALK_SPEED, MAX_WALK_SPEED); clif_displaymessage(fd, output); return -1; } speed = atoi(message); if (speed >= MIN_WALK_SPEED && speed <= MAX_WALK_SPEED) { sd->speed = speed; //sd->walktimer = x; //この文を追加 by れ clif_updatestatus(sd, SP_SPEED); clif_displaymessage(fd, msg_table[8]); // Speed changed. } else { sprintf(output, "Please, enter a valid speed value (usage: @speed <%d-%d>).", MIN_WALK_SPEED, MAX_WALK_SPEED); clif_displaymessage(fd, output); return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_storage( const int fd, struct map_session_data* sd, const char* command, const char* message) { storage_storageopen(sd); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_guildstorage( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (sd->status.guild_id > 0) storage_guild_storageopen(sd); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_option( const int fd, struct map_session_data* sd, const char* command, const char* message) { int param1 = 0, param2 = 0, param3 = 0; if (!message || !*message || sscanf(message, "%d %d %d", ¶m1, ¶m2, ¶m3) < 1 || param1 < 0 || param2 < 0 || param3 < 0) { clif_displaymessage(fd, "Please, enter at least a option (usage: @option )."); return -1; } sd->opt1 = param1; sd->opt2 = param2; if (!(sd->status.option & CART_MASK) && param3 & CART_MASK) { clif_cart_itemlist(sd); clif_cart_equiplist(sd); clif_updatestatus(sd, SP_CARTINFO); } sd->status.option = param3; // fix pecopeco display if (sd->status.class == 13 || sd->status.class == 21 || sd->status.class == 4014 || sd->status.class == 4022) { if (!pc_isriding(sd)) { // sd have the new value... if (sd->status.class == 13) sd->status.class = sd->view_class = 7; else if (sd->status.class == 21) sd->status.class = sd->view_class = 14; else if (sd->status.class == 4014) sd->status.class = sd->view_class = 4008; else if (sd->status.class == 4022) sd->status.class = sd->view_class = 4015; } } else { if (pc_isriding(sd)) { // sd have the new value... if (sd->disguise > 0) { // temporary prevention of crash caused by peco + disguise, will look into a better solution [Valaris] (code added by [Yor]) sd->status.option &= ~0x0020; } else { if (sd->status.class == 7) sd->status.class = sd->view_class = 13; else if (sd->status.class == 14) sd->status.class = sd->view_class = 21; else if (sd->status.class == 4008) sd->status.class = sd->view_class = 4014; else if (sd->status.class == 4015) sd->status.class = sd->view_class = 4022; else sd->status.option &= ~0x0020; } } } clif_changeoption(&sd->bl); pc_calcstatus(sd, 0); clif_displaymessage(fd, msg_table[9]); // Options changed. return 0; } /*========================================== * *------------------------------------------ */ int atcommand_hide( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (sd->status.option & OPTION_HIDE) { sd->status.option &= ~OPTION_HIDE; clif_displaymessage(fd, msg_table[10]); // Invisible: Off } else { sd->status.option |= OPTION_HIDE; clif_displaymessage(fd, msg_table[11]); // Invisible: On } clif_changeoption(&sd->bl); return 0; } /*========================================== * 転職する upperを指定すると転生や養子にもなれる *------------------------------------------ */ int atcommand_jobchange( const int fd, struct map_session_data* sd, const char* command, const char* message) { int job = 0, upper = -1; if (!message || !*message || sscanf(message, "%d %d", &job, &upper) < 1) { clif_displaymessage(fd, "Please, enter job ID (usage: @job/@jobchange )."); return -1; } if (job == 37 ||job == 45) return 0; if ((job >= 0 && job < MAX_PC_CLASS)) { // fix pecopeco display if ((job != 13 && job != 21 && job != 4014 && job != 4022)) { if (pc_isriding(sd)) { if (sd->status.class == 13) sd->status.class = sd->view_class = 7; if (sd->status.class == 21) sd->status.class = sd->view_class = 14; if (sd->status.class == 4014) sd->status.class = sd->view_class = 4008; if (sd->status.class == 4022) sd->status.class = sd->view_class = 4015; sd->status.option &= ~0x0020; clif_changeoption(&sd->bl); pc_calcstatus(sd, 0); } } else { if (!pc_isriding(sd)) { if (job == 13) job = 7; if (job == 21) job = 14; if (job == 4014) job = 4008; if (job == 4022) job = 4015; } } if (pc_jobchange(sd, job, upper) == 0) clif_displaymessage(fd, msg_table[12]); // Your job has been changed. else { clif_displaymessage(fd, msg_table[155]); // Impossible to change your job. return -1; } } else { clif_displaymessage(fd, "Please, enter a valid job ID (usage: @job/@jobchange )."); return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_die( const int fd, struct map_session_data* sd, const char* command, const char* message) { pc_damage(NULL, sd, sd->status.hp + 1); clif_displaymessage(fd, msg_table[13]); // A pity! You've died. return 0; } /*========================================== * *------------------------------------------ */ int atcommand_kill( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @kill )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can kill only lower or same level pc_damage(NULL, pl_sd, pl_sd->status.hp + 1); clif_displaymessage(fd, msg_table[14]); // Character killed. } else { clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_alive( const int fd, struct map_session_data* sd, const char* command, const char* message) { sd->status.hp = sd->status.max_hp; sd->status.sp = sd->status.max_sp; pc_setstand(sd); if (battle_config.pc_invincible_time > 0) pc_setinvincibletimer(sd, battle_config.pc_invincible_time); clif_updatestatus(sd, SP_HP); clif_updatestatus(sd, SP_SP); clif_resurrection(&sd->bl, 1); clif_displaymessage(fd, msg_table[16]); // You've been revived! It's a miracle! return 0; } /*========================================== * *------------------------------------------ */ int atcommand_kami( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message) { clif_displaymessage(fd, "Please, enter a message (usage: @kami )."); return -1; } sscanf(message, "%199[^\n]", output); intif_GMmessage(output, strlen(output) + 1, (*(command + 5) == 'b') ? 0x10 : 0); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_heal( const int fd, struct map_session_data* sd, const char* command, const char* message) { int hp = 0, sp = 0; // [Valaris] thanks to fov sscanf(message, "%d %d", &hp, &sp); if (hp == 0 && sp == 0) { hp = sd->status.max_hp - sd->status.hp; sp = sd->status.max_sp - sd->status.sp; } else { if (hp > 0 && (hp > sd->status.max_hp || hp > (sd->status.max_hp - sd->status.hp))) // fix positiv overflow hp = sd->status.max_hp - sd->status.hp; else if (hp < 0 && (hp < -sd->status.max_hp || hp < (1 - sd->status.hp))) // fix negativ overflow hp = 1 - sd->status.hp; if (sp > 0 && (sp > sd->status.max_sp || sp > (sd->status.max_sp - sd->status.sp))) // fix positiv overflow sp = sd->status.max_sp - sd->status.sp; else if (sp < 0 && (sp < -sd->status.max_sp || sp < (1 - sd->status.sp))) // fix negativ overflow sp = 1 - sd->status.sp; } if (hp > 0) // display like heal clif_heal(fd, SP_HP, hp); else if (hp < 0) // display like damage clif_damage(&sd->bl,&sd->bl, gettick(), 0, 0, -hp, 0 , 4, 0); if (sp > 0) // no display when we lost SP clif_heal(fd, SP_SP, sp); if (hp != 0 || sp != 0) { pc_heal(sd, hp, sp); if (hp >= 0 && sp >= 0) clif_displaymessage(fd, msg_table[17]); // HP, SP recovered. else clif_displaymessage(fd, msg_table[156]); // HP or/and SP modified. } else { clif_displaymessage(fd, msg_table[157]); // HP and SP are already with the good value. return -1; } return 0; } /*========================================== * @item command (usage: @item ) (modified by [Yor] for pet_egg) *------------------------------------------ */ int atcommand_item( const int fd, struct map_session_data* sd, const char* command, const char* message) { char item_name[100]; int number = 0, item_id, flag; struct item item_tmp; struct item_data *item_data; int get_count, i, pet_id; memset(item_name, '\0', sizeof(item_name)); if (!message || !*message || sscanf(message, "%99s %d", item_name, &number) < 1) { clif_displaymessage(fd, "Please, enter an item name/id (usage: @item [quantity])."); 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) { get_count = number; // check pet egg pet_id = search_petDB_index(item_id, PET_EGG); if (item_data->type == 4 || item_data->type == 5 || item_data->type == 7 || item_data->type == 8) { get_count = 1; } for (i = 0; i < number; i += get_count) { // if pet egg if (pet_id >= 0) { sd->catch_target_class = pet_db[pet_id].class; intif_create_pet(sd->status.account_id, sd->status.char_id, pet_db[pet_id].class, mob_db[pet_db[pet_id].class].lv, pet_db[pet_id].EggID, 0, pet_db[pet_id].intimate, 100, 0, 1, pet_db[pet_id].jname); // if not pet egg } else { memset(&item_tmp, 0, sizeof(item_tmp)); item_tmp.nameid = item_id; item_tmp.identify = 1; if ((flag = pc_additem((struct map_session_data*)sd, &item_tmp, get_count))) clif_additem((struct map_session_data*)sd, 0, 0, flag); } } clif_displaymessage(fd, msg_table[18]); // Item created. } else { clif_displaymessage(fd, msg_table[19]); // Invalid item ID or name. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_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; memset(item_name, '\0', sizeof(item_name)); if (!message || !*message || sscanf(message, "%99s %d %d %d %d %d %d %d %d", item_name, &number, &identify, &refine, &attr, &c1, &c2, &c3, &c4) < 9) { clif_displaymessage(fd, "Please, enter all informations (usage: @item2 "); clif_displaymessage(fd, " )."); 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(sd, &item_tmp, get_count))) clif_additem(sd, 0, 0, flag); } clif_displaymessage(fd, msg_table[18]); // Item created. } else { clif_displaymessage(fd, msg_table[19]); // Invalid item ID or name. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_itemreset( const int fd, struct map_session_data* sd, const char* command, const char* message) { int i; for (i = 0; i < MAX_INVENTORY; i++) { if (sd->status.inventory[i].amount && sd->status.inventory[i].equip == 0) pc_delitem(sd, i, sd->status.inventory[i].amount, 0); } clif_displaymessage(fd, msg_table[20]); // All of your items have been removed. return 0; } /*========================================== * *------------------------------------------ */ int atcommand_itemcheck( const int fd, struct map_session_data* sd, const char* command, const char* message) { pc_checkitem(sd); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_baselevelup( const int fd, struct map_session_data* sd, const char* command, const char* message) { int level, i; if (!message || !*message || (level = atoi(message)) == 0) { clif_displaymessage(fd, "Please, enter a level adjustement (usage: @lvup/@blevel/@baselvlup )."); return -1; } if (level > 0) { if (sd->status.base_level == battle_config.maximum_level) { // check for max level by Valaris clif_displaymessage(fd, msg_table[47]); // Base level can't go any higher. return -1; } // End Addition if (level > battle_config.maximum_level || level > (battle_config.maximum_level - sd->status.base_level)) // fix positiv overflow level = battle_config.maximum_level - sd->status.base_level; for (i = 1; i <= level; i++) sd->status.status_point += (sd->status.base_level + i + 14) / 4; sd->status.base_level += level; clif_updatestatus(sd, SP_BASELEVEL); clif_updatestatus(sd, SP_NEXTBASEEXP); clif_updatestatus(sd, SP_STATUSPOINT); pc_calcstatus(sd, 0); pc_heal(sd, sd->status.max_hp, sd->status.max_sp); clif_misceffect(&sd->bl, 0); clif_displaymessage(fd, msg_table[21]); // Base level raised. } else { if (sd->status.base_level == 1) { clif_displaymessage(fd, msg_table[158]); // Base level can't go any lower. return -1; } if (level < -battle_config.maximum_level || level < (1 - sd->status.base_level)) // fix negativ overflow level = 1 - sd->status.base_level; if (sd->status.status_point > 0) { for (i = 0; i > level; i--) sd->status.status_point -= (sd->status.base_level + i + 14) / 4; if (sd->status.status_point < 0) sd->status.status_point = 0; clif_updatestatus(sd, SP_STATUSPOINT); } // to add: remove status points from stats sd->status.base_level += level; clif_updatestatus(sd, SP_BASELEVEL); clif_updatestatus(sd, SP_NEXTBASEEXP); pc_calcstatus(sd, 0); clif_displaymessage(fd, msg_table[22]); // Base level lowered. } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_joblevelup( const int fd, struct map_session_data* sd, const char* command, const char* message) { int up_level = 50, level; if (!message || !*message || (level = atoi(message)) == 0) { clif_displaymessage(fd, "Please, enter a level adjustement (usage: @joblvup/@jlevel/@joblvlup )."); return -1; } if (sd->status.class == 0 || sd->status.class == 4001) up_level -= 40; else if ((sd->status.class > 4007 && sd->status.class < 4024) || sd->status.class == 23) up_level += 20; if (level > 0) { if (sd->status.job_level == up_level) { clif_displaymessage(fd, msg_table[23]); // Job level can't go any higher. return -1; } if (level > up_level || level > (up_level - sd->status.job_level)) // fix positiv overflow level = up_level - sd->status.job_level; sd->status.job_level += level; clif_updatestatus(sd, SP_JOBLEVEL); clif_updatestatus(sd, SP_NEXTJOBEXP); sd->status.skill_point += level; clif_updatestatus(sd, SP_SKILLPOINT); pc_calcstatus(sd, 0); clif_misceffect(&sd->bl, 1); clif_displaymessage(fd, msg_table[24]); // Job level raised. } else { if (sd->status.job_level == 1) { clif_displaymessage(fd, msg_table[159]); // Job level can't go any lower. return -1; } if (level < -up_level || level < (1 - sd->status.job_level)) // fix negativ overflow level = 1 - sd->status.job_level; sd->status.job_level += level; clif_updatestatus(sd, SP_JOBLEVEL); clif_updatestatus(sd, SP_NEXTJOBEXP); if (sd->status.skill_point > 0) { sd->status.skill_point += level; if (sd->status.skill_point < 0) sd->status.skill_point = 0; clif_updatestatus(sd, SP_SKILLPOINT); } // to add: remove status points from skills pc_calcstatus(sd, 0); clif_displaymessage(fd, msg_table[25]); // Job level lowered. } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_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; memset(buf, '\0', sizeof(buf)); if ((fp = fopen(help_txt, "r")) != NULL) { clif_displaymessage(fd, msg_table[26]); // Help commands: gm_level = pc_isGM(sd); while(fgets(buf, sizeof(buf) - 1, 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_table[27]); // File help.txt not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_gm( const int fd, struct map_session_data* sd, const char* command, const char* message) { char password[100]; memset(password, '\0', sizeof(password)); if (!message || !*message || sscanf(message, "%99[^\n]", password) < 1) { clif_displaymessage(fd, "Please, enter a password (usage: @gm )."); return -1; } if (pc_isGM(sd)) { // a GM can not use this function. only a normal player (become gm is not for gm!) clif_displaymessage(fd, msg_table[50]); // You already have some GM powers. return -1; } else chrif_changegm(sd->status.account_id, password, strlen(password) + 1); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_pvpoff( const int fd, struct map_session_data* sd, const char* command, const char* message) { struct map_session_data *pl_sd; int i; if (battle_config.pk_mode) { //disable command if server is in PK mode [Valaris] clif_displaymessage(fd, msg_table[52]); // This option cannot be used in PK Mode. return -1; } if (map[sd->bl.m].flag.pvp) { map[sd->bl.m].flag.pvp = 0; clif_send0199(sd->bl.m, 0); for (i = 0; i < fd_max; i++) { //人数分ループ if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { if (sd->bl.m == pl_sd->bl.m) { clif_pvpset(pl_sd, 0, 0, 2); if (pl_sd->pvp_timer != -1) { delete_timer(pl_sd->pvp_timer, pc_calc_pvprank_timer); pl_sd->pvp_timer = -1; } } } } clif_displaymessage(fd, msg_table[31]); // PvP: Off. } else { clif_displaymessage(fd, msg_table[160]); // PvP is already Off. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_pvpon( const int fd, struct map_session_data* sd, const char* command, const char* message) { struct map_session_data *pl_sd; int i; if (battle_config.pk_mode) { //disable command if server is in PK mode [Valaris] clif_displaymessage(fd, msg_table[52]); // This option cannot be used in PK Mode. return -1; } if (!map[sd->bl.m].flag.pvp && !map[sd->bl.m].flag.nopvp) { map[sd->bl.m].flag.pvp = 1; clif_send0199(sd->bl.m, 1); for (i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { if (sd->bl.m == pl_sd->bl.m && pl_sd->pvp_timer == -1) { pl_sd->pvp_timer = add_timer(gettick() + 200, pc_calc_pvprank_timer, pl_sd->bl.id, 0); pl_sd->pvp_rank = 0; pl_sd->pvp_lastusers = 0; pl_sd->pvp_point = 5; } } } clif_displaymessage(fd, msg_table[32]); // PvP: On. } else { clif_displaymessage(fd, msg_table[161]); // PvP is already On. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_gvgoff( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (map[sd->bl.m].flag.gvg) { map[sd->bl.m].flag.gvg = 0; clif_send0199(sd->bl.m, 0); clif_displaymessage(fd, msg_table[33]); // GvG: Off. } else { clif_displaymessage(fd, msg_table[162]); // GvG is already Off. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_gvgon( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (!map[sd->bl.m].flag.gvg) { map[sd->bl.m].flag.gvg = 1; clif_send0199(sd->bl.m, 3); clif_displaymessage(fd, msg_table[34]); // GvG: On. } else { clif_displaymessage(fd, msg_table[163]); // GvG is already On. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_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; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d %d %d", &hair_style, &hair_color, &cloth_color) < 1) { sprintf(output, "Please, enter at least a value (usage: @model ).", MIN_HAIR_STYLE, MAX_HAIR_STYLE, MIN_HAIR_COLOR, MAX_HAIR_COLOR, MIN_CLOTH_COLOR, MAX_CLOTH_COLOR); clif_displaymessage(fd, output); return -1; } 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) { //服の色変更 if (cloth_color != 0 && sd->status.sex == 1 && (sd->status.class == 12 || sd->status.class == 17)) { //服の色未実装職の判定 clif_displaymessage(fd, msg_table[35]); // You can't use this command with this class. return -1; } else { pc_changelook(sd, LOOK_HAIR, hair_style); pc_changelook(sd, LOOK_HAIR_COLOR, hair_color); pc_changelook(sd, LOOK_CLOTHES_COLOR, cloth_color); clif_displaymessage(fd, msg_table[36]); // Appearence changed. } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } return 0; } /*========================================== * @dye && @ccolor *------------------------------------------ */ int atcommand_dye(const int fd, struct map_session_data* sd, const char* command, const char* message) { int cloth_color = 0; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d", &cloth_color) < 1) { sprintf(output, "Please, enter a clothes color (usage: @dye/@ccolor ).", MIN_CLOTH_COLOR, MAX_CLOTH_COLOR); clif_displaymessage(fd, output); return -1; } if (cloth_color >= MIN_CLOTH_COLOR && cloth_color <= MAX_CLOTH_COLOR) { if (cloth_color != 0 && sd->status.sex == 1 && (sd->status.class == 12 || sd->status.class == 17)) { clif_displaymessage(fd, msg_table[35]); // You can't use this command with this class. return -1; } else { pc_changelook(sd, LOOK_CLOTHES_COLOR, cloth_color); clif_displaymessage(fd, msg_table[36]); // Appearence changed. } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } return 0; } /*========================================== * @chardye by [MouseJstr] *------------------------------------------ */ int atcommand_chardye(const int fd, struct map_session_data* sd, const char* command, const char* message) { return 0; } /*========================================== * @hairstyle && @hstyle *------------------------------------------ */ int atcommand_hair_style(const int fd, struct map_session_data* sd, const char* command, const char* message) { int hair_style = 0; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d", &hair_style) < 1) { sprintf(output, "Please, enter a hair style (usage: @hairstyle/@hstyle ).", MIN_HAIR_STYLE, MAX_HAIR_STYLE); clif_displaymessage(fd, output); return -1; } if (hair_style >= MIN_HAIR_STYLE && hair_style <= MAX_HAIR_STYLE) { if (hair_style != 0 && sd->status.sex == 1 && (sd->status.class == 12 || sd->status.class == 17)) { clif_displaymessage(fd, msg_table[35]); // You can't use this command with this class. return -1; } else { pc_changelook(sd, LOOK_HAIR, hair_style); clif_displaymessage(fd, msg_table[36]); // Appearence changed. } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } return 0; } /*========================================== * @charhairstyle by [MouseJstr] *------------------------------------------ */ int atcommand_charhairstyle(const int fd, struct map_session_data* sd, const char* command, const char* message) { return 0; } /*========================================== * @haircolor && @hcolor *------------------------------------------ */ int atcommand_hair_color(const int fd, struct map_session_data* sd, const char* command, const char* message) { int hair_color = 0; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d", &hair_color) < 1) { sprintf(output, "Please, enter a hair color (usage: @haircolor/@hcolor ).", MIN_HAIR_COLOR, MAX_HAIR_COLOR); clif_displaymessage(fd, output); return -1; } if (hair_color >= MIN_HAIR_COLOR && hair_color <= MAX_HAIR_COLOR) { if (hair_color != 0 && sd->status.sex == 1 && (sd->status.class == 12 || sd->status.class == 17)) { clif_displaymessage(fd, msg_table[35]); // You can't use this command with this class. return -1; } else { pc_changelook(sd, LOOK_HAIR_COLOR, hair_color); clif_displaymessage(fd, msg_table[36]); // Appearence changed. } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } return 0; } /*========================================== * @charhaircolor by [MouseJstr] *------------------------------------------ */ int atcommand_charhaircolor(const int fd, struct map_session_data* sd, const char* command, const char* message) { return 0; } /*========================================== * @go [city_number/city_name]: improved by [yor] to add city names and help *------------------------------------------ */ int atcommand_go( const int fd, struct map_session_data* sd, const char* command, const char* message) { int i; int town; char map_name[100]; char output[200]; int m; struct { char map[16]; int x, y; } data[] = { { "prontera.gat", 156, 191 }, // 0=Prontera { "morocc.gat", 156, 93 }, // 1=Morroc { "geffen.gat", 119, 59 }, // 2=Geffen { "payon.gat", 162, 233 }, // 3=Payon { "alberta.gat", 192, 147 }, // 4=Alberta { "izlude.gat", 128, 114 }, // 5=Izlude { "aldebaran.gat",140, 131 }, // 6=Al de Baran { "xmas.gat", 147, 134 }, // 7=Lutie { "comodo.gat", 209, 143 }, // 8=Comodo { "yuno.gat", 157, 51 }, // 9=Yuno { "amatsu.gat", 198, 84 }, // 10=Amatsu { "gonryun.gat", 160, 120 }, // 11=Gon Ryun { "umbala.gat", 89, 157 }, // 12=Umbala { "niflheim.gat", 21, 153 }, // 13=Niflheim { "louyang.gat", 217, 40 }, // 14=Lou Yang { "new_1-1.gat", 53, 111 }, // 15=Start point { "sec_pri.gat", 23, 61 }, // 16=Prison }; memset(map_name, '\0', sizeof(map_name)); memset(output, '\0', sizeof(output)); // get the number town = atoi(message); // if no value, display all value if (!message || !*message || sscanf(message, "%99s", map_name) < 1 || town < -3 || town >= (int)(sizeof(data) / sizeof(data[0]))) { clif_displaymessage(fd, msg_table[38]); // Invalid location number or name. clif_displaymessage(fd, msg_table[82]); // Please, use one of this number/name: clif_displaymessage(fd, "-3=(Memo point 2) 4=Alberta 11=Gon Ryun"); clif_displaymessage(fd, "-2=(Memo point 1) 5=Izlude 12=Umbala"); clif_displaymessage(fd, "-1=(Memo point 0) 6=Al de Baran 13=Niflheim"); clif_displaymessage(fd, " 0=Prontera 7=Lutie 14=Lou Yang"); clif_displaymessage(fd, " 1=Morroc 8=Comodo 15=Start point"); clif_displaymessage(fd, " 2=Geffen 9=Yuno 16=Prison"); clif_displaymessage(fd, " 3=Payon 10=Amatsu"); return -1; } else { // get possible name of the city and add .gat if not in the name map_name[sizeof(map_name)-1] = '\0'; for (i = 0; map_name[i]; i++) map_name[i] = tolower(map_name[i]); if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); // try to see if it's a name, and not a number (try a lot of possibilities, write errors and abbreviations too) if (strncmp(map_name, "prontera.gat", 3) == 0) { // 3 first characters town = 0; } else if (strncmp(map_name, "morocc.gat", 3) == 0) { // 3 first characters town = 1; } else if (strncmp(map_name, "geffen.gat", 3) == 0) { // 3 first characters town = 2; } else if (strncmp(map_name, "payon.gat", 3) == 0 || // 3 first characters strncmp(map_name, "paion.gat", 3) == 0) { // writing error (3 first characters) town = 3; } else if (strncmp(map_name, "alberta.gat", 3) == 0) { // 3 first characters town = 4; } else if (strncmp(map_name, "izlude.gat", 3) == 0 || // 3 first characters strncmp(map_name, "islude.gat", 3) == 0) { // writing error (3 first characters) town = 5; } else if (strncmp(map_name, "aldebaran.gat", 3) == 0 || // 3 first characters strcmp(map_name, "al.gat") == 0) { // al (de baran) town = 6; } else if (strncmp(map_name, "lutie.gat", 3) == 0 || // name of the city, not name of the map (3 first characters) strcmp(map_name, "christmas.gat") == 0 || // name of the symbol strncmp(map_name, "xmas.gat", 3) == 0 || // 3 first characters strncmp(map_name, "x-mas.gat", 3) == 0) { // writing error (3 first characters) town = 7; } else if (strncmp(map_name, "comodo.gat", 3) == 0) { // 3 first characters town = 8; } else if (strncmp(map_name, "yuno.gat", 3) == 0) { // 3 first characters town = 9; } else if (strncmp(map_name, "amatsu.gat", 3) == 0 || // 3 first characters strncmp(map_name, "ammatsu.gat", 3) == 0) { // writing error (3 first characters) town = 10; } else if (strncmp(map_name, "gonryun.gat", 3) == 0) { // 3 first characters town = 11; } else if (strncmp(map_name, "umbala.gat", 3) == 0) { // 3 first characters town = 12; } else if (strncmp(map_name, "niflheim.gat", 3) == 0) { // 3 first characters town = 13; } else if (strncmp(map_name, "louyang.gat", 3) == 0) { // 3 first characters town = 14; } else if (strncmp(map_name, "new_1-1.gat", 3) == 0 || // 3 first characters (or "newbies") strncmp(map_name, "startpoint.gat", 3) == 0 || // name of the position (3 first characters) strncmp(map_name, "begining.gat", 3) == 0) { // name of the position (3 first characters) town = 15; } else if (strncmp(map_name, "sec_pri.gat", 3) == 0 || // 3 first characters strncmp(map_name, "prison.gat", 3) == 0 || // name of the position (3 first characters) strncmp(map_name, "jails.gat", 3) == 0) { // name of the position town = 16; } if (town >= -3 && town <= -1) { if (sd->status.memo_point[-town-1].map[0]) { m = map_mapname2mapid(sd->status.memo_point[-town-1].map); if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to this memo map."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } if (pc_setpos(sd, sd->status.memo_point[-town-1].map, sd->status.memo_point[-town-1].x, sd->status.memo_point[-town-1].y, 3) == 0) { clif_displaymessage(fd, msg_table[0]); // Warped. } else { clif_displaymessage(fd, msg_table[1]); // Map not found. return -1; } } else { sprintf(output, msg_table[164], -town-1); // Your memo point #%d doesn't exist. clif_displaymessage(fd, output); return -1; } } else if (town >= 0 && town < (int)(sizeof(data) / sizeof(data[0]))) { m = map_mapname2mapid(data[town].map); if (m >= 0 && map[m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you to this destination map."); return -1; } if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp you from your actual map."); return -1; } if (pc_setpos(sd, data[town].map, data[town].x, data[town].y, 3) == 0) { clif_displaymessage(fd, msg_table[0]); // Warped. } else { clif_displaymessage(fd, msg_table[1]); // Map not found. return -1; } } else { // if you arrive here, you have an error in town variable when reading of names clif_displaymessage(fd, msg_table[38]); // Invalid location number or name. return -1; } } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_monster( const int fd, struct map_session_data* sd, const char* command, const char* message) { char name[100]; char monster[100]; char output[200]; int mob_id; int number = 0; int x = 0, y = 0; int count; int i, j, k; int mx, my, range; memset(name, '\0', sizeof(name)); memset(monster, '\0', sizeof(monster)); memset(output, '\0', sizeof(output)); if (!message || !*message || (sscanf(message, "\"%[^\"]\" %99s %d %d %d", name, monster, &number, &x, &y) < 2 && sscanf(message, "%99s \"%[^\"]\" %d %d %d", monster, name, &number, &x, &y) < 2 && sscanf(message, "%99s %99s %d %d %d", name, monster, &number, &x, &y) < 2)) { clif_displaymessage(fd, msg_table[80]); // Give a display name and monster name/id please. return -1; } if ((mob_id = mobdb_searchname(monster)) == 0) // check name first (to avoid possible name begining by a number) mob_id = mobdb_checkid(atoi(monster)); if (mob_id == 0) { clif_displaymessage(fd, msg_table[40]); // Invalid monster ID or name. return -1; } if (mob_id == 1288) { clif_displaymessage(fd, msg_table[83]); // Cannot spawn emperium. return -1; } if (number <= 0) number = 1; if (strlen(name) < 1) strcpy(name, "--ja--"); // If value of atcommand_spawn_quantity_limit directive is greater than or equal to 1 and quantity of monsters is greater than value of the directive if (battle_config.atc_spawn_quantity_limit >= 1 && number > battle_config.atc_spawn_quantity_limit) number = battle_config.atc_spawn_quantity_limit; if (battle_config.etc_log) printf("%s monster='%s' name='%s' id=%d count=%d (%d,%d)\n", command, monster, name, mob_id, number, x, y); count = 0; range = sqrt(number) / 2; range = range * 2 + 5; // calculation of an odd number (+ 4 area around) for (i = 0; i < number; i++) { j = 0; k = 0; while(j++ < 8 && k == 0) { // try 8 times to spawn the monster (needed for close area) if (x <= 0) mx = sd->bl.x + (rand() % range - (range / 2)); else mx = x; if (y <= 0) my = sd->bl.y + (rand() % range - (range / 2)); else my = y; k = mob_once_spawn((struct map_session_data*)sd, "this", mx, my, name, mob_id, 1, ""); } count += (k != 0) ? 1 : 0; } if (count != 0) if (number == count) clif_displaymessage(fd, msg_table[39]); // All monster summoned! else { sprintf(output, msg_table[240], count); // %d monster(s) summoned! clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[40]); // Invalid monster ID or name. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_spawn( const int fd, struct map_session_data* sd, const char* command, const char* message) { char name[100]; char monster[100]; char output[200]; int mob_id; int number = 0; int x = 0, y = 0; int count; int i, j, k; int mx, my, range; memset(name, '\0', sizeof(name)); memset(monster, '\0', sizeof(monster)); memset(output, '\0', sizeof(output)); if (!message || !*message || (sscanf(message, "\"%[^\"]\" %99s %d %d %d", name, monster, &number, &x, &y) < 2 && sscanf(message, "%99s \"%[^\"]\" %d %d %d", monster, name, &number, &x, &y) < 2 && sscanf(message, "%99s %d %99s %d %d", monster, &number, name, &x, &y) < 1)) { clif_displaymessage(fd, msg_table[143]); // Give a monster name/id please. return -1; } // If monster identifier/name argument is a name if ((mob_id = mobdb_searchname(monster)) == 0) // check name first (to avoid possible name begining by a number) mob_id = mobdb_checkid(atoi(monster)); if (mob_id == 0) { clif_displaymessage(fd, msg_table[40]); // Invalid monster ID or name. return -1; } if (mob_id == 1288) { clif_displaymessage(fd, msg_table[83]); // Cannot spawn emperium. return -1; } if (number <= 0) number = 1; if (strlen(name) < 1) strcpy(name, "--ja--"); // If value of atcommand_spawn_quantity_limit directive is greater than or equal to 1 and quantity of monsters is greater than value of the directive if (battle_config.atc_spawn_quantity_limit >= 1 && number > battle_config.atc_spawn_quantity_limit) number = battle_config.atc_spawn_quantity_limit; if (battle_config.etc_log) printf("%s monster='%s' name='%s' id=%d count=%d (%d,%d)\n", command, monster, name, mob_id, number, x, y); count = 0; range = sqrt(number) / 2; range = range * 2 + 5; // calculation of an odd number (+ 4 area around) for (i = 0; i < number; i++) { j = 0; k = 0; while(j++ < 8 && k == 0) { // try 8 times to spawn the monster (needed for close area) if (x <= 0) mx = sd->bl.x + (rand() % range - (range / 2)); else mx = x; if (y <= 0) my = sd->bl.y + (rand() % range - (range / 2)); else my = y; k = mob_once_spawn((struct map_session_data*)sd, "this", mx, my, name, mob_id, 1, ""); } count += (k != 0) ? 1 : 0; } if (count != 0) if (number == count) clif_displaymessage(fd, msg_table[39]); // All monster summoned! else { sprintf(output, msg_table[240], count); // %d monster(s) summoned! clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[40]); // Invalid monster ID or name. return -1; } return 0; } /*========================================== * *------------------------------------------ */ void atcommand_killmonster_sub( const int fd, struct map_session_data* sd, const char* message, const int drop) { int map_id; char map_name[100]; memset(map_name, '\0', sizeof(map_name)); if (!message || !*message || sscanf(message, "%99s", map_name) < 1) map_id = sd->bl.m; else { if (strstr(map_name, ".gat") == NULL && strstr(map_name, ".afm") == NULL && strlen(map_name) < 13) // 16 - 4 (.gat) strcat(map_name, ".gat"); if ((map_id = map_mapname2mapid(map_name)) < 0) map_id = sd->bl.m; } map_foreachinarea(atkillmonster_sub, map_id, 0, 0, map[map_id].xs, map[map_id].ys, BL_MOB, drop); clif_displaymessage(fd, msg_table[165]); // All monsters killed! return; } /*========================================== * *------------------------------------------ */ int atcommand_killmonster( const int fd, struct map_session_data* sd, const char* command, const char* message) { atcommand_killmonster_sub(fd, sd, message, 1); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_killmonster2( const int fd, struct map_session_data* sd, const char* command, const char* message) { atcommand_killmonster_sub(fd, sd, message, 0); return 0; } /*========================================== * *------------------------------------------ */ int atcommand_refine( const int fd, struct map_session_data* sd, const char* command, const char* message) { int i, position = 0, refine = 0, current_position, final_refine; int count; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d %d", &position, &refine) < 2) { clif_displaymessage(fd, "Please, enter a position and a amount (usage: @refine <+/- amount>)."); return -1; } if (refine < -10) refine = -10; else if (refine > 10) refine = 10; else if (refine == 0) refine = 1; count = 0; for (i = 0; i < MAX_INVENTORY; i++) { if (sd->status.inventory[i].nameid && // 該当個所の装備を精錬する (sd->status.inventory[i].equip & position || (sd->status.inventory[i].equip && !position))) { final_refine = sd->status.inventory[i].refine + refine; if (final_refine > 10) final_refine = 10; else if (final_refine < 0) final_refine = 0; if (sd->status.inventory[i].refine != final_refine) { sd->status.inventory[i].refine = final_refine; current_position = sd->status.inventory[i].equip; pc_unequipitem(sd, i, 0); clif_refine(fd, sd, 0, i, sd->status.inventory[i].refine); clif_delitem(sd, i, 1); clif_additem(sd, i, 1, 0); pc_equipitem(sd, i, current_position); clif_misceffect((struct block_list*)&sd->bl, 3); count++; } } } if (count == 0) clif_displaymessage(fd, msg_table[166]); // No item has been refined! else if (count == 1) clif_displaymessage(fd, msg_table[167]); // 1 item has been refined! else { sprintf(output, msg_table[168], count); // %d items have been refined! clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_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 output[200]; memset(output, '\0', sizeof(output)); memset(item_name, '\0', sizeof(item_name)); if (!message || !*message || sscanf(message, "%99s %d %d", item_name, &attribute, &star) < 1) { clif_displaymessage(fd, "Please, enter at least an item name/id (usage: @produce <# of very's>)."); 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 (itemdb_exists(item_id) && (item_id <= 500 || item_id > 1099) && (item_id < 4001 || item_id > 4148) && (item_id < 7001 || item_id > 10019) && itemdb_isequip(item_id)) { 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] = 0x00ff; tmp_item.card[1] = ((star * 5) << 8) + attribute; *((unsigned long *)(&tmp_item.card[2])) = sd->char_id; clif_produceeffect(sd, 0, item_id); // 製造エフェクトパケット clif_misceffect(&sd->bl, 3); // 他人にも成功を通知 if ((flag = pc_additem(sd, &tmp_item, 1))) clif_additem(sd, 0, 0, flag); } else { if (battle_config.error_log) printf("@produce NOT WEAPON [%d]\n", item_id); if (item_id != 0 && itemdb_exists(item_id)) sprintf(output, msg_table[169], item_id, item_data->name); // This item (%d: '%s') is not an equipment. else sprintf(output, msg_table[170]); // This item is not an equipment. clif_displaymessage(fd, output); return -1; } return 0; } /*========================================== * Sub-function to display actual memo points *------------------------------------------ */ void atcommand_memo_sub(struct map_session_data* sd) { int i; char output[200]; memset(output, '\0', sizeof(output)); clif_displaymessage(sd->fd, "Your actual memo positions are (except respawn point):"); for (i = MIN_PORTAL_MEMO; i <= MAX_PORTAL_MEMO; i++) { if (sd->status.memo_point[i].map[0]) sprintf(output, "%d - %s (%d,%d)", i, sd->status.memo_point[i].map, sd->status.memo_point[i].x, sd->status.memo_point[i].y); else sprintf(output, msg_table[171], i); // %d - void clif_displaymessage(sd->fd, output); } return; } /*========================================== * *------------------------------------------ */ int atcommand_memo( const int fd, struct map_session_data* sd, const char* command, const char* message) { int position = 0; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d", &position) < 1) atcommand_memo_sub(sd); else { if (position >= MIN_PORTAL_MEMO && position <= MAX_PORTAL_MEMO) { if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to memo this map."); return -1; } if (sd->status.memo_point[position].map[0]) { sprintf(output, msg_table[172], position, sd->status.memo_point[position].map, sd->status.memo_point[position].x, sd->status.memo_point[position].y); // You replace previous memo position %d - %s (%d,%d). clif_displaymessage(fd, output); } memcpy(sd->status.memo_point[position].map, map[sd->bl.m].name, 24); sd->status.memo_point[position].x = sd->bl.x; sd->status.memo_point[position].y = sd->bl.y; clif_skill_memo(sd, 0); if (pc_checkskill(sd, AL_WARP) <= (position + 1)) clif_displaymessage(fd, msg_table[173]); // Note: you don't have the 'Warp' skill level to use it. atcommand_memo_sub(sd); } else { sprintf(output, "Please, enter a valid position (usage: @memo ).", MIN_PORTAL_MEMO, MAX_PORTAL_MEMO); clif_displaymessage(fd, output); atcommand_memo_sub(sd); return -1; } } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_gat( const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[200]; int y; memset(output, '\0', sizeof(output)); for (y = 2; y >= -2; y--) { sprintf(output, "%s (x= %d, y= %d) %02X %02X %02X %02X %02X", map[sd->bl.m].name, sd->bl.x - 2, sd->bl.y + y, map_getcell(sd->bl.m, sd->bl.x - 2, sd->bl.y + y), map_getcell(sd->bl.m, sd->bl.x - 1, sd->bl.y + y), map_getcell(sd->bl.m, sd->bl.x, sd->bl.y + y), map_getcell(sd->bl.m, sd->bl.x + 1, sd->bl.y + y), map_getcell(sd->bl.m, sd->bl.x + 2, sd->bl.y + y)); clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_packet( const int fd, struct map_session_data* sd, const char* command, const char* message) { int x = 0, y = 0; if (!message || !*message || sscanf(message, "%d %d", &x, &y) < 2) { clif_displaymessage(fd, "Please, enter a status type/flag (usage: @packet )."); return -1; } clif_status_change(&sd->bl, x, y); return 0; } /*========================================== * @stpoint (Rewritten by [Yor]) *------------------------------------------ */ int atcommand_statuspoint( const int fd, struct map_session_data* sd, const char* command, const char* message) { int point, new_status_point; if (!message || !*message || (point = atoi(message)) == 0) { clif_displaymessage(fd, "Please, enter a number (usage: @stpoint )."); return -1; } new_status_point = (int)sd->status.status_point + point; if (point > 0 && (point > 0x7FFF || new_status_point > 0x7FFF)) // fix positiv overflow new_status_point = 0x7FFF; else if (point < 0 && (point < -0x7FFF || new_status_point < 0)) // fix negativ overflow new_status_point = 0; if (new_status_point != (int)sd->status.status_point) { sd->status.status_point = (short)new_status_point; clif_updatestatus(sd, SP_STATUSPOINT); clif_displaymessage(fd, msg_table[174]); // Number of status points changed! } else { if (point < 0) clif_displaymessage(fd, msg_table[41]); // Impossible to decrease the number/value. else clif_displaymessage(fd, msg_table[149]); // Impossible to increase the number/value. return -1; } return 0; } /*========================================== * @skpoint (Rewritten by [Yor]) *------------------------------------------ */ int atcommand_skillpoint( const int fd, struct map_session_data* sd, const char* command, const char* message) { int point, new_skill_point; if (!message || !*message || (point = atoi(message)) == 0) { clif_displaymessage(fd, "Please, enter a number (usage: @skpoint )."); return -1; } new_skill_point = (int)sd->status.skill_point + point; if (point > 0 && (point > 0x7FFF || new_skill_point > 0x7FFF)) // fix positiv overflow new_skill_point = 0x7FFF; else if (point < 0 && (point < -0x7FFF || new_skill_point < 0)) // fix negativ overflow new_skill_point = 0; if (new_skill_point != (int)sd->status.skill_point) { sd->status.skill_point = (short)new_skill_point; clif_updatestatus(sd, SP_SKILLPOINT); clif_displaymessage(fd, msg_table[175]); // Number of skill points changed! } else { if (point < 0) clif_displaymessage(fd, msg_table[41]); // Impossible to decrease the number/value. else clif_displaymessage(fd, msg_table[149]); // Impossible to increase the number/value. return -1; } return 0; } /*========================================== * @zeny (Rewritten by [Yor]) *------------------------------------------ */ int atcommand_zeny( const int fd, struct map_session_data* sd, const char* command, const char* message) { int zeny, new_zeny; if (!message || !*message || (zeny = atoi(message)) == 0) { clif_displaymessage(fd, "Please, enter an amount (usage: @zeny )."); return -1; } new_zeny = 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 != sd->status.zeny) { sd->status.zeny = new_zeny; clif_updatestatus(sd, SP_ZENY); clif_displaymessage(fd, msg_table[176]); // Number of zenys changed! } else { if (zeny < 0) clif_displaymessage(fd, msg_table[41]); // Impossible to decrease the number/value. else clif_displaymessage(fd, msg_table[149]); // Impossible to increase the number/value. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_param( const int fd, struct map_session_data* sd, const char* command, const char* message) { int i, index, value = 0, new_value; const char* param[] = { "@str", "@agi", "@vit", "@int", "@dex", "@luk", NULL }; short* status[] = { &sd->status.str, &sd->status.agi, &sd->status.vit, &sd->status.int_, &sd->status.dex, &sd->status.luk }; char output[200]; memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%d", &value) < 1 || value == 0) { sprintf(output, "Please, enter a valid value (usage: @str,@agi,@vit,@int,@dex,@luk <+/-adjustement>)."); clif_displaymessage(fd, output); return -1; } index = -1; for (i = 0; param[i] != NULL; i++) { if (strcmpi(command, param[i]) == 0) { index = i; break; } } if (index < 0 || index > MAX_STATUS_TYPE) { // normaly impossible... sprintf(output, "Please, enter a valid value (usage: @str,@agi,@vit,@int,@dex,@luk <+/-adjustement>)."); clif_displaymessage(fd, output); return -1; } new_value = (int)*status[index] + value; if (value > 0 && (value > battle_config.max_parameter || new_value > battle_config.max_parameter)) // fix positiv overflow new_value = battle_config.max_parameter; else if (value < 0 && (value < -battle_config.max_parameter || new_value < 1)) // fix negativ overflow new_value = 1; if (new_value != (int)*status[index]) { *status[index] = new_value; clif_updatestatus(sd, SP_STR + index); clif_updatestatus(sd, SP_USTR + index); pc_calcstatus(sd, 0); clif_displaymessage(fd, msg_table[42]); // Stat changed. } else { if (value < 0) clif_displaymessage(fd, msg_table[41]); // Impossible to decrease the number/value. else clif_displaymessage(fd, msg_table[149]); // Impossible to increase the number/value. return -1; } return 0; } /*========================================== * *------------------------------------------ */ //** Stat all by fritz (rewritten by [Yor]) int atcommand_stat_all( const int fd, struct map_session_data* sd, const char* command, const char* message) { int index, count, value = 0, new_value; short* status[] = { &sd->status.str, &sd->status.agi, &sd->status.vit, &sd->status.int_, &sd->status.dex, &sd->status.luk }; if (!message || !*message || sscanf(message, "%d", &value) < 1 || value == 0) value = battle_config.max_parameter; count = 0; for (index = 0; index < (int)(sizeof(status) / sizeof(status[0])); index++) { new_value = (int)*status[index] + value; if (value > 0 && (value > battle_config.max_parameter || new_value > battle_config.max_parameter)) // fix positiv overflow new_value = battle_config.max_parameter; else if (value < 0 && (value < -battle_config.max_parameter || new_value < 1)) // fix negativ overflow new_value = 1; if (new_value != (int)*status[index]) { *status[index] = new_value; clif_updatestatus(sd, SP_STR + index); clif_updatestatus(sd, SP_USTR + index); pc_calcstatus(sd, 0); count++; } } if (count > 0) // if at least 1 stat modified clif_displaymessage(fd, msg_table[84]); // All stats changed! else { if (value < 0) clif_displaymessage(fd, msg_table[177]); // Impossible to decrease a stat. else clif_displaymessage(fd, msg_table[178]); // Impossible to increase a stat. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_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; if (!message || !*message || sscanf(message, "%d", &level) < 1 || level == 0) { clif_displaymessage(fd, "Please, enter a valid level (usage: @guildlvup/@guildlvlup <# of levels>)."); return -1; } if (sd->status.guild_id <= 0 || (guild_info = guild_search(sd->status.guild_id)) == NULL) { clif_displaymessage(fd, msg_table[43]); // You're not in a guild. return -1; } if (strcmp(sd->status.name, guild_info->master) != 0) { clif_displaymessage(fd, msg_table[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(fd, msg_table[179]); // Guild level changed. } else { clif_displaymessage(fd, msg_table[45]); // Guild level change failed. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_makeegg( const int fd, struct map_session_data* sd, const char* command, const char* message) { struct item_data *item_data; int id, pet_id; if (!message || !*message) { clif_displaymessage(fd, "Please, enter a monter/egg name/id (usage: @makeegg )."); return -1; } if ((item_data = itemdb_searchname(message)) != NULL) // for egg name id = item_data->nameid; else if ((id = mobdb_searchname(message)) == 0) // for monster name id = atoi(message); pet_id = search_petDB_index(id, PET_CLASS); if (pet_id < 0) pet_id = search_petDB_index(id, PET_EGG); if (pet_id >= 0) { sd->catch_target_class = pet_db[pet_id].class; intif_create_pet( sd->status.account_id, sd->status.char_id, pet_db[pet_id].class, mob_db[pet_db[pet_id].class].lv, pet_db[pet_id].EggID, 0, pet_db[pet_id].intimate, 100, 0, 1, pet_db[pet_id].jname); } else { clif_displaymessage(fd, msg_table[180]); // The monter/egg name/id doesn't exist. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_hatch( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (sd->status.pet_id <= 0) clif_sendegg(sd); else { clif_displaymessage(fd, msg_table[181]); // You already have a pet. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_petfriendly( const int fd, struct map_session_data* sd, const char* command, const char* message) { int friendly; int t; if (!message || !*message || (friendly = atoi(message)) < 0) { clif_displaymessage(fd, "Please, enter a valid value (usage: @petfriendly <0-1000>)."); return -1; } if (sd->status.pet_id > 0 && sd->pd) { if (friendly >= 0 && friendly <= 1000) { if (friendly != sd->pet.intimate) { t = sd->pet.intimate; sd->pet.intimate = friendly; clif_send_petstatus(sd); if (battle_config.pet_status_support) { if ((sd->pet.intimate > 0 && t <= 0) || (sd->pet.intimate <= 0 && t > 0)) { if (sd->bl.prev != NULL) pc_calcstatus(sd, 0); else pc_calcstatus(sd, 2); } } clif_displaymessage(fd, msg_table[182]); // Pet friendly value changed! } else { clif_displaymessage(fd, msg_table[183]); // Pet friendly is already the good value. return -1; } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } } else { clif_displaymessage(fd, msg_table[184]); // Sorry, but you have no pet. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_pethungry( const int fd, struct map_session_data* sd, const char* command, const char* message) { int hungry; if (!message || !*message || (hungry = atoi(message)) < 0) { clif_displaymessage(fd, "Please, enter a valid number (usage: @pethungry <0-100>)."); return -1; } if (sd->status.pet_id > 0 && sd->pd) { if (hungry >= 0 && hungry <= 100) { if (hungry != sd->pet.hungry) { sd->pet.hungry = hungry; clif_send_petstatus(sd); clif_displaymessage(fd, msg_table[185]); // Pet hungry value changed! } else { clif_displaymessage(fd, msg_table[186]); // Pet hungry is already the good value. return -1; } } else { clif_displaymessage(fd, msg_table[37]); // An invalid number was specified. return -1; } } else { clif_displaymessage(fd, msg_table[184]); // Sorry, but you have no pet. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_petrename( const int fd, struct map_session_data* sd, const char* command, const char* message) { if (sd->status.pet_id > 0 && sd->pd) { if (sd->pet.rename_flag != 0) { sd->pet.rename_flag = 0; intif_save_petdata(sd->status.account_id, &sd->pet); clif_send_petstatus(sd); clif_displaymessage(fd, msg_table[187]); // You can now rename your pet. } else { clif_displaymessage(fd, msg_table[188]); // You can already rename your pet. return -1; } } else { clif_displaymessage(fd, msg_table[184]); // Sorry, but you have no pet. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_charpetrename( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @charpetrename )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pl_sd->status.pet_id > 0 && pl_sd->pd) { if (pl_sd->pet.rename_flag != 0) { pl_sd->pet.rename_flag = 0; intif_save_petdata(pl_sd->status.account_id, &pl_sd->pet); clif_send_petstatus(pl_sd); clif_displaymessage(fd, msg_table[189]); // This player can now rename his/her pet. } else { clif_displaymessage(fd, msg_table[190]); // This player can already rename his/her pet. return -1; } } else { clif_displaymessage(fd, msg_table[191]); // Sorry, but this player has no pet. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_recall( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; char output[200]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @recall )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can recall only lower or same level if (sd->bl.m >= 0 && map[sd->bl.m].flag.nowarpto && battle_config.any_warp_GM_min_level > pc_isGM(sd)) { clif_displaymessage(fd, "You are not authorised to warp somenone to your actual 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; } pc_setpos(pl_sd, sd->mapname, sd->bl.x, sd->bl.y, 2); sprintf(output, msg_table[46], character); // %s recalled! clif_displaymessage(fd, output); } else { clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * 対象キャラクターを転職させる upper指定で転生や養子も可能 *------------------------------------------ */ int atcommand_character_job( 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) { clif_displaymessage(fd, "Please, enter a job and a player name (usage: @charjob/@charjobchange )."); return -1; } if (sscanf(message, "%d %d %99[^\n]", &job, &upper, character) < 3) { //upper指定してある upper = -1; if (sscanf(message, "%d %99[^\n]", &job, character) < 2) { //upper指定してない上に何か足りない clif_displaymessage(fd, "Please, enter a job and a player name (usage: @charjob/@charjobchange )."); return -1; } } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can change job only to lower or same level if ((job >= 0 && job < MAX_PC_CLASS)) { // fix pecopeco display if ((job != 13 && job != 21 && job != 4014 && job != 4022)) { if (pc_isriding(sd)) { if (pl_sd->status.class == 13) pl_sd->status.class = pl_sd->view_class = 7; if (pl_sd->status.class == 21) pl_sd->status.class = pl_sd->view_class = 14; if (pl_sd->status.class == 4014) pl_sd->status.class = pl_sd->view_class = 4008; if (pl_sd->status.class == 4022) pl_sd->status.class = pl_sd->view_class = 4015; pl_sd->status.option &= ~0x0020; clif_changeoption(&pl_sd->bl); pc_calcstatus(pl_sd, 0); } } else { if (!pc_isriding(sd)) { if (job == 13) job = 7; if (job == 21) job = 14; if (job == 4014) job = 4008; if (job == 4022) job = 4015; } } if (pc_jobchange(pl_sd, job, upper) == 0) clif_displaymessage(fd, msg_table[48]); // Character's job changed. else { clif_displaymessage(fd, msg_table[192]); // Impossible to change the character's job. return -1; } } else { clif_displaymessage(fd, msg_table[49]); // Invalid job ID. return -1; } } else { clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_revive( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; struct map_session_data *pl_sd; memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @revive )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { pl_sd->status.hp = pl_sd->status.max_hp; pc_setstand(pl_sd); if (battle_config.pc_invincible_time > 0) pc_setinvincibletimer(sd, battle_config.pc_invincible_time); clif_updatestatus(pl_sd, SP_HP); clif_updatestatus(pl_sd, SP_SP); clif_resurrection(&pl_sd->bl, 1); clif_displaymessage(fd, msg_table[51]); // Character revived. } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_character_stats( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; char job_jobname[100]; char output[200]; struct map_session_data *pl_sd; int i; memset(character, '\0', sizeof(character)); memset(job_jobname, '\0', sizeof(job_jobname)); memset(output, '\0', sizeof(output)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @charstats )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { struct { const char* format; int value; } output_table[] = { { "Base Level - %d", pl_sd->status.base_level }, { job_jobname, pl_sd->status.job_level }, { "Hp - %d", pl_sd->status.hp }, { "MaxHp - %d", pl_sd->status.max_hp }, { "Sp - %d", pl_sd->status.sp }, { "MaxSp - %d", pl_sd->status.max_sp }, { "Str - %3d", pl_sd->status.str }, { "Agi - %3d", pl_sd->status.agi }, { "Vit - %3d", pl_sd->status.vit }, { "Int - %3d", pl_sd->status.int_ }, { "Dex - %3d", pl_sd->status.dex }, { "Luk - %3d", pl_sd->status.luk }, { "Zeny - %d", pl_sd->status.zeny }, { NULL, 0 } }; sprintf(job_jobname, "Job - %s %s", job_name(pl_sd->status.class), "(level %d)"); sprintf(output, msg_table[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); } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * *------------------------------------------ */ //** Character Stats All by fritz int atcommand_character_stats_all(const int fd, struct map_session_data* sd, const char* command, const char* message) { char output[1024], gmlevel[1024]; int i; int count; struct map_session_data *pl_sd; memset(output, '\0', sizeof(output)); memset(gmlevel, '\0', sizeof(gmlevel)); count = 0; for(i = 0; i < fd_max; i++) { if (session[i] && (pl_sd = session[i]->session_data) && pl_sd->state.auth) { if (pc_isGM(pl_sd) > 0) sprintf(gmlevel, "| GM Lvl: %d", pc_isGM(pl_sd)); else sprintf(gmlevel, " "); sprintf(output, "Name: %s | BLvl: %d | Job: %s (Lvl: %d) | HP: %d/%d | SP: %d/%d", pl_sd->status.name, pl_sd->status.base_level, job_name(pl_sd->status.class), pl_sd->status.job_level, pl_sd->status.hp, pl_sd->status.max_hp, pl_sd->status.sp, pl_sd->status.max_sp); clif_displaymessage(fd, output); sprintf(output, "STR: %d | AGI: %d | VIT: %d | INT: %d | DEX: %d | LUK: %d | Zeny: %d %s", pl_sd->status.str, pl_sd->status.agi, pl_sd->status.vit, pl_sd->status.int_, pl_sd->status.dex, pl_sd->status.luk, pl_sd->status.zeny, gmlevel); clif_displaymessage(fd, output); clif_displaymessage(fd, "--------"); count++; } } if (count == 0) clif_displaymessage(fd, msg_table[28]); // No player found. else if (count == 1) clif_displaymessage(fd, msg_table[29]); // 1 player found. else { sprintf(output, msg_table[30], count); // %d players found. clif_displaymessage(fd, output); } return 0; } /*========================================== * *------------------------------------------ */ int atcommand_character_option( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; 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 %99[^\n]", &opt1, &opt2, &opt3, character) < 4 || opt1 < 0 || opt2 < 0 || opt3 < 0) { clif_displaymessage(fd, "Please, enter valid options and a player name (usage: @charoption )."); return -1; } if ((pl_sd = map_nick2sd(character)) != NULL) { if (pc_isGM(sd) >= pc_isGM(pl_sd)) { // you can change option only to lower or same level pl_sd->opt1 = opt1; pl_sd->opt2 = opt2; pl_sd->status.option = opt3; // fix pecopeco display if (pl_sd->status.class == 13 || pl_sd->status.class == 21 || pl_sd->status.class == 4014 || pl_sd->status.class == 4022) { if (!pc_isriding(pl_sd)) { // pl_sd have the new value... if (pl_sd->status.class == 13) pl_sd->status.class = pl_sd->view_class = 7; else if (pl_sd->status.class == 21) pl_sd->status.class = pl_sd->view_class = 14; else if (pl_sd->status.class == 4014) pl_sd->status.class = pl_sd->view_class = 4008; else if (pl_sd->status.class == 4022) pl_sd->status.class = pl_sd->view_class = 4015; } } else { if (pc_isriding(pl_sd)) { // pl_sd have the new value... if (pl_sd->disguise > 0) { // temporary prevention of crash caused by peco + disguise, will look into a better solution [Valaris] (code added by [Yor]) pl_sd->status.option &= ~0x0020; } else { if (pl_sd->status.class == 7) pl_sd->status.class = pl_sd->view_class = 13; else if (pl_sd->status.class == 14) pl_sd->status.class = pl_sd->view_class = 21; else if (pl_sd->status.class == 4008) pl_sd->status.class = pl_sd->view_class = 4014; else if (pl_sd->status.class == 4015) pl_sd->status.class = pl_sd->view_class = 4022; else pl_sd->status.option &= ~0x0020; } } } clif_changeoption(&pl_sd->bl); pc_calcstatus(pl_sd, 0); clif_displaymessage(fd, msg_table[58]); // Character's options changed. } else { clif_displaymessage(fd, msg_table[81]); // Your GM level don't authorise you to do this action on this player. return -1; } } else { clif_displaymessage(fd, msg_table[3]); // Character not found. return -1; } return 0; } /*========================================== * charchangesex command (usage: charchangesex ) *------------------------------------------ */ int atcommand_char_change_sex( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @charchangesex )."); return -1; } // check player name if (strlen(character) < 4) { clif_displaymessage(fd, msg_table[86]); // Sorry, but a player name have at least 4 characters. return -1; } else if (strlen(character) > 23) { clif_displaymessage(fd, msg_table[87]); // Sorry, but a player name have 23 characters maximum. return -1; } else { chrif_char_ask_name(sd->status.account_id, character, 5, 0, 0, 0, 0, 0, 0); // type: 5 - changesex clif_displaymessage(fd, msg_table[88]); // Character name sends to char-server to ask it. } return 0; } /*========================================== * charblock command (usage: charblock ) * This command do a definitiv ban on a player *------------------------------------------ */ int atcommand_char_block( const int fd, struct map_session_data* sd, const char* command, const char* message) { char character[100]; memset(character, '\0', sizeof(character)); if (!message || !*message || sscanf(message, "%99[^\n]", character) < 1) { clif_displaymessage(fd, "Please, enter a player name (usage: @charblock/@block )."); return -1; } // check player name if (strlen(character) < 4) { clif_displaymessage(fd, msg_table[86]); // Sorry, but a player name have at least 4 characters. return -1; } else if (strlen(character) > 23) { clif_displaymessage(fd, msg_table[87]); // Sorry, but a player name have 23 characters maximum. return -1; } else { chrif_char_ask_name(sd->status.account_id, character, 1, 0, 0, 0, 0, 0, 0); // type: 1 - block clif_displaymessage(fd, msg_table[88]); // Character name sends to char-server to ask it. } return 0; } /*========================================== * charban command (usage: charban