diff --git a/MagicMaster/5.3.0/MagicMaster.js b/MagicMaster/5.3.0/MagicMaster.js new file mode 100644 index 000000000..c6d29fb01 --- /dev/null +++ b/MagicMaster/5.3.0/MagicMaster.js @@ -0,0 +1,10872 @@ +// Github: https://github.com/Roll20/roll20-api-scripts/tree/master/MagicMaster +// Beta: https://github.com/DameryDad/roll20-api-scripts/tree/MagicMaster/MagicMaster +// By: Richard @ Damery +// Contact: https://app.roll20.net/users/6497708/richard-at-damery + +var API_Meta = API_Meta||{}; // eslint-disable-line no-var +API_Meta.MagicMaster={offset:Number.MAX_SAFE_INTEGER,lineCount:-1}; +{try{throw new Error('');}catch(e){API_Meta.MagicMaster.offset=(parseInt(e.stack.split(/\n/)[1].replace(/^.*:(\d+):.*$/,'$1'),10)-8);}} + +/** + * MagicMaster.js + * + * * Copyright 2020: Richard @ Damery. + * Licensed under the GPL Version 3 license. + * http://www.gnu.org/licenses/gpl.html + * + * This script is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This script is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * + * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * + * + * The goal of this script is to create and automate aspects of magic spell & item + * discovery, storage & use, initially for the ADnD 2e game in Roll20 + * + * v0.1.0 to v2.3.4 For earlier change log see earlier versions + * v3.0.0 31/10/2023 Added support for other character sheets and game systems. Corrected how the + * casting level of spells used as powers are calculated. Fixed storing items in + * type 6 or 7 containers. Added query: attribute to magic items to add Roll Queries + * to adding a new MI to a sheet to drive variable data. Moved parseData() to library. + * Fixed Long Rest for MI spells & powers. Added config option for magical weapon plus + * affecting weapon speeds, and corrected --config command documentation. + * v3.1.0 17/12/2023 Added additional support for other character sheets. Moved configuation menu to + * library. Added support for an "item carried" flag as used on the AD&D1e sheet. + * v3.1.2 15/01/2024 Implemented inheritance for magic item database objects. Implemented magic item + * query: and variables. Implemented "change-last" and "cursed+change-last" magic item + * classes for items that change to a different item when reaching zero charges. Added + * "Remove Curse" option to GM-only MI menu. Use evalAttr() when specifying qty for + * storing an MI + * v3.2.0 08/02/2024 New recharge types 'enable' and 'disable' which are uncharged but allow c: + * charge comparisons to support enabling and disabling of weapon attack rows. Fix + * moving hidden db item variables to always move with the trueName of the weapon + * (not the name). Added swordType as a shorthand query tag. Fixes to do with handling + * hidden equipment items. Add optional API command as a 5th parameter to --message + * command. + * v3.2.1 11/02/2024 Improvements to management of hidden items. Config item to set default reveal type + * to on use or manually. Better support for data attribute hide: - force hiding with + * 'hide', default to auto-hide state with no definition, or force no hiding with + * anything else. Improve parseStr() handling of undefined or empty strings. + * v3.3.0 26/02/2024 Allow re-usable (-1) powers to be weaponised in the same way that other spells and + * powers are. For spells & powers stored on items with a casting level, set the MU- + * and PR- casting levels to the stored level as well as the overall casting level. + * Extend "changing" items to allow cursed types. Define the store: attribute for + * bag-type objects which can be used with "nostore" to define a bag from which can + * be taken from but not stored. Extend GM's add-items dialog to cater for equipment. + * Fixed spell-storing items displaying "ghost" spells. Fixed issue with removing + * memorised spells. + * v3.4.0 27/03/2024 Added pick: and put: data attributes for commands to execute on picking & putting + * (or adding/removing) a magic item. Fixed bag creation on MI use. Fixed display + * of spells stored in a spell-storing item using a --view-spells command. Allow + * --mi-power command to be passed multiple '/' separated item names to cater for + * changing items. Add check for impact on character's initiative when picking or + * putting an item. Add maths evaluation to the MIqty argument of --addmi command. + * Fix trapped container that does not have a "Trap-1" (open/disarmed) macro to assume + * trap removed. Added --query-qty command to set the SpellCharges attribute on the + * character sheet to the charges of a spell, power or item. Added the --button SHOWMORE + * command to support the new [show more...] and {{hide#=...}} syntax of RPGMspell & + * RPGMdefault templates. On token death, save current container type & set to 6 + * (force inanimate), but reset to original if revived. + * v3.4.1 23/05/2024 Fixed errors in renaming magic items using the GM-edit-mi menu. + * v3.5.0 06/05/2024 Updated --level-change to support "fixed class" where does not ask for classes. + * Allow configuration option to "grey out" spell & item action buttons when viewing + * (rather than using). Add "splitable" items which can be split when picked up but + * do not stack (e.g. used for paper, parchment & papyrus) except for renamed items + * which can't do this. Fix spell storing items that have an "-ADD" postfix allowing + * the player/character to add spells. Fix magic item rev: attribute to correctly use + * 'manual', 'view', or 'use'. Support renaming of items picked up that are not + * stackable and the container already contains that item name. Fix handling of use + * of --mi-charges with "=#" for setting the quantity to an absolute number. Support + * RPGM maths operators for numbers passed to --mi-charges. Fixed stacking of looted + * items. Added container self-heal capability on version change. + * v3.5.1 02/08/2024 Fixed storing an item to a character sheet of security type 7 (Force Sentient) + * v4.0.1 22/09/2024 Gave option for pre-determined name change on picking up an item with a duplicated + * displayed name. Fix listing/viewing/using a spell or power that is on the sheet but + * not in a database. Improved error checking and type conversion. Corrected speed + * of items to use inheritance via resolveData(). Improved --message command resolution + * of selected vs. id token selection. Added new MI-DB-Treasure database. + * v4.0.2 25/02/2025 Fixed error when using GM's [Add Items] or --gm-edit-mi to hide an item as another item. + * v4.0.3 05/04/2025 Fixed error in memorize spells dialog misdisplaying spells with empty (as opposed to + * undefined) strings. + * v4.0.4 08/04/2025 Added ability for --message command to take any number of variables as arguments (after + * API call argument) referenced by ^^#^^. Fixed removeMIability() which was deleting + * across all sheets rather than just selected sheet. + * v4.0.5 27/04/2025 Fixed character sheet corruption caused by remove() behaviour with open references. + * Fixed error in removeMIability() due to incorrect object name reference. + * v4.0.6 30/04/2025 Enhanced the fix in removeMIability() to deal with corrupted attributes. + * Added the !magic --clean function to clean away corrupted attributes & abilities. + * v5.0.0 29/04/2025 Fixed display of [[n]] calculated values when viewing spells and magic items. Add the + * ability to "rest" a single spell or power using --rest. Added commerce, money, and + * traders. Changed table indexing (e.g. for item variable attribute names) to use table + * row object-ids, thereby eliminating impact of changing row numbers. On a long rest, + * call commandMaster item conversion to convert character sheet to new table structures. + * Also on a long rest, call commandMaster command --restock to restock trader inventories. + * Added Services list to GM-edit-mi dialog to allow services to be added to traders. + * Updated --change-attr command to have a '=' qualifier to set temporary attribute + * value to a specific number. Created itemSlotData() utility function to replace faulty + * slotCounts{} object and add qty & weight counts. + * v5.0.1 24/09/2025 Added the --noWaitMsg command to silence the immediate "Please Wait, gathering data..." + * messages. + * v5.0.2 05/10/2025 Add (temporary?) fix to API button cmd / macro pair action. + * v5.0.3 17/10/2025 Fixed crash on calling !magic without any command. Fixed sloppy checking of spell + * schools and spheres. + * v5.1.0 25/09/2025 Converted var declarations to use let and const where possible. Tried to enhance + * speed of algorithms. + * v5.2.0 18/11/2025 Added selection of multiple items to pick, put, buy or sell with traders and + * containers. Used new hyperlink RPGM template syntax to add hyperlinks to select + * all of a type of item, or all items in the container. + * v5.3.0 23/12/2025 Added encumbrance. Updated attrLookup() and resolveData() to use objects for + * optional parameters. Fixed viewing spell storing MIs in innanimate containers. + */ + +const MagicMaster = (function() { // eslint-disable-line no-unused-vars + 'use strict'; + const version = '5.3.0'; + const author = 'RED'; + let pending = null; + const lastUpdate = 1777318205; + + /* + * Define redirections for functions moved to the RPGMaster library + */ + + const getRPGMap = (...a) => libRPGMaster.getRPGMap(...a); + const getHandoutIDs = (...a) => libRPGMaster.getHandoutIDs(...a); + const setAttr = (...a) => libRPGMaster.setAttr(...a); + const attrLookup = (...a) => libRPGMaster.newAttrLookup(...a); + const setAbility = (...a) => libRPGMaster.setAbility(...a); + const miSpellLookup = (...a) => libRPGMaster.miSpellLookup(...a); + const abilityLookup = (...a) => libRPGMaster.abilityLookup(...a); + const doDisplayAbility = (...a) => libRPGMaster.doDisplayAbility(...a); + const getAbility = (...a) => libRPGMaster.getAbility(...a); + const getTableField = (...t) => libRPGMaster.getTableField(...t); + const getTable = (...t) => libRPGMaster.getTable(...t); + const getTableGroup = (...t) => libRPGMaster.getTableGroup(...t); + const getTableGroupField = (...t) => libRPGMaster.getTableGroupField(...t); + const getItemTable = (...t) => libRPGMaster.getItemTable(...t); + const tableGroupLookup = (...t) => libRPGMaster.tableGroupLookup(...t); + const tableGroupIndex = (...t) => libRPGMaster.tableGroupIndex(...t); + const indexTableGroup = (...t) => libRPGMaster.indexTableGroup(...t); + const addTableGroupRow = (...t) => libRPGMaster.addTableGroupRow(...t); + const tableGroupFind = (...t) => libRPGMaster.tableGroupFind(...t); + const getLvlTable = (...t) => libRPGMaster.getLvlTable(...t); + const initValues = (...v) => libRPGMaster.initValues(...v); + const checkDBver = (...a) => libRPGMaster.checkDBver(...a); + const saveDBtoHandout = (...a) => libRPGMaster.saveDBtoHandout(...a); + const buildCSdb = (...a) => libRPGMaster.buildCSdb(...a); + const checkCSdb = (...a) => libRPGMaster.checkCSdb(...a); + const getDBindex = (...a) => libRPGMaster.getDBindex(...a); + const updateHandouts = (...a) => libRPGMaster.updateHandouts(...a); + const findThePlayer = (...a) => libRPGMaster.findThePlayer(...a); + const findCharacter = (...a) => libRPGMaster.findCharacter(...a); + const fixSenderId = (...a) => libRPGMaster.fixSenderId(...a); + const evalAttr = (...a) => libRPGMaster.evalAttr(...a); + const getCharacter = (...a) => libRPGMaster.getCharacter(...a); + const characterLevel = (...a) => libRPGMaster.characterLevel(...a); + const caster = (...a) => libRPGMaster.caster(...a); + const getTokenValue = (...a) => libRPGMaster.getTokenValue(...a); + const classObjects = (...a) => libRPGMaster.classObjects(...a); + const updateCoins = (...a) => libRPGMaster.updateCoins(...a); + const spendMoney = (...a) => libRPGMaster.spendMoney(...a); + const redisplayOutput = (...a) => libRPGMaster.redisplayOutput(...a); + const greyOutButtons = (...a) => libRPGMaster.greyOutButtons(...a); + const getMagicList = (...a) => libRPGMaster.getMagicList(...a); + const getShownType = (...a) => libRPGMaster.getShownType(...a); + const addMIspells = (...a) => libRPGMaster.addMIspells(...a); + const handleCheckWeapons = (...a) => libRPGMaster.handleCheckWeapons(...a); + const handleCheckSaves = (...a) => libRPGMaster.handleCheckSaves(...a); + const handleGetBaseThac0 = (...a) => libRPGMaster.handleGetBaseThac0(...a); + const parseClassDB = (...a) => libRPGMaster.parseClassDB(...a); + const parseData = (...a) => libRPGMaster.parseData(...a); + const parseStr = (...a) => libRPGMaster.parseStr(...a); + const resolveData = (...a) => libRPGMaster.newResolveData(...a); + const getSetPlayerConfig = (...a) => libRPGMaster.getSetPlayerConfig(...a); + const makeConfigMenu = (...a) => libRPGMaster.makeConfigMenu(...a); + const sendToWho = (...m) => libRPGMaster.sendToWho(...m); + const sendMsgToWho = (...m) => libRPGMaster.sendMsgToWho(...m); + const sendPublic = (...m) => libRPGMaster.sendPublic(...m); + const sendAPI = (...m) => libRPGMaster.sendAPI(...m); + const sendFeedback = (...m) => libRPGMaster.sendFeedback(...m); + const sendResponse = (...m) => libRPGMaster.sendResponse(...m); + const sendResponsePlayer = (...p) => libRPGMaster.sendResponsePlayer(...p); + const sendResponseError = (...e) => libRPGMaster.sendResponseError(...e); + const sendError = (...e) => libRPGMaster.sendError(...e); + const sendCatchError = (...e) => libRPGMaster.sendCatchError(...e); + const sendParsedMsg = (...m) => libRPGMaster.sendParsedMsg(...m); + const sendGMquery = (...m) => libRPGMaster.sendGMquery(...m); + const sendWait = (...m) => libRPGMaster.sendWait(...m); + + /* + * Handle for reference to character sheet field mapping table. + * See RPG library for your RPG/character sheet combination for + * full details of this mapping. See also the help handout on + * RPGMaster character sheet setup. + */ + + var fields = { + defaultTemplate: 'RPGMdefault', + spellTemplate: 'RPGMspell', + potionTemplate: 'RPGMpotion', + menuTemplate: 'RPGMmenu', + warningTemplate: 'RPGMwarning', + messageTemplate: 'RPGMmessage', + }; + + /* + * Handle for reference to database data relevant to MagicMaster. + * Actual data is held in the relevant RPG-specific library. Refer + * to the library for full details. See also the help handout for + * each database. + */ + + var dbNames; + + /* + * Handle for the Database Index, used for rapid access to the character + * sheet ability fields used to hold database items. + */ + + var DBindex = {}; + + /* + * Handle for the library object used to pass back RPG & character sheet + * specific data tables. + */ + + var RPGMap = {}; + + /* + * set design strings for common icons and button colours before they + * are used. + */ + + const design = Object.freeze({ + turncolor: '#D8F9FF', + roundcolor: '#363574', + statuscolor: '#F0D6FF', + statusbgcolor: '#897A87', + statusbordercolor: '#430D3D', + edit_icon: 'https://s3.amazonaws.com/files.d20.io/images/11380920/W_Gy4BYGgzb7jGfclk0zVA/thumb.png?1439049597', + delete_icon: 'https://s3.amazonaws.com/files.d20.io/images/11381509/YcG-o2Q1-CrwKD_nXh5yAA/thumb.png?1439051579', + settings_icon: 'https://s3.amazonaws.com/files.d20.io/images/11920672/7a2wOvU1xjO-gK5kq5whgQ/thumb.png?1440940765', + apply_icon: 'https://s3.amazonaws.com/files.d20.io/images/11407460/cmCi3B1N0s9jU6ul079JeA/thumb.png?1439137300', + bag_icon: 'https://s3.amazonaws.com/files.d20.io/images/335981697/ocKqy1UIfPMSD-TYEO6oXA/thumb.png?1680722832', + info_msg: '
', + grey_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: gray; font-weight: extra-light; padding: 1px 5px;"', + dark_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: black; font-weight: normal; padding: 1px 5px;"', + selected_button: '"display: inline-block; background-color: white; border: 1px solid red; border-radius: 5px ; color: red; font-weight: bold; padding: 1px 5px;"', + green_button: '"display: inline-block; background-color: white; border: 1px solid lime; border-radius: 5px ; color: darkgreen; font-weight: bold; padding: 1px 5px;"', + boxed_number: '"display: inline-block; background-color: yellow; border: 1px solid blue; padding: 2px; color: black; font-weight: bold;"', + success_box: '"display: inline-block; background-color: yellow; border: 1px solid lime; padding: 2px; color: green; font-weight: bold;"', + failure_box: '"display: inline-block; background-color: yellow; border: 1px solid red; padding: 2px; color: maroon; font-weight: bold;"', +// grey_action: '<span style="display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: dimgrey; font-weight: extra-light;">$2</span>$4', + }); + + /* + * MagicMaster related help handout information. + */ + + const handouts = Object.freeze({ + MagicMaster_Help: {name:'MagicMaster Help', + version:3.13, + avatar:'https://s3.amazonaws.com/files.d20.io/images/257656656/ckSHhNht7v3u60CRKonRTg/thumb.png?1638050703', + bio:'
' + +'MagicMaster Help v3.13' + +'
' + +'
' + +'

MagicMaster API v'+version+'

' + +'

and later

' + +'
' + +'

New: in this Help Handout

' + +'

New: Ability to select multiple items to buy or sell

' + +'

New: Ability to pick up, loot or store multiple items at the same time

' + +'

Updated: --mi-charges can take API commands as success and/or fail parameters

' + +'

New: Calculation of encumbrance (configurable) and --check-move command

' + +'
' + +'

The MagicMaster API provides functions to manage all types of magic, including Wizard & Priest spell use and effects; Character, NPC & Monster Powers; and discovery, looting, use and cursing of Magic Items. All magical aspects can work with the RoundMaster API to implement token markers that show and measure durations, and produce actual effects that can change token or character sheet attributes temporarily for the duration of the spell or permanently if so desired. They can also work with the InitiativeMaster API to provide menus of initiative choices and correctly adjust individual initiative rolls, including effects of Haste and Slow and similar spells. This API can also interact with the MoneyMaster API (under development) to factor in the passing of time, the cost of spell material use, the cost of accommodation for resting, and the cost of training for leveling up as a spell caster (Wizard, Priest or any other).

' + +'

Syntax of MagicMaster calls

' + +'

The MagicMaster API is called using !magic (or the legacy command !mibag).

' + +'
!magic --help
' + +'

Commands to be sent to the MagicMaster API must be preceded by two hyphens \'--\' as above for the --help command. Parameters to these commands are separated by vertical bars \'|\', for example:

' + +'
!magic --mi-power token_id|power_name|mi_name|[casting-level]
' + +'

If optional parameters are not to be included, but subsequent parameters are needed, use two vertical bars together with nothing between them, e.g.

' + +'
!magic --cast-spell MI|[token_id]||[casting_name]
' + +'

Commands can be stacked in the call, for example:

' + +'
!magic --spellmenu [token_id]|[MU/PR/POWER] --mimenu [token_id]
' + +'

When specifying the commands in this document, parameters enclosed in square brackets [like this] are optional: the square brackets are not included when calling the command with an optional parameter, they are just for description purposes in this document. Parameters that can be one of a small number of options have those options listed, separated by forward slash \'/\', meaning at least one of those listed must be provided (unless the parameter is also specified in [] as optional): again, the slash \'/\' is not part of the command. Parameters in UPPERCASE are literal, and must be spelt as shown (though their case is actually irrelevant).

' + +'
' + +'[General API Help]' + +'

How MagicMaster works

' + +'

Race, Class, Item, Spell and Power databases

' + +'

MagicMaster uses a large range of items held in databases. The current versions of these databases are distributed with the game-version-specific RPGMaster Library, updated as new versions are released via Roll20. The provided databases are held in memory, but can be extracted to ability macros in database character sheets using the !magic --extract-db command. These macros can do anything that can be programmed in Roll20 using ability macros and calls to APIs, and are found (either in the Character Sheet database or the internal database in memory) and called by the MagicMaster API when the Player selects them using the menus provided by the MagicMaster functions. The GM can add to the provided items in the databases using standard Roll20 Character Sheet editing, following the instructions provided in the Magic Database Handout.

' + +'

Races & Classes

' + +'

The definitions for character Races & Classes held in the Race-DB and Class-DB databases include a description of the race and class and its capabilities, the powers/non-weapon proficiencies that it comes with, any restrictions on weapons, armour and spells that it is subject to, and other class-specific aspects such as alignments and races. As you might expect, these are not just descriptions, but restrict the player character to the characteristics defined (alterable by using the !magic --config command). The Class & Race Database Help handouts provide information on the structure of the race & class specifications and how the GM / game creator can add their own races and classes and alter those provided.

' + +'

Spells and Powers

' + +'

The Ability Macros for spells and powers include descriptions of the spell they represent (limited, I\'m afraid, to avoid copyright issues), and also can optionally have API Buttons embedded in them which, if selected by the Player, can enact the actions of the spell or power. The API Buttons call one or more of the API commands listed in this document, or commands provided by other APIs. This is most powerful when combined with the RoundMaster API to implement token statuses and status markers with durations and effect macros, enabling the spells & powers to make temporary (or permanent, if desired) changes to the targeted creature\'s token and character sheet attributes.

' + +'

The best way to learn about these capabilities is to look at example spell definitions in the databases and use those spells or powers to see what they do.

' + +'

Types of Item Provided

' + +'

The Item database is currently split into twelve parts: Weapons, Ammunition, Armour, Equipment, Lights, Potions, Scrolls & Spellbooks, Treasure, Wands Staves & Rods, Rings, Miscellaneous, custom items of all these types, and now Services. More might be added in future releases, and any DM can add more databases with their own items.

' + +'

Many magic items have actions that they can perform in the same way as Spells & Powers, using API Buttons in their macros that call MagicMaster API commands, or commands from other APIs. As with spells & powers, this is most powerful when combined with the capabilities of the RoundMaster API.

' + +'

Items can have stored spells (like Rings of Spell Storing) and the spells can be cast from them, and/or can have powers that can be consumed and are refreshed each day. Again, using the RoundMaster API, the spells and powers can have temporary or permanent effects on Tokens and Character Sheets, if desired. Some items can even store other items, such as a Bag of Holding.

' + +'

Adding Items to the Character

' + +'

Classes are set using the CommandMaster API or via the AttackMaster !attk --other-menu menu (or can be set manually on the Character Sheet). Classes can be those provided in the Class-DB, or any other class. Class names that are not in the database will adopt the attributes of the standard classes depending on the character sheet field the class name and level are entered into: Warrior, Wizard, Priest, Rogue, and Psion. Depending on the settings selected by the GM under the --config menu, the choise of class will restrict or grant the character\'s ability to use certain items and cast certain spells.

' + +'

The MagicMaster API provides commands to perform menu-driven addition of items to the Character Sheet. Using these commands will set up all the necessary fields so that the Player can use the items with the other APIs - if using MagicMaster then items should not be added directly to the Character Sheet.

' + +'

Items can also be acquired by finding them in chests or on tables (simply tokens with images of chests or tables that represent Character Sheets with items added to them) that can be looted, or even dead bodies of NPCs that have been killed in battle. MagicMaster provides commands that support a menu-driven way to perform looting. Characters, especially Rogues, can even try to Pick Pockets to take items from NPCs (or even other Characters...), though failure may alert the DM (or other Player) to the attempt. Containers can even be trapped, with magical consequences if the trap goes off! On the other hand, Characters can also put items away into chests or onto tables or other storage places, or give them to other Characters or NPCs.

' + +'

New:Encumbrance

' + +'

Almost all items weigh something, and there is a limit to what a character of a particular strength can carry. When items are added to a character, NPC, creature, or other container the total weight carried is calculated, including the weight of items in bags carried. This weight can be displayed by viewing the item list. As this weight increases, it can "encumber" the carrier - slowing movement, impacting the ability to fight and reducing their ability to dodge so impacting AC. The degree of encumbrance is tracked by the API and the appropriate penalties applied (unless disabled by the GM using a configuration option). The Attk Menu > Check Movement dialog (or !magic --check-move command) will display how the encumbrance is calculated from carried items and current modifications to movement (AttackMaster API is required).

' + +'

While some magical items may have a weight that needs to be born by the carrier, they may not "encumber" the carrier or impact movement, attacks or AC. Magical armour has this effect. Data in the MI database sets the weights and encumbrance values for each item. See the Items Database Help handout for more information.

' + +'

Trading Items & Services

' + +'

From v4.1 of the RPGMaster suite, characters can be defined as Traders, with the ability to buy & sell items in their inventories. This even includes Drag & Drop Innkeepers, Shopkeepers, and Blacksmiths in their Forge (and many others listed under the [Services] button on the Drag & Drop dialog), from which Player Characters (and others) can buy equipment and items from as well as sell items to in exchange for money. Training Schools also exist that sell training in weapon proficiencies and even levelling up. See the Class Database Help and Race & Creature Database Help handouts for more information.

' + +'

All items in the API databases have been given monetary values, based on the rules stated in the DMG and the Dungeon Master Option: High Level Campaigns for the cost of creating the items (sometimes adjusted for game balance). This cost is then adjusted by each Trader depending on the trading margin each has defined using their buy: and sell: data tag formulas. This means the same item can be offered at different prices by two different traders: indeed, many margin calculations are based on a degree of variability based on a dice roll so the price of an item from a single Trader can vary over time. The trading system also allows the Trader (or the GM or player controlling the Trader) to haggle a price with the player controlling the PC.

' + +'

A coin system is now included for each character consisting of numbers of Platinum, Gold, Electrum, Silver and Copper Coin items being held in each character\'s inventory. The quantity of these coins are automatically reflected to the Currency fields on the character sheet. The coin numbers are updated as trades are made: Traders cannot go "overdrawn" with negative numbers of coins (to ensure there is a balance of buying & selling to preserve game balance), but player characters and other NPCs are not prevented from doing so - the DM should keep an eye on borrowing levels and impose penalties (such as interest charges) for excessive overdrafts. Coins can be stored into and recovered (or looted) from containers (such as chests, or perhaps containers called "bank accounts").

' + +'

Not only magic items and treasure can be traded, but also services, such as weapon proficiency training, training to level up (if the GM rules this needs training), costs of accommodation or for mooring a ship in a harbour. Several examples are included in the Race-DB-Services database distributed with the APIs.

' + +'

For ease of use (and to demonstrate examples of use), several Drag & Drop Service Providers and other traders are included with the APIs. These include training schools for all classes of character (for proficiency and level training), Inns with accommodation, food and drink, General Stores for standard equipment, a Wizard\'s Emporium, and even the Thieve\'s Guild. These create tokens dropped onto the playing surface fully populated with appropriate items that can be bought and currency for the Trader to use to buy items from the characters.

' + +'

Of course, as with all other aspects of the RPGMaster suite, GMs can extract the relevant databases to view, update, and add to the trader and service item definitions, following the advice given in the database help handouts.

' + +'

Adding Spells & Powers to the Character

' + +'

Spells need to be added in two steps: 1. adding to a Character\'s or NPC\'s spell book; and 2. Memorising the spells each day.

' + +'

The simplest way to add spells to a Character\'s spell books is to use the CommandMaster API functions that set up Character Sheets from scratch. However, spells can be added to the Character Sheet manually: see the RPG Master CharSheet Setup handout for details of how to do this. Either approach results in the Character having a list of spells at each spell level they can use that they have available to memorise.

' + +'

Spells can be memorised using the MagicMaster menus or via the !magic --mem-spell MagicMaster command. This limits the number of spells memorised at each level to the number that is valid for the Character, with their specific characteristics, class, level and other valid adjustments (though it is possible to add a "fudge factor" if needed). Once memorised, they can be rememorised or changed at any time, though the DM usually limits this in game play to once each in-game day. If a Player is happy with the spells a Character has, the Character just needs to rest at the end of the day to regain their spells (and powers, and recharging magic item charges).

' + +'

Powers are added in exactly the same way as Spells. The difference between the two is that Powers are granted to a Character, either as a function of the class they have adopted, or from being granted powers in game-play. Of course, NPCs and creatures also have many various powers. Some Powers can be used more than once a day, or even \'at will\' (an example is Priests turning undead).

' + +'

Using Items

' + +'

Items possessed by the Character can be used to perform their functions, using MagicMaster menus. When used with the InitiativeMaster API, the action for the next round can be the use of a specific item the Character has on them, with the speed of that item. This may use charges or consume quantities of the item, and these charges may or may not be regained overnight, or through other means. The items use Roll20 ability macros that can be as simple as putting text in the chat window explaining what the item does, through to much more complex targeting of effects on the user, a single other target, or all tokens in a defined area. When used with the RoundMaster API, targeted tokens can have a status marker applied with a pre-determined duration and associated effects at the start, each round and when it finishes. Items that are totally consumed will automatically disappear from the Character Sheet.

' + +'

Casting spells and using powers

' + +'

Spells memorised by the Character can be cast using MagicMaster menus. As with items, when used with the InitiativeMaster API with Group or Individual initiative, the action for the next round can be the casting of a specific spell with the speed of the Casting Time. Casting a spell will remove it from memory for the rest of the day, but a rest will bring it back. Like items, spells use Roll20 ability macros and thus can perform any function a macro or an API call can achieve. The same capability to affect tokens and Character Sheets is available if used with the RoundMaster API.

' + +'

Dynamic lighting for tokens

' + +'

MagicMaster API provides commands to change the lighting settings of the token to reflect illumination, as if holding various light sources. This includes both radiant light sources such as hooded lanterns, torches, continual light gems, magic items and magic armour, and also directed light sources such as beacon lanterns and bullseye lanterns which only illuminate in beams.

' + +'

DM tools

' + +'

The DM is provided with tools to be able to add items to chests, NPCs, Characters etc. These tools allow the DM to also change certain aspects of the items, including the displayed name and the cursed status of the item. Items that are cursed are not obvious to Characters and Players, and such items can be \'hidden\' and appear to be other items until revealed as the cursed item by the DM.

' + +'

The tools also allow the DM to increase or restrict the number of items Characters can have on their person: it is then possible to give each Character a \'backpack\' token/character sheet, which the Character can store items to and get items from - of course, retrieving an item from the backpack takes a round (at the DM\'s discression - the system does not impose this).

' + +'

DMs can also add their own items, spells and powers to additional databases (the provided databases should not be added to, but entries can be replaced by new entries in your own databases - updates will not replace your own databases - see the Items Database Help handout). This requires some knowledge of Roll20 macro programming and use of APIs. See the Roll20 Help Centre for information.

' + +'
' + +'

Command Index

' + +'

1.Spell and Power management

' + +'
--spellmenu [token_id]|[MU/PR/POWER]
'
+							+'--mem-spell (MU/PR/POWER)|[token_id]
'
+							+'--view-spell (MU/PR/POWER)|[token_id]
'
+							+'--cast-spell (MU/PR/POWER/MI)|[token_id]|[casting_level]|[casting_name]
'
+							+'--cast-again (MU/PR/POWER)|token_id|[spell_name]
'
+							+'--mem-all-powers token_id
' + +'

2.Magic Item management

' + +'
--mimenu [token_id]
'
+							+'--edit-mi [token_id]
'
+							+'--view-mi [token_id]
'
+							+'--use-mi [token_id]
'
+							+'--add-mi [token_id]|(mi-to-replace/row#)|mi-to-add|quantity|hand#|[NOCURSE]|[SILENT]
'
+							+'--mi-charges token_id|value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
'
+							+'--mi-power token_id|power_name|mi_name|[casting-level]
'
+							+'--store-spells token_id|mi-name
'
+							+'--mem-spell (MI-MU/MI-PR)[-ANY/-ADD/-CHANGE]|[token_id]|[mi-name]
'
+							+'--view-spell (MI/MI-MU/MI-PR/MI-POWER)|[token_id]|[mi-name]
'
+							+'--cast-spell (MI/MI-POWER)|[token_id]|[casting_level]|[casting_name]|[CHARGED]|[mi-name]
'
+							+'--learn-spell [token_id]|spell_name
'
+							+'New:--check-move [token_id]|[SILENT]
' + +'

3.Spell, power & magic item effects and resting

' + +'
!rounds --target CASTER|caster_token_id|caster_token_id|spell_name|duration|increment|[msg]|[marker]
'
+							+'!rounds --target (SINGLE/AREA)|caster_token_id|target_token_id|spell_name|duration|increment|[msg]|[marker]
'
+							+'--touch token_id|effect-name|duration|per-round|message|marker
'
+							+'--level-change [token_id]|[# of levels]|[HP change]|[class]
'
+							+'--change-attr [token_id]|change|[field]|[SILENT]
'
+							+'--rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale / spellname]
'
+							+'--mi-rest [token_id]|mi_name|[charges]|[power_name]
'
+							+'--query-qty [token_id]|(MU/PR/POWER/MI/MIPOWER)|item|[SILENT]
' + +'

4.Treasure & Item container management

' + +'
--gm-edit-mi [token_id]
'
+							+'--find-traps token_id|pick_id|put_id
'
+							+'--search token_id|pick_id|put_id
'
+							+'--pickorput token_id|pick_id|put_id|[SHORT/LONG]
'
+							+'--buy token_id|pick_id|put_id
'
+							+'--sell token_id|pick_id|put_id
' + +'

5.Light source management

' + +'
--lightsources [token_id]
'
+							+'--light token_id|(NONE/WEAPON/TORCH/HOODED/CONTLIGHT/BULLSEYE/BEACON)
' + +'

6.Other commands

' + +'
--help
'
+							+'--message [who|][token_id]|title|message|[command]|[var1]|[var2]...
'
+							+'--display-ability [who|][token_id]|database|db_item|[dice_roll1]|[dice_roll2]|[target_id]
'
+							+'--tidy [token_id]|[SILENT]
'
+							+'--clean [token_id]|[SILENT]
'
+							+'Updated:--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/REVEAL/VIEW-ACTION/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
'
+							+'--check-db [db-name]
'
+							+'--extract-db [db-name]
'
+							+'--handshake from | [cmd]
'
+							+'--hsq from | [cmd]
'
+							+'--hsr from | [cmd] | [TRUE/FALSE]
'
+							+'--debug (ON/OFF)
' + +'
' + +'

1. Spell management

' + +'

1.1 Display a menu to do actions with spells

' + +'
--spellmenu [token_id]|[MU/PR/POWER]
' + +'

Takes an optional token ID and an optional menu type as arguments. If token ID is not specified, uses the selected token.

' + +'' + +' ' + +' ' + +' ' + +' ' + +'
MU:displays buttons for Magic User/Wizard spells for casting, resting (short or long), memorising spells from the character\'s spell book, or viewing the memorised spells.
PR:displays buttons for Priest spells for casting, resting (short or long), memorising spells from the character\'s spell book, or viewing the memorised spells.
POWER:displays buttons for using powers, doing a long rest, changing/resetting powers from the character\'s granted powers, or viewing the granted powers.
None of the above:the system will check the class(es) of the character and display the appropriate menu, or if a multi-class character including both a Wizard and a Priest, ask if the player wants to display Magic User or Priest menus.
' + +'

If the specified token is not associated with a character that has a spell book of the chosen type, or any granted powers, an error message is displayed.

' + +'

1.2 Display a menu to memorise spells from the Character\'s spell book

' + +'
--mem-spell (MU/PR/POWER/MI-MU/MI-PR)|[token_id]|[mi-name]
' + +'

Takes a mandatory spell book type, an optional token ID, and an optional magic item name as arguments. If token ID is not specified, uses the selected token.

' + +'

The Character Sheet associated with the token must have spell books specified for the relevant types of spells or powers. These are lists of spells from the spell macro databases (see Section 7) specified by level (powers are all 1 level) and as lists separated by \'|\'. E.g. Charm-Person|Light|Sleep. If the CommandMaster API is installed, the GM can use its menus to set up character spell books and granted powers.

' + +'

Initially displays a menu for memorising Level 1 spells (the only level for powers), with buttons to: choose a spell from the Level 1 spell book on the character sheet; review the chosen spell; and one for each memorising slot the Character has at this level. Other buttons to memorise or remove spells become available when spells or slots are chosen. Another button goes to the next available level with slots. When a granted power is memorised to a slot, a quantity per day can be specified: -1 will grant unlimited uses of the power per day. Memorising any other type of spell is limited to 1 use per slot.

' + +'

Depending on the settings on the --config menu, the character will be limited to memorising spells and powers allowed to their character class and level.

' + +'

MI-MU and MI-PR have a special function: these are used to cast memorised spells into the named spell-storing magic item (if no item is named, the last item selected by the Character running the command will be used instead), such as a Ring-of-Spell-Storing. Magic Item spells are stored in an unused level of the Character Sheet. This command displays both all memorised spells and all spell-storing magic item spell slots, and allows a memorised spell to be selected, a slot (for the same spell name) to be selected, and the spell cast from one to the other. Spells can only be replaced by the same spell that was in the slot previously (unless this is the first time spells have been stored in a blank spell-storing item).

' + +'

1.3 View the memorised spells or granted powers

' + +'
--view-spell (MU/PR/POWER/MI-MU/MI-PR/MI-POWER)|[token_id]|[mi-name]
' + +'

Takes a mandatory spell type, an optional token ID, and an optional magic item name. If token ID is not specified, uses the selected token.

' + +'

Displays a menu of all levels of memorised spells of the selected type (there is only 1 level of powers). Spells that have already been cast appear as greyed out buttons, and can\'t be selected. Spells that are still available to cast that day can be selected and this runs the spell or power macro from the relevant database without consuming the spell, so that the Player can see the specs. Action buttons on the macro are "greyed out" and can\'t be selected, with the exception of [View...] buttons on spell-storing items which will display the stored spells/powers if selected (again without consuming them).

' + +'

Adding MI- before any of the types of spell views the spells or powers available for the specified magic item, or the last Magic Item used by the Character if no magic item name is provided. Generally this version of the command is only called from API Buttons from the magic item\'s ability macro.

' + +'

1.4 Cast a memorised spell or use a granted power

' + +'
--cast-spell (MU/PR/POWER/MI/MI-POWER)|[token_id]|[casting_level]|[casting_name]|[CHARGED]|[mi-name]
' + +'

Takes a mandatory spell type, an optional token ID (if not specified, uses the selected token), an optional casting level, and an optional caster name, an optional \'CHARGED\' command, and an optional magic item name.

' + +'

This displays a menu of all levels of the memorised spells/powers of the relevant type. MI displays the spell book for spells stored on the specified magic item, or the last magic item used or viewed if not specified (both MU & PR), and MI-POWER all stored powers in the specified or last selected magic item, (this version of the command is generally called using an API Button in the magic item ability macro). The player can select a spell/power and then a button becomes available to cast it, using up that slot/deducting a power charge until the next long rest (or until the item is recharged).

' + +'

If a casting_level is specified, the spell will be cast as if by a caster of that level, and if a casting_name is specified, that name will be displayed in the spell macro information. These functions are often used for magic items that cast at specific levels of use, or magic artefacts that are named and/or sentient. If these are not specified, the caster name and relevant class level are used. In either case, specified or not, the character\'s Character Sheet Attributes called @{Casting-name} and @{Casting-level} are set to the values used, and can be used in spell, power, or magic item macros.

' + +'

If the optional CHARGED parameter is specified (only relevant to spells and powers stored on magic items), this specifies that the Magic Item from which the spell or power is cast is charged, and looses one charge when that cast is made. This is generally the case when the spell or power is on a Scroll. When the charge quantity reaches zero, the item will follow the behaviour determined by its charge type (charged, uncharged, rechargeable, recharging, self-charging) - see section 4.1 for more information on charges and charge types.

' + +'

1.5 Cast the last used spell or power again

' + +'
--cast-again (MU/PR/POWER)|token_id|[spell_name]
' + +'

Takes a mandatory spell type, a mandatory token ID and an optional spell name.

' + +'

This command is used for certain spells and powers that, once cast, allow continuing effects in the same or subsequent rounds, without using additional charges. If the optional spell name is not used, the command just casts again the same spell as the last spell cast by the character associated with the selected token, at the same casting level and casting name. If a spell name is specified, this spell is cast instead as if it were the same spell: this is used where different spell macros are required to specify subsequent spell effects.

' + +'

1.6 Memorise All Valid Powers

' + +'
--mem-all-powers token_id
' + +'

Takes a mandatory token_id.

' + +'

Reviews all the Powers currently in the Powers Spellbook, checking for Race, Creature, Class and user-added Powers, and checks them against their respective definitions in the various databases to assess if they can be used at the level of experience/Hit Dice of the character / creature. Memorises each valid power for the number of uses per day specified in the Race, Class or Creature database definition: user-added powers are memorised at unlimited uses per day unless a default is otherwise specified in the Powers database, on the basis that DMs/Players will either change this by rememorising them individually, or otherwise play to the agreed limits of use.

' + +'
' + +'

2. Magic Item management

' + +'

2.1 Display a menu of possible Magic Item actions

' + +'
--mimenu [token_id]
' + +'

Takes an optional token ID as an argument. If token ID is not specified, uses the selected token.

' + +'

Displays a menu with the following actions: Use a magic item, Search for magic items & treasure, Store magic items in a container, Edit the contents of a character\'s magic item bag, and View the contents of a character\'s magic item bag.

' + +'

Searching & Storing are explained in section 4.

' + +'

2.2 Edit a Magic Item bag

' + +'
--edit-mi [token_id]|[MARTIAL/MAGICAL/ALL]
' + +'

Takes an optional token ID, and an optional item type as arguments. If token ID is not specified, uses the selected token. If the item type is not specified, defaults to MAGICAL.

' + +'

Displays a menu similar to editing memorised spells. At the top are buttons to choose different types of magic items which have macros in the magic item databases. If the optional item type is MARTIAL, only weapons, ammo and armour are listed; if ALL is specified, lists of all items are shown; otherwise only non-MARTIAL items are listed. The slots available in the bag are shown (with their current contents) and, when magic items and/or slots are chosen buttons become selectable below to store, review, or remove magic items in/from the bag.

' + +'

Storing a magic item will ask for a number - either a quantity or a number of charges. Magic Items can be of various types: Charged (is used up when reaches 0), Uncharged (a number is a pure quantity that is not consumed), Recharging (regains charges after each long rest), Rechargable (is not used up when reaches 0, stays in bag and can be recharged when the DM allows), Self-charging (recharge at a rate per round determined by the item) and can also be Cursed - more under section 4.

' + +'

This menu is generally used when Magic Item & treasure containers (such as Treasure Chests and NPCs/monsters with treasure) have not been set up in a campaign as lootable, and provides a means of giving found magic items to characters. The DM just tells the Player that they have found a magic item, and the Player adds it to their Character Sheet using this command (more likely accessed via the Magic Item menu).

' + +'

2.3 View a character\'s Magic Item Bag

' + +'
--view-mi [token_id]
' + +'

Takes an optional token ID as an argument. If token ID is not specified, uses the selected token.

' + +'

Displays a menu of items in the character\'s magic item bag, with the quantity possessed or the number of charges. Pressing a button displays the named Magic Item specs without using any charges so that the Player can review the specifications of that item. Action buttons on the item macro are "greyed out" and can\'t be selected, with the exception of [View...] buttons on spell-storing items which will display the stored spells/powers if selected (again without consuming them). Items for which all charges have been consumed are greyed out, and cannot be viewed as the character can no longer use them. They will become viewable again if they gain charges.

' + +'

2.4 Use a Magic Item from the bag

' + +'
--use-mi [token_id]
' + +'

Takes an optional token ID as an argument. If token ID is not specified, uses the selected token.

' + +'

Displays a similar menu as for viewing the contents of the Magic Item Bag, but when an item is selected, a button is enabled that uses the Magic Item and consumes a charge. Other buttons specified in the item macro might use additional charges to perform additional effects. See section 3.

' + +'

Items with 0 quantity or charges left are greyed out and cannot be selected, unless they have abilities to regain charges such as "spell absorbing" items. When a Charged Item reaches 0 charges left, it is removed from the character\'s Magic Item Bag automatically.

' + +'

2.5 Add an Item to a Character / Container

' + +'
--add-mi [token_id]|(mi-to-replace/row#)|mi-to-add|[quantity]|[hand#]|[NOCURSE]|[SILENT]
' + +'

Takes an optional token ID (if not provided, uses selected token), then either the name of the item to be replaced or the row number of the item in the equipment list, the name of the item to add, the quantity to add (defaults to quantity of replaced item, or 1), optionally a hand number to use to take in-hand, optionally NOCURSE if replacement of cursed items is possible, and optionally SILENT to not trigger messages, menus or dialogs.

' + +'

This command can be used to add a named item from the databases to a character, NPC, creature or other container without going through other dialogs to select the item. It will add the item to a numbered row in the equipment list or, more usefully, replace a named item that already exists in the list (or \'-\' to find an empty row). If the item is one that can be taken in-hand (e.g. a weapon or a shield, or a magic item like a wand or staff), the optional \'hand number\' can be used to specify which hand to take it in. 0=prime hand,1=offhand,2=both,3 onwards for other hands, or just \'=\' (or blank) means replace in-hand if mi-to-replace is in-hand or worn as a ring - if the item is not one that can be held the item will not be taken in-hand. If the item to be replaced is cursed, it will not be replaced and an error message will be displayed unless the NOCURSE option is used. Finally, the command will pop up the edit-mi dialog or the gm-edit-mi dialog (if NOCURSE is specified) showing the resulting equipment list unless the SILENT flag is also used.

' + +'

The quantity can be a number to set the amount of the item to add. If preceeded by an operator (such as \'+\', \'-\', \'*\', or \'/\'), the quantity will modify the quantity of the item replaced (up to the maximum quantity of the replaced item). If the quantity is just \'=\' the quantity will set to the same as the replaced item, or 1 for an added item, or if the item to be replaced is not found and quantity is \'=\', the item will not be added.

' + +'

2.6 Add, set or deduct Magic Item charges

' + +'
Updated: --mi-charges token_id|[+/-/0]value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
' + +'

Takes a mandatory token ID, a mandatory value preceeded by an optional + or -, an optional magic item name, an optional maximum value, an optional magic item charge type override, a success message or ccommand, and a fail message or command as arguments.

' + +'

Alters the number of current or recoverable charges on an item. By default, alters the last magic item used by the character, or will affect the named magic item. Warning: a character can have two items of the same name, and there is no guarantee which will be affected if the name is used.

' + +'

Remember: using a Charged, Recharging, Rechargeable or Self-Charging Magic Item will automatically use 1 charge on use (unless the ItemData specification includes the field c:0, in which case no charges will automatically be deducted on use). If the c: tag is not used, or is anything other than 0, then charges will be deducted (default 1 charge) on use of the item. In addition, that one charge deduction always happens - if an effect of a Magic Item uses 2 charges, only 1 more needs to be deducted.

' + +'

Note: \'-\' reduces current remaining charges, \'+\' adds to the maximum recoverable charges, no + or - sets the maximum recoverable charges, and \'0\' (or starting with 0 e.g. \'01\') the item will recharge to the set or current maximum. This command cannot otherwise be used to increase the current remaining charges unless the item is of type absorbing.

' + +'

Using minus \'-\' before the value will deduct charges from the current quantity/charges: e.g. if using an optional power of the item that uses more than 1 charge. Using + before the value will add the value to the number of recoverable charges (overnight or rechargeable to), up to any specified maximum (often used for magic items that regain variable numbers of charges overnight). Just using the value without + or - will just set the number of recoverable charges to the given value. This command is not required to recharge self-charging items but can be used to change the maximum number of charges they will self-charge up to.

' + +'

Absorbing items can gain charges in use from other sources, so the --mi-charges command works differently: \'-\' reduces both current and maximum charges and \'+\' only increases current charges (but only to maximum and not beyond). Using neither \'-\' or \'+\' will set the current charges (but, again, only up to the maximum).

' + +'

The charge-override can be used to temporarily change the charge behaviour of the magic item. Specifying an override will cause the magic item to behave as if its charging type was that of the override only for this call. Thus charges could be deducted from an uncharged item by overriding by rechargeable or charged.

' + +'

Updated: If the command is able to sucessfully change the number of charges and the item remains in existance, the optional *success* command will be executed or message displayed. If not, if the item "expires" with no remaining charges, or if the command fails for any other reason an optional *fail* command will be executed or message displayed.

' + +'

2.7 Use a Magic Item power

' + +'
--mi-power token_id|[type-]power_name|mi_name|[casting-level]
' + +'

Takes a mandatory token ID, mandatory power name (optionally prefixed by a power type), mandatory magic item name (which can be several names separated by forward slash), and an optional casting level as parameters.

' + +'

Magic Items, especially artefacts, can have their own powers that can be used a specified number of times a day, or at will. This command can be used in API buttons in the Magic Item macro to call on that power. The power name and the magic item name (or names, especially where items that change with use have powers) must be specified to select the right power. If a casting level is specified, any relevant impacts on use of the power will be taken into account: it is often the case that magic items use powers at specific levels. If not specified, the item using Character\'s level is used (user does not need to be a spell caster).

' + +'

Generally, magic item powers have unique names, though they do not have to. Such magic items require specific setting up by the DM - see later sections. However, powers can have a prefix that indicates a power type that specifies the power is in fact a Wizard spell (MU-), a Priest spell (PR-), or a Magic Item (MI-) or (for completeness) confirmed as a Power (PW-). Specifying a power type prefix means the appropriate database types will be searched for the named power - thus (for instance) a Wizard or Priest spell can be specified as a Magic Item power without having to program a duplicate in the Powers Databases. If no power type prefix is specified, the system will first search for a matching power in the Powers Databases (both API-supplied and user-supplied), then all Wizard spell databases, then Priest spell databases, then all Magic Item databases, and finally the character sheet of the creature wielding the Magic Item.

' + +'

2.8 Add spells to a spell-storing Magic Item

' + +'
--store-spells token_id|mi_name
' + +'

Takes a mandatory token ID and a mandatory magic item name.

' + +'

This command presents a dialog in the chat window that stores spells or powers in any magic item that has been defined as being able to cast stored spells/powers. The item definition must include somewhere in its definition the command call !magic --cast-spell MI| or !magic --cast-spell MI-POWER|, (or either of their --view-spell equivalents) generally as part of an API button, or spells/powers cannot be stored. If the command is for MI, the dialog defaults to Level 1 Wizard spells, and has buttons to switch level and to Priest spells. If the command is for MI-POWER, the dialog allows powers to be stored, but Wizard and Priest spells can also be stored as powers, and the dialog will prompt for a number of uses per day for each.

' + +'

Once a spell is cast from a spell-storing item, the spell is spent and does not return on a long or short rest: the spell must be refreshed using the --mem-spell command (see below). If a power is used from a power-storing item, the power will have a number of uses per day (or be "at will"), and will refresh on a long rest.

' + +'

2.9 Restore spells in a spell-storing Magic Item

' + +'
--mem-spell (MI-MU/MI-PR)[-ADD/-ANY/-CHANGE]|[token_id]|[mi-name]
' + +'

Takes a mandatory spell type (optionally followed by -ADD or -ANY or -CHANGE), an optional Token ID for the character, and an optional magic item name. If token ID is not provided, it uses the selected token, and if the magic item name is not specified, the last used magic item is assumed.

' + +'

MI-MU and MI-PR mem-spell types are used to cast memorised spells into a spell-storing magic item, such as a Ring of Spell Storing. Magic Item spells are stored in an unused spell level of the Character Sheet (by default Wizard Level 15 spells). This command displays both all the character\'s memorised spells and the spell-storing magic item spell slots in the specified magic item (or the last one used if not specified), and allows a memorised spell to be selected, a slot to be selected (for the same spell name - limiting the item to only store certain defined spells unless "-ANY" or "-CHANGE" is added to the command), and the spell cast from one to the other.

' + +'

If either "-ANY" or "-ADD" are added to the spell type string, the player can just select a memorised spell and then immediately cast it into the device without choosing a slot: this will add the spell to the device. If the extension is "-ADD" then existing spells need to be refreshed with an identical spell, the same way as if -ADD was not specified. If "-ANY" is specified, not only can the player extend the spells stored, they can replace expended spell slots with any spell, not just the one previously stored in the slot. "-CHANGE" will allow different spells to be stored in a slot, but not give the ability to add to the number of slots. If none of these qualifiers are specified in the command, spell slots cannot be added, and slots have to be refreshed with the same spell - just like a normal Ring of Spell Storing. Generally, the GM will state that the device used for storing the spells will have a limited capacity of some type - number of spell levels, number of spells, types or spheres of spell, etc. The number of levels can be set in the database entry for the magic item (see the Magic Database Help handout) and the caster\'s spells of higher level than can be stored will not be available. The number of spells can be restricted by using the "-CHANGE" qualifier or no qualifier. Alternatively the GM can just tell the players to do so manually.

' + +'

Unlike some other menus, however, magic item spell slots that are full are greyed out and not selectable - their spell is intact and does not need replacing. Spell slots that need replenishing are displayed as selectable buttons with the spell name that needs to be cast into the slot.

' + +'

The level of the caster at the time of casting the spell into the magic item is stored in the magic item individually for each spell - when it is subsequently cast from the spell-storing magic item it is cast as if by the same level caster who stored it.

' + +'

A spell-storing magic item can hold spells from one or both of Wizard and Priest spells. The database where the spell is defined is also stored in the magic item with the spell, so the correct one is used when at some point in the future it is cast. A copy of the spell macro is also stored on the Character Sheet of the character that has the spell-storing magic item. If, when cast, the system can\'t find the database or the spell in that database (perhaps the character has been moved to a different campaign with different databases), and it can\'t use the copy on its own character sheet for some reason, the system will search all databases for a spell with the same name - this does not guarantee that the same spell will be found: the definition used by a different DM could be different - or the DM may not have loaded the database in question into the campaign for some reason. In this case, an error will occur when the spell is cast.

' + +'

See the Magic Items Database documentation for how spell-storing magic items are defined.

' + +'

2.10 Casting a spell from a spell-storing magic item

' + +'
--cast-spell (MI/MI-POWER)|[token_id]|[casting_level]|[casting_name]|[CHARGED]|[mi-name]
' + +'

Takes a mandatory casting type of \'MI\', an optional Token ID (if token ID is not provided, it uses the selected token), an optional casting level (which will be ignored in favour of the level of the caster of the spell who cast it into the item), an optional casting name which, if not specified, will be the name of the wielder of the magic item, an optional \'CHARGED\' command, and an optional magic item name (if not provided, uses name of the last magic item the character selected, viewed or used).

' + +'

This command works in the same way as for casting other spells. However, spells cast from a spell-storing magic item are not regained by resting - either short or long rests. The only way to regain spells cast from such an item is to cast them back into the item from the character\'s own memorised spells: see the --mem-spell command above. If the character does not have these spells in their spell book or is not of a level able to memorise them, then they will not be able to replace the spells and will have to get another spell caster to cast them into the item (by giving the item to the other Character and asking nicely for it back again) or wait until they can get the spells.

' + +'

If the optional parameter \'CHARGED\' is used, spells on the magic item are not re-storable. The spells will be deleted after they are all used up and the magic item will not be able to store any more spells. This is mainly used for Scrolls with multiple spells.

' + +'

2.11 Learning a spell in a spellbook (or other MI)

' + +'
--learn-spell [token_id]|spell_name
' + +'

Takes an optional token_id which defaults to that of the currently selected token, followed by a mandatory spell name.

' + +'

This command is intended for use with magic items of the type spellbook (listed in the GM\'s Add Items dialog under Scrolls), although any spell storing magic item that has the Data tag learn: set to 1 (as in learn:1) will prompt the player with a [Learn this spell] button when stored spells are viewed. If the GM stores a spellbook item in a container or adds it to an NPC character sheet, and then stores Wizard spells in the spellbook (all of this by using the GM\'s Add Items dialog), any Wizard spell-casting character looting the spellbook will gain access to view the spells the GM stored in it. Viewing any of the spells in a spellbook will display a [Learn this spell] button at the bottom of the spell description. Selecting this button runs this command, which will:

' + +'' + +'

2.12 New:Check Weights and Encumbrance

' + +'
--check-move [token_id]|[SILENT]
' + +'

Takes an optional token_id which defaults to that of the currently selected token, followed by an optional litteral command of SILENCE (case insensitive).

' + +'

This command calculates the weight and encumbrance of items listed as carried on the character sheet represented by the itentified token. This includes the weight contained in any items classified as bags (such as backpacks) modified by the weight and encumbrance specification of the bag (e.g. a Bag of Holding will only weigh a set amount regardless of what it contains). Items (including bags) can have a different encumbrance from their weight (e.g. magical armour has a weight but no encumbrance). These values are specified in the item specification in the MI databases (see the Item Database Help handout).

' + +'

Items carried can also modify the calculated movement. For example, Boots of Speed will always set the movement rate to 12 regardless of encumbrance, though if weight carried exceeds the maximum possible for the strength of the character the GM may say movement should be zero despite the boots (the API does not restrict Boots of Speed).

' + +'

If the AttackMaster API is loaded and SILENT is not specified, a dialog will appear displaying all elements that make up the calculation of weight, encumbrance and movement. The effect on attacks will also be applied to that character/NPC/Creature.

' + +'

If the RoundMaster API is loaded and the character is calculated as being encumbered to any degree, a status will be placed on the identified token indicating the encumbrance and resulting movement limit, and the effect on AC will automatically be applied.

' + +'

While weight and encumbrance will always be calculated, their effects on attacks and AC can be disabled by the GM using a configuration option. The AttacksMaster API and RoundMaster API are required for full functionality of Encumbrance.

' + +'
' + +'

3.Spell, power & magic item effects and resting

' + +'

If this API is used in conjunction with the RoundMaster API, Magic Items, Spells & Powers can all place status markers on tokens, and also cause real Effects to alter token & character sheet attributes and behaviours: when cast; during each round of their duration; and when they expire. See the RoundMaster documentation for further information, especially on Effects and the Effects Database.

' + +'

3.1 Target spell effects on a token (with RoundMaster API only)

' + +'
!rounds --target CASTER|caster_token_id|[caster_token_id|]spell_name|duration|[+/-]increment|[msg]|[marker]
'
+							+'!rounds --target (SINGLE/AREA)|caster_token_id|target_token_id|spell_name|duration|increment|[msg]|[marker]
' + +'

Takes mandatory CASTER, SINGLE or AREA command, a mandatory caster token ID, for SINGLE/AREA a mandatory target token ID, mandatory spell name, duration & increment (preceeded by an optional +/-), and an optional message and optional token marker name.

' + +'

If using the RoundMaster API, this command targets one, or a sequential set of tokens and applies a token marker to the token for the specified duration number of rounds, with the increment applied each round. The optional message will be shown below that token\'s turn announcement each round. The marker used will either be the one specified or if not specified a menu to choose one will be shown.

' + +'' + +' ' + +' ' + +' ' + +'
CASTERwill just take one Token ID and apply the marker to that token.
SINGLEwill take both the Token ID of the caster, and the Token ID of a target of the spell/power/MI. The marker will be applied to that of the target.
AREAwill take the Token ID of the caster, and one Token ID of the first token in the area of effect. As each token is specified the command will ask the Player to select subsequent tokens in the area of effect. Once all relevant tokens have been selected, just ignore the next prompt.
' + +'

If the Player is not the DM/GM, the system will ask the DM/GM to approve the marker/effect for each token - this allows the DM to make saving throws for monsters/NPCs affected where appropriate.

' + +'

See the RoundMaster API documentation for full details.

' + +'

3.2 Cast a spell that requires a "touch" attack roll

' + +'
--touch token_id|effect-name|duration|per-round|[message]|[marker]
' + +'

Takes mandatory token ID, effect name, duration of the effect, an increment to the duration per round (often -1), an optional message each round for the targeted token, and an optional status marker to use (if not supplied, the DM or user will be asked to select one).

' + +'

Note: this command requires RoundMaster API to also be loaded, but this is a !magic command.

' + +'

Note: This is a legacy command that has been superceeded by "Touch" being able to be taken in-hand as a weapon. It is retained for backwards compatability.

' + +'

Sets up the Character represented by the specified token ready for an "Attack Roll" to deliver a touch attack for a spell or power or magic item use that requires an attack. The parameters are those that will be passed to the !rounds --target command if the attack is successful (see above).

' + +'

To use this command, add it as part of a spell, power or MI macro in the appropriate database, before or after the body of the macro text (it does not matter which, as long as it is on a separate line in the macro - the Player will not see the command). Then include in the macro (in a place the Player will see it and be able to click it) an API Button call [Button name](~Selected|To-Hit-Spell) which will run the Ability "To-Hit-Spell" on the Character\'s sheet (which has just been newly written there or updated by the --touch command).

' + +'

Thus, when the Player casts the Character\'s spell, power or MI, they can then press the API Button when the macro runs and the attack roll will be made. If successful, the Player can then use the button that appears to mark the target token and apply the spell effect to the target.

' + +'

See the RoundMaster API documentation for further information on targeting, marking and effects.

' + +'

3.3 Change the Experience Level

' + +'
--level-change [token_id]|[# of levels]|[HP change]|[class]
' + +'

Takes an optional Token ID (if not specified, uses the selected token), an optional number of levels (plus or minus: if not specified assumes -1), an optional total number of HP gained or lost, and an optional class to apply the level change to.

' + +'

Mainly used for attacks and spell-like effects that drain levels from opponents, this command undertakes all the calculations and Character Sheet updates that can automatically be done when a character or creature changes experience level. Saving throw targets are reassessed, weapon attacks per round recalculated, numbers of memorised spells changed, Race & Class powers checked for level appropriateness, etc. If this is a single class character or a creature, the optional class parameter will be ignored and the single class/monster HD applied. If the HP change is not specified for a single class character, then the appropriate HP dice will be rolled and changed (Tip: it\'s better to put in a roll query to ask the player for the HP to change by). If the character is multi- or dual-class, it will either use the class specified, or asks the player which class to add/drain levels to/from and the hit points for each.

' + +'

3.4 Change an Attribute Value

' + +'
--change-attr [token_id]|[+/-/*///=]change|[STRENGTH/DEXTERITY/CONSTITUTION/INTELLIGENCE/WISDOM/CHARISMA]
' + +'

Takes an optional Token ID (if not specified, uses the selected token), and a mandatory change value (can be zero) preceeded by an optional operator, and an optional attribute name (defaults to STRENGTH)

' + +'

Mainly used to support magical effects and creature attacks that drain or add to attributes such as Strength, this command specifically deals with aspects such as Exceptional Strength, remembering if a Character has exceptional strength as a characteristic and taking it into account as the value is changed. Going up or down from the original rolled value and then back the other way will include as a step the exceptional, percentage value. If the change requested would take the value past the original rolled value, the change will only go as far as the original value, whatever change was requested. However, the change can then continue with subsequent calls to beyond the original value with subsequent calls.

' + +'

The optional operator before the increment will work in (hopefully) an obvious way: \'+\' adds to the attribute value, \'-\' subtracts, \'*\' multiplies (e.g. *2 will double the current attribute value), \'/\' will divide (e.g. /2 halves it), and \'=\' sets the value to that given. The value in each case can be a formula using RPGM maths operators.

' + +'

Note:Should the rolled value need to change permanently to a new rolled value, the change value of 0 (zero) will reset the remembered original rolled value to the current value of the attribute - this is not needed the first time the command is used on a character sheet, which will trigger this value to be remembered for the first time.

' + +'

3.5 Perform Short or Long Rests

' + +'
--rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale/spellname]
' + +'

Takes an optional token ID (if not specified, uses the selected token), an optional rest type, short or long, an optional magic type to regain charges for, and an optional timescale for days passing OR an optional spell or power name to individually rest.

' + +'

Most magic requires the character to rest periodically to study spell books, rememorise spells, and regain powers and charges of magic items. This command implements both Short and Long rests.

' + +'

The type of rest (short or long) can be specified or, if not specified, the system will ask the Player what type of rest is to be undertaken - though Long Rests will be disabled if the Timescale (either the optional value or the character sheet attribute) is not 1 or more days (see below). The type of magic to be affected can also be specified or, if not specified, all types of magic are affected.

' + +'

A Short rest is deemed to be for 1 hour (though this is not a restriction of the system and is up to the DM), and allows spell casters (such as Wizards and Priests, as well as others) to regain their 1st level spells only. This can happen as often as the DM allows.

' + +'

A Long rest is considered to be an overnight activity of at least 8 hours (though again this is not a restriction of the system and is up to the DM). A Long rest allows spell casters to regain all their spells, all character and magic item powers to be regained to full uses per day, and for recharging magic items to regain their charges up to their current maximum. After a long rest, ammunition that has been used but not recovered can no longer be recovered using the Ammunition Management command (see AttackMaster API documentation): it is assumed that other creatures will have found the ammo, or it has been broken or otherwise lost in the 8 hours of the long rest.

' + +'

A Long rest can only be undertaken if certain conditions are met: either the optional Timescale (in days) must be specified as 1 or more days, or the Character Sheet must have a Roll20 attribute called Timescale, current, set to a value of 1 or more (can be set by InitiativeMaster API --end-of-day command). An internal date system is incremented: an attribute on the Character Sheet called In-Game-Day is incremented by the Timescale, and Timescale is then set to 0.

' + +'

If the InitiativeMaster API is being used, the system will interact with the "End of Day" command to allow rests to be coordinated with the choice of accommodation (and its cost...!) or with earnings made for the day\'s adventuring.

' + +'

Instead of the timescale parameter, a spell or power name can be provided as the 4th parameter. In this case, all memorised instances of that specific spell or power (depending on the magic type selected) will be "rested".

' + +'

Warning: Undertaking a rest of either type on a Trader (see "Adding Items to the Character" above) will "restock" the Trader\'s inventory, which first empties all previously held items of all types except coins, and then restocks the inventory using the original definition of the Trader\'s items in the relevant database. If the Trader has items in their inventory that they want to keep, it is recommended that they use a Drag & Drop container to store those items in to keep them safe.

' + +'

3.6 Perform a Single Item Rest

' + +'
--mi-rest [token_id]|mi_name|[charges]|[power_name]
' + +'

Takes an optional Token ID (defaults to the selected token), a mandatory magic item name (case insensitive), an optional number of charges to recharge to, and an optional power name (case insensitive).

' + +'

This command restores the powers for a single magic item, or even a single power of a single magic item. If the optional number of charges is specified, this is the number of charges set for the power, otherwise the power is restored to its original max uses. If a power name is specified, and the item has a power of the same name, only that power will be affected. Otherwise, all powers of the item will be restored.

' + +'

3.7 Query the Number of Charges

' + +'
--query-qty [token_id]|(MU/PR/MU-PR/POWER/MI/MI-POWER)|item|[SILENT]
' + +'

Takes an optional token ID (defaults to selected token), a mandatory item type, the mandatory name of the item, and an optional "silent" to surpress feedback.

' + +'

Some spells, powers, and magic items need to know how many charges they have left in order to impact the effect they have. The quantity is difficult to find from the table entry in macro code unless the row number is known, so this command finds the item for the macro and saves the current quantity in the character sheet attribute that can be accessed using @{selected|spellcharges}. Generally a call to this command should be outside of any roll template so that the command runs before the roll template is displayed and any API buttons become available.

' + +'
' + +'

4.Treasure & Item container management

' + +'

4.1 DM/GM version of Magic Item management

' + +'
--gm-edit-mi [token_id]
' + +'

Takes an optional token ID. If token ID is not specified, uses the selected token.

' + +'

This command opens a menu showing all the items in the Items table of the character sheet associated with the specified token. Unlike the Player version of the command (--edit-mi), this command shows all attributes of every magic item, including those of hidden and cursed items, and also offers an additional lists of "DM Only" items from the item databases, tradeable services, treasure items and other lists restricted to GM use.

' + +'

The following functions are available once both a magic item is selected from the lists, and a slot to store it in are selected:

' + +'' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +'
Store item:Select a magic item from the databases and store it in a slot - this is the same as the Player version.
Hide item as different item:The magic item already in the selected bag slot is given the displayed name of the magic item selected from the databases - the Player will only see the Magic Item selected (Displayed Name), and not the hidden actual name. The MI will behave exactly like the selected, displayed item until the DM reverts the item to the hidden version using the [Reset Single MI] button. This is generally used for items in containers, especially Cursed items, so that the real nature of the item is hidden until the character uses it or the DM wants them to. Once an item has been marked as hidden, the DM can see the name it will be displayed to the palyer as by selecting that slot - the displayed name will appear on the menu, and other options for hidden items will become selectable.
Rename MI:Allows the DM to change the actual and displayed name of an item. This will create a unique item (existing item names cannot be used) stored on the character\'s/container\'s Character Sheet which will work in exactly the same way as the original item. This can be used to resolve duplicate magic items, such as two rings of spell storing can be given different names. This is different from hiding - the actual name of the item is changed.
Remove MI:Blanks the selected Bag slot, removing all details, both displayed & actual.
Change MI Type:This allows the type of the item in the selected Bag slot to be changed. It can be one of the following - Charged, Discharging, Uncharged, Recharging, Rechargeable, Self-charging, Absorbing, Cursed, Cursed-Charged, Cursed-Self-charging, Cursed-Recharging, Cursed-Absorbing (cursed rechargeable items behave in exactly the same way as Cursed-Charged items). Cursed versions of items cannot be removed from the character\'s MI Bag, given away, stored or deleted by the Player, even when all their charges are depleted. Otherwise, they act in the same way as other magic items. Charged, Discharging, and Rechargeable items disappear if they reach zero charges, unless preceeded by \'perm-\'. Charged, Uncharged and Cursed items can be divided when picked up by Searching or Storing, other types cannot.
Change Displayed Charges:Changes the number of displayed/current charges for the item in the selected Bag slot. This can be used to set the quantity of Uncharged items, or the current charges of other types. It also allows charged items in containers to be stored as a single item, for instance single Wands (current/displayed qty = 1) with multiple charges (max qty = n): when picked up the current qty is always set to the actual value - see the --pickorput command below.
Change Actual Charges:Setting this allows the actual quantity of Uncharged items in containers to be hidden, or the maximum number of charges to be set for other types. When the item is picked up from a container, the actual number of charges will be set as the current value.
Store Spells/Powers in MIOnly enabled for items that can store & cast spells or powers: the item definition must have a call to !magic --cast-spell MI for spell storing, or !magic --cast-spell MI-POWER for powers, associated with an API button. If this is the case, this option opens a menu to select Wizard or Priest spells, or powers as appropriate. A blank Ring-of-Spell-Storing and a blank Scroll-of-Spells are both included in the databases, allowing GMs to build their own unique items and then give them a unique new name using the Rename function described above.
Change Item Cost:Items can have a cost in GP (fractions allowed which get converted to SP & CP). When an item is picked up from a container, the cost will be multiplied by the quantity picked up and the Player will be asked if they want the character to pay the cost. If confirmed, the cost will be deducted from the money values on the character sheet. 0 and negative values are allowed. This supports merchants and shops to be created in the campaign.
Reset Qty to Max:Allows the DM to reset the quantity of the selected Bag slot to the actual (max) values.
Reveal Now:Only available when a hidden item is selected. Reveals the item, setting the displayed name to the actual name, which will function as the revealed item from that point on.
Reveal MI:Allows selection of when a hidden item is revealed: MANUALLY by DM (the default) using the Reveal Now button; on VIEWING the item; or on USING the item; or on a long REST. From the point the item is revealed onwards, the item will behave as the revealed item.

Edit Treasure:		Mainly for use on Magic Item containers, such as Treasure Chests, but also useful for NPCs and Monsters. Allows the DM to add text only treasure descriptions to the container. The displayed menu allows [Add], [Edit], and [Delete] functions to manage multiple lines/rows of treasure description. This is less useful now: instead consider adding items from the [Treasure] and [Coins] lists to the container, which are then saleable to Traders for money.
Container Type:Sets the type of the Magic Item container or Bag. Available choices are: Untrapped container, Trapped container, Force to be an Inanimate Container, Force to be a Sentient creature. If searched, Inanimate objects can be looted without penalty; Sentient beings require a Pick Pockets check; Trapped containers call a Trap ability macro on the container\'s character sheet to determine the effect. See the --search command below.
Container Size:Sets the maximum number of items that can be stored in the selected Character\'s/containers bag. The default is 18 items, though identical items can be stacked.
Show As:Sets what level of item description a Player sees when looting a container. Either "Show as Item Types" (e.g. potion, scroll, melee weapon, etc), or "Show as Item Names" (default) which shows the display names of the items. Once picked up from the container, will always show their display names.
' + +'

4.2 Check a token for traps

' + +'
--find-traps token_id|check_id|searcher_id
' + +'

Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to check for traps, mandatory token ID of the token doing the checking.

' + +'

This command will check a token for any traps. If the container represented by the token was created using the Drag & Drop container system (see CommandMaster API documentaion for details of the Drag & Drop container system) this command will start the selected container\'s "Find & Remove Traps" programmed sequence, with a (small) chance of the trap (if any) being triggered. If the trap is successfully removed, the container may still be locked but will no longer be trapped. If the token represents any other type of character, container, creature or object a standard "Find/Remove Traps" sequence will ensue, resulting in the party (and the GM) being alerted to the success or otherwise of the outcome.

' + +'

In either case, the default approach to the Find Traps roll is that the GM is asked to make it - being presented with a drop-down list of options that includes (a) just rolling 1d100 against the character\'s chance, (b) forcing a successful roll (e.g. if they were meant to find it), and (c) forcing a failure to find a trap (e.g. if there is no trap to be found). The GM can use the !magic --config command to change this action so that the player always rolls to Find Traps, though this might result in an indication for a (non-Drag & Drop) container indicating success for a container that is not trapped!

' + +'

4.3 Searching/Storing tokens with Items and Treasure

' + +'
--search token_id|pick_id|put_id
' + +'

Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to search and pick up items from, mandatory token ID of the token to put picked up items into.

' + +'

This command can be used to pick the pockets of an NPC or even another Player Character, as well as to loot magic item and treasure containers such as Chests and dead bodies. It can also be used for putting stuff away, storing items from the character\'s Item Bag into a container, for instance if the MI Bag is getting too full (it is limited to the number of items specified via the --gm-edit-mi menu, though similar items can be stacked). The effect of this command depends on the type of the container: intelligent characters, NPCs and creatures (even if only with animal intelligence of 1) are considered sentient unless they are dead (Hit Points equal to or less than zero). The trapped container status is set by any Drag & Drop container, or via the GM\'s [Add Items] button or !magic --gm-edit-mi command. All other containers (tokens with character sheets) are considered inanimate and untrapped. Any status can also be overridden if so desired by resetting the container type using the Add Items dialog to set the type to a different value - a sentient creature can be forced to be inanimate (i.e. does not need a pick pockets roll), and visa-versa (e.g. luggage Terry Pratchett style).

' + +'

Warning: be wary of "giving" items to other sentient characters for free - remember you can now sell them for money!

' + +'' + +' ' + +' ' + +' ' + +'
Inanimate container:a message is shown to the Player saying the container is empty or the items in the container are displayed, and the character doing the search (associated with the put_id token ID) can pick them up and store them in their own Magic Item Bag or, if storing, put items from their character into the container.
Sentient Creature:if searching, a Pick Pockets check is undertaken - the Player is asked to roll a dice and enter the result (or Roll20 can do it for them), which is compared to the Pick Pockets score on their character sheet. If successful, a message is displayed in the same way as an Inanimate object. If unsuccessful, a further check is made against the level of the being targeted to see if they notice, and the DM is informed either way. The DM can then take whatever action they believe is needed. Of course, you can always freely give/store items to another creature.
Trapped container:Traps can be as simple or as complex as the DM desires. Traps may be nothing more than a lock that requires a Player to say they have a specific key, or a combination that has to be chosen from a list, and nothing happens if it is wrong other than the items in the container not being displayed. Or setting a trap off can have damaging consequences for the character searching or the whole party. It can just be a /whisper gm message to let the DM know that the trapped container has been searched. Searching a trapped container with this command calls an ability macro called "Trap-@{container_name|version}" on the container\'s character sheet: if this does not exist, it calls an ability macro just called "Trap". The first version allows the Trap macro to change the behaviour on subsequent calls to the Trap functionality (if using the ChatSetAttr API to change the version attribute), for instance to allow the chest to open normally once the trap has been defused or expended. This functionality requires confidence in Roll20 macro programming.
Important Note: all Character Sheets representing Trapped containers must have their \'ControlledBy\' value (found under the [Edit] button at the top right of each sheet) set to \'All Players\'. Otherwise, Players will not be able to run the macros contained in them that operate the trap!
' + +'

Note: Some items are not stackable - they are single items with charges such as a wand or rod, or a spell-storing item which must retain its uniqueness so the spells remain associated. Previously, non-stackable items like these needed to have unique names in the container to retain their unique identity. However, this is strictly speaking no longer the case - the APIs now use unique object identifiers "under the hood". However, you may want to give similar items different names in order to differentiate them,

' + +'

4.4 Looting and storing without searching a container

' + +'
--pickorput token_id|pick_id|put_id|[SHORT/LONG]
' + +'

Takes a mandatory token ID for the Player\'s character, a mandatory token ID for the token to pick items from, a mandatory token ID for the token to put items in to, and an optional argument specifying whether to use a long or a short menu.

' + +'

This command displays a menu from which items on the character sheet associated with the Pick token can be selected to put in the character sheet associated with the Put token. The Player character\'s token can be either the Put token (if picking up items from a container) or the Pick token (if storing items from their sheet into the container). The other token can be another Player Character (useful for one character giving a magic item to another character) or any other selectable token with a character sheet. No traps or sentient being checks are made by this command - this allows the DM to allow Players to bypass the searching functionality when looting a container or storing items in it. Note: the Player\'s Magic Item menu (accessed via the --mimenu command) does not have an option to loot without searching.

' + +'

There are two forms of this menu - the Long form displays all items in the container as individual buttons for the Player to select from, and a single button to store the item: this is generally OK when looting containers with not much in them. The Short form of the menu shows only two buttons: one button which, when clicked, brings up a pick list of all the items in the Pick container, and another button to store the item in the Put container: this is generally best for when a character is storing something from their character sheet items into a chest or other container, or giving an MI to another character, as a character\'s sheet often has many items in it which can make a Long menu very long. Each type of menu has a button on it to switch to the other type of menu without re-issuing the command. If not specified in the command, the type of menu the Player last used in this campaign is remembered and used by the system.

' + +'

4.5 Buying and Selling

' + +'
--buy token_id|pick_id|put_id
'
+							+'--sell token_id|pick_id|put_id
' + +'

Takes a mandatory token ID for the player\'s character, a mandatory token ID for the token to pick items from, and a mandatory token ID for the token to put items in to.

' + +'

These commands essentially do the same as the --pickorput command, but allows the buying and selling of items for money. Thus when a character "targets" an NPC with a --buy command, instead of initiating a pick-pocket sequence the API assesses the value of the item, the characteristics of the NPC targeted and, if the NPC is configured as a Trader (see the Class Database Help and Race & Creature Database Help handouts for this configuration), initiates a trading sequence. The same goes for the --sell command, where rather than just giving the item to the NPC, if the NPC is a Trader a sales sequence is triggered. If the other character is not a Trader or other Service Provider then a message is displayed to this effect and the trading session ends.

' + +'
' + +'

5.Light source management

' + +'

These functions use Roll20 Dynamic Lighting to provide a token with a light source. If your campaign does not use Dynamic Lighting, they will not function. They can also be accessed through the menu displayed by the AttackMaster API !attk --other-menu command.

' + +'

5.1 Show a menu of Light Sources to select from

' + +'
--lightsources [token_id]
' + +'

Takes an optional token ID as an argument. If token ID is not specified, uses the selected token.

' + +'

This command brings up a menu showing a selection of various light sources that a character can use. Selecting one will change the Roll20 Dynamic Lighting values on the Token identified to provide this lighting effect. These are:

' + +'' + +'

The menu shows [ON] and [OFF] buttons for each type. Only one type can be ON for each Token: selecting an ON button for any light source turns OFF the others for that Token. Turning the current light source off will turn off all lighting effects on the identified token.

' + +'

5.2 Set a lightsource for a token

' + +'
--light token_id|(NONE/WEAPON/TORCH/HOODED/CONTLIGHT/BULLSEYE/BEACON)
' + +'

Takes a mandatory token ID, and a mandatory type of light source.

' + +'

This command sets the light source type that the identified token is using, and changes the Roll20 Dynamic Lighting settings of the token to the relevant value shown under section 5.1, or turn off all lighting effects for the selected token if NONE is specified.

' + +'
' + +'

6.Other commands

' + +'

6.1 Display help on these commands

' + +'
--help
' + +'

This command does not take any arguments. It displays the mandatory and optional arguments, and a brief description of each command.

' + +'

6.2 Display a formatted message in chat

' + +'
--message [who|][token_id]|title|message|[command]|[var1]|[var2]...
' + +'

This command takes an optional parameter stating who to send the message to, which defaults to depending on who owns the character represented by the token, an optional token_id which defaults to a selected token, a title for the message which can be an empty string, the message to display, an optional API command string to be sent at the same time that the message is sent (can use standard & extended escape characters), and any number of values.

' + +'

The "who" parameter can be one of:

' + +'' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +'
gmSend only to the GM
whisperSend only to the players that control the character represented by the token
wShort for "whisper" and does the same
publicSend to all players and the GM
standardCheck which players/GMs control the character represented by the token. If the GM controls, or no-one, or the controlling player is not on-line, or the token does not represent a character, send to the GM; otherise make public.
Anything elseSame as Standard
' + +'

The values submitted as var1, var2 etc can be referenced inside the message or the command by using the syntax ^^#^^, where # is the argument number: with var1 being argument 5. Arguments 0 through 4 refer to the previous arguments in the expression. This syntax is useful to, for instance, use the result of a dice roll in both the body of the message and the command.

' + +'

6.3 Display a database item or Character Sheet ability

' + +'
--display-ability [who|][token_id]|database|db_item|[dice_roll1]|[dice_roll2]|[target_id]
' + +'

This command takes an optional parameter stating who to send the output to, which defaults to depending on who owns the character represented by the token, an optional token_id which defaults to a selected token, the mandatory name or ID of a database or character sheet, the mandatory name of a database item or character sheet ability macro, two optional dice roll results (or Roll20 in-line roll specifications), and an optional token_id of a target token.

' + +'

This command can be used to extract database items wherever they are currently stored and display them to a player, character, the GM, or publicly - the options are the same as for the --message command above. If the "database" parameter has a name that includes "-DB" the db_item is read from the databases. This includes extracting database items from the databases held in code by the APIs and displaying them, as if they were ability macros in a Character Sheet, or from a Character Sheet database if the db_item exists there. If the "database" parameter is not for a database, but instead represents the name of a Character Sheet that does not include "-DB", the command will look for and display an ability macro with name "db_item" from that character sheet.

' + +'

Whether from the databases or from a character sheet ability macro, the item retrieved can optionally have up to two dice roll values and/or a target token ID passed to it. The dice roll parameters will replace the place-holders %%diceRoll1%% and %%diceRoll2%% in the retrieved item. The parameters can be plain numbers, roll queries (which will be resolved if the command is passed via the chat window or an API button), or in-line roll calculations in Roll20 format (using [[...]]). The target token_id will replace anywhere the @{target|...|token_id} syntax is used.

' + +'

6.4 Tidy one or more character sheets

' + +'
--tidy [token_id]
' + +'

This command takes an optional token_id. If not specified, the command will act on the character sheets represented by all currently selected tokens.

' + +'

This command tidies up the character sheet, removing Spell and Magic Item attribute and ability objects that are no longer for items held, and for spells no longer in any spell book. Attack ability objects will also all be removed. All of these will be recreated as and when these items, spells or attacks are again picked up, added to spell books, or used for attacks. This simplifies and speeds up the system, removing redundant processing and memory usage.

' + +'

Note: this command is automatically run whenever the DM moves the "Player Ribbon" to a new map page, for every token on that map page that represents a character sheet, and also whenever a character token is dragged onto the active Player page. This continually tidies the system while not imposing a heavy overhead on processing.

' + +'

6.5 Recover a corrupt character sheet

' + +'
--clean [token_id]|[SILENT]
' + +'

Takes an optional token ID (uses selected token if not specified), and an optional SILENT argument to supress messages.

' + +'

Very rarely, a character sheet can become corrupt, for instance so that attributes become read-only for no apparent reason. This command creates an identical copy of the character sheet with all attributes, abilities and table entries copied across. It then updates all tokens that did point to the previous sheet to use the new one, and then deletes the original, corrupt sheet. Finally, it conducts a --tidy command on the new sheet.

' + +'

Warning: this is a radical solution and there may well have been a valid reason why the original character sheet became corrupted. It is recommended that all options are explored before using a --clean command.

' + +'

6.6 Updated:Configure API behavior

' + +'
--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/ALPHA-LISTS/GM-ROLLS/ENCUMBRANCE] | [TRUE/FALSE]
' + +'

Takes two optional arguments, the first a switchable flag name, and the second TRUE or FALSE.

' + +'

Allows configuration of several API behaviors. If no arguments given, displays menu for DM to select configuration. Parameters have the following effects:

' + +'' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +' ' + +'
FlagTrueFalse
FANCY-MENUSUse chat menus with a textured backgroundUse chat menus with a plain background
SPECIALIST-RULESOnly Specialist Wizards specified in the PHB get an extra spell per spell levelAny non-Standard Wizard gets an extra spell per spell level
SPELL-NUMSpellcaster spells per level restricted to PHB rulesSpellcaster spells per level alterable using Misc Spells button
ALL-SPELLSSpellcaster spell schools are unrestrictedSpellcaster spell schools are restricted by class rules
ALL-POWERSClass powers not restricted by levelClass powers are restricted by level as per spec
CUSTOM-SPELLSNo distributed custom spells/items allowed (but CS DB allowed)All custom spells and items allowed
AUTO-HIDEItems defined to be hideable will be automatically hidden when added to containersHideable items must be hidden manually if desired
REVEALAuto-hidden items will reveal themselves when usedThe GM will need to reveal auto-hidden items manually
VIEW-ACTIONAction API buttons on items/spells clickable when viewedAction API buttons greyed out when viewed
ALPHA-LISTSLong lists will automatically be split into alpha listsWhole long lists will be displayed for selection
GM-ROLLSGM is asked to roll thievish skill-based chances when using Find TrapsPlayer rolls skill-based chances for Find Traps
ENCUMBRANCEEncumbrance rules are applied as per PHBWeight, Encumbrance & Move calculated but no adverse effects applied
' + +'

6.7 Check database completeness & integrity (GM only)

' + +'
--check-db [ db-name ]
' + +'

Takes an optional database name or part of a database name: if a partial name, checks all character sheets with the provided text in their name that also have \'-db\' as part of their name. If omitted, checks all character sheets with \'-db\' in the name. Not case sensitive. Can only be used by the GM.

' + +'

This command finds all databases that match the name or partial name provided (not case sensitive), and checks them for completeness and integrity. The command does not alter any ability macros, but ensures that the casting time (\'ct-\') attributes are correctly created, that the item lists are sorted and complete, and that any item-specific power & spell specifications are correctly built and saved.

' + +'

This command is very useful to run after creating/adding new items as ability macros to the databases (see specific database documentation). It does not check if the ability macro definition itself is valid, but if it is then it ensures all other aspects of the database consistently reflect the new ability(s).

' + +'

6.8 Extract database for Editing

' + +'
--extract-db [db-name]
' + +'

Takes an optional database name or part of a database name: if a partial name, extracts all character sheets with the provided text in their name that also have \'-db\' as part of their name. If omitted, checks all character sheets with \'-db\' in the name. Not case sensitive. Can only be used by the GM.

' + +'

Extracts a named database or all provided databases from the loaded RPGMaster Library, and builds the database(s) in a Character Sheet format: see the Database specific help handouts for further details of this format. This allows editing of the standard items in the databases, adding additional items to the databases, or for items to be copied into the GM\'s own databases. Unlike with previous versions of the Master Series APIs, these extracted databases will not be overwritten automatically by the system. However: using extracted databases will slow the system down - the use of the internal API databases held in memory is much faster. The best use for these extracts is to examine how various items have been programmed so that the GM can create variations of the standard items in their own databases by copying and making small alterations to the definitions, and then the extracted databases can be deleted.

' + +'

Important: Once a Character Sheet database is changed or deleted, run the !magic --check-db command against any database (especially a changed one) to prompt the APIs to re-index the objects in all databases.

' + +'

6.9 Handshake with other APIs

' + +'
-hsq from|[command]
'
+							+'-handshake from|[command]
' + +'

Either form performs a handshake with another API, whose call (without the \'!\') is specified as from in the command parameters (the response is always an -hsr command). The command calls the from API command responding with its own command to confirm that this API is loaded and running: e.g.

' + +'
Received:
!magic -hsq init
' + +'
Response:
!init -hsr magic
' + +'

Optionally, a command query can be made to see if the command is supported by MagicMaster if the command string parameter is added, where command is the MagicMaster command (the \'--\' text without the \'--\'). This will respond with a true/false response: e.g.

' + +'
Received:
!magic -handshake init|menu
' + +'
Response:
!init -hsr magic|menu|true
' + +'

6.10 Switch on or off Debug mode

' + +'
--debug (ON/OFF)
' + +'

Takes one mandatory argument which should be ON or OFF.

' + +'

The command turns on a verbose diagnostic mode for the API which will trace what commands are being processed, including internal commands, what attributes are being set and changed, and more detail about any errors that are occurring. The command can be used by the DM or any Player - so the DM or a technical advisor can play as a Player and see the debugging messages.

' + +'
' + +'
', + }, + }); + + /* + * Handles for other RPG and Character Sheet specific data tables + * obtained from the RPGMaster Library. + */ + + var fieldGroups; + var miTypeLists; + var clTypeLists; + var spTypeLists; + var reSpellSpecs; + var reClassSpecs; + var reWeapSpecs; + var reACSpecs; + var saveFormat; + var spellsPerLevel; + var casterLevels; + var specMU; + var ordMU; + var wisdomSpells; + var spellLevels; + var showMoreObj; + var encumberDef; + + /* + * MagicMaster specific global data tables and variables. + */ + + const MIB_StateEnum = Object.freeze({ + NOBAG: 0, + OLDBAG: 6, + V4BAG: 12, + }); + + const PR_Enum = Object.freeze({ + YESNO: 'YESNO', + CUSTOM: 'CUSTOM', + }); + + const messages = Object.freeze({ + header: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}', + restHeader: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^ is Resting}}', + noChar: '&{template:'+fields.warningTemplate+'} {{name=^^tname^^\'s\nMagic Items Bag}}{{desc=^^tname^^ does not have an associated Character Sheet, and so cannot have a Magic Item Bag.}}', + noMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Items Bag}}{{desc=^^cname^^ does not have a Magic Item bag! Perhaps you ought to invest in one... Go and find an appropriate vendor (ask the DM).}}', + oldMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=^^cname^^ has an old v3 Magic Item bag, which will not hold the latest, cutting edge Magic Items! Perhaps you ought to invest in a new one... Go and find an appropriate vendor (ask the DM).}}', + cursedSlot: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=Oh what a shame. No, you can\'t overwrite a cursed item with a different item. You\'ll need a *Remove Curse* spell or equivalent to be rid of it!}}', + cursedItem: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=Oh no! You try putting this away, but is seems to be back where it was... Perhaps you need a *Remove Curse* spell or equivalent to be rid of it!}}', + nothingToPick: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=You seem to be trying to pick up something invisible, even to me! I can\'t pick up thin air...}}', + slotFull: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=The slot you chose is already full.}}', + fruitlessSearch: 'does not have a store of Magic Items}}', + searchEmptyToken: '&{template:'+fields.menuTemplate+'}{{name=Nothing here}}{{desc=After a quick look you can\'t seem to find anything here}}', + noSpellbooks: '&{template:'+fields.warningTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ does not have any spellbooks!}}', + noMUspellbook: '&{template:'+fields.warningTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ does not have a Wizard\'s spellbook. Do they want one? Speak to the Arch-Mage (or, failing that, the DM)}}', + noPRspellbook: '&{template:'+fields.warningTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ does not have a Priest\'s spellbook. Do they want one? Pray to your god (or, failing that, the DM)}}', + chooseSpellMenu: '&{template:'+fields.menuTemplate+'} {{name=Spellbooks}}{{section1=^^cname^^ has both Wizard and Priest spellbooks. Which do you want to use?}}{{section2=[Wizard](!magic --spellmenu ^^tid^^|MU) or [Priest](!magic --spellmenu ^^tid^^|PR)}}', + shortRest: '&{template:'+fields.messageTemplate+'} {{name=^^cname^^ is Resting}}{{desc=After a short rest, ^^cname^^ has rememorised all their 1st level spells}}', + longRest: 'After a good long rest, ^^cname^^ has regained their powers, read their spellbooks and rememorised their spells, and magic items that recharge have regained their charges.}}', + noLongRest: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Unable to Rest}}{{desc=I don\'t think the DM has declared it is time for a rest yet, perhaps due to system lag.}}{{desc1=[Try Again](!magic --rest ^^tid^^|long) once the DM says you can}}', + noMoreCharges: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ Has No Charges}}{{desc=^^cname^^ has used all the charges of the Power, Spell or Magic Item that they are using, and needs to rest before any charges are available again.}}', + miBagFull: '&{template:'+fields.warningTemplate+'} {{name=^^c2name^^ Can\'t Store That}}{{desc=There are not enough slots left to store the selected item(s)}}', + fixedSpell: '&{template:'+fields.warningTemplate+'} {{name=Fixed MI Spell Slot}}{{desc=The chosen slot in your spell-storing Magic Item is fixed to be the named spell. You may only refresh it with the same spell}}', + convertItems: '&{template:'+fields.warningTemplate+'} {{name=Converting Items Bag}}{{desc=Please wait while I convert your Items Bag to add sections and make better use of the Character Sheet}}', + notSpellCaster: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Not a Spell Caster}}{{desc=^^cname^^ may aspire to be a wonderful Wizard or powerful Priest, but has yet to fulfil those desires. Until then, refrain from pretending - you will be found out!}}', + notYetSpellCaster: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ can\'t cast spells yet}}{{desc=^^cname^^ is eager to reach a level of experience at which they can cast spells: keep adventuring and you\'ll get there soon!}}', + castSpellClass: '&{template:'+fields.menuTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ has both Wizard and Priest spellbooks. Which do you want to use?}}{{desc1=[Wizard](!magic --cast-spell MU|^^tid^^) or [Priest](!magic --cast-spell PR|^^tid^^)}}', + memSpellClass: '&{template:'+fields.menuTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ has both Wizard and Priest spellbooks. Which do you want to use?}}{{desc1=[Wizard](!magic --mem-spell MU|^^tid^^) or [Priest](!magic --mem-spell PR|^^tid^^)}}', + viewSpellClass: '&{template:'+fields.menuTemplate+'} {{name=Spellbooks}}{{desc=^^cname^^ has both Wizard and Priest spellbooks. Which do you want to view?}}{{desc1=[Wizard](!magic --view-spell MU|^^tid^^) or [Priest](!magic --view-spell PR|^^tid^^)}}', + noStoring: '&{template:'+fields.warningTemplate+'} {{name=Can\'t Store Items Here}}{{desc=You can\'t store items in the selected container. Perhaps try somewhere else?}}', + newClassPlayer: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ Taking a New Class}}{{desc1=Please wait while the DM assesses if you can take this new class}}', + newClassGM: '&{template:'+fields.warningTemplate+'} {{name=Taking a New Class}}{{desc1=Use [the Class menu](!cmd --class-menu) to give the new class to them.}}', + wrongSpellCaster: '&{template:'+fields.warningTemplate+'} {{name=Wrong Spell Type}}{{desc1=^^cname^^ is of the wrong spell casting class to memorise or store the types of spell required.}}', + }); + + const BT = Object.freeze({ + ADD_MIROW: 'ADD_MIROW', + ADD_TO_STORE: 'ADD_TO_STORE', + ADD_AS_POWER: 'ADD_AS_POWER', + MON_ATTACK: 'MON_ATTACK', + MON_INNATE: 'MON_INNATE', + MON_MELEE: 'MON_MELEE', + MELEE: 'MELEE', + MW_DMGSM: 'MW_DMGSM', + MW_DMGL: 'MW_DMGL', + MON_RANGED: 'MON_RANGED', + RANGED: 'RANGED', + RANGEMOD: 'RANGEMOD', + RW_DMGSM: 'RW_DMGSM', + RW_DMGL: 'RW_DMGL', + MI_SPELL: 'MI_SPELL', + MI_POWER: 'MI_POWER', + MI_SCROLL: 'MI_SCROLL', + MI_POWER_USED: 'MI_POWER_USED', + MI_POWER_CHARGE_USED:'MI_POWER_CHARGE_USED', + LEVEL_CHANGE: 'LEVEL_CHANGE', + LEFTRING: 'LEFTRING', + RIGHTRING: 'RIGHTRING', + MU_SPELL: 'MU_SPELL', + MU_TO_STORE: 'MU_TO_STORE', + MU_TO_STORE_ANY: 'MU_TO_STORE_ANY', + MU_TO_STORE_ADD: 'MU_TO_STORE_ADD', + MU_MI_SLOT: 'MU_MI_SLOT', + MU_MI_SLOT_ANY: 'MU_MI_SLOT_ANY', + MU_MI_SLOT_ADD: 'MU_MI_SLOT_ADD', + PR_SPELL: 'PR_SPELL', + PR_TO_STORE: 'PR_TO_STORE', + PR_TO_STORE_ANY: 'PR_TO_STORE_ANY', + PR_TO_STORE_ADD: 'PR_TO_STORE_ADD', + PR_MI_SLOT: 'PR_MI_SLOT', + PR_MI_SLOT_ANY: 'PR_MI_SLOT_ANY', + PR_MI_SLOT_ADD: 'PR_MI_SLOT_ADD', + CAST_MUSPELL: 'CAST_MUSPELL', + CAST_PRSPELL: 'CAST_PRSPELL', + CAST_MISPELL: 'CAST_MISPELL', + CAST_MIPOWER: 'CAST_MIPOWER', + CAST_SCROLL: 'CAST_SCROLL', + CHOOSE_MUSPELL: 'CHOOSE_MUSPELL', + CHOOSE_PRSPELL: 'CHOOSE_PRSPELL', + CHOOSE_POWER: 'CHOOSE_POWER', + CHOOSE_MI: 'CHOOSE_MI', + CHOOSE_MARTIAL_MI: 'CHOOSE_MARTIAL_MI', + CHOOSE_ALLITEMS_MI: 'CHOOSE_ALLITEMS_MI', + REDO_CHOOSE_MI: 'REDO_CHOOSE_MI', + REDO_MARTIAL_MI: 'REDO_MARTIAL_MI', + REDO_ALLITEMS_MI: 'REDO_ALLITEMS_MI', + CHOOSE_VIEW_MI: 'CHOOSE_VIEW_MI', + CHOOSE_USE_MI: 'CHOOSE_USE_MI', + CHOOSE_TO_STORE: 'CHOOSE_TO_STORE', + REVIEW_MUSPELL: 'REVIEW_MUSPELL', + REVIEW_PRSPELL: 'REVIEW_PRSPELL', + REVIEW_POWER: 'REVIEW_POWER', + REVIEW_MI: 'REVIEW_MI', + REVIEW_MARTIAL_MI: 'REVIEW_MARTIAL_MI', + REVIEW_ALLITEMS_MI: 'REVIEW_ALLITEMS_MI', + REVIEW_MIPOWER: 'REVIEW_MIPOWER', + REVIEW_STORE: 'REVIEW_STORE', + LEARNT_MUSPELL: 'LEARNT_MUSPELL', + SLOT_MUSPELL: 'SLOT_MUSPELL', + SLOT_PRSPELL: 'SLOT_PRSPELL', + SLOT_POWER: 'SLOT_POWER', + SLOT_MI: 'SLOT_MI', + SLOT_MARTIAL_MI: 'SLOT_MARTIAL_MI', + SLOT_ALLITEMS_MI: 'SLOT_ALLITEMS_MI', + CHECK_MOVE: 'CHECK_MOVE', + MISC_SPELL: 'MISC_SPELL', + MEM_MUSPELL: 'MEM_MUSPELL', + MEM_PRSPELL: 'MEM_PRSPELL', + MEM_POWER: 'MEM_POWER', + MEM_MIPOWER: 'MEM_MIPOWER', + MEMALL_POWERS: 'MEMALL_POWERS', + EDIT_MUSPELLS: 'EDIT_MUSPELLS', + EDIT_PRSPELLS: 'EDIT_PRSPELLS', + EDIT_NOSPELLS: 'EDIT_NOSPELLS', + EDIT_POWERS: 'EDIT_POWERS', + EDIT_MIMUSPELLS: 'EDIT_MIMUSPELLS', + EDIT_MIPRSPELLS: 'EDIT_MIPRSPELLS', + EDIT_MISPELLS: 'EDIT_MISPELLS', + EDIT_MIPOWERS: 'EDIT_MIPOWERS', + EDIT_MI: 'EDIT_MI', + EDIT_MARTIAL: 'EDIT_MARTIAL', + EDIT_ALLITEMS: 'EDIT_ALLITEMS', + EDITMI_OPTION: 'EDITMI_OPTION', + EDITMARTIAL_OPTION: 'EDITMARTIAL_OPTION', + EDITALLITEMS_OPTION:'EDITALLITEMS_OPTION', + ALPHALIST_OPTION: 'ALPHALIST_OPTION', + REMOVE_MUSPELL: 'REMOVE_MUSPELL', + REMOVE_PRSPELL: 'REMOVE_PRSPELL', + REMOVE_POWER: 'REMOVE_POWER', + REMOVE_MI: 'REMOVE_MI', + REMOVE_MARTIAL_MI: 'REMOVE_MARTIAL_MI', + DEL_STORED: 'DEL_STORED', + SORT_ITEMS: 'SORT_ITEMS', + SECTIONS_OPTION: 'SECTIONS_OPTION', + STORE_MI: 'STORE_MI', + STORE_MARTIAL_MI: 'STORE_MARTIAL_MI', + STORE_ALLITEMS_MI: 'STORE_ALLITEMS_MI', + MISTORE_MUSPELL: 'MISTORE_MUSPELL', + MISTORE_PRSPELL: 'MISTORE_PRSPELL', + MISTORE_MUSPELL_ANY:'MISTORE_MUSPELL_ANY', + MISTORE_PRSPELL_ANY:'MISTORE_PRSPELL_ANY', + MISTORE_MUSPELL_ADD:'MISTORE_MUSPELL_ADD', + MISTORE_PRSPELL_ADD:'MISTORE_PRSPELL_ADD', + VIEW_MUSPELL: 'VIEW_MUSPELL', + VIEW_PRSPELL: 'VIEW_PRSPELL', + VIEW_POWER: 'VIEW_POWER', + VIEW_MI_POWER: 'VIEW_MI_POWER', + VIEW_MI_SPELL: 'VIEW_MI_SPELL', + VIEW_MI_MUSPELL: 'VIEW_MI_MUSPELL', + VIEW_MI_PRSPELL: 'VIEW_MI_PRSPELL', + VIEW_MI_SCROLL: 'VIEW_MI_SCROLL', + VIEW_MI_MUSPELL: 'VIEW_MI_MUSCROLL', + VIEW_MI_PRSPELL: 'VIEW_MI_PRSCROLL', + VIEW_MI: 'VIEW_MI', + VIEWMI_OPTION: 'VIEWMI_OPTION', + VIEWMEM_MUSPELLS: 'VIEWMEM_MUSPELLS', + VIEWMEM_PRSPELLS: 'VIEWMEM_PRSPELLS', + VIEWMEM_POWERS: 'VIEWMEM_POWERS', + VIEWMEM_MI_POWERS: 'VIEWMEM_MI_POWERS', + VIEWMEM_MI_SPELLS: 'VIEWMEM_MI_SPELLS', + VIEWMEM_MI_MUSPELLS:'VIEWMEM_MI_MUSPELLS', + VIEWMEM_MI_PRSPELLS:'VIEWMEM_MI_PRSPELLS', + VIEWMEM_MI_SCROLL: 'VIEWMEM_MI_SCROLL', + VIEWMEM_MI_MUSCROLL:'VIEWMEM_MI_MUSCROLL', + VIEWMEM_MI_PRSCROLL:'VIEWMEM_MI_PRSCROLL', + POP_PICK: 'POP_PICK', + POP_STORE: 'POPSUBMIT', + PICK_POP: 'PICK_POP', + PICK_ITEM: 'PICK_ITEM', + BUY_PICK: 'BUY_PICK', + SELL_PICK: 'SELL_PICK', + BUY_STORE: 'BUY_STORE', + SELL_STORE: 'SELL_STORE', + BUY_OFFER: 'BUY_OFFER', + SELL_OFFER: 'SELL_OFFER', + BUY_POP: 'BUY_POP', + SELL_POP: 'SELL_POP', + BUY_ITEM: 'BUY_ITEM', + SELL_ITEM: 'SELL_ITEM', + BUY_TREASURE: 'BUY_TREASURE', + PICKMI_OPTION: 'PICKMI_OPTION', + PUTMI_OPTION: 'PUTMI_OPTION', + LOCKTYPE: 'LOCKTYPE', + TRAPTYPE: 'TRAPTYPE', + POWER: 'POWER', + USE_POWER: 'USE_POWER', + USE_MI: 'USE_MI', + USEMI_OPTION: 'USEMI_OPTION', + MI_BAG: 'MI_BAG', + THIEF: 'THIEF', + MOVE: 'MOVE', + CHG_WEAP: 'CHG_WEAP', + STAND: 'STAND', + SPECIFY: 'SPECIFY', + CARRY: 'CARRY', + SUBMIT: 'SUBMIT', + RIGHT: 'PRIMARY', + LEFT: 'OFFHAND', + BOTH: 'BOTH', + HAND: 'HAND', + AB_ASK_TOKENBARS: 'AB_ASK_TOKENBARS', + }); + + const reIgnore = /[\s\-\_]*/gi; + const reCastViewMIspellCmd = /!magic\s+--(?:cast|view)-spell\s+MI(?:-SPELLS)?\s*\|/im; + const reCastViewMIpowerCmd = /!magic\s+--(?:cast|view)-spell\s+MI-POWERS?\s*\|/im; + const reCastMIspellCmd = /!magic\s+--cast-spell\s+MI(?:-SPELLS)?\s*\|/im; + const reLooksLike = /Looks\s?Like=/im; + const reInitMIqty = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?qty:([d\d\+\-\*\/.]+?)[,\s\]]/im; + const reSpecs = /}}\s*?specs\s*?=(.*?){{/im; + const reSpecsAll = /\[\s*?(\w[-\+\s\w\|]*?)\s*?,\s*?(\w[-\s\w\|]*?\w)\s*?,\s*?(\w[\s\w\|]*?\w)\s*?,\s*?(\w[-\+\s\w\|]*?\w)\s*?\]/g; + const reSpecClass = /\[\s*?\w[\s\|\w\-\+]*?\s*?,\s*?(\w[\s\|\w\-]*?)\s*?,.*?\]/g; + const reSpecSuperType = /}}\s*Specs=\s*?\[\s*?\w[-\+\s\w\|]*?\s*?,\s*?\w[-\s\w\|]*?\w\s*?,\s*?\d+H(?:\|\d*H)\s*?,\s*?(\w[-\+\s\w\|]*?\w)\s*?\]/im; + const reDataSpeed = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?sp:([d\d\+\-\*\/.]+?)[,\s\]]/im; + const reDataCost = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?gp:(\d+?\.?\d*?)[,\s\]]/im; + const reDataLevel = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?lv:(\d+?)[,\s\]]/im; + const reLevel = /[\[,]\s*?lv:(\d+?)[,\s\]]/im; + const reClassData = /}}\s*?ClassData\s*?=(.*?){{/im; + const reRaceData = /}}\s*?(?:Class|Race)Data\s*?=(.*?){{/im; + const reSpellData = /}}\s*?SpellData\s*?=(.*?){{/im; + const reRepeatingTable = /^(repeating_.*)_\$(\d+)_.*$/; + const reItemData = /}}[\s\w\-]*?(?"], + [/\\lt;?/gm, "<"], + [/¦/g, "|"], + ]); + + const msgReplacers = Object.freeze([ + [/\\api;?/g, "!"], + [/\\lbrc;?/g, "{"], + [/\\rbrc;?/g, "}"], + [/\\gt;?/gm, ">"], + [/\\lt;?/gm, "<"], + [/<<|«/g, "["], + [/\\lbrak;?/g, "["], + [/>>|»/g, "]"], + [/\\rbrak;?/g, "]"], + [/\\\^/g, "?"], + [/\\ques;?/g, "?"], + [/`/g, "@"], + [/\\at;?/g, "@"], + [/~/g, "-"], + [/\\dash;?/g, "-"], + [/\\n/g, "\n"], + [/¦/g, "|"], + [/\\vbar;?/g, "|"], + [/\\clon;?/g, ":"], + [/\\amp;?/g, "&"], + [/\\lpar;?/g, "("], + [/\\rpar;?/g, ")"], + [/\\cr;?/g, " "], + [/&&/g, "/"], + [/%%/g, "%"], + [/\\fs;?/g, "\\"], + ]); + + const dbEncoders = Object.freeze([ + [/\r?\n/gm,'\\n'], + [/'/gm,"\\'"], + [/&/gm,"\\\\amp;"], + [/>/gm,"\\\\gt;"], + [/<%= text %>'), + confirm_box: _.template('
' + + '
' + + '<%= message %>' + + '
' + + '' + + '' + + '' + + '' + + '' + + '
' + + '<%= confirm_button %>' + + '' + + '<%= reject_button %>' + + '
' + + '
') + }; + + return { + getTemplate: function(tmpArgs, type) { + var retval; + + retval = _.find(templates, function(e,i) { + if (type === i) { + {return true;} + } + })(tmpArgs); + + return retval; + }, + + hasTemplate: function(type) { + if (!type) + {return false;} + return !!_.find(_.keys(templates), function(elem) { + {return (elem === type);} + }); + + } + }; + }()); +*/ + /** + * Init + */ + var init = function() { + try { + if (!state.MagicMaster) + {state.MagicMaster = {};} + if (_.isUndefined(state.MagicMaster.spellRules)) + {state.MagicMaster.spellRules = {specMU:true,strictNum:false,allowAll:false,allowAnyPower:false,denyCustom:false}} + if (_.isUndefined(state.MagicMaster.fancy)) + {state.MagicMaster.fancy = true;} + if (_.isUndefined(state.MagicMaster.alphaLists)) + {state.MagicMaster.alphaLists = true;} + if (_.isUndefined(state.MagicMaster.autoHide)) + {state.MagicMaster.autoHide = false;} + if (_.isUndefined(state.MagicMaster.reveal)) + {state.MagicMaster.reveal = false;} + if (_.isUndefined(state.MagicMaster.viewActions)) + {state.MagicMaster.viewActions = false;} + if (_.isUndefined(state.MagicMaster.encumbrance)) + {state.MagicMaster.encumbrance = true;} + if (_.isUndefined(state.MagicMaster.gmRolls)) + {state.MagicMaster.gmRolls = true;} + if (_.isUndefined(state.MagicMaster.debug)) + {state.MagicMaster.debug = false;} + if (_.isUndefined(state.MagicMaster.gmID)) + {state.MagicMaster.gmID = undefined;} + if (!state.MagicMaster.playerConfig) + {state.MagicMaster.playerConfig = {};} + + if (!state.moneyMaster) + {state.moneyMaster = {};} + if (!state.moneyMaster.inGameDay) + {state.moneyMaster.inGameDay = 0;} + + [fields,RPGMap] = getRPGMap(); + dbNames = RPGMap.dbNames; + fieldGroups = RPGMap.fieldGroups; + miTypeLists = RPGMap.miTypeLists; + clTypeLists = RPGMap.clTypeLists; + spTypeLists = RPGMap.spTypeLists; + reSpellSpecs = RPGMap.reSpellSpecs; + reClassSpecs = RPGMap.reClassSpecs; + reWeapSpecs = RPGMap.reWeapSpecs; + reACSpecs = RPGMap.reACSpecs; + saveFormat = RPGMap.saveFormat; + spellsPerLevel = RPGMap.spellsPerLevel; + casterLevels = RPGMap.casterLevels; + specMU = RPGMap.specMU; + ordMU = RPGMap.ordMU; + wisdomSpells = RPGMap.wisdomSpells; + spellLevels = RPGMap.spellLevels; + showMoreObj = RPGMap.showMoreObj; + encumberDef = RPGMap.encumberDef; + DBindex = undefined; + flags.noWaitMsg = true; + reSpellSpecs.reveal.def = state.MagicMaster.reveal ? 'use' : ''; + setTimeout( () => flags.noWaitMsg=false, 10000 ); + + // RED: v2.040 check what other APIs are loaded + setTimeout( () => issueHandshakeQuery('rounds'), 20); + setTimeout( () => issueHandshakeQuery('attk'), 20); + setTimeout( () => issueHandshakeQuery('cmd'), 20); + setTimeout( () => updateHandouts(handouts,true,findTheGM()), 30); + setTimeout(cmdMasterRegister, 40); + setTimeout( () => updateDBindex(false), 80); + setTimeout(setWeights,1000); + + // RED: log the version of the API Script + log('-=> MagicMaster v'+version+' <=- ['+(new Date(lastUpdate*1000))+']'); + + } catch (e) { + log('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); + sendDebug('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); + sendCatchError('MagicMaster',null,e,'MagicMaster initialisation'); + } + }; + +/* ------------------------------ Simple String Manipulation ----------------------------------- */ + + /* + * Function to encode special characters in a string + */ + + const encodeStr = (str,encoders=dbEncoders) => encoders.reduce((m, rep) => m.replace(rep[0], rep[1]), str); + + /* + * Function to standardise two strings and compare them. + */ + + const stdEqual = (strA,strB) => ((strA.dbName() || '-') === (strB.dbName() || '-')); + + /* + * Function to return the msVersion of the Character Sheet + * i.e. which versions of MagicMaster it is matched to + */ + + const csVer = (charCS) => parseFloat(((attrLookup( charCS, fields.msVersion ) || '1.5').match(/^\d+\.?\d*/) || ['1.5'])[0]) || 1.5; + + /* + * Build an array of values to store in a table row + */ + +// const valLine = (a,p,t,v) => a[fields[p+t][0]][fields[p+t][1]] = v; + + /** + * Express a cost in coins for display + **/ + + const showCost = (cost) => '**' + Math.floor(cost) + 'GP, ' + Math.floor((cost*10)%10) + 'SP, ' + Math.floor((cost*100)%10) +'CP**'; + + /* + * Determine the class or classes of the character, and + * the level of each + * + */ + + const getCharLevels = ( charCS ) => _.filter( fields, (elem,l) => {return l.toLowerCase().includes('_level')}).filter( elem => {return 0 < (attrLookup( charCS, elem ) || 0)}); + + /* + * Get a caster level + */ + + const casterLevel = (charCS, casterType) => caster( charCS, casterType ).clv; + + /** + * Add a message to a character sheet Journal. Generally + * used to record items picked up, put away, bought and sold + * so that they can be distributed as part of treasure + * at the end of the campaign. + **/ + + const diaryEntry = (charCS, msg) => setAttr( charCS, fields.Diary, (attrLookup( charCS, fields.Diary ) + '\n' + String(new Date(Date.now())).substring(0,15) + ': '+msg)); + + /** + * In the inline roll evaluator from ChatSetAttr script v1.9 + * by Joe Singhaus and C Levett. + **/ + + const processInlinerolls = function (msg) { + if (msg.inlinerolls && msg.inlinerolls.length) { + return msg.inlinerolls.map(v => { + const ti = v.results.rolls.filter(v2 => v2.table) + .map(v2 => v2.results.map(v3 => v3.tableItem.name).join(", ")) + .join(", "); + return (ti.length && ti) || v.results.total || 0; + }) + .reduce((m, v, k) => m.replace(`$[[${k}]]`, v), msg.content); + } else { + return msg.content; + } + }; + +// -------------------------------------------- send messages to chat ----------------------------------------- + + // RED 3.060 Chat management functions moved to common library + + /** + * Function to send an API command to chat + * that has '^^parameter^^' replaced by relevant names & ids + **/ + + const sendAPImacro = function(senderId,charID,targetID,ability,modifier) { + + if (!charID || !targetID || !ability) { + sendDebug('sendAPImacro: a parameter is null'); + return; + } + modifier = modifier || ''; + const curToken = getObj('graphic',charID), + tid = charID, + tname = curToken.get('name'), + cid = curToken.get('represents'), + targetCS = getCharacter(targetID), + journal = getObj( 'character', cid ); + + if (targetCS && journal) { + const abilityMacro = findObjs({ _type : 'ability' , characterid : targetCS.id, name : ability + modifier }, {caseInsensitive: true}); + if (!abilityMacro || abilityMacro == undefined || abilityMacro.length === 0) { + sendDebug('Not found macro ' + targetCS.get('name') + '|' + ability + modifier); + return; + } + const cname = journal.get('name') || curToken.get('name'), + bar1 = curToken.get('bar1_value'), + bar2 = curToken.get('bar2_value'), + bar3 = curToken.get('bar3_value'), + ac = getTokenValue(curToken,fields.Token_AC,fields.AC,fields.MonsterAC,fields.Thac0_base).val, + thac0 = getTokenValue(curToken,fields.Token_Thac0,fields.Thac0,fields.MonsterThac0,fields.Thac0_base).val, + hp = getTokenValue(curToken,fields.Token_HP,fields.HP,null,fields.Thac0_base).val, + targetcid = targetCS.id, + targetchar = targetCS.get('name'), + targettoken = getObj('graphic',targetID).get('name'); + + if (abilityMacro.length > 0) { + const macroBody = abilityMacro[0].get('action') + .replace( /\@\{selected\|token_id}/gi, tid ) + .replace( /\@\{selected\|/gi, '\@{'+cname+'|' ) + .replace( /\^\^cname\^\^/gi , cname ) + .replace( /\^\^tname\^\^/gi , tname ) + .replace( /\^\^cid\^\^/gi , cid ) + .replace( /\^\^tid\^\^/gi , tid ) + .replace( /\^\^pid\^\^/gi , senderId ) + .replace( /\^\^targetchar\^\^/gi , cname ) + .replace( /\^\^targettoken\^\^/gi , tname ) + .replace( /\^\^targetcid\^\^/gi , targetcid ) + .replace( /\^\^targettid\^\^/gi , targetID ) + .replace( /\^\^bar1_current\^\^/gi , bar1 ) + .replace( /\^\^bar2_current\^\^/gi , bar2 ) + .replace( /\^\^bar3_current\^\^/gi , bar3 ) + .replace( /\^\^token_ac\^\^/gi , ac ) + .replace( /\^\^token_thac0\^\^/gi , thac0 ) + .replace( /\^\^token_hp\^\^/gi , hp ); + + sendChat("character|"+cid,sendMsgToWho(journal,senderId,macroBody),null,{noarchive:!flags.archive, use3d:false}); + } + } + return; + }; + + /** + * RED: v1.207 Send a debugging message if the debugging flag is set + */ + + const sendDebug = function(msg) { + if (!!state.MagicMaster.debug) { + if (playerIsGM(state.MagicMaster.debug)) { + log('MagicMaster Debug: '+msg); + } else { + const player = getObj('player',state.MagicMaster.debug); + let to; + if (player) { + to = '/w "' + player.get('_displayname') + '" '; + } else { + throw ('sendDebug could not find player'); + } + if (!msg) msg = 'No debug msg'; + sendChat('MagicMaster Debug',to + ''+msg+'',null,{noarchive:!flags.archive, use3d:false}); + }; + }; + }; + + const doSetDebug = function(args,senderId) { + const player = getObj('player',senderId); + if (!player) throw ('doSetDebug could not find player: ' + args); + const playerName = player.get('_displayname'); + if (!!args && args.indexOf('off') !== 0) { + state.MagicMaster.debug = senderId; + sendResponseError(senderId,'MagicMaster Debug set on for ' + playerName,'MagicMaster Debug'); + sendDebug('Debugging turned on'); + } else { + sendResponseError(senderId,'MagicMaster Debugging turned off','MagicMaster Debug'); + state.MagicMaster.debug = false; + } + }; + + /** + * Display a message when a character has picked up a magic item + **/ + + const pickupMessage = function( args, miName, miType, pickedQty, fromCharges, toCharges, senderId ) { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + tokenID = args[1], + fromID = args[3], + toID = args[4], + cost = parseFloat(args[7]), + charCS = getCharacter( tokenID ), + picking = (tokenID == toID), + whereStr = picking ? (' from '+getObj('graphic',fromID).get('name')) : (' to '+getObj('graphic',toID).get('name')), + pickOrPut = sell ? 'sold ' : (buy ? 'bought ' : (picking ? 'picked up ' : 'put away ')), + charges = picking ? toCharges : fromCharges; + let msg; + let content = '&{template:'+fields.messageTemplate+'}{{name='+(pickOrPut.dispName()+' Items')+' Items}}{{desc='; + + if (_.isArray(miName)) { + let msgArray = []; + msg = 'You have '+pickOrPut+' '; + for (let i=0; i1)?'\'s':'')+whereStr+', and now have '+charges; + break; + } + }; + + if (cost && !isNaN(cost) && cost > 0) { + msg += ', at a cost of '+showCost( cost ); + } + + content += msg + '.}}{{desc1=[Pick or put another MI](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromID+'|'+toID+')}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + + diaryEntry( charCS, msg ); + } + + +// -------------------------------------------- Roll20 utility functions ---------------------------------------------- + + /** + * Issue a handshake request to check if another API or + * specific API command is present + **/ + + const issueHandshakeQuery = function( api, cmd ) { + const handshake = '!'+api+' --noWaitMsg --hsq magic'+((cmd && cmd.length) ? ('|'+cmd) : ''); + sendAPI(handshake); + return; + }; + + /** + * Do any necessary updates + */ + + async function updateACS( charCS, tokenID, curVer, senderId ) { + + try { + const charName = charCS.get('name'), + csv = csVer(charCS); + + const updateCSspellCol = function( charCS, charName, c, senderId ) { + return new Promise(resolve => { + try { + let spellName, SpellCol, msg, + r = 0; + var updated = false; + SpellCol = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); + SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_macro, c, '' ); + SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_msg, c, '' ); + while (!_.isUndefined(spellName = SpellCol.tableLookup( fields.Spells_name, r, false ))) { + if (spellName != '-') { + updated = true; + SpellCol = SpellCol.tableSet( fields.Spells_msg, r, SpellCol.tableLookup( fields.Spells_macro, r ) ); + SpellCol = SpellCol.tableSet( fields.Spells_macro, r, (spellName != '-' ? ('%{'+charName+'|'+spellName+'}') : '')); + } + r++; + } + } catch (e) { + log('MagicMaster updateCharSheets: JavaScript '+e.name+': '+e.message+' while converting sheet '+charCS.get('name')); + sendCatchError('MagicMaster',msg_orig[senderId],e); + } finally { + setTimeout(() => { + resolve(updated); + }, 10); + } + }); + }; + + if (csv < curVer) { + + log('updateACS: updating '+charName+'\'s character sheet from version '+csv+' to version '+curVer); + + if (csv < 2.1) { + for (let c=1; c<=fields.MaxSpellCol; c++) { + await updateCSspellCol( charCS, charName, c, senderId ); + } + csv = 2.1; + } + if (csv < 4.1) { + sendAPI(fields.commandMaster+' --conv-items '+tokenID+'|true'); + } + setAttr( charCS, fields.msVersion, version ); + } + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + }; + + const updateCharSheets = function(args,senderId) { + + log('updateCharSheets: a character sheet version test has been triggered'); + + const curVer = parseFloat(((version || '1.5').match(/^\d+\.\d+/) || ['1.5'])[0]) || 1.5; + let CSarray = [], + delay; + + if (args && args.length) { + const charObj = getCharacter(args[0]); + if (charObj) { + if (curVer > csVer(charObj)) { + CSarray = [{cs:charObj,tid:args[0]}]; + } + } + } else { + let csIDs = []; + filterObjs( obj => { + if (obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token') return false; + charCS = getCharacter(obj.id); + if (!charCS) return false; + if (charCS.get('name').toLowerCase().includes('-db')) return false; + if (csIDs.includes(charCS.id)) return false; + csIDs.push(charCS.id); + csArray.push({cs:charCS,tid:obj.id}); + return curVer > csVer(charCS); + }); + }; + for (const ct of CSarray) { + delay = Math.round(1000+(Math.random() * 1000)); + setTimeout( updateACS, delay, ct.cs, ct.tid, curVer, senderId ); + } + }; + + /** + * Find the GM, generally when a player can't be found + */ + + const findTheGM = function() { + let playerGM; + const players = findObjs({ _type:'player' }); + + if (players.length !== 0) { + if (!_.isUndefined(playerGM = _.find(players, function(p) { + const player = p; + if (player) { + if (playerIsGM(player.id)) { + state.MagicMaster.gmID = player.id; + return player.id; + } + } + }))) { + return playerGM.id; + } + } + return state.MagicMaster.gmID; + } + +/* ------------------------------- Character Sheet Database Management -------------------------- */ + + /** + * Create an internal index of items in the databases + * to make searches much faster. Index entries indexed by + * database root name & short name (name in lower case with + * '-', '_' and ' ' ignored). index[0] = abilityID, + * index[1] = ct-attributeID + * v3.051 Check that other database-handling APIs have finished + * updating their databases and performed a handshake + **/ + + const updateDBindex = function(forceUpdate=false) { + + apiDBs.attk = !!apiDBs.attk || ('undefined' === typeof attackMaster); + + DBindex = getDBindex(forceUpdate); + parseClassDB(forceUpdate); + return; + } + + /* + * Check a character sheet database and update/create the + * required attributes from the definitions. This should + * be run after updating or adding item or spell definitions. + */ + + const checkDB = function( args ) { + + checkCSdb( args[0] ); + + apiDBs.magic = true; + updateDBindex(true); + return; + } + + /* + * Check the version of a Character Sheet database and, if + * it is earlier than the static data held in this API, update + * it to the latest version. + */ + + const buildDB = function( dbFullName, dbObj, senderId, silent ) { + + return new Promise(resolve => { + + try { + const dbName = dbFullName.toLowerCase(), + typeList = dbObj.type.includes('spell') ? spTypeLists : (dbObj.type.includes('class') ? clTypeLists : miTypeLists); + + var errFlag = buildCSdb( dbFullName, dbObj, typeList, silent ); + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + var errFlag = true; + } finally { + setTimeout(() => { + resolve(errFlag); + }, 10); + } + }); + }; + + const copyMarkerCSdb = function( APIdbName, UserDbName, itemClass ) { + + let APIdbCS = findObjs({ _type:'character', name:APIdbName }); + const reItemClass = new RegExp( itemClass, 'im' ); + if (!APIdbCS || !APIdbCS.length) { + sendError(APIdbName+' not found'); + return; + } else { + APIdbCS = APIdbCS[0]; + } + let UserDbCS = findObjs({ _type:'character', name:UserDbName }); + if (!UserDbCS || !UserDbCS.length) { + UserDbCS = createObj( 'character', {name:UserDbName} ); + } else { + UserDbCS = UserDbCS[0]; + } + + const abilities = findObjs({ _type:'ability', _characterid:APIdbCS.id }) + .filter( o => /\s--target\s|\s--touch\s/im.test(o.get('action')) ) + .filter( o => reItemClass.test(o.get('action'))); + let UserObj; + _.each(abilities, a => { + UserObj = findObjs({_type:'ability', _characterid:UserDbCS.id, name:a.get('name') }); + if (!UserObj || !UserObj.length) { + createObj( 'ability', {name: a.get('name'), action: a.get('action'), characterid: UserDbCS.id} ); + } + }); + checkDB([UserDbName]); + return; + }; + +/* ---------------------------- Update Legacy Character Sheets ------------------------- */ + + async function setWeights() { + const gmID = findTheGM(); + let delay = 50; + let doneList = []; + const charList = filterObjs( obj => { + if (obj.get('_type') !== 'graphic' || obj.get('subtype') !== 'token' || !obj.get('represents').length) return false; + const charID = obj.get('represents'); + if (doneList.includes(charID)) return false; + doneList.push(charID); + const charCS = getObj('character',charID); + if (!charCS || !charCS.get('controlledby').length) return false; + return (!String(attrLookup( charCS, fields.Weight_total ) || '').length); + }); + for (const obj of charList) { + const Items = getTableGroup( obj, fieldGroups.MI ); + await itemSlotData( obj.id, Items, gmID ); + }; + }; + +/* ------------------------------- Magic Utility functions ----------------------------- */ + + /** + * Determine the type of caster and set the correct levels + **/ + + const setCaster = function( args, msg, senderId ) { + + const tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + itemName = args[5] || ''; + let isPower = args[0].toUpperCase().includes('POWER'), + isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPR = args[0].toUpperCase().includes('PR'), + level = parseInt(evalAttr(args[2])), + castingName = args[3]; + + if (!charCS) { + sendError('No token selected'); + return; + } + + let mu_level = parseInt(casterLevel( charCS, 'MU' ),10); + let pr_level = parseInt(casterLevel( charCS, 'PR' ),10); + const charType = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + + if (isMU && isPR) { + isMU = !isNaN(mu_level) && mu_level > 0; + isPR = !isNaN(pr_level) && pr_level > 0; + if (isPR && !isMU) { + args[0] = 'PR'; + } else if (isMU && !isPR) { + args[0] = 'MU'; + } + } + + if (!isPower && !isMI && !isMU && !isPR && (mu_level || pr_level)) { + sendParsedMsg( tokenID, messages.notYetSpellCaster, senderId ); + return; + } else if (!mu_level && !pr_level && !isMI && !isPower) { + sendParsedMsg( tokenID, messages.notSpellCaster, senderId ); + return; + } else if ((isMU && isPR) || (!isPower && !isMI && !isMU && !isPR)) { + sendParsedMsg( tokenID, msg, senderId ); + return; + } + + if (!level || level <= 0) { + level = casterLevel( charCS, ((isPower || isMI) ? 'POWER' : (isMU ? 'MU' : 'PR')) ); + mu_level = mu_level || ((isPower || isMI) ? level : 0); + pr_level = pr_level || ((isPower || isMI) ? level : 0); + } else{ + mu_level = pr_level = level; + } + + if (isMI && charType !== 2 && charType !== 3 && charType !== 7) { + level = 1; + } + if (!level || level <= 0) { + sendParsedMsg( tokenID, ((mu_level || pr_level) ? messages.wrongSpellCaster : messages.notSpellCaster), senderId ); + return; + } + + if (!castingName || castingName.length == 0) { + castingName = curToken.get('name'); + } + + setAttr( charCS, fields.CastingLevel, level ); + setAttr( charCS, fields.MU_CastingLevel, mu_level ); + setAttr( charCS, fields.PR_CastingLevel, pr_level ); + setAttr( charCS, fields.Casting_name, castingName ); + if (itemName.length) { + setAttr( charCS, fields.ItemChosen, itemName ); + const item = abilityLookup( fields.MagicItemDB, itemName ); + if (args[0].toLowerCase().includes('mi') && !!item.obj && !!item.obj[1].charge) { + if (chargedList.includes(item.obj[1].charge.toLowerCase())) { + args[0] = BT.MI_SCROLL; + } + }; + }; + + return args; + }; + + /* + * Set up the shape of the spell book. This is complicated due to + * the 2E sheet L5 MU Spells start out-of-sequence at column 70 + */ + + const shapeSpellbook = function( charCS, spellbook ) { + + const countSpells = function( levelSpells ) { + levelSpells[1].spells = 0; + let r = 0, c = 0, + spellName = '', + hasDash = false, + spellTables = []; + do { + c = levelSpells[1].base; + for (let w = 1; (w <= fields.SpellsCols); w++) { + if (!spellTables[w]) { + spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); + } + spellName = spellTables[w].tableLookup( fields.Spells_name, r, false ); + if (_.isUndefined(spellName)) { + break; + } else { + hasDash = hasDash || spellName == '-'; + levelSpells[1].spells++; + c++; + } + } + r++; + } while(!_.isUndefined(spellName)); + if (!hasDash) levelSpells[1].spells++; + return levelSpells; + }; + + + let levelSpells = []; + if (charCS) { + const casterSpecs = caster( charCS, spellbook ), + charClass = casterSpecs.ccl, + level = casterSpecs.lv; + + let maxLevel, miscSpells, noSpells, specSpells, levelSpec; + + switch (spellbook.toUpperCase()) { + + case 'MU': + levelSpells = spellLevels.mu; + if (!level || !charClass) {return levelSpells;} + maxLevel = 1+parseInt(spellsPerLevel[charClass]['MU'][0][0]); + specSpells = (state.MagicMaster.spellRules.specMU ? specMU.includes(casterSpecs.cl.dbName()) : !ordMU.includes(casterSpecs.cl.dbName())) ? 1 : 0; + for (let i=1; i { + banned = !(s === 'any' || ((isMU || majorSpells.includes('any') || majorSpells.some(sph => s.startsWith(sph)) || (minorSpells.some(sph => s.startsWith(sph)) && level < 4)) && (isPR || !bannedSpells.some(sph => s.startsWith(sph))))); + specialist = isMU && majorSpells.includes(s); + specStd = isMU && !majorSpells.includes('any'); +// log('checkValidSpell: r:'+r+', s:'+s+', isMU:'+isMU+', bannedSpells.some:'+bannedSpells.some(sph => s.startsWith(sph))+', specialist:'+specialist+', specStd:'+specStd+', allowAll:'+allowAll+', banned:'+banned); + + return ((!allowAll && (!r || banned)) ? 0 : (specialist ? 3 : (specStd ? 2 : r))); + },1); + } + + /** + * Find an item identified as a Power, but which might actually + * be in a different database, as powers can be anything magical + **/ + + const findPower = function( charCS, power ) { + + if (!power || !power.length) return abilityLookup( fields.PowersDB, '', charCS, true, false ); + + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; + const powerType = power.substring(0,3); + let powerLib; + + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) power = power.slice(powerType.length); + + if (!_.some(dbList, dB => { + if (powerType.toUpperCase() === dB[0]) { + powerLib = abilityLookup( dB[1], power, null, true ); + return true; + } else { + return false; + } + })) { + _.some(dbList, dB => { + powerLib = abilityLookup( dB[1], power, null, true ); + return !_.isUndefined(powerLib.obj); + }); + }; + if (!powerLib.obj) { + powerLib = abilityLookup( fields.PowersDB, power, charCS ); + } + powerLib.name = power; + return powerLib; + } + + /* + * Check if the specified power is a class-defined power and, if so + * assess if the power can be used by a character of this level + */ + + const checkValidPower = function( args, senderId ) { + + const matchPower = (args[5] || '').dbName(), + charCS = getCharacter( args[1] ), + classObj = classObjects( charCS, senderId ), + age = parseInt(attrLookup( charCS, fields.AgeVal ) || 9999); + let castAsLvl = -1, + classData, powerData, powerName, + isClassPower, isValidPower; + + if (!matchPower || !matchPower.length || state.MagicMaster.spellRules.allowAnyPower) {log('checkValidPower: no check possible. !matchPower='+!matchPower+', matchPower.length='+matchPower.length+', !matchPower.length='+!matchPower.length+', allowAll='+state.MagicMaster.spellRules.allowAnyPower); return true;} + + const success = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; + return _.some(classData, p => { + powerData = parseData( String(p), reSpellSpecs ); + powerName = powerData.name.toLowerCase(); + if (powerName.startsWith('mu-') || powerName.startsWith('pr-') || powerName.startsWith('pw-')) powerName = powerName.slice(3); + isClassPower = matchPower == powerName.dbName(); + isValidPower = (parseInt(powerData.age) <= age && parseInt(powerData.level) <= parseInt(c.level)); + castAsLvl = !isClassPower ? castAsLvl : (isValidPower ? (powerData.castlvl || -1) : 0); + return (isClassPower && isValidPower); + }); + }) || (castAsLvl < 0); + return success ? castAsLvl : 0; + }; + + /* + * Find the power use per day for Race & Class powers, or default + * from the Powers database + */ + + const getUsesPerDay = function( charCS, power, senderId ) { + + const matchPower = (power || '').dbName(), + classObj = classObjects( charCS, senderId ); + let perDay, perLevel, classData, + powerData, foundName, + isClassPower, isRacePower; + + let foundPower = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; + return _.some(classData, p => { + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isClassPower = matchPower == foundName.dbName(); + if (isClassPower) { + perLevel = (powerData.perDay || '').match(/(\d+)L(\d+?)/i); + if (perLevel) { + perDay = perLevel[1] * Math.ceil(c.level / perLevel[2]); + } else { + perDay = powerData.perDay; + } + } + return (isClassPower); + }); + }); + if (!foundPower || _.isUndefined(perDay)) { + const raceDef = abilityLookup( fields.RaceDB, attrLookup( charCS, fields.Race ), charCS ); + if (raceDef.obj) { + const raceData = raceDef.data(reRaceData); + foundPower = _.some(raceData, p => { + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isRacePower = matchPower == foundName.dbName(); + if (isRacePower) perDay = powerData.perDay; + return (isRacePower); + }); + }; + }; + if (!foundPower || _.isUndefined(perDay)) { + const powerDef = findPower( charCS, power ); + if (powerDef.obj) { + powerData = powerDef.data(reSpellData); + powerData = powerData ? parseData( String(powerData), reSpellSpecs, false ) : powerData; + if (powerData) perDay = powerData.perDay; + }; + }; + return (perDay || -1); + }; + + + /* + * Return a string containing the in-game date in short or long form + */ + + const inGameDate = function( inGameDay ) { + + return ['Mon','Tue','Wed','Thur','Fri','Sat','Sun'][((inGameDay%7))]+', ' + + (1+(inGameDay%28)) + ['st','nd','rd','th'][Math.min((((inGameDay%28)%20)),3)]+' ' + + ['Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'][Math.floor(((inGameDay%336))/28)]+', ' + + Math.floor(inGameDay/336); + }; + + /* + * insert a spell into an identified spellbook slot + */ + + const setSpell = function( charCS, spellTables, altSpellTable, spellDB, spellName, r, c, lv, cost, msg, levelOrPerDay, castAsLvl='' ) { + + const isPower = spellDB.toUpperCase().includes('POWER'); +// isMU = spellDB.toUpperCase().includes('MU'), + let newSpellObj, altValues, altSpellRow; + + if (fields.GameVersion === 'AD&D1e') { + altSpellRow = altSpellTable.tableFind( (isPower ? fields.AltPowers_name : fields.AltSpells_name), (spellTables.tableLookup( fields.Spells_name, r ) || '-') ); + } else { + altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c); + } + if (!isPower) { + newSpellObj = abilityLookup( spellDB, spellName, charCS, true ); + } else { + newSpellObj = findPower( charCS, spellName ); + spellDB = newSpellObj.dB; + spellName = newSpellObj.obj ? newSpellObj.obj[1].name : spellName; + }; + + if (!newSpellObj.obj) { + sendError('Unable to find the spell or power '+spellName+' in any '+spellDB+' database'); + + // If spell not found, just blank the row + if (!isPower || fields.GameVersion === 'AD&D1e') altSpellTable.addTableRow( altSpellRow ); + return spellTables.addTableRow( r ); + } + + const speed = newSpellObj.obj[1].ct, + level = parseInt(newSpellObj.obj[1].type.match(/\d+/)) || 1, + specs = newSpellObj.specs(), + data = newSpellObj.data(), + spellData = data ? parseData( data[0][0], reSpellSpecs ) : {}, + csv = csVer(charCS), + weapon = newSpellObj.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.+?\]/im), + equip = (!weapon ? '' : (weapon[0].match(/[\[,\s]equip:(.+?)[,\]]/i) || ['',''])[1].toLowerCase()); + + let values = spellTables.copyValues(); + +// if (!specs || !specs[0]) log('setSpell: specs = '+(specs ? (specs[0] ? specs[0] : 'specs[0] undefined, spell is '+spellName) : 'specs undefined, spell is '+spellName)); + + values[fields.Spells_name[0]][fields.Spells_name[1]] = spellName; + values[fields.Spells_db[0]][fields.Spells_db[1]] = spellDB; + values[fields.Spells_speed[0]][fields.Spells_speed[1]] = speed; + values[fields.Spells_cost[0]][fields.Spells_cost[1]] = cost || newSpellObj.obj[1].cost; + values[fields.Spells_msg[0]][fields.Spells_msg[1]] = msg; + values[fields.Spells_macro[0]][fields.Spells_macro[1]] = csv < 2.1 ? msg : ('%{'+charCS.get('name')+'|'+(spellName.hyphened())+'}'); + values[fields.Spells_weapon[0]][fields.Spells_weapon[1]] = weapon ? '1' : '0'; + values[fields.Spells_equip[0]][fields.Spells_equip[1]] = (equip==='prime'?'0':(equip==='offhand'?'1':(equip==='both'?'2':equip))); + values[fields.Spells_spellLevel[0]][fields.Spells_spellLevel[1]] = level; + + if (!isPower || fields.GameVersion === 'AD&D1e') altValues = altSpellTable.copyValues(); + if (isPower) { + values[fields.Spells_castValue[0]][fields.Spells_castValue[1]] = (levelOrPerDay[0] || fields.Spells_castValue[2]); + values[fields.Spells_castMax[0]][fields.Spells_castMax[1]] = levelOrPerDay[0]; + values[fields.Spells_storedLevel[0]][fields.Spells_storedLevel[1]] = castAsLvl || levelOrPerDay[1] || casterLevel( charCS, 'POWER' ); + if (fields.GameVersion === 'AD&D1e') { + altValues[fields.AltPowers_name[0]][fields.AltPowers_name[1]] = spellName; + altValues[fields.AltPowers_castValue[0]][fields.AltPowers_castValue[1]] = (levelOrPerDay[0] || fields.Spells_castValue[2]); + altValues[fields.AltPowers_effect[0]][fields.AltPowers_effect[1]] = '%{'+charCS.get('name')+'|'+(spellName.hyphened())+'}'; + altValues[fields.AltPowers_castMax[0]][fields.AltPowers_castMax[1]] = 1; + altSpellTable.addTableRow( altSpellRow, altValues ); + } + } else { + values[fields.Spells_miSpellSet[0]][fields.Spells_miSpellSet[1]] = (levelOrPerDay[1] || fields.Spells_miSpellSet[2]); + values[fields.Spells_storedLevel[0]][fields.Spells_storedLevel[1]] = levelOrPerDay[0]; + values[fields.Spells_castValue[0]][fields.Spells_castValue[1]] = (levelOrPerDay[0]==0 ? 0 : 1); + values[fields.Spells_castMax[0]][fields.Spells_castMax[1]] = 1; + altValues[fields.AltSpells_name[0]][fields.AltSpells_name[1]] = spellName; + altValues[fields.AltSpells_speed[0]][fields.AltSpells_speed[1]] = speed; + altValues[fields.AltSpells_level[0]][fields.AltSpells_level[1]] = lv; + altValues[fields.AltSpells_effect[0]][fields.AltSpells_effect[1]] = '%{'+charCS.get('name')+'|'+(spellName.hyphened())+'}'; + altValues[fields.AltSpells_remaining[0]][fields.AltSpells_remaining[1]] = (levelOrPerDay[0]==0 ? 0 : 1);; + altValues[fields.AltSpells_memorized[0]][fields.AltSpells_memorized[1]] = 1; + altValues[fields.AltSpells_range[0]][fields.AltSpells_range[1]] = spellData.range; + altValues[fields.AltSpells_school[0]][fields.AltSpells_school[1]] = specs ? (specs[0] ? specs[0][4] : '') : ''; + altValues[fields.AltSpells_aoe[0]][fields.AltSpells_aoe[1]] = spellData.aoe; + altValues[fields.AltSpells_save[0]][fields.AltSpells_save[1]] = spellData.save; + altValues[fields.AltSpells_comps[0]][fields.AltSpells_comps[1]] = spellData.comps; + altValues[fields.AltSpells_duration[0]][fields.AltSpells_duration[1]] = spellData.duration; // (newSpellObj.obj[1].body.match(/}}.*?data\s*=\s*\[.*?dur:([^,\]]+?)[\,\]].*?{{/im) || ['',''])[1]; + altSpellTable.addTableRow( altSpellRow, altValues ); + } + return spellTables.addTableRow( r, values ); + } + + /* + * Find an item table row to put an item in + */ + + const findPutRow = function( tokenID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotCount ) { // addTableRow + let putRow = -1, + miTable = '', + pickedMI = ''; + if (!isNaN(pickRow) && pickRow >= 0) { + pickedMI = tableGroupLookup( pickItems, 'name', pickRow ) || ''; + const pickedTrueMI = (tableGroupLookup( pickItems, 'trueName', pickRow ) || '').dbName() || '-'; + const pickedType = (tableGroupLookup( pickItems, 'type', pickRow ) || '').dbName() || '-'; + const miTrueObj = abilityLookup( fields.MagicItemDB, pickedTrueMI, pickCS ); + const lowerMI = pickedMI.dbName().replace(/v\d+$/,'') || '-'; + miTable = miTrueObj.obj ? getItemTable( miTrueObj.obj[1].type ) : 'GEAR'; + let putItemsTable = putItems[miTable]; + let mi, miTrueName, miType; + for (let i = 0; i < putItemsTable.sortKeys.length; i++) { + mi = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'name'],i) || '').dbName().replace(/v\d+$/,'') || '-'; + if (_.isUndefined(mi)) break; + if (mi != lowerMI) continue; + miTrueName = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'trueName'],i) || '').dbName() ||'-'; + if (miTrueName != pickedTrueMI) continue; + miType = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'type'],i) || pickedType); + if (miType.dbName() !== '' && (miType.dbName() !== pickedType || !stackable.includes(miType.toLowerCase()))) continue; + putRow = i; + break; + } + if (showTypes && !buy) { + const miObj = abilityLookup( fields.MagicItemDB, pickedMI, pickCS ); + pickedMI = !miObj.obj ? pickedMI : getShownType( miObj, pickRow ); + } + if (putRow < 0) { + const bagSize = (attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); +// if (slotCount <= bagSize) { +// sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); +// putRow = -1; +// miTable = pickedMI = ''; +// } else { + putRow = putItemsTable.tableFind( fields[fieldGroups[miTable].prefix+'name'], '-', false ); + if (_.isUndefined(putRow)) { + putItemsTable = putItemsTable.addTableRow(); + putRow = putItemsTable.sortKeys.length-1; +// } + } + } + }; + return [putRow,miTable,pickedMI]; + }; + + /* + * Remove MI powers specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIpowers = function( charCS, MIname, miRow, miRowID, powerList, powerValues ) { + + let powerName = '', + removeList = [], + PowersTable = [], + r, c, i=0; + + powerValues = powerValues.split(','); + powerList = powerList.split(','); + MIname = MIname.hyphened(); + while (powerList.length > 0) { + powerName = powerList.shift(); + powerName = powerName.hyphened(); + let attrObj = miSpellLookup( charCS, MIname, miRow, miRowID, [fields.MIpowerPrefix[0],null], '', powerName ); + if (attrObj) { + r = attrObj.get('current'); + c = attrObj.get('max'); + if (!_.isUndefined(r) && !_.isUndefined(c)) { + if (_.isUndefined(PowersTable[c])) { + PowersTable[c] = getTable( charCS, fieldGroups.POWERS, c ); + } + powerValues[i] = PowersTable[c].tableLookup( fields.Powers_castMax, r ) + '.' + PowersTable[c].tableLookup( fields.Powers_storedLevel, r ); + PowersTable[c].addTableRow( r ); + } + removeList.push(attrObj); + i++; + } + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return powerValues.join(); + } + + /* + * Remove MI spells specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIspells = function( charCS, MIname, MIrow, MIrowID, spellType, spellList, spellValues ) { + + let SpellsTable = [], + removeList = [], + spellQty, r, c, altSpellRow, i=0, spellRows, spellCols, +// attrName = fields.MIspellPrefix[0]+(MIname.replace(/\s/g,'-'))+'-'+(spellType.toLowerCase())+'+'+MIrowID, + altSpellTable = getLvlTable( charCS, fieldGroups.ALTWIZ, fields.MIspellLevel ); + + const base = shapeSpellbook( charCS, 'MI' )[1].base; + + { // Block created to restrict scope of spellRCobj + + let spellRCobj = miSpellLookup( charCS, MIname, MIrow, MIrowID, [fields.MIspellPrefix[0],null] ); + + if (!spellRCobj) return undefined; + + spellRows = spellRCobj.get(fields.MIspellRows[1]).split(','); + spellCols = spellRCobj.get(fields.MIspellCols[1]).split(','); + removeList.push(spellRCobj); + } + + spellValues = spellValues.split(','); + spellList = spellList.split(','); + while (spellRows.length > 0 && spellCols.length > 0) { + r = spellRows.shift(); + c = spellCols.shift(); + if (!_.isUndefined(r) && !_.isUndefined(c) && parseInt(c) >= 0) { + altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c-base); + if (_.isUndefined(SpellsTable[c])) { + SpellsTable[c] = getTable( charCS, fieldGroups.SPELLS, c ); + } + spellQty = SpellsTable[c].tableLookup( fields.Spells_castValue, r ); + spellValues[i] = (spellQty <= 0 ? 0 : (SpellsTable[c].tableLookup(fields.Spells_storedLevel, r))) + + '.' + (SpellsTable[c].tableLookup( fields.Spells_miSpellSet, r )); + + SpellsTable[c].addTableRow( r ); + altSpellTable.addTableRow( altSpellRow ); + }; + i++; + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return spellValues.join(); + }; + + /* + * add or remove spells/powers listed in the parameters to + * the specified spell level table in the specified character sheet + */ + + const changeMIspells = function( charCS, MIname, miRow, miRowID, listType, action, spellList, spellValues = '' ) { + + + const isAdd = action.toUpperCase() == 'ADD'; + let altGroup, spellDB, + toDoList = spellList.toLowerCase().split(','), + spellTables = [], + level = fields.MIspellLevel, + levelSpells = shapeSpellbook( charCS, 'MI' ), + valueList; + + if (!isAdd) { + valueList = removeMIspells( charCS, MIname, miRow, miRowID, listType, spellList, spellValues ); + if (!_.isUndefined(valueList)) return valueList; + } + + spellList = spellList.split(','); + MIname = MIname.hyphened(); + + let indexPrefix = fields.MIspellPrefix[0]+MIname+'-'+(listType.toLowerCase())+'+'+miRowID; + valueList = spellValues ? spellValues.split(',') : []; + + switch (listType.toUpperCase()) { + case 'MU': + spellDB = fields.MU_SpellsDB; + altGroup = fieldGroups.ALTWIZ; + break; + case 'PR': + spellDB = fields.PR_SpellsDB; + altGroup = fieldGroups.ALTPRI; + break; + case 'POWER': + case 'PW': + spellDB = fields.PowersDB; + level = fields.MIpowerLevel; + indexPrefix = fields.MIpowerPrefix[0]+MIname+'+'+miRowID; + levelSpells = shapeSpellbook( charCS, 'MIPOWER' ); + altGroup = fields.GameVersion === 'AD&D1e' ? fieldGroups.ALTPWR : undefined; + break; + default: + sendError('Invalid list type '+listType+' at changeMIspells'); + return; + } + let w, c, r, valueItem, spellHyphen, spellName, spellQty, altSpellTable, + rows = [], + cols = []; + for (let lv=1; lv < levelSpells.length; lv++) { + if (altGroup) altSpellTable = getLvlTable( charCS, altGroup, (level+lv-1) ); + r = 0; + do { + c = levelSpells[lv].base; + w = 1; + do { + if (!spellTables[w]) { + spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); + } + spellName = spellTables[w].tableLookup( fields.Spells_name, r, false ); + if (isAdd && (_.isUndefined(spellName) || spellName === '-')) { + spellName = spellList.shift() || ''; + spellHyphen = '-'+spellName.hyphened(); +// log('changeMIspells: at shift, valueList = '+valueList); + valueItem = (valueList.shift() || '').split('.'); + if (listType === 'POWER') { + setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'current'], r ); + setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'max'], c ); + } + rows.push(r); + cols.push(c); + spellTables[w] = setSpell( charCS, spellTables[w], altSpellTable, spellDB, spellName, r, w-1, lv, 0, spellName, valueItem ); + } else if (!_.isUndefined(spellName) && !isAdd && ((valueItem = toDoList.indexOf(spellName.toLowerCase())) >= 0)) { + toDoList[valueItem] = ''; + spellList.splice(spellList.indexOf(spellName),1); + spellQty = spellTables[w].tableLookup( fields.Spells_castValue, r ); + valueList[valueItem] = (spellQty <= 0 ? 0 : (spellTables[w].tableLookup(fields.Spells_storedLevel, r))) + + '.' + (spellTables[w].tableLookup( fields.Spells_miSpellSet, r )); + spellTables[w].addTableRow(r); + } + c++; + w++; + } while ((w <= fields.SpellsCols) && !_.isUndefined(spellName) && (spellList && spellList.length)); + r++; + } while (!_.isUndefined(spellName) && (spellList && spellList.length)); + setAttr( charCS, [fields.MISpellNo_table[0] + lv + fields.MISpellNo_memable[0],fields.MISpellNo_memable[1]], Math.max(spellTables.reduce((s,w) => s+w.sortKeys.length, 0),levelSpells[lv].spells) ); + if (!spellList || !spellList.length) break; + spellTables = []; + } + setAttr( charCS, [indexPrefix,fields.MIspellRows[1]], rows.join(',') ); + setAttr( charCS, [indexPrefix,fields.MIspellCols[1]], cols.join(',') ); + if (isAdd) { + if (spellList && spellList.length>0) { + sendError(charCS.get('name')+'\'s Character Sheet storage not large enough to save all '+listType+' magic item spells'); + } + return spellValues; + } else { + return valueList.join(); + } + }; + + /* + * handle removing and adding magic item spells and powers + * from their defining lists + * Usually used when picking up or putting away a magic item + */ + + var moveMIspells = function( senderId, fromCS, fromIndex, fromRowID, toCS, toIndex, toRowID, itemName='', type='ALL', del=true ) { + + return new Promise(resolve => { + + try { + + const moveSpell = function( type, listField, valuesField, indexField, removeList ) { + let spellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [listField[0], null] ), + spellList = (!!spellObj ? (spellObj.get(listField[1]) || '') : ''), + spellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, valuesField ), + spellIndex = miSpellLookup( oldCS, MIname, oldIndex, oldID, [indexField[0],null], type ); + + if (spellList.length) { + let miSpellValues; + if (!notFrom && toCS) setAttr( toCS, [listField[0]+MIname+'+'+toRowID, listField[1]], spellList ); + setAttr( oldCS, [valuesField[0]+MIname+'+'+oldID, valuesField[1]], (miSpellValues = notFrom ? spellValues : (type !== 'PW' ? changeMIspells( fromCS, itemName, fromIndex, fromRowID, type, 'REMOVE', spellList, spellValues) : removeMIpowers( fromCS, itemName, fromIndex, fromRowID, spellList, spellValues )))); + if (toCS) { + if (spellbook) { + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellRows[1]], Array(spellList.split(',').length).fill(0).map((x,i)=>i).join() ); + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellCols[1]], Array(spellList.split(',').length).fill(-1).join() ); + } else { +// log('moveSpell: calling changeMIspells to add to MI, with list '+spellList+' and values '+miSpellValues); + setAttr( toCS, [valuesField[0]+MIname+'+'+toRowID, valuesField[1]], changeMIspells( toCS, itemName, toIndex, toRowID, type, 'ADD', spellList, miSpellValues )); + } + } + } + if (!update && del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { + if (!!spellObj) removeList.push(spellObj); + if (!!spellIndex) removeList.push(spellIndex); + } + return removeList; + }; + + const MIobj = getAbility( fields.MagicItemDB, itemName, toCS, true, null, null, fromIndex, fromRowID ), + notFrom = !fromCS && !!toCS, + update = (!!fromCS && !!toCS && (fromCS.id === toCS.id)), + MIname = itemName.hyphened(), + doMU = type === 'MU' || type === 'ALL', + doPR = type === 'PR' || type === 'ALL', + doPW = type === 'PW' || type === 'ALL', + spellbook = MIobj.obj && MIobj.obj[1] && reCastViewMIspellCmd.test(MIobj.obj[1].body) && !reCastMIspellCmd.test(MIobj.obj[1].body); + +// log('moveMIspells: spellbook = '+spellbook+', cast button = '+reCastMIspellCmd.test(MIobj.obj[1].body)); + + let oldCS = fromCS, + oldIndex = fromIndex, + oldID = fromRowID, + removeList = []; + + var error = false; + + if (notFrom || update) { + if (!MIobj.obj) { + sendDebug('moveMIspells: can\'t find item '+MIname+' in any database'); + throw 'Invalid spell storing item specified'; + } + addMIspells( toCS, MIobj.obj[1], toRowID ); + oldCS = toCS; + oldIndex = toIndex; + oldID = toRowID; + } + + if (doMU) removeList = moveSpell( 'mu', fields.ItemMUspellsList, fields.ItemMUspellValues, fields.MIspellPrefix, removeList ); + if (doPR) removeList = moveSpell( 'pr', fields.ItemPRspellsList, fields.ItemPRspellValues, fields.MIspellPrefix, removeList ); + if (doPW) removeList = moveSpell( 'pw', fields.ItemPowersList, fields.ItemPowerValues, fields.MIpowerPrefix, removeList ); + + const queries = (resolveData(itemName,fields.MagicItemDB,reItemData,(fromCS || toCS),{query:reClassSpecs.query}).parsed.query || '').split('$$'); + if (queries && queries.length && itemName && !notFrom && !update && !isNaN(fromIndex)) { + let varObj, toField; + _.each( queries, q => { + toField = [fields.ItemVar[0]+MIname+'+'+toRowID+'-'+q.split('=')[0],fields.ItemVar[1]]; + if (toCS && !isNaN(toIndex)) setAttr( toCS, toField, (miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], fields.ItemVar ) || '') ); + if (!_.isUndefined(varObj = miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], [fields.ItemVar[0],null], '', '', false ))) removeList.push(varObj); + }); + }; + _.each(removeList.filter(r => !!r),r => setTimeout( () => r.remove(), 1000)); + + } catch (e) { + log('MagicMaster moveMIspells: '+e.name+': '+e.message+' while processing item '+itemName); + sendDebug('MagicMaster moveMIspells: '+e.name+': '+e.message+' while processing item '+itemName); + sendCatchError('MagicMaster',msg_orig[senderId],e); + error = true; + + } finally { + setTimeout(() => { + resolve(error); + }, 5); + } + }); + }; + + /* + * Check an item to see if it is a "bag" that can contain + * other items. If so, check to see if the "bag" character sheet + * has been created yet, and if it needs to be filled with initial + * items. + */ + + const checkForBag = function( charCS, miName, row ) { + + let itemRow, rowID, table; + + [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); + + const bag = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {bag:reSpellSpecs.bag,store:reSpellSpecs.store}, {row:itemRow, rowID:rowID} ); + if (!bag.parsed.bag) return; + + let bagCS = findObjs({ type:"character", name:miName }); + const bagData = parseInt(bag.parsed.bag); + const itemSpecs = {name:reSpellSpecs.name, + trueName:reSpellSpecs.trueName, + speed:reSpellSpecs.speed, + qty:reSpellSpecs.qty, + spell:reSpellSpecs.type, + type:reSpellSpecs.recharge, + trueType:reSpellSpecs.trueType || reSpellSpecs.type || 'uncharged', + reveal:reSpellSpecs.reveal, + cost:reSpellSpecs.cost, + }; + + if (!bagCS || !bagCS.length) { + + bagCS = createObj( "character", + {name:miName, + avatar: design.bag_icon, + inplayerjournals:(charCS.get("inplayerjournals") || ''), + controlledby:charCS.get("controlledby")}); + setAttr( bagCS, fields.Race, 'Magic Item' ); + + if (bagData > 0) { + let Items = getTableGroup( bagCS, fieldGroups.MI ), + itemClass, itemData, itemObj, p; + let values; + setAttr( bagCS, fields.ItemContainerType, (bag.parsed.store !== 'nostore' ? '1' : '-1') ); + setAttr(charCS, fields.ItemOldContainerType, attrLookup(charCS, fields.ItemContainerType)); + setAttr( bagCS, fields.ItemContainerSize, Math.max( fields.MIRowsStandard, bagData )); + _.each( bag.raw, item => { + itemClass = 'GEAR'; + itemData = parseData( item[0], itemSpecs, false, charCS, miName, itemRow, rowID ); + if ((itemData.spell || '').toUpperCase() != 'MI') return; + itemObj = abilityLookup( fields.MagicItemDB, (itemData.trueName || itemData.name), charCS ); + if (itemObj.obj) { + itemData.speed = itemData.speed || itemObj.obj[1].ct; + itemData.type = itemData.type || itemObj.obj[1].charge; + itemClass = getItemTable( itemObj.obj[1].type ) || 'GEAR'; + } + p = Items[itemClass].fieldGroup; + values = initValues( p ); + + values.valLine(p,'name',itemData.name) + .valLine(p,'trueName',(itemData.trueName || itemData.name)) + .valLine(p,'speed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'trueSpeed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'qty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'trueQty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'cost',evalAttr(itemData.cost,charCS) || 0) + .valLine(p,'type',itemData.type || 'uncharged') + .valLine(p,'trueType',itemData.trueType || itemData.type || 'uncharged') + .valLine(p,'reveal',itemData.reveal || ''); + + Items[itemClass].addTableRow( NaN, values ); + }); + } else { + setAttr( bagCS, fields.ItemContainerType, '0' ); + setAttr(charCS, fields.ItemOldContainerType, '0'); + setAttr( bagCS, fields.ItemContainerSize, fields.MIRowsStandard ); + } + } else { + bagCS = bagCS[0]; + bagCS.set({inplayerjournals:(charCS.get("inplayerjournals") || ''), controlledby:charCS.get("controlledby")}); + } + return; + } + + /** + * Remove a magic item ability object from a character sheet if + * it no longer exists in the equipment list + **/ + + const removeMIability = function( charCS, itemName, Items, table ) { + + if (!Items.tableFind( fields[fieldGroups[table].prefix+'name'], itemName ) && !Items.tableFind( fields[fieldGroups[table].prefix+'trueName'], itemName )) { + let MIobjs = filterObjs( obj => { + if (obj.get('_type') !== 'ability' && obj.get('_type') !== 'attribute') return false; + if (obj.get('_characterid') !== charCS.id) return false; + return ((obj.get('name') || '') === itemName || (obj.get('name') || '').startsWith(fields.ItemVar[0]+itemName.hyphened())); + }); + if (MIobjs) _.each(MIobjs,MIobj => MIobj.remove()); + } + } + + /** + * Parse a data item query statement and return the parsed version. + **/ + + const parseQuery = function( query ) { + query = (query || '').split('$$').map(q => { + switch (q) { + case 'weaponMagic': q = 'weaponMagic=How magical is this weapon?|+0%%0//0|-4%%-4/Cursed/1700|-3%%-3/Cursed/1350|-2%%-2/Cursed/900|-1%%-1/Cursed/450|0%%0//0|+1%%1//500|+2%%2//1000|+3%%3//1500|+4%%4//2000|+5%%5//3000'; break; + case 'weaponPlus': q = 'weaponPlus=How magical is this weapon?|+0%%0//0|+1%%1//500|+2%%2//1000|+3%%3//1500|+4%%4//2000|+5%%5//3000'; break; + case 'weaponCurse': q = 'weaponCurse=How cursed is this weapon?|-0%%0/Cursed/0|-1%%-1/Cursed/450|-2%%-2/Cursed/900|-3%%-3/Cursed/1350|-4%%-4/Cursed/1700'; break; + case 'swordType': q = 'swordType=What type of sword?|Bastard-Sword%%M/S/6/1d8/1d12/M/S/8/2d4/2d8/Long-Blade/10|Broadsword%%M/S/5/2d4/1+1d6/M/S/5/2d4/1+1d6/Long-Blade/4|Khopesh%%M/S/9/2d4/1d6/M/S/9/2d4/1d6/Medium-Blade/7|Longsword%%M/S/5/1d8/1d12/M/S/5/1d8/1d12/Long-Blade/4|Rapier%%M/P/4/1+1d6/1+1d8/M/P/4/1d8/1d8/Fencing-Blade/4|Sabre%%M/S/5/1d8/1d8/M/S/5/1d8/1d8/Fencing-Blade/5|Scimitar%%M/S/5/1d8/1d8/M/S/5/1d8/1d8/Long-Blade/4|Shortsword%%S/P/3/1d6/1d8/S/P/3/1d6/1d8/Short-Blade/3|Two-Handed-Sword%%L/S/10/0/0/L/S/10/1d10/3d6/Long-Blade/15]'; break; + default: break; + } + return q; + }).join('$$'); + let queries = (query || '').replace(/\)/g,'\\rpar;').replace(/\|(.+?)%%/g,'|$1,$1/').replace(/=/g,'=?{').replace(/\$\$/g,'}|'); + if (queries.length) queries += '}'; + return queries; + }; + + /* + * Do the minimal parsing of a "pick:" or "put:" command and + * then send it to chat on a timeout + */ + + const pickPutCmd = function( cmd, tokenID, charCS, who ) { + + setTimeout(() => sendAPI( cmd.replace(/,/g,',') + .replace(/[/g,'[') + .replace(/]/g,']') + .replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) + .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), + null, who), 2000); + }; + + /* + * Calculate the weight of the items in a container + */ + + const calcWeight = function( charCS, Items ) { + + let slotCount = 0, + totalWeight = 0.0, + totalEnc = 0.0, + totalQty = 0, + prefix, name, qty, tableWt, tableEnc, trueType, type, data, bagObj, bagData; + + if (!Items) Items = getTableGroup( charCS, fieldGroups.MI ); + + for (const table in Items) { + for (let i=0; i { + let errFlag = false, + count,qty,tableWt,tableEnc,encumbrance; + try { + let curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + baseMove = attrLookup( charCS, fields.BaseMove, {def:false} ), + name, trueType, type, data, move, moveMod, extra, weights, weightData; + + const oldEncumbrance = parseInt(attrLookup( charCS, fields.Encumbrance )) || 0; + + if (_.isUndefined(baseMove) || isNaN(baseMove) || !String(baseMove || '').length) { + const classObjs = classObjects( charCS, senderId, {move:reClassSpecs.move} ); + const classMove = classObjs.reduce( (a,o) => Math.max(a,(parseInt(o.classData.move) || 0)), 0 ); + const raceMove = (resolveData( (attrLookup( charCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, charCS, {move:reClassSpecs.move} ).parsed.move || 12); + setAttr( charCS, fields.BaseMove, Math.max(classMove,raceMove) ); +// log('itemSlotData: raceMove = '+raceMove+', classMove = '+classMove); + } + + if (calc || !String(attrLookup( charCS, fields.Weight_total ) || '').length) { + weightData = calcWeight( charCS, Items ); + tableWt = weightData.weight; + tableEnc = weightData.encumberWt; + count = weightData.count; + qty = weightData.qty; + + setAttr( charCS, fields.Equip_total, 'Total Weight' ); + setAttr( charCS, fields.Equip_totalWeight, tableWt); + setAttr( charCS, fields.Equip_encumberWeight, tableEnc ); + setAttr( charCS, fields.Equip_totalFlag, 1 ); + setAttr( charCS, fields.Weight_total, tableWt ); + setAttr( charCS, fields.Weight_encumbrance, tableEnc); + setAttr( charCS, fields.Weight_count, count); + setAttr( charCS, fields.Weight_qty, qty); + } else { + tableWt = attrLookup( charCS, fields.Weight_total ); + tableEnc = attrLookup( charCS, fields.Weight_encumbrance ); + count = attrLookup( charCS, fields.Weight_count ); + qty = attrLookup( charCS, fields.Weight_qty ); + }; + + let strength = attrLookup( charCS, fields.Strength, {def:false} ); + // log('itemSlotData: strength = '+strength+', flag = '+state.MagicMaster.encumbrance+', Encumbrance stored field = '+attrLookup( charCS, fields.Encumbrance )); + if (state.MagicMaster.encumbrance && !_.isUndefined(strength)) { + const parsedStr = strength.match(/(\d+)(?:[\(\[](\d+)[\)\]])?/) || [null,null]; + strength = parseInt(parsedStr[1]); + extra = parseInt(parsedStr[2]); + if (!isNaN(extra)) { + extra = Math.min(99,Math.max(0,extra)); + weights = encumberDef.stepsExt[encumberDef.exceptional.findIndex(e => e >= extra)]; + } else if (!isNaN(strength)) { + strength = Math.min(25,strength); + weights = encumberDef.stepsStr[encumberDef.strengths.findIndex(s => s >= strength)]; + } + // log('itemSlotData: strength = '+strength+', extra = '+extra+', weights = '+weights); + if (!_.isUndefined(weights)) { + for (encumbrance = 0; encumbrance < 5 && tableEnc > weights[encumbrance]; encumbrance++ ); + // log('itemSlotData: encumbrance = '+encumbrance+', current weight = '+tableEnc+', max weight = '+weights[encumbrance]); + setAttr( charCS, fields.Weight_forStr, weights.join() ); + setAttr( charCS, fields.Weight_label, encumberDef.labels[encumbrance].dispName() ); + setAttr( charCS, fields.Weight_ACmod, encumberDef.ac[encumbrance] ); + baseMove = attrLookup( charCS, fields.BaseMove ); +// let moves = encumberDef.moves[encumberDef.moves.findIndex(m => m[0] >= baseMove)]; +// move = parseInt(encumbrance < 5 ? (moves[encumbrance] || 12) : 0); + move = Math.round(baseMove*([1,2/3,1/2,1/3,1/baseMove,0][encumbrance])); + moveMod = attrLookup( charCS, fields.MoveMod ) || ''; + move = parseFloat(evalAttr(moveMod[0] === '=' ? moveMod.slice(1) : (isNaN(moveMod[0]) ? (move + moveMod) : (move+'+'+moveMod) ), charCS)); +// log('itemSlotData: moveMod = '+moveMod+', move = '+move); + if ((Math.ceil(move) !== Math.ceil(parseFloat(attrLookup( charCS, fields.Move )))) || (encumbrance !== (parseInt(attrLookup( charCS, fields.Encumbrance )) || 99))) { + if (encumbrance === 0) { + if (oldEncumbrance !== 0) sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + } else { + sendAPI( fields.roundMaster+' --addTargetStatus '+tokenID+'|Encumbrance|$'+(encumbrance+90)+'|0|'+curToken.get('name')+' is '+encumberDef.labels[encumbrance]+' and has a move of '+move+'|'+encumberDef.marker[encumbrance], senderId ); + }; + setAttr( charCS, fields.Encumbrance, encumbrance ); + setAttr( charCS, fields.Move, move ); + }; + }; + } else if (!state.MagicMaster.encumbrance && (attrLookup( charCS, fields.Encumbrance ) != 0)) { + // log('itemSlotData: flag is false but encumbered so removing status'); + setAttr( charCS, fields.Encumbrance, 0 ); + sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + }; + // log('itemSlotData: returning with count '+count+', weight '+Math.ceil(tableWt)+', encumberWt '+Math.ceil(tableEnc)); + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve({errorFlag:errFlag,count:count,qty:qty,weight:Math.ceil(tableWt),encumberWt:Math.ceil(tableEnc),encumberNum:encumbrance}); + }, 10); + } + }); + }; + + /** + * Reset the chosen flags of the Items table + **/ + + const clearItemSelection = function( charCS, Items=undefined ) { + if (_.isUndefined(Items)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + }; + let [indexes,tables] = tableGroupFind( Items, 'chosen', '1', true, true ); + if (_.isUndefined(indexes)) return Items; + for (let i=0; i a.concat(b[2].dbName().split('|')), []) : [], + superTypes = !!specs ? specs.reduce((a,b) => a.concat(b[4].dbName().split('|')), []) : []; + let types = miClasses.filter(itemClass => _.isUndefined(miTypeLists[itemClass.dbName()]) || !(['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type))); + + if (!types || !types.length) { + types = miClasses.filter(itemClass => ['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type)) || ['miscellaneous']; + } + types = types.concat(miClasses,superTypes); + + return (!bannedList.length && !allowedList.length) || (!bannedList.some(b => types.includes(b.dbName())) && (!allowedList.length || allowedList.some(a => types.includes(a.dbName())))); + } + + /* + * Create a list of Magic Items in an MI bag, able + * to be used to select one from. A flag determines + * whether empty slots '-' are included + */ + + const makeMIlist = function( charCS, senderId, includeEmpty=true, disable0=true, showTypes=false, showMagic=true, putCS, buy=false, refuse='' ) { // type + + return new Promise(resolve => { + + try { + + const bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'); + let mi, qty, rows, maxSize, specs, carried, + cost, miObj, type, zeroOK, + slotsUsed = 0, + lastSlot = -1, + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + types = []; + + var miList = '', + miText; + + if (_.isUndefined(putCS)) putCS = charCS; + + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'qty' ); + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'carried' ); + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'cost' ); + maxSize = attrLookup( charCS, fields.ItemContainerSize ) || fields.MIRows; + buy = !!buy; + + for (const table in Items) { + rows = ((Items[table] && Items[table].sortKeys) ? Items[table].table[1]+Items[table].sortKeys.length : 0); + for (let i=0; i 0 && (includeEmpty || mi != '-') && (!buy || cost !== 0) && (showMagic || !type.includes('magic'))) { + zeroOK = (type.includes('selfchargeable') || type.includes('absorbing') || type.includes('recharging')); + if (!disable0 || zeroOK || qty > 0) { + if (!buy && showTypes && miObj.obj) miText = getShownType( miObj, i ); + if (mi != '-') slotsUsed++; + if (!buy || canBuyOrSell( miObj, bannedMI, allowedMI )) miList += '|' + qty + ' ' + miText + ',' + lastSlot; + } + } + } + } + } + lastSlot++; + if (lastSlot < maxSize && lastSlot < fields.MIRows && includeEmpty) { + miList += '|0 -,'+lastSlot; + } + if (!lastSlot) { + miList += '|0 -,'+lastSlot; + } + } catch (e) { + log('MagicMaster makeMIlist: JavaScript '+e.name+': '+e.message+' while listing MI '+miText); + sendDebug('MagicMaster makeMIlist: JavaScript '+e.name+': '+e.message+' while listing MI '+miText); + sendCatchError('MagicMaster',msg_orig[senderId],e); + miList = ''; + + } finally { + setTimeout(() => { + resolve(miList); + }, 5); + } + }); + } + + /* + * Create buttons to select Magic Item slots from. Highlight + * any button with the index of MIrowref. A flag determines + * whether empty slots '-' are included. + */ + + const makeMIbuttons = function( tokenID, senderId, miField, qtyField, cmd, extension='', MIrowref=-1, disable0=true, includeEmpty=false, showTypes=false, showMagic=true, pickID, putID, buy='', refuse='', sectNo=2 ) { + +// Note: if buy is true or has a string value, disable0 refers to cost rather than quantity (zero quantity is always not shown if buy is true). This ensures all owned goods can be sold. + + return new Promise(resolve => { + + try { + + const charCS = getCharacter(tokenID), + pickCS = !_.isUndefined(pickID) ? getCharacter(pickID) : charCS, + putCS = !_.isUndefined(putID) ? getCharacter(putID) : charCS, + isView = extension == 'viewMI', + isGM = playerIsGM(senderId), + Items = getTableGroup( pickCS, fieldGroups.MI ), + rows = _.reduce(Items,(r,i) => r+((i && i.sortKeys) ? i.sortKeys.length : 0),0), + maxSize = attrLookup( pickCS, fields.ItemContainerSize ) || fields.MIRowsStandard, + bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), + playerConfig = getSetPlayerConfig( senderId ), + sheetVer = csVer(pickCS), + sections = {POTIONS:{n:0,name:'**Potions**'}, + DUSTS:{n:1,name:'**Dusts**'}, + WANDS:{n:2,name:'**Rings, Rods, Staves & Wands**'}, + SCROLLS:{n:3,name:'**Scrolls & Books**'}, + GEAR:{n:4,name:'**Weapons, Armour & Gear**'}, + MISC:{n:5,name:'**Miscellaneous**'}, + TREASURE:{n:6,name:'**Treasure**'}, + COINS:{n:7,name:'**Coins**'}}; + let buttonNo = 0, + rowNo = -1, + slotsUsed = 0, + renamed, miObj, + qty, maxQty, mi, miText, type, makeGrey, i, + sectHead, buttonCount, blankAvailable, + ItemsTable, trueMI, carried, cost, zeroOK, + changedMI, miClass, types, highlight, selected, + hide, reveal, action, extIsAbility, prefix; + + var content = ''; + + if (isView) extension = ''; + buy = !!buy; + + for (const table in Items) { + + if (sheetVer > 3.9 && playerConfig.sections !== false) { + sectHead = '}}{{Section'+(sectNo+sections[table].n)+'=' + + (pickID && pickID.length ? (' _All_(!magic --button '+ cmd +'|'+ tokenID +'|'+ table + extension + ') ') : '') + + sections[table].name+'\n'; + } else if (rowNo >= 0) { + sectHead = '\n'; + } else { + sectHead = '}}{{Section'+sectNo+'='; + }; + buttonCount = buttonNo; + blankAvailable = false; + for (let i=0; i 0 && (includeEmpty || mi != '-')) { + miObj = abilityLookup( fields.MagicItemDB, mi, pickCS, true ); + renamed = !miObj.dB.toLowerCase().includes('-db'); + changedMI = renamed ? 'Display-'+mi : mi; + miClass = !miObj.obj ? 'miscellaneous' : getShownType( miObj, i, resolveData( trueMI, fields.MagicItemDB, reItemData, pickCS, {itemType:reSpellSpecs.itemType}, {row:i, rowID:Items[table].rowID(i)} ).parsed.itemType ); +// types = ['-']; + makeGrey = makeGrey || (!showMagic && (!miObj.obj || miObj.obj[1].type.toLowerCase().includes('magic'))) + || (buy && !canBuyOrSell( miObj, bannedMI, allowedMI )); + if (!buy && showTypes && miObj.obj) { + miText = miClass; + if (!['charged','uncharged','splitable','cursed','change-last','change-each','changing','cursed+change-last','discharging','cursed+discharging','single'].includes(type)) { + qty = Math.min(qty,1); + } + } + selected = rowNo == MIrowref; + highlight = ItemsTable.tableLookup( fields[prefix+'chosen'], i ) == 1; + content += sectHead; + content += selected ? ('') : (makeGrey ? ('') : '['); + content += highlight ? ('') : ''; + content += (mi != '-' ? (qty + ((qty != maxQty && isGM) ? '/'+maxQty : '') + ' ' + miText.replace(/\-/g,' ')) : '-'); + if (mi != '-') slotsUsed++; + extIsAbility = isView && mi.replace(reIgnore,'').length; + if (extIsAbility) { + if (ItemsTable.tableLookup( fields[prefix+'reveal'], i ) == 'view') mi = trueMI; + hide = !miObj.obj ? '' : resolveData( mi, fields.MagicItemDB, reItemData, pickCS, {hide:reSpellSpecs.hide}, {row:i, rowID:Items[table].rowID(i)} ).parsed.hide; + reveal = (mi !== trueMI) && !!miObj.obj && hide && hide.length && hide !== 'hide'; + miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, (reveal ? mi : trueMI), i, Items[table].rowID(i) ); + if (miObj.obj) miObj = greyOutButtons( tokenID, pickCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(sheetVer < 4 ? '' : '@{selected|'+fields.ItemRowRef[0]+'}')+')') ); + extension = ' '+(miObj.api ? '' : sendToWho(charCS,senderId,false,true))+' %{'+miObj.dB+'|'+changedMI.hyphened()+'} !'; + } else { + miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, trueMI, i, Items[table].rowID(i) ); + action = ((!miObj.obj || !miObj.obj[0]) ? '' : (miObj.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); + if (renamed) { + setAbility( pickCS, changedMI, action ); + } else if (!!action && action.length) { + miObj.obj[0].set('action',action); + } + } + content += (selected || makeGrey) ? '' : ((highlight ? '' : '')+('](!'+(!extIsAbility ? '' : extension)+'magic --button '+ cmd +'|'+ tokenID +'|'+ rowNo + (!extIsAbility ? extension : '')+')')); + buttonNo++; + sectHead = ''; + }; + }; + if (rows < maxSize && rows < fields.MIRows && includeEmpty && !blankAvailable) { + content += sectHead; + content += '[-](!magic --button ADD_MIROW|'+ cmd +'|'+ tokenID +'|'+ (rowNo+1) +'|'+ table + (!isView ? extension : '') + ')'; + }; + + }; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + content = ''; + + } finally { + setTimeout(() => { + resolve(content); + }, 5); + } + }); + } + + /* + * Create a menu line for the number of spells the caster + * can have memorised at a particular spell level. + */ + + const makeNumberOfSpells = function( curToken, spellType, level, totalSpells ) { + + const charCS = getCharacter(curToken.id); + let content = curToken.get('name') + ' can memorise '; + + if (spellType == 'MI') { + content += 'these spells in magic items'; + } else { + content += '[[ [['+totalSpells+']]'; + if (spellType == 'MU') { + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0) : 0; + content += '['+spellsAtLevel+' at level '+level+',+'+spellsSpecialist+' specialist, +'+spellsMisc+' misc]'; + } else { + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = parseInt(attrLookup(charCS,fields.Wisdom)||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0) : 0; + content += '['+spellsAtLevel+' at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom+', + '+spellsMisc+' misc]'; + } + content += ' ]] spells at level '+level; + } + return content; + } + + /* + * Create a menu line for the number of spells the caster + * can have memorised at a particular spell level, where the + * number can be edited.. + */ + + const makeEditNumberOfSpells = function( args, spellType, totalSpells ) { + + const mngSpellsCmd = args[0], + tokenID = args[1], + level = args[2], + curToken = getObj('graphic',tokenID); + let content = curToken.get('name') + ' can memorise '; + + if (spellType == 'MI') { + content += 'these spells in this magic item'; + } else if (!state.MagicMaster.spellRules.strictNum) { + content += '['+totalSpells+'](!magic --button '+BT.EDIT_NOSPELLS+'|'+tokenID+'|'+spellType+'|'+level+'|'+mngSpellsCmd+') spells at level '+level; + } else { + content = makeNumberOfSpells( curToken, spellType, level, totalSpells ); + } + return content; + } + + /* + * Create a menu to edit the number of misc spells for + * a particular spell class and level + */ + + const makeMiscSpellsEdit = function( args, senderId ) { + + const tokenID = args[1], + spellClass = args[2], + level = args[3], + mngSpellsCmd = args[4], + charCS = getCharacter(tokenID); + let spellsMisc, spellsTotal, + content = '&{template:'+fields.messageTemplate+'}{{name=Edit Level '+level+' Misc Spells}}' + + '{{desc=Here\'s how '+getObj('graphic',tokenID).get('name')+' total '+spellClass+' spells are determined. ' + + 'You can adjust the Miscellaneous number by clicking on it and specifying a different value}}{{desc1='; + + if (spellClass == 'MU') { + const spellsAtLevel = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + spellsMisc = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0); + spellsTotal = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_total[0],fields.MUSpellNo_total[1]])||0); + content += spellsAtLevel+' MU spells at level '+level+', + '+spellsSpecialist+' specialist'; + } else { + const spellsAtLevel = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = (attrLookup(charCS,fields.Wisdom)||0); + spellsMisc = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0); + spellsTotal = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_total[0],fields.PRSpellNo_total[1]])||0); + content += spellsAtLevel+' PR spells at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom; + } + content += ', + ['+spellsMisc+' misc](!magic --button '+BT.MISC_SPELL+'|'+tokenID+'|'+spellClass+'|'+level+'|?{How many miscellaneous spells?|'+spellsMisc+'}|'+mngSpellsCmd+')' + + ' = '+spellsTotal+' total}}{{desc2=[Return to spells menu](!magic --button '+(spellClass=='PR' ? BT.EDIT_PRSPELLS : BT.EDIT_MUSPELLS)+'|'+tokenID+'|'+level+'|-1|-1||1)}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + + /* + * Check if an item stores spells and, if it does, return the + * spell row and column arrays, and the number of live spells + */ + + const getStoredSpells = function( charCS, miName, miRow, miRowID ) { + const spellbook = miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemMUspellsList ).split(',').filter(s=>!!s); + let spellTables = {}; + let spellCount = 0; + let rows = []; + let cols = []; + rows.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'pr' ) || '')); + cols.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'pr' ) || '')); + rows = rows.join().split(',').filter(r=>!!r); + cols = cols.join().split(',').filter(c=>!!c); + if (cols[0] && parseInt(cols[0]) < 0) { + spellCount = spellbook.length; + } else if (rows.length && cols.length) { + cols.forEach( (c,i) => { + if (_.isUndefined(spellTables[c])) spellTables[c] = getTableField( charCS, {}, fields.Spells_table, fields.Spells_castValue, c ); + spellCount += parseInt((spellTables[c].tableLookup( fields.Spells_castValue, rows[i] )),10); + }); + }; + return {count:spellCount,rows:rows,cols:cols,spellbook:spellbook}; + }; + + /* + * Make a list of spells in the specified memorised/stored list + */ + + const makeSpellList = function( senderId, tokenID, command, selectedButton, noDash = false, submitted = false, extension = '', maxLevel = 13 ) { + + const isMU = command.toUpperCase().includes('MU'), // toWho + isPR = command.toUpperCase().includes('PR'), + isMI = command.toUpperCase().includes('MI'), + isPower = command.toUpperCase().includes('POWER'), + isView = command.toUpperCase().includes('VIEW'), + isScroll = command.toUpperCase().includes('SCROLL'), + miStore = command.includes('MI_SLOT'), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID), + miName = (attrLookup( charCS, fields.ItemChosen ) || '-').hyphened(), + MIbag = getTableGroup( charCS, fieldGroups.MI ), + oldVer = 2.1 > csVer(charCS); + + let content = '', + viewCmd = '', + buttonID = 0, + buttonList = [], + spell, spellType, spellName, + magicDB, table, + miRow = attrLookup( charCS, fields.ItemRowRef ) || '', + toWho = sendToWho(charCS,senderId,false,true), + spellTables = [], + spellLevels = 0, + learnData = '', + learn = false, + rows = [], cols = [], + miRowID, isExtAbility; + + [miRow,table,miRowID] = tableGroupIndex( MIbag, miRow ); + + if (isPower && isMI) { + spellType = 'MIPOWER'; + viewCmd = BT.VIEWMEM_MI_POWERS; + buttonList = 'EmptyList,' + miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemPowersList ) || ''; + buttonList = buttonList.dbName().split(','); + } else if (isPower) { + spellType = 'POWER'; + viewCmd = BT.VIEWMEM_POWERS; + } else if (isMI) { + spellType = 'MI'; + viewCmd = isScroll ? BT.VIEWMEM_MI_SCROLL : BT.VIEWMEM_MI_SPELLS; + buttonList = 'EmptyList,' + miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemMUspellsList ) || ''; + buttonList += ',' + miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemPRspellsList ) || ''; + buttonList = buttonList.dbName().split(','); + if (caster(charCS,'MU').clv > 0) { + if (abilityLookup( fields.MagicItemDB, miName, charCS ).obj) learnData = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:miRow, rowID:miRowID} ).parsed.learn; + learn = (learnData && learnData != '0' && (!isScroll || !isView)); + }; + + // see if can build an item-specific spell list... + + let storedSpells = getStoredSpells( charCS, miName, miRow, miRowID ); + rows = storedSpells.rows; + cols = storedSpells.cols; + const isSB = parseInt(cols[0]) < 0; + let learnText, spellDB, spellValue, disabled; + if (rows.length && cols.length) { + _.each( cols, (c,k) => { + let r = rows[k]; + if (!isSB && _.isUndefined(spellTables[c])) spellTables[c] = getTable( charCS, fieldGroups.SPELLS, c ); + let spellMsg = !isSB ? spellTables[c].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ) : ''; + if (miStore) spellName = spellMsg; else spellName = !isSB ? spellTables[c].tableLookup( fields.Spells_name, r ) : storedSpells.spellbook[r]; + spellDB = !isSB ? (spellTables[c].tableLookup( fields.Spells_db, r ) || fields.MU_SpellsDB) : fields.MU_SpellsDB; + spellValue = !isSB ? parseInt((spellTables[c].tableLookup( fields.Spells_castValue, r )),10) : 1; + disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); + if (!disabled) spellLevels = spellLevels + (isSB ? 1 : (parseInt(spellTables[c].tableLookup( fields.Spells_spellLevel, r )) || 1)); + if (!noDash || spellName !== '-') { + let renamed = !abilityLookup( spellDB, spellName ), + changedSpell = renamed ? 'Display-'+spellName : spellName; + spell = getAbility( spellDB, spellName, charCS ); + if (!!spell.obj) { + if (isView) { + spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c + extension +')') ); + } else { + let action = ((!spell.obj || !spell.obj[1]) ? '' : (spell.obj[1].body || '')).replace(reKeepButton,'[$2]($3$4'); + if (learn) action = action.replace(/\}\}\s*$/m,('}}{{Learn=Try to [Learn this spell]\lpar;\api;magic ~~learn-spell '+tokenID+'¦'+(learnData != 1 ? learnData : spellName)+'\rpar;}}')); + spell.obj[0] = setAbility( charCS, changedSpell, action ); + spell.dB = charCS.get('name'); + }; + }; + content += (buttonID == selectedButton ? '' : ((submitted || disabled) ? '' : '[')); + content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + (spellName || '-'); + content += ((buttonID == selectedButton) || submitted || disabled) ? '' : ('](!'+(!isView ? '' : ' '+toWho+'%{' + spell.dB + '|' + changedSpell.hyphened() + '} !') + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + extension +')'); + } + buttonID++; + }); + return [content,spellLevels]; + }; + } else if (!isMU) { + spellType = 'PR'; + viewCmd = BT.VIEWMEM_PRSPELLS; + magicDB = fields.PR_SpellsDB; + } else { + spellType = 'MU'; + viewCmd = BT.VIEWMEM_MUSPELLS; + magicDB = fields.MU_SpellsDB; + } + + // build the Spell list + let levelSpells = shapeSpellbook( charCS, spellType ); + + for (let lv = 1; lv < levelSpells.length; lv++) { + let r = 0; + if (levelSpells[lv].spells > 0) { + if (lv != 1 ) + {content += '\n';} + if (!isPower) + {content += makeNumberOfSpells(curToken,spellType,lv,levelSpells[lv].spells)+'\n';} + } + while (levelSpells[lv].spells > 0) { + let c = levelSpells[lv].base, + buttonIndex; + for (let w = 1; (w <= fields.SpellsCols) && (levelSpells[lv].spells > 0); w++) { + if (_.isUndefined(spellTables[w])) { + spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); + } + let spellMsg = spellTables[w].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ); + if (miStore) spellName = spellMsg.hyphened(); + else spellName = spellTables[w].tableLookup( fields.Spells_name, r ).hyphened(); + if (_.isUndefined(spellName)) { + levelSpells[lv].spells = 0; + break; + } + if (spellName.trim().length && (!buttonList.length || (buttonIndex = buttonList.indexOf(spellMsg.dbName())) != -1)) { + if (buttonList.length) buttonList.splice(buttonIndex,1); + spellLevels = spellLevels + (parseInt(spellTables[w].tableLookup( fields.Spells_spellLevel, r )) || 1); + let spellValue = parseInt((spellTables[w].tableLookup( fields.Spells_castValue, r )),10), + disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); + if (!noDash || spellName != '-') { + isExtAbility = isView && spellName.replace(reIgnore,'').length; + if (isExtAbility) { + magicDB = spellTables[w].tableLookup( fields.Spells_db,r ); + if (!magicDB || magicDB == spellName) { + magicDB = findPower(charCS,spellName).dB; + spellTables[w] = spellTables[w].tableSet( fields.Spells_db,r,magicDB ); + } + let renamed = !abilityLookup( magicDB, spellName ), + changedSpell = renamed ? 'Display-'+spellName : spellName; + spell = abilityLookup( magicDB, spellName, charCS ); + if (!!spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c +')') ); + extension = ` ${toWho}%{${spell.dB}|${changedSpell}} !`; + } + content += (buttonID == selectedButton ? '' : ((submitted || disabled || (lv > maxLevel)) ? '' : '[')); + content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + spellName.dispName(); + content += (((buttonID == selectedButton) || submitted || disabled || (lv > maxLevel)) ? '' : '](!' + (!isExtAbility ? '' : extension) + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + (isExtAbility ? '' : extension) +')'); + } + } + buttonID++; + c++; + levelSpells[lv].spells--; + } + r++; + } + spellTables = []; + } + return [content,spellLevels]; + } + + /* + * Create a menu for a player to manage their spell list. + */ + + const makeManageSpellsMenu = function( args, senderId, msg ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isSpell = cmd.includes('SPELL'), + isScroll = cmd.includes('SCROLL'), + isView = cmd.includes('REVIEW'), + isGM = args[0].includes('GM'), + tokenID = args[1], + spellRow = args[3], + spellCol = args[4], + spellToMemorise = args[5] || '', + singleLevel = (args[7] || '').dbName() === 'single', + selectedSpell = (spellToMemorise.length > 0), + selectedSlot = (spellRow >= 0 && spellCol >= 0), + selectedBoth = selectedSpell && selectedSlot, + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let level = parseInt((args[2]),10), + spellToDisplay = spellToMemorise, + levelSpells; + + if (!curToken || !charCS) { + sendError('Internal MagicMaster parameter error'); + return; + } + + let spell, + noToMemorise = '1', + magicWord = 'spell', + spellTables = [], + magicDB, magicType, tableType, + editCmd, reviewCmd, memCmd, + levelLimit; + + if (isPower) { + level = 1; + levelLimit = 1; + magicType = isMI ? 'MIPOWER' : 'POWER'; + tableType = magicWord = 'power'; + editCmd = isMI ? BT.EDIT_MIPOWERS : BT.EDIT_POWERS; + memCmd = isMI ? BT.MEM_MIPOWER : BT.MEM_POWER; + spell = findPower( charCS, spellToMemorise ); + spellToDisplay = spell.name; + magicDB = spell.dB; + noToMemorise = '?{How many per day (-1=unlimited)}'; + } else if (isMU) { + levelLimit = 9; + magicType = 'MU'; + tableType = 'Wizard Spellbook'; + editCmd = BT.EDIT_MUSPELLS; + memCmd = BT.MEM_MUSPELL; + magicDB = fields.MU_SpellsDB; + } else { + levelLimit = 7; + magicType = 'PR'; + tableType = 'Priest Spellbook'; + editCmd = BT.EDIT_PRSPELLS; + memCmd = BT.MEM_PRSPELL; + magicDB = fields.PR_SpellsDB; + } + + if (isMI) { + if (isGM) { + reviewCmd = 'GM-MImenu'; + } else if (isPower) { + reviewCmd = (isView ? BT.VIEWMEM_MI_POWERS : BT.EDIT_MIPOWERS); + } else if (isMU) { + reviewCmd = (isView ? BT.VIEWMEM_MI_MUSPELLS : BT.EDIT_MIMUSPELLS); + } else if (isPR) { + reviewCmd = (isView ? BT.VIEWMEM_MI_PRSPELLS : BT.EDIT_MIPRSPELLS); + } else if (isSpell) { + reviewCmd = (isView ? BT.VIEWMEM_MI_SPELLS : BT.EDIT_MISPELLS); + } else if (isScroll) { + reviewCmd = (isView ? BT.VIEWMEM_MI_SCROLL : BT.EDIT_MISPELLS); + } else { + reviewCmd = (isView ? BT.VIEW_MI : (args[0].includes('MARTIAL') ? BT.CHOOSE_MARTIAL_MI : (args[0].includes('ALLITEMS') ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI))); + } + } else if (isPower) { + reviewCmd = (isView ? BT.VIEWMEM_POWERS : BT.EDIT_POWERS); + } else if (isMU) { + reviewCmd = (isView ? BT.VIEWMEM_MUSPELLS : BT.EDIT_MUSPELLS); + } else { + reviewCmd = (isView ? BT.VIEWMEM_PRSPELLS : BT.EDIT_PRSPELLS); + } + + levelSpells = shapeSpellbook( charCS, magicType ); + + const spellbook = attrLookup( charCS, [fields.Spellbook[0]+((fields.SpellsFirstColNum || levelSpells[level].book != 1) ? levelSpells[level].book : ''), fields.Spellbook[1]] ) || ''; + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Slot to Use in '+curToken.get('name')+'\'s '+tableType+'s}}' + + ((isPower) ? ('{{subtitle=All Powers -1 means "At Will"}}') : ('{{subtitle=Level '+level+' spells}}')); + + if (msg && msg.length > 0) { + content += '{{='+msg+'}}'; + } + + content += '{{desc=1. [Choose](!magic --button '+editCmd+'|'+tokenID+'|'+level+'|'+spellRow+'|'+spellCol+'|?{'+magicWord+' to memorise|'+spellbook+'}) '+magicWord+' to memorise
'; + + if (selectedSpell) { + let renamed = !abilityLookup( magicDB, spellToDisplay ), + changedSpell = renamed ? 'Display-'+spellToDisplay : spellToDisplay; + spell = getAbility( magicDB, spellToDisplay, charCS ); + if (spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+level +'|'+ spellRow +'|'+ spellCol +'|'+spellToMemorise+')') ); + content += '...Optionally [Review '+spellToDisplay+'](! '+sendToWho(charCS,senderId,false,true)+'%{'+spell.dB+'|'+changedSpell.hyphened()+'})}}'; + } else { + content += '...Optionally Review the '+magicWord+'}}'; + } + content += '{{desc1=2. Choose slot to use\n' + + (isPower ? '' : (makeEditNumberOfSpells(args,magicType,levelSpells[level].spells)))+'\n'; + + // build the Spell list + + let w, c, r = 0; + let spellName, spellValue, selected; + while (levelSpells[level].spells > 0) { + c = levelSpells[level].base; + for (w = 1; (w <= fields.SpellsCols) && (levelSpells[level].spells > 0); w++) { + if (!spellTables[w]) { + spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); + } + selected = (r == spellRow && c == spellCol); + spellName = spellTables[w].tableLookup( fields.Spells_name, r, false ); + if (_.isUndefined(spellName)) spellTables[w].addTableRow( r ); + if (!spellName) spellName = '-'; + spellValue = parseInt((spellTables[w].tableLookup( fields.Spells_castValue, r )),10); + content += (selected ? ('') : ('['+(spellValue == 0 ? ('') : ''))); + if (isPower && spellName != '-') { + content += spellValue + ' '; + } + content += spellName; + content += (selected || spellValue == 0 ? '' : ''); + content += (!selected ? ('](!magic --button ' + editCmd + '|' + tokenID + '|' + level + '|' + r + '|' + c + '|' + spellToMemorise + ')') : ''); + c++; + levelSpells[level].spells--; + } + r++; + spellTables = []; + } + + const nextLevel = (level >= levelLimit) ? 1 : ((levelSpells[(level+1)].spells>0) ? (level+1) : 1); + const slotSpell = !selectedSlot ? '' : attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || ''; + + content += '}}{{desc2=...Then\n' + + '3. '+(selectedBoth ? '[' : '') + + 'Memorise '+(selectedSpell ? spellToDisplay : ' the '+magicWord ) + + (!selectedBoth ? '' : ('](!magic --button '+memCmd+'|'+tokenID+'|'+level+'|'+spellRow+'|'+spellCol+'|'+spellToMemorise+'|'+noToMemorise+')'))+'\n' + + (isPower ? (!isMI ? 'or [Memorise all valid Powers](!magic --button '+BT.MEMALL_POWERS+'|'+tokenID+'|1|-1|-1||)\n' : '') : (singleLevel ? '' : '4. When ready [Go to Level '+nextLevel+'](!magic --button '+editCmd+'|'+tokenID+'|'+nextLevel+'|-1|-1|)\n')) + + 'Or just do something else anytime\n\n' + + + 'Or ' + (selectedSlot ? '[' : ('')) + + 'Remove '+slotSpell + + (!selectedSlot ? ' the' : ('](!magic --button '+memCmd+'|'+tokenID+'|'+level+'|'+spellRow+'|'+spellCol+'|-|0)') )+' '+magicWord+'}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + + /* + * Make a menu to store spells in a Magic Item from the caster's + * own memorised spells. + */ + + const makeStoreMIspell = function(args,senderId,msg = '') { // isAny + + let command = (args[0] || '').toUpperCase(), + tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const isMU = command.includes('MU'), + isMI = command.includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)], + item = attrLookup( charCS, fields.ItemChosen ) || '-', + row = attrLookup( charCS, fields.ItemRowRef ) || '', + itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + wisLevel = casterLevel( charCS, (isMU ? 'MU' : 'PR') ), + oldVer = 2.1 > csVer(charCS), + tokenName = curToken.get('name'); + + let MIbutton = args[(isMI ? 2 : 5)], + isAdd = command.includes('ADD'), + isAny = command.includes('ANY') || (isAdd && MIbutton < 0), + isChange = command.includes('CHANGE'), + spellName = 'spell', + MIspellName = '', + levelLimit = false, + table, itemRow, rowID; + + let extra = isAdd ? '_ADD' : (isAny ? '_ANY' : ''); + + [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); + + if (!itemObj.obj) { + sendError('Item '+item+' not found. Unable to store spells in this item.'); + return; + } else { + let itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,rowID); + const storeSpells = (itemData.store || 'store').toLowerCase(); + isAdd = isAdd || storeSpells === 'add'; + isChange = isChange || storeSpells === 'change'; + isAny = isAny || (storeSpells === 'any' || (isAdd && MIbutton < 0)); + levelLimit = itemData.lvlimit == 1; + }; + + let memSpells, storedSpells, storedLevels, itemQty = 99; + + [storedSpells,storedLevels] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_MI_SLOT : BT.PR_MI_SLOT)+extra, MIbutton, !isAny, false, ('|'+spellButton+'|'+spellRow+'|'+spellCol) ); + if (levelLimit) { + if (!isNaN(parseInt(itemRow))) itemQty = parseInt(getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueQty'] ).tableLookup( fields[fieldGroups[table].prefix+'trueQty'], itemRow )) || 99; + } + [memSpells] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_TO_STORE : BT.PR_TO_STORE)+extra, spellButton, true, false, ('|'+MIbutton+'|'+MIrow+'|'+MIcol), (itemQty - storedLevels) ); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spell in '+tokenName+'\'s Magic Items}}' + + '{{subtitle=Storing ' + (isMU ? 'MU' : 'PR') + ' spells}}' + + '{{desc=**1.Choose a spell to store**\n'+memSpells+'}}' + + '{{desc1=**2.'+(isAny ? 'Optionally c' : 'C')+'hoose where to store it**\n'+(storedSpells || 'No spells currently stored')+'}}'; + + if (spellButton >= 0) { + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; + } + if (MIbutton >= 0) { + MIspellName = attrLookup( charCS, (oldVer ? fields.Spells_macro : fields.Spells_msg), {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; + if ((isAdd || isAny) && MIspellName === '-') MIbutton = -1; + } + let canStore = isAny || isChange || (isAdd && MIspellName === '-') || (spellName.dbName() == MIspellName.dbName()), + itemRef = (isNaN(parseInt(itemRow)) ? item : itemRow+'/'+item); + + content += '{{desc2=3.Once both spell and '+(isAny ? 'optionally ' : '')+'slot selected\n' + + ((canStore && (spellButton >= 0) && (isAdd || isAny || MIbutton >= 0)) ? '[' : '') + + ((isAdd || isAny) && MIbutton < 0 ? 'Add ' : 'Store ')+spellName + + ((canStore && (spellButton >= 0)) ? (((isAdd || isAny) && MIbutton<0) ? ('](!magic --button ADD_TO_SPELLS|'+tokenID+'|'+itemRef+'|'+command+'|1|STORE-MI-SPELL|'+spellName+'|'+wisLevel+'||'+MIspellName+'|'+spellRow+'|'+spellCol+')') + : ('](!magic --button '+(isMU ? BT.MISTORE_MUSPELL : BT.MISTORE_PRSPELL)+extra+'|'+tokenID+'|'+MIbutton+'|'+MIrow+'|'+MIcol+'|'+spellButton+'|'+spellRow+'|'+spellCol+')')) + : '') + + ((spellButton >= 0 && MIbutton >= 0 && !canStore) ? ' Spells don\'t match. Must be the same\n' : '') + + ' or switch to ['+(isMU ? 'Priest' : 'Wizard')+'](!magic --mem-spell MI-'+(isMU ? 'PR' : 'MU')+extra+'|'+tokenID+') spells' + + '}}'; + if (msg.length) { + content += '{{='+msg+'}}'; + } + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + + /* + * Create a menu for a player to cast a spell + */ + + const makeCastSpellMenu = function( args, senderId, submitted = false ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + tokenID = args[1], + spellButton = args[2], + spellRow = args[3], + spellCol = args[4], + charged = (args[5] || '').toString().toLowerCase() == 'true', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!curToken || !charCS) { + sendError('Internal MagicMaster parameter error'); + return; + } + + const miName = attrLookup( charCS, fields.ItemChosen ) || '', + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let magicDB, + magicWord = 'spell', + spell, + spellName = '', + maxLevel = 13, + learn = false, + learnText = '', + selectCmd, + storeCmd, + itemRow = parseInt(attrLookup( charCS, fields.ItemRowRef )), + itemTable, + itemRowID; + + [itemRow,itemTable,itemRowID] = tableGroupIndex( Items, itemRow ); + if (isNaN(itemRow)) { + [itemRow,itemTable,itemRowID] = tableGroupFind( Items, 'name', miName ); + }; + + let tokenName = curToken.get('name'); + let content = '&{template:'+fields.menuTemplate+'}{{name='; + if (!isPower) {content += 'What Spell is ' + tokenName + ' casting?}}{{subtitle=Casting '}; + + if (isPower) { + content += 'What Power is ' + tokenName + ' using?}}{{subtitle=Using Powers'; + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.PowersDB;} + magicWord = 'power'; + selectCmd = isMI ? BT.MI_POWER : BT.POWER; + storeCmd = isMI ? BT.CAST_MIPOWER : BT.USE_POWER; + } else if (isMI) { + content += 'MI stored spells'; + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.MU_SpellsDB;} + selectCmd = charged ? BT.MI_SCROLL : BT.MI_SPELL; + storeCmd = charged ? BT.CAST_SCROLL : BT.CAST_MISPELL; + if (caster(charCS,'MU').clv > 0) { + let miObj = abilityLookup( fields.MagicItemDB, miName, charCS ); + if (miObj.obj) learn = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:itemRow, rowID:itemRowID} ).parsed.learn == 1; + }; + } else if (isMU) { + content += 'MU spells'; + magicDB = fields.MU_SpellsDB; + selectCmd = BT.MU_SPELL; + storeCmd = BT.CAST_MUSPELL; + } else { + content += 'PR spells'; + magicDB = fields.PR_SpellsDB; + selectCmd = BT.PR_SPELL; + storeCmd = BT.CAST_PRSPELL; + } + + if (!isPower && !isMI && charged) { + if (miName) { + if (!_.isUndefined(itemRow) && !isNaN(itemRow)) { + maxLevel = parseInt(getTableField( charCS, {}, fieldGroups[itemTable].tableDef, fields[fieldGroups[itemTable].prefix+'qty'] ).tableLookup( fields[fieldGroups[itemTable].prefix+'qty'], itemRow )) || 0; + } + } + } + + content += '}}{{section=' + (makeSpellList( senderId, tokenID, selectCmd, spellButton, true, submitted, '|'+charged, maxLevel )[0]); + + if (spellButton >= 0) { + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; + if (spellName.replace(reIgnore,'').length) { + spell = getAbility( magicDB, spellName, charCS ); + learnText = (learn ? '{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+spellName+')}}' : ''); + } else { + spellButton = -1; + } + } + content += '}}{{'+(((spellButton < 0) || submitted)?'section1':'highlight1')+'=Select '+magicWord+' above, then ' + + (((spellButton < 0) || submitted) ? '' : '[') + + 'Cast '+(spellName.length > 0 ? spellName : magicWord) + + (((spellButton < 0) || submitted) ? '' : '](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + spellName.hyphened() + '}' + learnText + ' ' + + '!magic --button '+ storeCmd +'|'+ tokenID +'|'+ spellButton +'|'+ spellRow +'|'+ spellCol +'|'+ charged + ')') + + '}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + /* + * Create a menu for a player to view a character's spells + */ + + const makeViewMemSpells = function( args, senderId ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isScroll = cmd.includes('SCROLL'), + tokenID = args[1], + spellButton = args[2], + learn = (String(args[3]) || '').toUpperCase() === 'LEARN', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let magicWord = 'spell', + magicDB, magicType, tableType, + viewCmd, + levelLimit; + + if (!charCS) { + sendError('Internal MagicMaster parameter error'); + return; + } + + const title = isMI ? attrLookup( charCS, fields.ItemChosen ) : curToken.get('name'); + if (isPower) { + levelLimit = 1; + magicType = 'POWER'; + tableType = 'Powers'; + magicWord = 'power'; + viewCmd = isMI ? BT.VIEW_MI_POWER : BT.VIEW_POWER; + magicDB = fields.PowersDB; + } else if (isMI && !(isMU || isPR)) { + levelLimit = 9; + tableType = 'Magic Item Spells'; + viewCmd = isScroll ? BT.VIEW_MI_SCROLL : BT.VIEW_MI_SPELL; + } else if (isMU) { + levelLimit = 9; + magicType = 'MU'; + tableType = (isMI ? 'Magic Item ' : '')+'Wizard Spells'; + viewCmd = !isMI ? BT.VIEW_MUSPELL : (isScroll ? BT.VIEW_MI_MUSCROLL : BT.VIEW_MI_MUSPELL); + magicDB = fields.MU_SpellsDB; + } else { + levelLimit = 7; + magicType = 'PR'; + tableType = (isMI ? 'Magic Item ' : '')+'Priest Spells'; + viewCmd = !isMI ? BT.VIEW_PRSPELL : (isScroll ? BT.VIEW_MI_PRSCROLL : BT.VIEW_MI_PRSPELL); + magicDB = fields.PR_SpellsDB; + } + + let content = '&{template:'+fields.menuTemplate+'}{{name=View '+title+'\'s currently memorised '+magicWord+'s}}' + + '{{subtitle=' + tableType + '}}' + + '{{desc=' + ((makeSpellList( senderId, tokenID, viewCmd, spellButton, true ))[0] || 'No '+magicWord+'s currently memorised') + + '}}{{desc1=Select the '+magicWord+' above that you want to view the details of. It will not be cast and will remain in your memorised '+magicWord+' list.}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + }; + + /* + * Make a one button menu to ask the player + * if they want to cast the same spell/power/MI again + */ + + const makeCastAgainMenu = function( args, senderId ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + spellName = args[5] || '-', + charCS = getCharacter( args[1] ); + + if (charCS) { + const macroDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : (isPR ? fields.PR_SpellsDB : fields.MagicItemDB)), + spell = getAbility( macroDB, spellName, charCS ), + content = '&{template:'+fields.menuTemplate+'}{{name='+args[5]+'}}' + + '{{desc=[Use another charge?](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + (args[5].hyphened()) + '} ' + + '!magic --button '+ args[0] +'|'+ args[1] +'|'+ args[2] +'|'+ args[3] +'|'+ args[4]+ ')}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, args[1] ); + } + return; + } + + /* + * Create a short menu to ask the player to select between + * a short or a long rest. The long rest option can be shown + * as disabled. + */ + + const makeRestSelectMenu = function( args, longRestEnabled, senderId ) { + + const tokenID = args[0], + casterType = args[2] || 'MU+PR', + charCS = getCharacter(tokenID), + curToken = getObj('graphic',tokenID); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Type of Rest for '+curToken.get('name')+'}}' + + '{{desc=[Short Rest](!magic --rest '+tokenID+'|short|'+casterType+') or ' + + (longRestEnabled ? '[' : '') + + 'Long Rest' + + (longRestEnabled ? ('](!magic --rest '+tokenID+'|long|'+casterType+'|1)') : '') + + '}}'; + + if (!longRestEnabled) { + content += '{{ =It looks like the DM has not enabled Long Rests.\n[Try Again](!magic --rest '+tokenID+'|SELECT|'+args[2]+') once the DM says it is enabled}}'; + } + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + + /** + * Create a version of Pick or Put for coins, jewels and other treasure + * Allow the player to switch from one to the other when looting + **/ + + const makeLootMenu = function(senderId,args,menuType) { + + const buy = (args[0] || '') === BT.BUY_TREASURE, + tokenID = args[1], + pickID = args[3], + putID = args[4], + pickCS = getCharacter( pickID ), + putCS = getCharacter( putID ); + + if (!pickCS || !putCS) { + sendError( 'Invalid make-menu call syntax' ); + return; + } + + const pickName = pickCS.get('name'), + treasure = (attrLookup( pickCS, fields.Money_treasure ) || ''); + + let content = '&{template:'+fields.menuTemplate+'}{{name=View Treasure from ' + pickName + '}}'; + + if (treasure && treasure.length > 0) { + content += treasure; + } else { + content += '{{desc=There is nothing else to be found here}}'; + } + + content += '{{desc1=Make a note of this. This is in addition to any treasure items that can be picked up.}}'; + content += '{{desc2=When ready [View Lootable Items](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP)+'|'+tokenID+'|'+pickID+'|'+putID+') or do something else.}}'; + + return content; + }; + + /* + * Create a menu to view or use a magic item + */ + + async function makeViewUseMI( args, senderId, menuType ) { + + try { + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = args[2] || -1, + isGM = playerIsGM(senderId), + isView = action.includes('VIEW'), + charCS = getCharacter(tokenID), + playerConfig = getSetPlayerConfig( senderId ); + + let sectType; + + if (!charCS) { + sendError( 'Invalid make-menu call syntax' ); + return; + } + + if (!menuType) { + if (playerConfig) { + sectType = (playerConfig.sections !== false ? 'Hide' : 'Show'); + menuType = playerConfig.viewUseMIType || 'long'; + } else { + sectType = 'Hide'; + menuType = 'long'; + } + } + const shortMenu = menuType == 'short', + actionText = (isView ? 'View' : 'Use'), + selectAction = (isView ? (shortMenu ? BT.CHOOSE_VIEW_MI : BT.VIEW_MI) : BT.CHOOSE_USE_MI), + submitAction = (isView ? BT.VIEW_MI : BT.USE_MI), + Items = getTableGroup( charCS, fieldGroups.MI ); + + let content = '&{template:'+fields.menuTemplate+'}{{name='+actionText+' '+charCS.get('name')+'\'s Magic Items}}' + + '{{Section=Select a Magic Item below to '+actionText + + (isView ? '. It will not be used and will remain in your Magic Item Bag' : ', and then press the **Use Item** button') + + '. Note that some items, such as Rods, Staves or Wands, may need to be taken in-hand using *Change Weapon* and used via the *Attack* action.'; + if (!shortMenu) content += ' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+BT.CHOOSE_VIEW_MI +'|'+tokenID+'|'+MIrowref+')'; + content += '}}{{section0='; + + if (shortMenu) { + content += '[Select a Magic Item](!magic --button '+selectAction+'|'+tokenID+'|?{Which Magic Item?'; + content += await makeMIlist( charCS, senderId, false, !isView, false, isView ); + content +='}) }}'; + } else { + // build the character's visible MI Bag + content += await makeMIbuttons( tokenID, senderId, (isGM ? 'max' : 'current'), fields.Items_qty[1], selectAction, (isView ? 'viewMI' : ''), MIrowref, true, false, false, isView ); + content += '}}'; + } + if (shortMenu || !isView) { + if (MIrowref >= 0) { + content += '{{highlight=Select above then '; + let selectedMI = tableGroupLookup( Items, 'name', MIrowref ), + reveal = tableGroupLookup( Items, 'reveal', MIrowref ).toLowerCase(), + tableRow,tableRowID,table; + + const displayMI = selectedMI.dispName(), + trueMI = tableGroupLookup( Items, 'trueName', MIrowref ), + trueType = tableGroupLookup( Items, 'trueType', MIrowref ).toLowerCase(), + qty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0; + + [tableRow,table,tableRowID] = tableGroupIndex( Items, MIrowref ); + + if (chargedList.includes(trueType) && qty <= 1) reveal = 'use'; + + if ((shortMenu && isView && reveal == 'view') || (!isView && (reveal == 'use' || reveal == 'view'))) { + selectedMI = trueMI.hyphened(); + } + const hide = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {hide:reSpellSpecs.hide}, {row:tableRow, rowID:tableRowID} ).parsed.hide, + showDesc = (selectedMI !== trueMI) && hide && hide.length && hide !== 'hide', + renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj, + changedMI = renamed ? 'Display-'+selectedMI : selectedMI; + + let magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, false, isGM, (showDesc ? selectedMI : trueMI), tableRow, tableRowID ); + + if (isView && !!magicItem.obj) { + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+')') ); + } else if (magicItem.obj && magicItem.obj[1]) { + if (reKeepButton.test(magicItem.obj[1].body || '')) { + magicItem.obj[0] = setAbility( charCS, changedMI, (magicItem.obj[1].body || '').replace(reKeepButton,'[$2]($3$4') ); + magicItem.dB = charCS.get('name'); + if (caster(charCS,'MU').clv > 0) { + const learn = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:tableRow, rowID:tableRowID} ).parsed.learn; + if (learn && learn != '0' && learn != '1' && !!abilityLookup( fields.MU_SpellsDB, learn ).obj) { + magicItem.obj[0] = setAbility( charCS, changedMI, magicItem.obj[0].get('action').replace(/\}\}$/m,'}}'+'{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+learn+')}}')); + }; + }; + }; + }; + content += '['+actionText+' '+displayMI+'](! '+((magicItem.api && !isView) ? '' : sendToWho(charCS,senderId,false,true))+'%{'+magicItem.dB+'|'+(changedMI.hyphened())+'}' + +' !magic --button '+ submitAction +'|'+ tokenID +'|'+ MIrowref +')'; + } else { + content += '{{section10=Select above then
'+actionText+' Magic Item
'; + } + content += '}}'; + } + if (isView) { + const slotData = await itemSlotData( tokenID, Items, senderId, false ); +// log('makeViewUseMI: slotData = {{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'); + content += '{{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'; + } + menuType = (shortMenu ? 'long' : 'short'); + content += '{{section12= _Swap to '+menuType+' menu_(!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}' +// content += '{{section12=*Swap to '+menuType+' menu*}}' + +// [Swap to a '+menuType+' menu](!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + } + + /** + * Create the Edit Magic Item Bag menu. Allow for a short version if + * the Short Menus status flag is set, and highlight selected buttons + **/ + + async function makeEditBagMenu(args,senderId,msg='') { // magicItem + + try { + const cmd = (args[0] || '').toUpperCase(), + tokenID = args[1], + MIrowref = args[2], + itemName = args[3] || '', + charges = args[4], + selectedMI = itemName.hyphened(), + charCS = getCharacter( tokenID ), + cmdStr = args.join('|'); + + let displayMI = selectedMI, + alphaLists = state.MagicMaster.alphaLists, + tableIndex, tableRowID, table, + MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + + [tableIndex,table,tableRowID] = tableGroupIndex( MItables, MIrowref ); + + if (!charCS) { + sendError( 'Invalid MagicMaster argument' ); + return; + } + + const selected = !!selectedMI && selectedMI.length > 0, + remove = (selectedMI.toLowerCase() == 'remove'), + bagSlot = !!MIrowref && parseInt(MIrowref) >= 0, + playerConfig = getSetPlayerConfig( senderId ); + + let qty, mi, removeMI, sectType, menuType, + content = '&{template:'+fields.menuTemplate+'}{{name=Edit Magic Item Bag}}'; + + if (playerConfig) { + menuType = playerConfig.editBagType; + alphaLists = playerConfig.alphaLists; + sectType = (playerConfig.sections !== false ? 'hide' : 'show'); + } else { + menuType = 'long'; + sectType = 'hide'; + } + const shortMenu = menuType == 'short', + editMartial = cmd.includes('MARTIAL'), + editAll = cmd.includes('ALLITEMS'), + optionCmd = (editMartial ? BT.EDITMARTIAL_OPTION : (editAll ? BT.EDITALLITEMS_OPTION : BT.EDITMI_OPTION)), + chooseCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + redoCmd = (editMartial ? BT.REDO_MARTIAL_MI : (editAll ? BT.REDO_ALLITEMS_MI : BT.REDO_CHOOSE_MI)), + slotCmd = (editMartial ? BT.SLOT_MARTIAL_MI : (editAll ? BT.SLOT_ALLITEMS_MI : BT.SLOT_MI)), + storeCmd = (editMartial ? BT.STORE_MARTIAL_MI : (editAll ? BT.STORE_ALLITEMS_MI : BT.STORE_MI)), + reviewCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + removeCmd = (editMartial ? BT.REMOVE_MARTIAL_MI : (editAll ? BT.REMOVE_ALLITEMS_MI : BT.REMOVE_MI)); + let magicItem; + + if (selected && !remove) { + magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, null, null, null, tableIndex, tableRowID ); + if (!magicItem.obj) { + sendResponse( charCS, 'Can\'t find '+selectedMI+' in the Magic Item database', senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } else { + let renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj; + if (renamed) displayMI = 'Display-'+selectedMI; + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? displayMI : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+'|'+selectedMI+')') ); + }; + }; + + if (msg && msg.length>0) { + content += '{{ ='+msg+'}}'; + }; + + if (!shortMenu || !selected) { + const potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,'equipment',senderId,'',false,'',alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',alphaLists); + + content += '{{Section=**1.Choose what item to store** _show '+(alphaLists ? 'full' : 'alphabetic')+' lists_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|'+cmd+')\n' + + (editMartial ? '' : '[Potion](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Potion to store|'+potions+'}|'+charges+')') + + (editMartial ? '' : '[Scroll](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Scroll to store|'+scrolls+'}|'+charges+')') + + (editMartial ? '' : '[Rods, Staves, Wands](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Rod Staff Wand to store|'+rods+'}|'+charges+')') + + (!editMartial && !editAll ? '' : '[Weapon](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Weapon to store|'+weapons+'}|'+charges+')') + + (!editMartial && !editAll ? '' : '[Ammo](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Ammunition to store|'+ammo+'}|'+charges+')') + + (!editMartial && !editAll ? '' : '[Armour](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Armour to store|'+armour+'}|'+charges+')') + + (editMartial ? '' : '[Ring](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Ring to store|'+rings+'}|'+charges+')') + + (editMartial ? '' : '[Equipment](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Equipment to store|'+equip+'}|'+charges+')') + + (editMartial ? '' : '[Miscellaneous](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Misc Item to store|'+misc+'}|'+charges+')'); + if (shortMenu) { + content += '\n**OR**\n' + + '[Choose item to Remove](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|'+'Remove) from your MI bag}}' + + '{{desc2=[Swap to a long menu](!magic --button '+optionCmd+'|'+tokenID+'|'+(shortMenu ? 'long' : 'short')+')}}'; + } else { + content += '}}'; + } + } + if (bagSlot) { + qty = tableGroupLookup( MItables, 'qty', MIrowref ) || 0; + removeMI = tableGroupLookup( MItables, 'name', MIrowref ); + } + if (!shortMenu || (selected && !bagSlot)) { + content += '{{Section1='; + if (remove) { + content += '**1.Action chosen** ***Remove***, [click](!magic --button '+redoCmd+'|'+tokenID+'|'+MIrowref+') to change'+(shortMenu ? '}}{{Section2=' : '\n'); + content += '2.Select the item to **remove** '; + } else { + if (!selected) content += 'Select an Item above then\n'; + content += '**2.Select a slot to add it to** '+(!shortMenu ? ('_'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')') : '')+'\n'; + } + + if (shortMenu) { + content += '[Select slot](!magic --button '+slotCmd+'|'+tokenID+'|?{Which slot?'; + content += await makeMIlist( charCS, senderId, true, false ); + content +='}|'+selectedMI+')'; + } else { + content += await makeMIbuttons( tokenID, senderId, 'current', fields.Items_qty[1], slotCmd, '|'+selectedMI, MIrowref, false, true ); + } + + content += '}}'; + } else if (shortMenu && bagSlot) { + removeMI = mi = tableGroupLookup( MItables, 'name', MIrowref ); + + content += '{{Section1=**2.Selected** ['+qty+' '+mi+'](!magic --button '+slotCmd+'|'+tokenID+'|?{Which other slot?'; + content += await makeMIlist( charCS, senderId, true, false ); + content += '}|'+selectedMI+'|)' + + ' as slot to '+(remove ? 'remove' : 'store it in')+', click to change}}'; + } + if (!shortMenu || (selected && bagSlot)) { + + menuType = (shortMenu ? 'long' : 'short'); + content += '{{desc2=**3.'; + if (!remove) { + let queries = ''; + qty = String(qty)+'+1'; + if (selected) { + let chosenData = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:tableIndex, rowID:tableRowID} ).parsed; + qty = chosenData.qty || (selectedMI.trueCompare(removeMI) ? qty : 1); + queries = parseQuery( chosenData.query ); + } + + content += ((selected && bagSlot) ? '[' : ('')) + + 'Store '+itemName + + ((selected && bagSlot && !remove) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+MIrowref+'|'+selectedMI+'|?{Quantity?|'+qty+'}||'+queries+')') : '') + + ' in your MI Bag**'+(!!removeMI ? (', overwriting **'+removeMI) : '')+'**\n\n' + + 'or '; + + '\nOptionally, you can '+(selected ? '[' : '')+'Review '+itemName+(selected ? ('](! '+sendToWho(charCS,senderId,false,true)+'%{'+magicItem.dB+'|'+(displayMI.hyphened())+'})') : '')+''; + } + content += (bagSlot ? '[' : ('')) + + 'Remove '+(!!removeMI ? removeMI : 'item') + + (bagSlot ? ('](!magic --button '+removeCmd+'|'+tokenID+'|'+MIrowref+'|'+removeMI+')') : '') + + ' from your MI Bag\n\n' + + 'or [Swap to a '+menuType+' menu](!magic --button '+optionCmd+'|'+tokenID+'|'+menuType+')}}'; + } + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + } + + /* + * Create a menu for DMs to see displayed and real Magic Item information + * on Character Sheets. Hidden information can be what the MI really is, + * which the DM can set using this menu. + */ + + async function makeGMonlyMImenu(args, senderId, msg) { + + try { + const cmd = args[0], + tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID), + cmdStr = args.join('|'); + + let MItoStore = args[3]; + + const ensureUnique = function( Items, name ) { + var count = 1, + newName = name, + table,index; + do { + [index,table] = tableGroupFind( Items, 'name', newName ); + if (!_.isUndefined(index)) newName = name + String(count++); + } while (!_.isUndefined(index)); + return newName; + }; + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const config = getSetPlayerConfig( senderId ), + sectType = (config.sections !== false ? 'hide' : 'show'), + alphaLists = _.isUndefined(config.alphaLists) ? true : config.alphaLists, + potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',!!alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',!!alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',!!alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',!!alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',!!alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',!!alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',!!alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',!!alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,['equipment','light'],senderId,'',false,'',!!alphaLists), + treasure = getMagicList(fields.MagicItemDB,miTypeLists,'treasure',senderId,'',false,'',!!alphaLists), + coins = getMagicList(fields.MagicItemDB,miTypeLists,'coin',senderId,'',false,'',false), + gems = getMagicList(fields.MagicItemDB,miTypeLists,'gem',senderId,'',false,'',!!alphaLists), + services = getMagicList(fields.MagicItemDB,miTypeLists,'services',senderId,'',false,'',!!alphaLists), + dmitems = getMagicList(fields.MagicItemDB,miTypeLists,'dmitem',senderId,'',false,'',false); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Edit '+charCS.get('name')+'\'s Magic Item Bag}}' + + (msg && msg.length ? '{{ ='+msg+'}}' : '') + + '{{Section=[Add from DMG Treasure Tables](!cmd --addTreasure '+tokenID+'||1|gm-only-mi|)\nor}}' + + '{{Section1=**1. Choose something to store** _show '+(alphaLists ? 'complete' : 'alphabetic')+' list_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|GMONLY)\n' + + '[Potion](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Potion?|'+potions+'})' + + '[Scroll](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Scroll?|'+scrolls+'})' + + '[Rods, Staves, Wands](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Rod, Staff or Wand?|'+rods+'})' + + '[Weapon](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Weapon?|'+weapons+'})' + + '[Ammo](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ammo?|'+ammo+'})' + + '[Armour](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which piece of Armour?|'+armour+'})' + + '[Ring](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ring?|'+rings+'})' + + '[Miscellaneous MI](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Misc MI?|'+misc+'})' + + '[Equipment](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Equipment?|'+equip+'})' + + '[Treasure](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Treasure?|'+treasure+'})' + + '[Services](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Service?|'+services+'})' + + '[Coins](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Coin?|'+coins+'})' + + '[Gems](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Gem?|'+gems+'})' + + '[DM only list](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which DM only item?|'+dmitems+'})}}' + + '{{Section2=**2. Choose slot to edit or store in** _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')}}'; + + const Items = getTableGroup( charCS, fieldGroups.MI ), + slotName = (MIrowref >= 0) ? tableGroupLookup( Items, 'name', MIrowref ) : '', + slotActualName = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueName', MIrowref ) : '', + slotType = (MIrowref >= 0) ? tableGroupLookup( Items, 'type', MIrowref ) : '', +// slotTrueType = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueType', MIrowref ) : '', + slotQty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, + slotActualQty = parseInt(tableGroupLookup( Items, 'trueQty', MIrowref )) || 0, + slotCost = parseFloat(tableGroupLookup( Items, 'cost', MIrowref )) || 0, + slotReveal = (MIrowref >= 0) ? tableGroupLookup( Items, 'reveal', MIrowref ) : '', + slotCursed = slotType.toLowerCase().includes('cursed'), + + chosenMI = (MItoStore.length > 0), + chosenSlot = (MIrowref >= 0), + chosenBoth = (chosenMI && chosenSlot), + chosenEither = (chosenMI || chosenSlot), + hiddenMI = slotName !== slotActualName, + greyButton = '', + selectableSlot = chosenSlot ? '[' : greyButton, + selectableBoth = chosenBoth ? '[' : greyButton, + selectableEither = chosenEither ? '[' : greyButton, + hiddenSlot = hiddenMI ? '[' : greyButton, + revealType = (!slotReveal || slotReveal.toLowerCase() === 'manual' ? 'Manually' : ('on '+slotReveal)), + intelligence = Math.max( (parseInt(attrLookup( charCS, fields.Intelligence )) || 0), (parseInt(attrLookup( charCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( charCS, fields.HP )) || 0, + sentient = (intelligence > 0 && hp > 0), + showTypes = parseInt(attrLookup( charCS, fields.ItemContainerHide )); + + let hideAvail = chosenBoth, + hideableBoth = selectableBoth, + containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0, + containerSize = attrLookup( charCS, fields.ItemContainerSize ), + spellStoring = false, + looksLike = false, + queries = '', + chosenData, initQty, containerType, slotObj, itemObj, index, rowID, table; + + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + + // build the character's visible MI Bag + + content += await makeMIbuttons( tokenID, senderId, 'max', 'current', 'GM-MIslot', '|'+MItoStore, MIrowref, false, true, false, true, undefined, undefined, '', '', 3 ); + content += '}}'; + + if (hiddenMI) { + content += '{{desc2=**Which is hidden as**\n' + + '' + + (slotName != '-' ? (slotQty + ((slotQty != slotActualQty) ? '/'+slotQty : '') + ' ') : '') + slotName + + '}}'; + } + + if (chosenSlot) { + slotObj = getAbility( fields.MagicItemDB, slotActualName, charCS, false, true, slotActualName, index, rowID ); + if (!!slotObj.obj) { + spellStoring = reCastViewMIspellCmd.test(slotObj.obj[1].body) || reCastViewMIpowerCmd.test(slotObj.obj[1].body); + looksLike = reLooksLike.test(slotObj.obj[1].body); + if (looksLike && !hiddenMI && !chosenMI) { + MItoStore = ensureUnique( Items, getShownType( slotObj, MIrowref, resolveData( slotActualName, fields.MagicItemDB, reItemData, charCS, {itemType:reSpellSpecs.itemType}, {row:index, rowID:rowID} ).parsed.itemType )); + hideAvail = MItoStore !== slotName; + hideableBoth = hideAvail ? '[' : greyButton; + } + } + } + const storableSlot = (spellStoring && chosenSlot) ? '[' : ''; + + if (_.isUndefined(containerSize)) { + containerSize = fields.MIRowsStandard; + setAttr( charCS, fields.ItemContainerSize, containerSize ); + } + + if (containerNo < 4) { + if (hp <= 0 || !sentient) { + containerNo = 1; + } else { + containerNo = 3; + } + } + switch (containerNo) { + case 0: + case 1: + case 6: containerType = 'Inanimate Container'; + break; + case 2: + case 3: + case 7:containerType = 'Sentient Creature'; + break; + case 4: + case 5: containerType = 'Trapped container'; + break; + default:containerType = 'Empty Container'; + containerNo = 0; + break; + } + setAttr( charCS, fields.ItemContainerType, containerNo ); + setAttr(charCS, fields.ItemOldContainerType, containerNo); + + const itemName = MItoStore; + MItoStore = (MItoStore || '').hyphened(); + initQty = String(slotQty)+'+1'; + if (chosenMI) { + itemObj = getAbility( fields.MagicItemDB, MItoStore, charCS, false, true, MItoStore, index, rowID ); + if (itemObj.obj) { + chosenData = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:index, rowID:rowID} ); + initQty = chosenData.parsed.qty || (itemName.trueCompare(slotName) ? initQty : 1); + queries = parseQuery( chosenData.parsed.query ); + } + }; + const reviewItem = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotActualName : itemName), + renamed = !abilityLookup( fields.MagicItemDB, reviewItem ).obj, + changedItem = renamed ? 'Display-'+reviewItem : reviewItem; + + let reviewObj = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotObj : itemObj); + + if (!state.MagicMaster.viewActions && reviewObj && reviewObj.obj) reviewObj = greyOutButtons( tokenID, charCS, reviewObj, (renamed ? changedItem : ''), ('[Return to menu](!magic --button GM-MImenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') ); + + content += '{{desc3=**3. '+selectableBoth+(chosenBoth ? ('Store '+itemName+'](!magic --button GM-StoreMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|[[?{Quantity?|'+initQty+'}]]||'+queries+')') : ('Store'+(chosenSlot ? ('d '+slotActualName) : itemName)+''))+' **' + + ' or '+hideableBoth+(hideAvail ? ('Hide '+slotName+' as '+itemName+'](!magic --button GM-HideMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') : ((hiddenMI ? ('Hidden as '+slotName) : ('Hide Item'+(chosenMI?(' as '+itemName):'')))+''))+'
' + + ' or '+selectableEither+'Review'+(chosenEither ? (' '+reviewItem+'](! /w gm %{'+reviewObj.dB+'|'+(changedItem.hyphened())+'})') : ' the item')+'

}}' + + '{{desc4=1. Or select MI from above ^\n' + + '' + + '
' + + selectableSlot+'Rename '+slotName+(chosenSlot ? ('](!magic --button GM-RenameMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{What name should '+slotName+' now have?}) ') : ' ')+'
' + + selectableSlot+(!slotCursed ? 'Change Type' : 'Remove Curse')+(chosenSlot ? ('](!magic --button GM-ChangeMItype|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|'+(slotCursed ? 'removeCurse' : ('?{Currently '+slotType+'. What type should '+slotName+' now be?|charged|uncharged|splitable|recharging|rechargeable|selfchargeable|absorbing|discharging|cursed|cursed+charged|cursed+recharging|cursed+rechargeable|cursed+selfchargeable|cursed+absorbing|cursed+discharging}'))+') ') : ' ')+'
' + + selectableSlot+'Change displayed charges'+(chosenSlot ? ('](!magic --button GM-ChangeDispCharges|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many displayed charges should '+slotName+' now have (currently '+slotQty+')?|'+slotQty+'}) ') : ' ')+'
' + + selectableSlot+'Change actual charges'+(chosenSlot ? ('](!magic --button GM-ChangeActCharges|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many actual charges should '+slotActualName+' now have (currently '+slotActualQty+')?|'+slotActualQty+'}) ') : ' ')+'
' + + storableSlot+'Store Spells/Powers in MI'+((spellStoring && chosenSlot) ? ('](!magic --store-spells '+tokenID+'|'+MIrowref+'/'+slotActualName+'|||GM-EDIT-MI) ') : ' ')+'		'+hiddenSlot+'Reveal '+revealType+((hiddenMI && chosenSlot) ? ('](!magic --set-reveal '+tokenID+'|'+slotActualName+'|?{Currently '+revealType+'. How should '+slotActualName+' be revealed?|Manually by DM,|When viewed,View|When used,Use|On Long Rest,Rest}|'+MIrowref+'|MENU) ') : ' ')+'
' + + selectableSlot+(hiddenMI ? 'Reveal Now' : 'Reset Qty to Max')+(chosenSlot ? ('](!magic --button GM-ResetSingleMI|'+tokenID+'|'+MIrowref+') ') : ' ')+'
' + + selectableSlot+'Change Cost'+(chosenSlot ? ('](!magic --button GM-SetMIcost|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How much should '+slotName+' now cost (currently '+slotCost+'GP)?|'+slotCost+'})') : '')+'
' + + selectableSlot+'REMOVE MI'+(chosenSlot ? '](!magic --button GM-DelMI|'+tokenID+'|'+MIrowref+'|'+slotActualName+') ' : ' ')+'
}}' + + '{{desc5=['+containerSize+' slot](!magic --button GM-SetTokenSize|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many slots does this container have?|'+containerSize+'})' + + '['+containerType+'](!magic --button GM-SetTokenType|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{What type of token is this?|Untrapped Container,1|Trapped container,4|Force Inanimate Container,6|Force Sentient Creature,7})\n' + + '['+(showTypes ? 'Show as Item types' : 'Show as Item names')+'](!magic --button GM-HideAsTypes|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|'+showTypes+') in container. ' + + '[BLANK BAG](!magic --button GM-BlankBag|'+tokenID+')' + + '}}'; + + sendFeedback( content, flags.feedbackName, null, tokenID, charCS ); + return; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + } + + /* + * Create the DM's Edit Treasure menu + */ + + const makeEditTreasureMenu = function(args,senderId,msg) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const charName = charCS.get('name'), + treasure = attrLookup( charCS, fields.Money_treasure ) || '{{Treasure=None found}}'; + + let content = '&{template:'+fields.menuTemplate+'}{{name=Current treasure for '+charName+'}}' + + treasure +'{{=----- End of current Treasure ----}}' + + '{{desc1=[Add](!magic --button GM-AddTreasure|'+tokenID+'|?{Title for Treasure?}|?{Treasure text}) or ' + + '[Edit](!magic --button GM-EditTreasure|'+tokenID+') or ' + + '[Delete](!magic --button GM-DeleteTreasure|'+tokenID+') the treasure}}' + + '{{desc2=Return to [DM\'s Change MI menu](!magic --button GM-MImenu|'+tokenID+'|-1|)}}'; + if (msg && msg.length > 0) { + content += '{{desc='+msg+'}}'; + } + + sendFeedback(content,flags.feedbackName,tokenID,charCS); + return; + } + + /* + * Create a shorter, easier Pick or Put menu, that only does either + * Pick or Put (Player can switch between two), that uses a drop-down + * list of the MIs in the container to pick from (rather than buttons), and + * automatically selects an empty slot to put it into + */ + + async function makeShortPOPmenu( args, senderId, buy=false, menuType ) { + + try { + const tokenID = args[1], + pickID = args[3], + putID = args[4]; + let pickRow = args[2] || -1, + putRow = args[5] || -1; + + if (!pickID || !putID) { + sendError( 'Invalid make-menu call syntax' ); + return; + }; + + const putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ), + pickingUp = (tokenID == putID), + pickOrPut = (pickingUp ? (!buy ? 'Pick up' : 'Buy') : (!buy ? 'Put away' : 'Sell')), + charCS = getCharacter(tokenID), + traderCS = pickingUp ? pickCS : putCS, + isGM = playerIsGM(senderId), + sell = buy && tokenID === pickID, + reTrade = {nobuy:reClassSpecs.nobuy, nosell:reClassSpecs.nosell, tobuy:reClassSpecs.tobuy, tosell:reClassSpecs.tosell}; + + if (!putCS || !pickCS) { + sendError( 'Invalid make-menu call syntax' ); + return; + } + + buy = buy && !sell; + + const pickCmd = sell ? BT.SELL_PICK : (buy ? BT.BUY_PICK : BT.POP_PICK), + storeCmd = sell ? BT.SELL_STORE : (buy ? BT.BUY_STORE : BT.POP_STORE), + match = '['+((attrLookup( traderCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/i) || ['',''])[1]+']', + tradeParse = parseData(match, reTrade, false), + tradeClass = classObjects( traderCS, senderId, reTrade )[0].classData, + tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade, {defBase:false} ).parsed, + noTrade = buy ? (tradeParse.nosell || tradingRace.nosell || tradeClass.nosell) : (sell ? (tradeParse.nobuy || tradingRace.nobuy || tradeClass.nobuy) : ''), + toTrade = buy ? (tradeParse.tosell || tradingRace.tosell || tradeClass.tosell) : (sell ? (tradeParse.tobuy || tradingRace.tobuy || tradeClass.tobuy) : ''); + + let shortMenu = pickingUp, + sectType = 'hide'; + + args[0] = pickCmd; + + if (!menuType) { + const playerConfig = getSetPlayerConfig( senderId ); + if (playerConfig) { + shortMenu = !!!((pickingUp ? playerConfig.pickUpMIType : playerConfig.putAwayMIType) == 'long'); + sectType = ((playerConfig.sections !== false || csVer(pickCS) < 4) ? 'Hide' : 'Show'); + } + } else { + shortMenu = !!!(menuType.toLowerCase() == 'long'); + } + menuType = shortMenu ? 'long' : 'short'; + + const putName = putCS.get('name'), + pickName = pickCS.get('name'), + showTypes = parseInt(attrLookup( pickCS, fields.ItemContainerHide )); + + let treasure = (attrLookup( pickCS, fields.Money_treasure ) || '{{desc1=There is no other treasure here}}'), + content = '&{template:'+fields.menuTemplate+'}{{name='+((sell || buy) ? (pickName + ' sells items to '+putName) : ('Take from ' + pickName + ' to add to ' + putName + '\'s Items of Equipment'))+'}}', + miTrueName, mi, pickedMI, miType, miTable, + fullMsg = '', magicItems = '', miList = ''; + + let pickItems = getTableGroupField( pickCS, {}, fieldGroups.MI, 'name' ); + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'trueName' ); + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'qty' ); + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'type' ); + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'chosen' ); + + let putItems = getTableGroup( putCS, fieldGroups.MI ); + const slotData = await itemSlotData(tokenID,putItems,senderId,false); + + let [foundButtons,foundTables] = tableGroupFind( pickItems, 'chosen', 1, true, true ), + chosen = !_.isUndefined(foundButtons) ? foundButtons.length : 0; + pickRow = !_.isUndefined(foundButtons) ? indexTableGroup( pickItems, foundTables[0], foundButtons[0] ) : -1; + + const bagSize = parseInt(attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); + if (parseInt(slotData.count)+parseInt(chosen) > bagSize) { + sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); + foundButtons = undefined; + pickRow = -1; + fullMsg = '{{rowhighlight=mistyrose}}{{highlight=There are not enough slots left to store all the selected items}}' + }; + + [putRow,miTable,pickedMI] = findPutRow( pickID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotData.count+chosen ); + + if (putRow >= 0) putRow = indexTableGroup( putItems, miTable, putRow ); + + const tradeText = (toTrade ? ('\n'+(buy ? pickName : putName)+' can '+(buy ? 'sell' : 'buy')+' these: '+toTrade.replace(/\|/g,', ')+'.') : '') + + (noTrade ? ('\n'+(toTrade ? 'but' : (buy ? pickName : putName))+' cannot '+(buy ? 'sell' : 'buy')+' these: '+noTrade.replace(/\|/g,', ')+'.') : '') + + (((buy || sell) && !shortMenu) ? ('\nItems that can\'t be traded with this trader are grey (try someone else).') : '') + + ((buy || sell) ? ('\nItems of zero value don\'t appear') : ''); + + if (shortMenu) { + miList = await makeMIlist( pickCS, senderId, false, !sell, showTypes, true, putCS, toTrade || (buy || sell), noTrade || '' ); + shortMenu = shortMenu && (miList.split('|').length > 2); + } + if (shortMenu) { + content += '{{Section10=Press the **[Select]** button to select the item you want to '+pickOrPut+' from a list of items, ' + + 'then press the **[Store]** button to automatically put it away in an empty slot' + + (buy ? 'or **[Review]** button to review before buying' : '')+'}}' + + '{{Select=[Select Item to '+pickOrPut+'](!magic --button '+pickCmd+'|'+tokenID+'|?{'+pickOrPut+' which Item?'+miList+'}|'+pickID+'|'+putID+'|'+putRow+')}}' + + (tradeText.length ? ('{{Trade Terms='+tradeText+'}}') : (pickingUp ? treasure : '')) + } else { + magicItems = await makeMIbuttons( tokenID, senderId, 'current', 'current', pickCmd, '|'+pickID+'|'+putID+'|'+putRow, -1, !sell, false, showTypes, true, pickID, putID, toTrade || (buy || sell), noTrade || '', 2 ); + if (magicItems && magicItems.length) { + content += '{{Section10=Select an item you want to '+pickOrPut+'\n' + + magicItems+'}}' + + (tradeText.length ? ('{{Section11=*Trade Terms: *'+tradeText+'}}') : (pickingUp ? treasure : '')); + } + } + content += '{{Section12='+putName+' has [['+(attrLookup( putCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots and carries a total weight of [['+slotData.weight+']]lbs}}' + + fullMsg + + '{{'; + + if (!shortMenu && (!magicItems || !magicItems.length)) { + content = messages.header + '{{desc=' + pickCS.get('name') + ' ' + messages.fruitlessSearch + treasure; + sendParsedMsg( tokenID, content, senderId ); + } else { +// content +=((pickRow >= 0 && putRow >= 0) ? ('Highlight='+(shortMenu?'Store ':'')+'[') : ((shortMenu?'Store=':'Section14=')+'')) +// + pickOrPut+' '+((pickRow >= 0) ? pickedMI.dispName() : 'item') +// + ((pickRow >= 0 && putRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) +// + (buy || sell ? ' and store' : '')+' in a free slot'; + content +=(!_.isUndefined(foundButtons) ? ('Highlight=') : (shortMenu?'Store=':'Section14=')) + + (!_.isUndefined(foundButtons) ? ((shortMenu?'Store ':'')+'[') : ('')) + + pickOrPut+' '+( chosen > 1 ? 'selected items' : ((pickRow >= 0) ? pickedMI.dispName() : 'item')) + + ((pickRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) + + (buy || sell ? ' and store' : '')+' in a free slot'; + + if (buy) { + let miObj = getAbility( fields.MagicItemDB, pickedMI, charCS ); + const renamed = !miObj || !miObj.obj; + const changedMI = renamed ? 'Display-'+pickedMI : pickedMI; + args[0] = pickCmd; + if (miObj.obj) miObj = greyOutButtons( tokenID, charCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+(args.join('|'))+')') ); + content +='\nor '+(((pickRow >= 0 && putRow >= 0) ? '[' : '')+ 'Review '+((pickRow >= 0) ? pickedMI : 'item') + + ((pickRow >= 0 && putRow >= 0) ? ('](! '+sendToWho(charCS,senderId,false,true)+'%{'+miObj.dB+'|'+(changedMI.hyphened())+'})') : '' )); + }; + content += '}}{{desc9=
' + + '' + + '
_Use '+menuType+' menu_(!magic --button '+(pickingUp ? BT.PICKMI_OPTION : BT.PUTMI_OPTION)+'|'+tokenID+'|'+menuType+'|'+pickID+'|'+putID+'|'+(buy || sell)+') _Select Everything_(!magic --button '+pickCmd+'|'+tokenID+'|All|'+pickID+'|'+putID+'|'+putRow+')'+(csVer(pickCS) >= 4 ? (' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+args.join('|')+')') : '')+'
' + + '
}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); + } + return; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + } + + /* + * Create the Spells menus + */ + + const makeMUSpellsMenu = function( args, senderId ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid MagicMaster parameter'); + return; + } + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Magic User Spells menu}}' + + '{{Section1=[Cast MU spell](!magic --cast-spell MU|'+tokenID+')' + + '[View MU Spellbook](!magic --view-spell MU|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 MU Spells](!magic --rest '+tokenID+'|short|MU)' + + '[Long Rest and recover MU spells](!magic --rest '+tokenID+'|long|MU|1)' + + '[Memorise MU spells](!magic --mem-spell MU|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + const makePRSpellsMenu = function( args, senderId ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid MagicMaster parameter'); + return; + } + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Clerical Spells menu}}' + + '{{Section1=[Cast Priest spell](!magic --cast-spell PR|'+tokenID+')' + + '[View Priest Spellbook](!magic --view-spell PR|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 Priest Spells](!magic --rest '+tokenID+'|short|PR)' + + '[Long Rest and recover Priest spells](!magic --rest '+tokenID+'|long|PR|1)' + + '[Memorise Priest spells](!magic --mem-spell PR|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + const makePowersMenu = function( args, senderId ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid MagicMaster parameter'); + return; + } + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Powers menu}}' + + '{{Section1=[Use Power](!magic --cast-spell POWER|'+tokenID+') ' + + '[View Powers](!magic --view-spell POWER|'+tokenID+')}}' + + '{{Section2=[Long Rest](!magic --rest '+tokenID+'|LONG) ' + + '[Memorise Powers](!magic --mem-spell POWER|'+tokenID+')}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + /** + * Make a menu to ask the Player which class they want a + * requested level drain (or boost) to be applied to. + **/ + + const makeLevelDrainMenu = function( args, classes, senderId, msg, totalHP ) { + + const tokenID = args[0], + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, + absLevels = Math.abs(drainLevels), + multiLevels = absLevels > 1; + + let content = '&{template:'+fields.menuTemplate+'}{{title=Level '+(drainLevels > 0 ? 'Boost' : 'Drain')+'}}'+(msg ? '{{Section='+msg+'}}' : '') + + '{{desc='+getObj('graphic',tokenID).get('name')+' is being '+(drainLevels > 0 ? 'boosted by' : 'drained of')+' '+absLevels+' level'+(multiLevels ? 's' : '') + + '. You will be asked for your Constitution HP adjustment of '+attrLookup( charCS, fields.HPconAdj )+' and the HP dice roll to '+(drainLevels > 0 ? 'add.' : 'deduct - enter the value previously rolled when leveling up') + + '. Which class do you want/have to '+(drainLevels > 0 ? 'gain' : 'lose')+' the ' + + (multiLevels ? 'next one level? You will then be asked which levels to drain the rest of the levels from, one at a time.' : 'level from?') + + '}}{{desc1='; + + _.each( classes, c => { + content += 'Level '+c.level+' ['+(c.classData.name || c.name)+'](!magic --button '+BT.LEVEL_CHANGE+'|'+tokenID+'|'+drainLevels+'|'+(c.classData.name || c.name)+'|'+args[3]+'|?{Enter Constitution adjustment|0}+?{Enter HP dice roll to '+(drainLevels > 0 ? 'add' : 'deduct')+'|'+c.classData.hd+'}|'+totalHP+')\n'; + }); + content += '}}'; + sendResponse( charCS, content ); + return; + } + + /* + * Menu to ask the user to confirm that they want + * to blank the specified repeating table + */ + + var menuConfirmBlank = function( args, question, senderId ) { + + var cmd = args[0], + tokenID = args[1], + charCS = getCharacter(tokenID), + content = '&{template:'+fields.menuTemplate+'}{{name=Confirm Action}}' + + '{{desc='+question+'}}' + + '{{desc1=[Yes](!magic --button '+args[0]+'|'+tokenID+') or [No](!magic --button '+BT.ANSWER_NO+'|'+tokenID+')}}'; + + sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); + } + + /* + * Display a menu to add spells and powers to spell-storing magic items + */ + + async function makeSpellsMenu( args, senderId, msg='' ) { + + try { + let lists = args[0].toUpperCase(); + + const tokenID = args[1], + cmd = args[3].toUpperCase(), + level = parseInt(args[4]) || 1, + retMenu = (args[5] || 'VIEW-ITEM').toUpperCase(), + spellName = args[6].dispName(), + spell = args[6].hyphened(), + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + storeBoth = lists.includes('BOTH'), + storeSpells = lists.includes('SPELLS'), + storePowers = lists.includes('POWERS'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let curSpells = '', + item = args[2].hyphened(), + storedSelected = false, + minLevel, rootDB, listType, table, + storedSpellsAttr, choice, itemRow, itemRowID, row, + spellObj, cmdStr, desc, question; + + if (/^\d/.test(item)) { + row = parseInt(item); + item = (item.split('/'))[1]; + if (_.isUndefined(item) || !item.length) { + item = tableGroupLookup( Items, 'name', row ); + }; + [itemRow,table,itemRowID] = tableGroupIndex( Items, row ); + } else { + [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); + row = indexTableGroup( Items, table, itemRow ); + }; + if (_.isUndefined(table) || _.isUndefined(itemRow)) { + sendError('Internal MagicMaster error'); + return; + } + + setAttr( charCS, fields.ItemChosen, item ); + setAttr( charCS, fields.ItemRowRef, row ); + + lists = storeBoth ? 'BOTH' : (storePowers ? 'POWERS' : 'SPELLS'); + + if (isPower) { + desc = 'Powers'; + choice = ' a power'; + rootDB = fields.PowersDB; + storedSpellsAttr = fields.ItemPowersList; + listType = ['power','itempower']; + minLevel = 1; + question = 'Cast how many per day (-1 means unlimited)?'; + } else if (isMU) { + desc = storePowers ? 'Powers' : 'Stored Wizard spells'; + choice = ' a level '+level+' Wizard spell', + rootDB = fields.MU_SpellsDB; + storedSpellsAttr = storePowers ? fields.ItemPowersList : fields.ItemMUspellsList; + listType = ['muspelll'+level,'itemspell']; + minLevel = spellsPerLevel.wizard.MU[level].findIndex(num => num > 0); + question = 'Cast at what level (normal min caster level '+minLevel+')?'; + } else if (isPR) { + desc = storePowers ? 'Powers' : 'Stored Priest spells'; + choice = ' a level '+level+' Priest spell', + rootDB = fields.PR_SpellsDB; + storedSpellsAttr = storePowers ? fields.ItemPowersList : fields.ItemPRspellsList; + listType = ['prspelll'+level,'itemspell']; + minLevel = spellsPerLevel.priest.PR[level].findIndex(num => num > 0); + question = 'Cast at what level (normal min caster level '+minLevel+')?'; + } else { + return; + } + + args.shift(); + const shortCmdStr = [tokenID,row+'/'+item,cmd,level,retMenu].join('|'); + cmdStr = shortCmdStr+'|'+spell; + + if (charCS) { + setAttr( charCS, fields.Casting_name, charCS.get('name')); + setAttr( charCS, fields.CastingLevel, minLevel ); + curSpells = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr ) || ''; +// if (_.isUndefined(attrLookup( charCS, pwList ))) setAttr( charCS, pwList, '' ); +// if (_.isUndefined(attrLookup( charCS, pwVals ))) setAttr( charCS, pwVals, '' ); +// if (_.isUndefined(attrLookup( charCS, muList ))) setAttr( charCS, muList, '' ); +// if (_.isUndefined(attrLookup( charCS, muVals ))) setAttr( charCS, muVals, '' ); +// if (_.isUndefined(attrLookup( charCS, prList ))) setAttr( charCS, prList, '' ); +// if (_.isUndefined(attrLookup( charCS, prVals ))) setAttr( charCS, prVals, '' ); + } + + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spells & Powers}}{{Section='+(msg||'')+'}}' + + '{{Section1=**How to use this menu**\nThe [Choose] button selects a spell of the type indicated. It can then be reviewed or stored. *Powerful* items can store Wizard & Priest spells as Powers.' + + ' *Spell Storing* items only store spells. To *Remove* a stored spell, select its name and the [Remove] button will appear}}' + + '{{'+desc+'=', + selected = false; + + curSpells = curSpells.split(',').filter(e=>!!e); + for (let storedSpell of curSpells) { + selected = storedSpell.dbName() === spell.dbName(); + storedSelected = storedSelected || selected; + content += (selected ? (''+storedSpell.dispName()+'') : ('['+storedSpell.dispName()+'](!magic --button CHOOSE_'+lists+'|'+shortCmdStr+'|'+storedSpell+')')); + } + let spellList = getMagicList( rootDB, spTypeLists, listType, senderId ); + content += '}}{{desc=1. [Choose](!magic --button CHOOSE_'+lists+'|'+shortCmdStr+'|?{Choose which spell|'+spellList+'})'+choice+'\n'; + + if (spell) { + let trueName = spell; + if (storePowers) { + spellObj = findPower( charCS, spell ); + rootDB = spellObj.dB; + trueName = spellObj.obj ? spellObj.obj[1].name : spell; + } + spellObj = getAbility( rootDB, trueName, charCS ); + content += '...Optionally [Review '+spellName+'](!magic --button REVIEW_'+lists+'|'+ cmdStr + + ' '+(spellObj.api ? '' : sendToWho(charCS,senderId,false,true))+'%{'+ spellObj.dB +'|'+ (trueName.hyphened()) +'})}}'; + } else { + content += '...Optionally Review choice}}'; + } + + content += '{{desc1=2. '; + if (!isPower && (storeSpells || storeBoth)) { + content += 'Store '+(spell ? ('**'+spellName+'**') : 'the spell' ) + ' as a ' + (spell ? '[' : ('')) + + 'stored ' + (!isPR ? 'Wizard' : 'Priest') + ' spell' + (spell ? '](!magic --button ADD_TO_'+lists+'|'+cmdStr+'|?{'+question+'})' : '' ); + } + if (storePowers || storeBoth) { + content += ((!isPower && storeBoth ? ' or ' : '') + 'Store '+(storeBoth ? 'it' : (spell ? ('**'+spellName+'**') : 'the spell'))+' ' + + (spell ? '[' : '')+'as a Power'+(spell ? '](!magic --button ADD_PWR_TO_'+lists+'|'+cmdStr+'|?{Cast how many per day (-1 means unlimited)?}|?{'+question+'})' : '' )); + } + if (storedSelected) { + content += ' or '+(spell ? '[' : '')+'Remove '+(spell ? spellName+'](!magic --button DEL_'+(storePowers ? 'PWR_FROM_' : '')+lists+'|'+cmdStr+')' : 'the spell' ); + } + + content += '}}{{desc2=3. Choose and Store more spells or\n'; + if (isPower) { + content += 'go to [Wizard](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|MU-ALL|1|'+retMenu+') or [Priest](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|PR-ALL|1|'+retMenu+') spells'; + } else if (isMU) { + content += 'go to [Level '+(level < 9 ? level+1 : 1)+'](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|MUSPELLS'+(storeBoth?'-ALL':'')+'|'+(level < 9 ? level+1 : 1)+'|'+retMenu+') or go to [Priest](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|PRSPELLS'+(storeBoth?'-ALL':'')+'|1|'+retMenu+') spells'+(!storeBoth && !storePowers ? '' : (' or go to [Powers](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|POWERS-ALL|1|'+retMenu+')')); + } else if (isPR) { + content += 'go to [Level '+(level < 7 ? level+1 : 1)+'](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|PRSPELLS'+(storeBoth?'-ALL':'')+'|'+(level < 7 ? level+1 : 1)+'|'+retMenu+') or go to [Wizard](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|MUSPELLS'+(storeBoth?'-ALL':'')+'|1|'+retMenu+') spells'+(!storeBoth && !storePowers ? '' : (' or go to [Powers](!magic --store-spells '+tokenID+'|'+row+'/'+item+'|POWERS-ALL|1|'+retMenu+')')); + } + if (retMenu !== 'VIEW-ITEM') { + content += ' or\n[Return to Add Items Menu](!magic --gm-edit-mi '+tokenID+')'; + } else { + let miObj = getAbility( fields.MagicItemDB, item, charCS, null, null, null, itemRow, itemRowID ); + content += ' or\n[Return to '+item.dispName()+' Description](! /w gm %{'+miObj.dB+'|'+(item)+'})'; + } + content += 'or just do something else}}'; + sendFeedback(content,flags.feedbackName,tokenID,charCS); + return; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + } + } + +// ------------------------------------------------------------ Menu Button Press Handlers -------------------------------------------- + + /** + * Handle the selection of an option button on a menu, + * usually used to set short or long menus. + */ + + const handleOptionButton = function( args, senderId ) { + + const cmd = args[0].toUpperCase(), + isView = cmd.includes('VIEW'), + tokenID = args[1], + optionValue = args[2].toLowerCase(); + + let config = getSetPlayerConfig( senderId ) || {}; + + if (cmd !== BT.SECTIONS_OPTION && !['short','long','list','alpha','full'].includes(optionValue)) { + sendError( 'Invalid MagicMaster menuType option.' ); + return; + } + + switch (cmd) { + + case BT.SECTIONS_OPTION: + config.sections = _.isUndefined(config.sections) ? false : !!!config.sections; + getSetPlayerConfig( senderId, config ); + args.splice(0,2); + sendAPI('!magic --button '+args.join('|') ); + break; + + case BT.VIEWMI_OPTION: + case BT.USEMI_OPTION: + config.viewUseMIType = optionValue; + getSetPlayerConfig( senderId, config ); + makeViewUseMI( [(isView ? BT.VIEW_MI : BT.USE_MI), tokenID, -1], senderId ); + break; + case BT.EDITMI_OPTION: + case BT.EDITMARTIAL_OPTION: + case BT.EDITALLITEMS_OPTION: + config.editBagType = optionValue; + getSetPlayerConfig( senderId, config ); + makeEditBagMenu( [(cmd == BT.EDITMI_OPTION ? BT.EDIT_MI :(cmd == BT.EDITMARTIAL_OPTION ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS)), tokenID, -1, ''], senderId, 'Using '+optionValue+' Edit MI Bag menu' ); + break; + case BT.PICKMI_OPTION: + config.pickUpMIType = optionValue; + getSetPlayerConfig( senderId, config ); + makeShortPOPmenu( ['POPmenu',tokenID,-1,args[3],args[4],-1], senderId, args[5] === 'true' ); + break; + case BT.PUTMI_OPTION: + config.putAwayMIType = optionValue; + getSetPlayerConfig( senderId, config ); + makeShortPOPmenu( ['POPmenu',tokenID,-1,args[3],args[4],-1], senderId, args[5] === 'true' ); + break; + case BT.ALPHALIST_OPTION: + config.alphaLists = optionValue === 'alpha'; + getSetPlayerConfig( senderId, config ); + let menu = (args[3] || '').toUpperCase(); + let msg = 'Using '+(optionValue ? 'alphabeticised' : 'long')+' item lists'; + switch (menu.toUpperCase()) { + case BT.EDIT_MI: + case BT.EDIT_MARTIAL: + case BT.EDIT_ALLITEMS: + makeEditBagMenu( [menu, tokenID, -1, ''], senderId, msg); + break; + case 'GMONLY': + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, msg, config.alphaLists ); + break; + default: + sendError( 'Invalid MagicMaster option. [Show Help](!magic --help)'); + break; + } + break; + default: + sendError( 'Invalid MagicMaster option. [Show Help](!magic --help)'); + break; + }; + return; + } + + /** + * Handle specification of a different number of Misc spells + */ + + const handleSetMiscSpell = function( args, senderId ) { + + const tokenID = args[1], + spellClass = args[2], + level = args[3], + noSpells = args[4] || 0, + charCS = getCharacter(tokenID); + + if (spellClass == 'MU') { + setAttr( charCS, [fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]], noSpells ); + } else { + setAttr( charCS, [fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]], noSpells ); + } + args = [args[5],args[1],args[3],-1,-1,'',1]; + makeManageSpellsMenu( args, senderId, 'Modified misc = '+noSpells ); + return; + } + + /** + * Handle the results of pressing a spell-selection button + * or a power-selection button + **/ + + const handleChooseSpell = function( args, senderId ) { + + if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { + sendError('Internal MagicMaster error'); + } else if (args[0] == BT.MI_SPELL || args[0] == BT.MI_SCROLL || args[0].toUpperCase().includes('POWER')) { + const charCS = getCharacter(args[1]), + storedLevel = attrLookup( charCS, fields.Spells_storedLevel, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); + if (storedLevel && storedLevel > 0) { + setAttr( charCS, fields.CastingLevel, storedLevel ); + setAttr( charCS, fields.MU_CastingLevel, storedLevel ); + setAttr( charCS, fields.PR_CastingLevel, storedLevel ); + } + } + makeCastSpellMenu( args, senderId ); + return; + + } + + /** + * Handle a selected spell being cast + */ + + const handleCastSpell = function( args, senderId ) { + + let db, action; + + const tokenID = args[1], + rowIndex = args[3], + colIndex = args[4], + charCS = getCharacter(tokenID); + + const setValue = (...a) => libRPGMaster.setAttr(...a); + + const delScrollSpell = function ( charCS, spellName, scrollName, scrollRow, scrollRowID, type, nameField, valueField ) { + spellName = spellName.dbName(); + scrollName = scrollName.replace(/\s/g,'-'); + let muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, nameField ) || '').split(','); + const nameIndex = _.findIndex( muSpellList, e => e.dbName() == spellName ); + if (nameIndex >= 0) { + const listField = [nameField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),nameField[1]], + valField = [valueField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),valueField[1]], + rowField = [fields.MIspellRows[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellRows[1]], + colField = [fields.MIspellCols[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellCols[1]]; + + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, listField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, valueField ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, valField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellRows, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, rowField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellCols, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, colField, muSpellList.join(',') ); + + } + return !muSpellList.filter(t => t.length).length; + }; + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { + sendError('Internal MagicMaster error'); + } + + let spellTables = getTable( charCS, fieldGroups.SPELLS, colIndex ), + absorb = false, + miName = '', + Items; + const oldVer = 2.1 > csVer(charCS), + spellName = spellTables.tableLookup( fields.Spells_name, rowIndex ).hyphened(), + charName = charCS.get('name'); + let spellMsg = spellTables.tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), rowIndex ); + + switch (args[0].toUpperCase()) { + case BT.CAST_MIPOWER: + miName = attrLookup( charCS, fields.ItemChosen ); + Items = getTableGroup( charCS, fieldGroups.MI ); + case BT.USE_POWER: + db = spellTables.tableLookup( fields.Spells_db, rowIndex ); + if (!db || db == spellName) { + db = findPower( charCS, spellName ).dB; + spellTables = spellTables.tableSet( fields.Spells_db, rowIndex, db ); + } + action = 'using'; + break; + case BT.CAST_MUSPELL: + db = fields.MU_SpellsDB; + action = 'casting'; + absorb = args[5] === 'true'; + break; + case BT.CAST_PRSPELL: + db = fields.PR_SpellsDB; + action = 'casting'; + absorb = args[5] === 'true'; + break; + case BT.CAST_SCROLL: + case BT.CAST_MISPELL: + db = spellTables.tableLookup( fields.Spells_db, rowIndex ); + miName = attrLookup( charCS, fields.ItemChosen ); + action = 'using their magic item to cast'; + spellMsg = ''; + Items = getTableGroup( charCS, fieldGroups.MI ); + break; + } + + const spell = getAbility( db, spellName, charCS ), + spellCost = ((!!spell.obj && !!spell.ct && ((args[0] === BT.CAST_MUSPELL) || (args[0] === BT.CAST_PRSPELL))) ? spell.obj[1].cost : 0); + let table, itemRow, itemRowID, + spellValue = parseInt((spellTables.tableLookup( fields.Spells_castValue, rowIndex )),10); + + setValue( charCS, fields.SpellToMem, spellName ); + setValue( charCS, fields.Expenditure, spellCost ); + setValue( charCS, fields.SpellRowRef, rowIndex ); + setValue( charCS, fields.SpellColIndex, colIndex ); + + if (!_.isUndefined(Items)) { + [itemRow,table,itemRowID] = tableGroupIndex( Items, parseInt(attrLookup( charCS, fields.ItemRowRef ))); + if (isNaN(itemRow)) { + [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', miName ); + }; + }; + + if (absorb) { + const level = (!spell.obj || !spell.obj[1]) ? 1 : (parseInt(spell.obj[1].type.match(/\d+/)) || 0); + if (!isNaN(itemRow)) { + Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'qty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'qty'], itemRow ) || 0)-level,0) ); + Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueQty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'trueQty'], itemRow ) || 0)-level,0) ); + } + } else if (spellValue != 0) { + + if (apiCommands.attk && apiCommands.attk.exists && !!spell.obj && !!spell.obj[1] && spell.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.*?\]/im)) { + sendAPI(fields.attackMaster+' '+senderId+' --weapon '+tokenID+'|Take '+spellName+' in-hand as a weapon and then Attack with it||'+miName); + } else { + if (spellValue > 0) spellValue--; + spellTables.tableSet( fields.Spells_castValue, rowIndex, spellValue ); + } + } + setValue( charCS, fields.SpellCharges, spellValue ); + if (args[0] == BT.CAST_SCROLL && spellValue == 0) { + spellTables.addTableRow( rowIndex ); // Blanks this table row + if (delScrollSpell( charCS, spellName, miName, itemRow, itemRowID, 'mu', fields.ItemMUspellsList, fields.ItemMUspellValues ) && + delScrollSpell( charCS, spellName, miName, itemRow, itemRowID, 'pr', fields.ItemPRspellsList, fields.ItemPRspellValues )) { + if (!isNaN(itemRow)) { + Items[table].addTableRow( itemRow ); // Blanks this table row + } + } + } + + if (spellMsg.length > 0) { + sendResponse( charCS, spellMsg, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + } + + const totalLeft = spendMoney( charCS, spellCost ); + const content = charName + ' is '+action+' [' + spellName.dispName() + '](! /w gm %{'+spell.dB+'|'+(spellName.hyphened())+'})' + + (parseInt(spellCost || 0) ? (' at a cost of [[' + spellCost + ']]GP (leaving [[' + totalLeft + ']]GP).') : '') + + ' Select ' + charName + '\'s token before pressing to see effects.'; + sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); + + return; + } + + /* + * Handle targeting the effects of a spell + * Moved to RoundMaster to allow passing of the PlayerID + */ + + const handleSpellTargeting = function( args, isGM ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + if (!apiCommands.rounds || !apiCommands.rounds.exists) { + sendError('RoundMaster API must be loaded for spell targeting to work'); + return; + } + + args.shift(); + const tokenName = curToken.get('name'), + thac0 = getTokenValue( curToken, fields.Token_thac0, fields.Thac0_base, fields.MonsterThac0, fields.Thac0_base ).val || 20, + strHitBonus = attrLookup( charCS, fields.Strength_hit ) || 0, + content = (isGM ? '/w gm ' : '')+'&{template:'+fields.menuTemplate+'}{{name=Try to Touch Target}}' + + '{{desc=**'+tokenName+' hits AC [[( ([['+thac0+']][Thac0]) - ([['+strHitBonus+']][Strength bonus]) - [[1d20]][Dice Roll] )]] with their spell.**}}' + + '{{desc1=If hit, [Cast on them](!rounds --target SINGLE|'+tokenID+'|@{target|Who to Attack with this spell?|token_id}|'+args.join('|')+')}}'; + setAbility( charCS, 'To-Hit-Spell', content ); + return; + + } + + /* + * Handle redisplaying the manage spells menu + * Used when selecting a spell or slot to memorise, + * or when changing level of spell to memorise. + */ + + const handleRedisplayManageSpells = function( args, senderId ) { + + const isPower = args[0].toUpperCase().includes('POWER'), + name = getObj('graphic',args[1]).get('name'); + + let msg = ''; + + if (args[3] > 0 && args[4] > 0 && (!args[5] || !args[5].length)) { + args[5] = attrLookup( getCharacter(args[1]), fields.Spells_name, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); + } + + // Check this is a spell that is of a school that can be memorised + if (isPower ? !checkValidPower( args, senderId ) : !checkValidSpell( args )) { + msg=isPower ? ('**Warning:** '+name+' has not gained experience enough to use '+args[5]+' as a granted power') + : ('**Warning:** '+args[5]+' is not of a school or sphere '+name+' can use'); + args[5] = ''; + } else { + if ((args[3] >= 0 && args[4] >= 0) || (args[5] && args[5].length > 0)) { + msg += 'Selected '; + } + if (args[5] && args[5].length > 0) { + msg += args[5] + ' to store'; + } + if (args[3] >= 0 && args[4] >= 0 && args[5] && args[5].length > 0) { + msg += ' and '; + } + if (args[3] >= 0 && args[4] >= 0) { + msg += 'a slot to store it in.'; + } + } + makeManageSpellsMenu( args, senderId, msg ); + return; + } + + /* + * Handle learning a spell from a spellbook or scroll + */ + + const handleLearnSpell = function( args, senderId ) { + + const cmd = (args[0] || ''), + tokenID = args[1], + spell = (args[2] || ''), + learnt = cmd.toUpperCase().includes('LEARNT'), + charCS = getCharacter(tokenID), + spellObj = abilityLookup( fields.MU_SpellsDB, spell, charCS ); + + if (!spellObj.obj) { + sendError('The spell '+spell+' has not been found in any database.',msg_orig[senderId]); + return; + } + const spellData = parseData((spellObj.data()[0][0] || {}),reSpellSpecs), + level = spellData.level; + + if (!level || level < 1 || level > 9) { + sendError('The spell '+spell+' is of an unrecognised level '+level,msg_orig[senderId]); + return; + } + + let content = '&{template:RPGMdefault}{{name=Add spell to '+charCS.get('name')+'\'s spellbook}}{{desc='; + + const name = getObj('graphic',tokenID).get('name'), + spellbook = [fields.Spellbook[0]+spellLevels.mu[level].book,fields.Spellbook[1]], + curList = (attrLookup(charCS,spellbook) || ''), + saveObj = saveFormat.Checks.Learn_Spell, + save = parseInt(attrLookup( charCS, saveObj.save ) || 0), + saveMod = parseInt(attrLookup( charCS, saveObj.mod ) || 0), + saveAdj = parseInt(attrLookup( charCS, fields.MagicSaveAdj ) || 0), + saveSpec = checkValidSpell( ['MU',tokenID,'','','',spell] ), + specMod = saveSpec > 2 ? 15 : (saveSpec > 1 ? -15 : 0), + learnChance = Math.max(5,Math.min((save-saveMod-saveAdj+specMod),99)); + + if (!saveSpec) { + content += 'The spell '+spell+' is of a school and/or level that '+name+' cannot learn!'; + } else if (curList.toLowerCase().includes(spell.toLowerCase())) { + content += 'The spell '+spell+' is already in '+charCS.get('name')+'\'s spellbook'; + } else if (!learnt) { + args.shift(); + const checkMacro = '&{template:RPGMdefault}{{name='+name+' Check vs Learn Spell}}{{Check Throw=Rolling [[?{Learn Spell roll|'+saveObj.roll+'}cf<'+(learnChance-1)+'cs>'+learnChance+']] vs. [[0+'+learnChance+']] target}}{{Result=Check Throw<='+learnChance+'}}{{desc=**'+name+'\'s target**[[0+'+save+']] to Learn Spell with [[0+'+specMod+']] change from specialism, [[0+'+saveMod+']] improvement from race, class & Magic Items, and [[0+'+saveAdj+']] improvement from current magic effects}}{{successcmd=!magic --button '+BT.LEARNT_MUSPELL+'|'+args.join('|')+'}}'; + setAbility(charCS,'Do-not-use-Learn_Spell-save',checkMacro); + content += 'Can you learn the spell "'+spell+'"? [Assess your chance](~'+charCS.get('name')+'|Do-not-use-Learn_Spell-save)'; + } else { + setAttr(charCS,spellbook,((curList+'|'+spell).split('|').sort().join('|'))); + content += 'The spell '+spell+' has been added to '+charCS.get('name')+'\'s spellbook.'; + } + content += '}}'; + sendResponse(charCS,content,senderId); + return; + }; + + /* + * Return to the spell storing menu after a review + */ + + const handleRevStore = function( args, senderId ) { + const cmd = args.shift().toUpperCase(); + setTimeout( () => sendFeedback( ('[Return to menu](!magic --button '+cmd.replace('REVIEW','CHOOSE')+'|'+args.join('|')+')'), flags.feedbackName ), 500); + } + + /* + * Handle memorising a selected spell in a selected slot + */ + + const handleMemoriseSpell = function( args, senderId ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + isAll = args[0].toUpperCase().includes('ALL'), + tokenID = args[1], + level = args[2], + row = args[3], + col = args[4], + spellName = args[5], + noToMemorise = parseInt((args[6]),10), + castAsLvl = parseInt((args[7]),10), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { + row = undefined; + if (isPower && !!spellName && !!spellName.length) { + [row,col] = powerRowCol( charCS, spellName ); + } + if (!isPower || _.isUndefined(row)) { + sendError('Internal MagicMaster error'); + return; + } + } + + if (isNaN(noToMemorise)) { + sendResponse(charCS, 'You must specify the number of uses as a number', senderId, flags.feedbackName, flags.feedbackImg, tokenID); + return; + } + + const rootDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), + base = spellLevels[(isPower ? (isMI ? 'pm' : 'pw') : (isMI ? 'mi' : (isMU ? 'mu' : 'pr')))][level].base; + + let spellTables = getTable( charCS, (isPower ? fieldGroups.POWERS : fieldGroups.SPELLS), col ), + altSpellTable; + + if (!isPower) { + altSpellTable = getLvlTable( charCS, (isMU ? fieldGroups.ALTWIZ : fieldGroups.ALTPRI), level ); + } else if (fields.GameVersion === 'AD&D1e') { + altSpellTable = getLvlTable( charCS, fieldGroups.ALTPWR ); + }; + + spellTables = setSpell( charCS, spellTables, altSpellTable, rootDB, spellName, row, col-base, level, undefined, '', [noToMemorise,(isPower ? 0 : noToMemorise)], castAsLvl ); + + if (isMI && isPower) { + setAttr( charCS, ['power-'+spellName, 'current'], row ); + setAttr( charCS, ['power-'+spellName, 'max'], col ); + } + + const hand = spellTables.tableLookup( fields.Spells_equip, row ); + + if (spellTables.tableLookup( fields.Spells_weapon, row ) === '1' && (hand)) { + sendAPI(fields.attackMaster+' --button '+(hand==='2'?BT.BOTH:(hand==='1'?BT.LEFT:(hand==='0'?BT.RIGHT:BT.HAND)))+'|'+tokenID+'|'+row+':'+col+'|'+hand); + } + + if (!isAll) { + args[3] = -1; + args[4] = -1; + args[5] = ''; + args[6] = 1; + makeManageSpellsMenu( args, senderId, 'Memorised '+spellName ); + } + return; + } + + /* + * Handle memorising all currently valid powers at once + */ + + async function handleMemAllPowers( args, senderId, silent=false ) { + + const cmd = args[0], + isMU = cmd.toUpperCase().includes('MU'), + isPower = cmd.toUpperCase().includes('POWER'), + tokenID = args[1], + charCS = getCharacter( tokenID ); + + let spellTables = [], + db, type, txt, name; + + const memSpell = function(args,charCS,db,isPower,list,i,r,c,senderId) { + + return new Promise(resolve => { + let spellDef, clv = false; + try { + let k; + for (let j=list.length; j > 0 && !clv; j--) { + k = (randomInteger(list.length)-1); + spellDef = isPower ? findPower( charCS, list.shift() ) : abilityLookup( db, list[k] ); + if (spellDef.obj) { + args[5] = spellDef.obj[1].name; + clv = isPower ? checkValidPower( args, senderId ) : (checkValidSpell( args, senderId ) ? i : 0); + if (!clv && !isPower) list.splice(k,1); + }; + }; + if (clv) { + const newArgs = [args[0],args[1],i,r,c,spellDef.obj[1].name,(isPower ? getUsesPerDay(charCS,spellDef.obj[1].name,senderId) : 1),clv]; + handleMemoriseSpell( newArgs, senderId ); + }; + } catch (e) { + log('MagicMaster memSpell: JavaScript '+e.name+': '+e.message+' while processing sheet '+charCS.get('name')); + sendCatchError('MagicMaster',msg_orig[senderId],e); + } finally { + setTimeout(() => { + resolve([list,(clv ? spellDef.obj[1].name : ''),clv]); + }, 20); + } + }); + } + + if (!charCS) return; + + if (isPower) { + type = 'POWER'; + db = fields.PowersDB; + txt = 'powers'; + } else if (isMU) { + type = 'MU'; + db = fields.MU_SpellsDB; + txt = 'wizard spells'; + } else { + type = 'PR'; + db = fields.PR_SpellsDB; + txt = 'priest spells'; + } + const levelSpells = shapeSpellbook( charCS, type ); + let r = 0, storeList = false, newList = [], list = [], s = 0, c, cellExists = false, castAsLevel = false; + for (let i = 1; i < levelSpells.length; i++) { + r = 0; + storeList = false; + newList = []; + list = (attrLookup(charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ]) || '').split('|').filter(t=>!!t); + s = (isPower) ? list.length : levelSpells[i].spells; + if (s > 0 && (!list || !list.join('').length || list.join('') == '-')) { + list = _.uniq(getMagicList( db, spTypeLists, (isPower ? 'power' : (isMU ? 'muspelll'+i : 'prspelll'+i)), senderId ).toLowerCase().split(/\,|\|/)); + storeList = true; + }; + c = levelSpells[i].base; + cellExists = true; + while (s > 0 || cellExists) { + c = levelSpells[i].base; + for (let w = 1; (w <= fields.SpellsCols); w++) { + castAsLevel = false; + if (!spellTables[w]) { + spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); + } + cellExists = !!spellTables[w].tableLookup( fields.Spells_name, r, false ); + if (s <= 0 && !cellExists) break; + spellTables[w].addTableRow( r ); + if (s > 0){ + [list,name,castAsLevel] = await memSpell(args,charCS,db,isPower,list,i,r,c,senderId); + if (castAsLevel && storeList) newList.push(name); + }; + c++; + s--; + } + r++; + }; + if (storeList) setAttr( charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ], _.uniq(newList.sort()).join('|')); + spellTables = []; + }; + if (silent) { + sendWait(senderId,0,'Magic handleMemAllPowers'); + return; + } + + args[3] = -1; + args[4] = -1; + args[5] = ''; + args[6] = 1; + + makeManageSpellsMenu( args, senderId, 'Memorised all valid '+txt ); + return; + } + + /* + * Handle a level change request + */ + + const handleLevelDrain = function( args, senderId, msg = '' ) { + + const tokenID = args[0], // tokenID + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, // +1 + fixedClass = args[6] || '', // ranger + totalLevels = parseInt(args[3]) || drainLevels, // +1 + classes = classObjects( charCS, senderId ); + + let classChosen = args[2] || fixedClass, // ranger + hitPoints = Math.abs(parseInt(evalAttr(args[4],charCS)) || 0), // [[1d10]] + totalHP = parseInt(args[5]) || 0, // always called = 0 + loopCount = Math.abs(drainLevels), // 1 + increment = drainLevels > 0 ? 1 : -1, //1 + levelHP = hitPoints * increment, + levelField, baseClass; + + const warriors = ['warrior','fighter'], + wizards = ['wizard','mage','magicuser'], + priests = ['priest','cleric'], + rogues = ['rogue','thief'], + psions = ['psion','psionicist']; + + if ((classes && classes.length === 1) || fixedClass) { + classChosen = classChosen || classes[0].base; + baseClass = classes.length === 1 ? (classes[0].name === classChosen.dbName() ? classes[0].base : '') : (classes.find(c => c.name === classChosen.dbName()) || {base:''}).base; + if (!baseClass) { + if (warriors.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (warriors.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => warriors.includes(c.name)) || {base:''}).base; + if (wizards.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (wizards.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => wizards.includes(c.name)) || {base:''}).base; + if (priests.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (priests.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => priests.includes(c.name)) || {base:''}).base; + if (rogues.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (rogues.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => rogues.includes(c.name)) || {base:''}).base; + if (psions.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (psions.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => psions.includes(c.name)) || {base:''}).base; + }; + hitPoints = parseInt(hitPoints || evalAttr((classes[0].classData.hd.replace(/(\d+)(d.+)/i,'(('+String(drainLevels)+'*$1)$2)')),charCS)) || 0; + levelHP = hitPoints; + loopCount = 1; + increment = increment * Math.abs(drainLevels); + } else if (!classChosen) { + makeLevelDrainMenu( args, classes, senderId, msg, totalHP ); + return; + } else { + baseClass = (classes.find(c => c.name === classChosen.dbName()) || {base:''}).base; + }; + if (!baseClass) { + sendParsedMsg( tokenID, messages.newClassPlayer+'{{desc=^^cname^^ wants to become a '+classChosen+'}}', senderId ); + sendFeedback( messages.newClassGM+'{{desc='+charCS.get('name')+' wants to become a '+classChosen+'}}', senderId ); + return; + }; + switch (baseClass.toLowerCase()) { + case 'wizard': + levelField = fields.Wizard_level; + break; + case 'priest': + levelField = fields.Priest_level; + break; + case 'rogue': + levelField = fields.Rogue_level; + break; + case 'psion': + levelField = fields.Psion_level; + break; + default: + levelField = fields.Fighter_level; + if (!attrLookup( charCS, levelField )) { + levelField = fields.Monster_hitDice; + } + } + +// let hpConBonus = parseInt(attrLookup( charCS, fields.HPconAdj )) || 0; + + setAttr( charCS, levelField, Math.max(0,((parseInt(attrLookup( charCS, levelField ) || 1) || 1) + increment)) ); + setAttr( charCS, fields.HP,((parseInt(attrLookup( charCS, fields.HP ) || 0) || 0) + levelHP) ); + setAttr( charCS, fields.MaxHP, Math.max(0,((parseInt(attrLookup( charCS, fields.MaxHP ) || 0) || 0) + levelHP)) ); + totalHP += hitPoints; + if (--loopCount > 0) { + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by one level, which in total makes '+(Math.abs(totalLevels) - loopCount)+' across all classes.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + sendResponse( charCS, content ); + handleLevelDrain( [tokenID,(drainLevels-increment),'',totalLevels,0,totalHP,fixedClass], senderId, 'Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen+' class by 1 level' ); + } else { + setAttr( charCS, fields.Thac0_base, handleGetBaseThac0( charCS ) ); + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by '+((fixedClass || Math.abs(increment) > 1) ? (totalLevels+' levels') : ('one level, which in total makes '+totalLevels+' across all classes')) + + ', and recalculated all saves, reassessed all weapon use and reset usable powers.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + sendResponse( charCS, content ); + setTimeout( () => handleMemAllPowers( [BT.MEMALL_POWERS,tokenID,1,-1,-1,'',''], senderId, true ), 100); + setTimeout( () => handleCheckWeapons( tokenID, charCS ), 200); + setTimeout( () => handleCheckSaves( [tokenID], null, null, true ), 300); + } + } + + /* + * Handle undertaking a short rest to recover 1st level spells + */ + + const handleRest = function( args, senderId ) { + + const tokenID = args[0], + charCS = getCharacter(tokenID), + isShort = args[1].toLowerCase().includes('short'), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let spellName = (args[3] || '').dbName(), + r, c, w; + + if (casterType.includes('MI') && casterType.includes('POWER')) { + return; + } + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + if (!isNaN(spellName)) spellName = ''; + + let isMU = casterType.includes('MU'), + isPR = casterType.includes('PR'), + isMI = !isShort, + isPower = !isShort, + isMIPower = !isShort; + + let levelSpells, + level, + levelLimit, + restType, + valueObj, + spell, + spellTables = []; + + while (isMU || isPR || isPower || isMIPower) { + restType = (isMIPower ? 'MIPOWER' : (isPower ? 'POWER' : (isMU ? 'MU' : 'PR' ))); + levelSpells = shapeSpellbook( charCS, restType ); + level = 1; + levelLimit = isShort ? 2 : levelSpells.length; + + while (level < levelLimit && levelSpells[level].spells > 0) { + r = 0; + while (levelSpells[level].spells > 0) { + c = levelSpells[level].base; + for (w = 1; (w <= fields.SpellsCols) && (levelSpells[level].spells > 0); w++) { + if (_.isUndefined(spellTables[w])) { + spellTables[w] = {}; + } + if (_.isUndefined(spellTables[w][fields.Spells_castValue[0]])) { + spellTables[w] = getTableField( charCS, spellTables[w], fields.Spells_table, fields.Spells_name, c ); + spellTables[w] = getTableField( charCS, spellTables[w], fields.Spells_table, fields.Spells_castValue, c ); + } + valueObj = spellTables[w].tableLookup( fields.Spells_castValue, r, true, true ); + spell = spellTables[w].tableLookup( fields.Spells_name, r ) || '-'; + if (!valueObj) { + levelSpells[level].spells = 0; + break; + } + if (spellName && spellName !== spell.dbName()) continue; + if (restType.includes('POWER')) { + if (_.isUndefined(spellTables[w][fields.Spells_castMax[0]])) { + spellTables[w] = getTableField( charCS, spellTables[w], fields.Spells_table, fields.Spells_castMax, c, 0 ); + } + valueObj.set( fields.Spells_castValue[1], spellTables[w].tableLookup( fields.Spells_castMax, r )); + } else { + valueObj.set( fields.Spells_castValue[1], 1 ); + } + c++; + levelSpells[level].spells--; + } + r++; + } + spellTables = []; + level++; + } + + switch (restType.toUpperCase()) { + case 'MIPOWER': + isMIPower = false; + break; + case 'POWER': + isPower = false; + break; + case 'MU': + isMU = false; + break; + case 'PR': + isPR = false; + break; + } + } + + if (isMI) { + let MagicItems = getTableGroup( charCS, fieldGroups.MI ), + prefix, miSpeedObj, miQtyObj, miTrueName, miType, miReveal, ItemSpecs; + + for (const table in MagicItems) { + for (r = 0; r < (MagicItems[table].sortKeys.length); r++) { + prefix = fieldGroups[table].prefix; + miSpeedObj = MagicItems[table].tableLookup( fields[prefix+'speed'], r, true, true ); + miQtyObj = MagicItems[table].tableLookup( fields[prefix+'qty'], r, true, true ); + miTrueName = MagicItems[table].tableLookup( fields[prefix+'trueName'], r ); + miType = MagicItems[table].tableLookup( fields[prefix+'type'], r ); + miReveal = MagicItems[table].tableLookup( fields[prefix+'reveal'], r ).toLowerCase(); + ItemSpecs = abilityLookup( fields.MagicItemDB, miTrueName, charCS ); + if (_.isUndefined(miSpeedObj) || _.isUndefined(miQtyObj)) {break;} + if (miTrueName && miTrueName != '-') { + if (miReveal == 'rest') { + MagicItems[table] = MagicItems[table].tableSet( fields[prefix+'name'], r, miTrueName ); + MagicItems[table] = MagicItems[table].tableSet( fields[prefix+'type'], MIrowref, MagicItems[table].tableLookup( fields.Items_trueType, MIrowref )); + MagicItems[table] = MagicItems[table].tableSet( fields[prefix+'reveal'], r, '' ); + } + if (ItemSpecs.obj && ItemSpecs.obj[1] && !miType.toLowerCase().includes('recharging') && (/{{ammo=/i.test(ItemSpecs.obj[1].body))) { + miQtyObj.set('max',(miQtyObj.get('current')||0)); + } else if (!miType.toLowerCase().includes('absorbing')) { + miQtyObj.set('current',(miQtyObj.get('max')||0)); + } + miSpeedObj.set('current',(miSpeedObj.get('max')||5)); + } + } + } + } + updateCharSheets( args, senderId ); + return; + } + + /* + * Handle time passing. Update both the character sheet for + * this character, and the global date if it is behind the + * character date + */ + + const handleTimePassing = function( charCS, timeSpent ) { + + timeSpent = Math.ceil(timeSpent); + const charDay = parseInt((attrLookup( charCS, fields.CharDay ) || 0),10) + timeSpent, + today = parseInt((state.moneyMaster.inGameDay || 0),10), + globalDay = Math.max( today, charDay ); + + setAttr( charCS, fields.CharDay, globalDay ); + + return globalDay; + } + + /* + * Handle viewing or using a magic item. + * The calling of the MI macro from the MI-DB is performed + * in the [Submit] button of the menu. + */ + + async function handleViewUseMI( args, isSilent, senderId, charges, chargeOverride='' ) { // miData + + if (isSilent) sendWait(senderId,0,'Magic handleViewUseMI'); + + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = parseInt(args[2],10), + charCS = getCharacter(tokenID); + +// msVersion = csVer(charCS), + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const MItables = getTableGroup( charCS, fieldGroups.MI ); + + let [index,table,rowID] = tableGroupIndex( MItables, MIrowref ); + + if (isNaN(MIrowref) || MIrowref < 0 || _.isUndefined(index)) { + sendError('Internal MagicMaster error'); + return; + } + + const prefix = MItables[table].fieldGroup, + MInameObj = MItables[table].tableLookup( fields[prefix+'name'], index, false, true ), + MItypeObj = MItables[table].tableLookup( fields[prefix+'type'], index, false, true ), + MIrevealObj = MItables[table].tableLookup( fields[prefix+'reveal'], index, false, true ); + + let MIname = MInameObj.get(fields.Items_name[1]); + + const MItrueName = MItables[table].tableLookup( fields[prefix+'trueName'], index ) || MIname, + MIreveal = !MIrevealObj ? '' : MIrevealObj.get(fields.Items_reveal[1]).toLowerCase(); + + setAttr( charCS, fields.ItemChosen, MIname ); + setAttr( charCS, fields.ItemRowRef, MIrowref ); + + if (action.includes('VIEW')) { + if (MIreveal == 'view') { + MIname = MItrueName; + MInameObj.set(fields.Items_name[1], MIname); + MItypeObj.set(fields.Items_type[1], MItables[table].tableLookup( fields[prefix+'trueType'], index)); + MIrevealObj.set(fields.Items_reveal[1], ''); + } + checkForBag( charCS, MItrueName, MIrowref ); + return; + } + const MIqtyObj = MItables[table].tableLookup( fields[prefix+'qty'], index, false, true ), + MIqty = MIqtyObj.get(fields.Items_qty[1]), + MImaxQty = MIqtyObj.get(fields.Items_trueQty[1]), + MItype = (chargeOverride || MItables[table].tableLookup( fields[prefix+'trueType'], index, 'uncharged' ) + || MItables[table].tableLookup( fields[prefix+'type'], index, 'uncharged' )).toLowerCase(); + + let MIdb = getAbility( fields.MagicItemDB, MIname, charCS, null, null, null, index, rowID ), + MIchangeTo = '', + MIcVal = 1, + recalcWeight = false, + miData; + + const MIdbName = MIdb; + + if (MItrueName !== MIname) MIdb = getAbility( fields.MagicItemDB, MItrueName, charCS, null, null, null, index, rowID ); + + const displayChangedMI = (row, table, mi) => { + setAttr( charCS, fields.ItemRowRef, row ); + setAttr( charCS, fields.ItemTableRef, table ); + setAttr( charCS, fields.ItemChosen, mi ); + const miObj = abilityLookup( fields.MagicItemDB, mi, charCS ); + if (String(((miObj.obj ? miObj.specs() : undefined) || [['','','','','']])[0][2]).toLowerCase().includes('hide')) { + doDisplayAbility( ['c',tokenID,fields.MagicItemDB,mi], null, senderId ); + }; + }; + + if (MIdb.obj) { + miData = resolveData( MItrueName, fields.MagicItemDB, reItemData, charCS, {charges:reSpellSpecs.charges,changeTo:reSpellSpecs.changeTo,zero:reSpellSpecs.zero,on:reSpellSpecs.on}, {row:index, rowID:rowID} ).parsed; + MIcVal = miData.charges; + MIchangeTo = miData.changeTo; + } + MIcVal = parseInt(MIcVal); + if (!(_.isUndefined(MIcVal) || isNaN(MIcVal)) && (_.isUndefined(charges) || _.isNull(charges))) { + charges = MIcVal; + } + if (_.isUndefined(charges) || _.isNull(charges)) { + charges = 1; + } + if (MIqty < charges) { + const content = '&{template:'+fields.menuTemplate+'}{{name=Using '+MIname+'}}{{desc='+MIname+' does not have enough charges left to do this}}' + +'{{desc1=[Show '+MIname+' again](\~'+MIdbName.dB+'|'+MIname+') or do something else}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return false; + } + +// let item = MIname.replace(/\s/g,'-'); + + switch (MItype) { + + case 'change-each': + case 'cursed+change-each': + if (MIchangeTo && MIchangeTo.length && charges > 0) { + let [changeRow,trueTable,chgRowID] = tableGroupFind( MItables, 'trueName', MIchangeTo ); + if (isNaN(changeRow) || !stackable.includes(resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},{row:changeRow,rowID:chgRowID}).parsed.type.toLowerCase())) { + [changeRow,trueTable] = await handleStoreMI( ['', tokenID, '', MIchangeTo, charges, 'silent' ], false, senderId ); + } else { + MItables[trueTable].tableSet( fields[MItables[trueTable].fieldGroup+'qty'], changeRow, (parseInt(MItables[trueTable].tableLookup( fields[MItables[trueTable].fieldGroup+'qty'], changeRow ) || 0)+charges) ); + MItables[trueTable].tableSet( fields[MItables[trueTable].fieldGroup+'trueQty'], changeRow, (parseInt(MItables[trueTable].tableLookup( fields[MItables[trueTable].fieldGroup+'trueQty'], changeRow ) || 0)+charges) ); + }; + displayChangedMI( indexTableGroup(MItables,trueTable,changeRow),trueTable,MIchangeTo ); + }; + case 'charged': + case 'perm-charged': + case 'cursed+charged': + case 'changing': + case 'change-last': + case 'cursed+change-last': + case 'discharging': + case 'perm-discharging': + case 'cursed+discharging': + case 'rechargeable': + case 'perm-rechargeable': + case 'cursed+rechargeable': + if (getStoredSpells( charCS, MItrueName, index, rowID ).count > 0) break; + if (MIqty == charges && !MItype.includes('cursed') && !MItype.includes('perm')) { + if (((MItype === 'changing') || (MItype === 'change-last')) && MIchangeTo) { + let [tableRow,table] = await handleStoreMI( ['',tokenID, MIrowref, MIchangeTo, 0, 'silent' ], false, senderId ); + displayChangedMI( MIrowref,table,MIchangeTo ); + } else { + handleRemoveMI( ['',tokenID, MIrowref, MIname], false, senderId, true, false ); + } + } else { + MIqtyObj.set('current',(MIqty-charges)); + MIqtyObj.set('max',(MImaxQty-charges)); +// addMIspells( charCS, MIdb.obj[1], rowID ); + } + recalcWeight = true; + break; + + case 'selfchargeable': + case 'cursed+selfchargeable': + if (MIqty >= charges) { + MIqtyObj.set('current',(MIqty-charges)); + MIqtyObj.set('max',(MImaxQty-charges)); + } + if ((MIqty-charges) == 0) { + sendAPI(fields.attackMaster + ' --blankweapon '+tokenID+'|'+MItrueName+'|silent',senderId); + } + break; + + case 'recharging': + case 'cursed+recharging': + case 'absorbing': + case 'cursed+absorbing': + if (MIqty >= charges) { + MIqtyObj.set('current',(MIqty-charges)); + } + break; + + default: + charges = 0; + break; + } + + setAttr( charCS, fields.ItemQty, MIqtyObj.get('current') ); + + if (MIqty > charges) checkForBag( charCS, MItrueName, MIrowref ); + if ((MIqty - charges == 0) && miData.zero && miData.zero.length) { + sendAPI( parseStr(miData.zero).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) + .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); + } + if (miData.on && miData.on.length) { + sendAPI( parseStr(miData.on).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) + .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); + } + if (action.includes('USE') && (MIreveal == 'view' || MIreveal == 'use')) { + MIname = MItrueName; + MInameObj.set(fields.Items_name[1], MItrueName ); + MItypeObj.set(fields.Items_type[1], tableGroupLookup( MItables, 'trueType', MIrowref )); + MIrevealObj.set(fields.Items_reveal[1], '' ); + } + + setTimeout( updateCoins, 10, charCS ); + + if (!isSilent) { + const charName = charCS.get('name'); + const content = '&{template:'+fields.menuTemplate+'}{{name='+charName+' is using '+MItrueName+(MIname !== MItrueName ? (' hidden as '+MIname) : '')+'}}' + + '{{desc=To see the effects, select '+charName+'\'s token and press ['+MItrueName+'](! /w gm %{'+MIdb.dB+'|'+(MItrueName.hyphened())+'})}}'; + sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); + }; +// if (msVersion < 4) { +// setTimeout( () => sendAPI('!cmd --button '+BT.SORT_ITEMS+'|'+tokenID), 1000 ); +// }; + if (recalcWeight) await itemSlotData( tokenID, MItables, senderId ); + return true; + } + + /* + * Handle the selection of a spell to store in + * a Magic Item, and the slot in the MI spellbook + * to store it in. + */ + + const handleSelectMIspell = function( args, senderId ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIbutton = args[(isMI ? 2 : 5)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)]; + + let content = ''; + + if (spellButton >= 0) { + const spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; + content += 'Selected '+spellName+' to store'; + } + if (MIbutton >= 0) { +// const col = (fields.SpellsFirstColNum || MIcol != 1) ? MIcol : ''; + const miName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; + content += (spellButton >= 0 ? '' : 'Selected to store') + ' in the slot for '+miName; + } + makeStoreMIspell( args, senderId, content ); + return; + } + + /* + * Handle selecting a magic item power + */ + + const handleSelectMIpower = function( args, isUse, senderId ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + if (!charCS) { + sendError('Incorrect MagicMaster syntax'); + return; + } + + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]], + itemName = (args[3] || '').split('/'), + charges = parseInt(args[5] || '1'), + maxChange = parseInt(args[6] || '0'), + miChargeUsed = parseInt(args[7] || '0'), + MIlibrary = charCS; + + let powerName = args[2] || '', + castLevel = args[4], + powerType = powerName.substring(0,3), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + item, powerObj, table, itemRow, itemRowID; + + const powerHyphen = powerName.hyphened(); + + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) { + powerName = powerName.slice(powerType.length); + if (!castLevel) castLevel = casterLevel( charCS, powerType.substring(0,2) ); + } else { + powerType = '' + if (!castLevel) castLevel = characterLevel( charCS ); + } + + for (let i=0; !powerObj && i 0) { + if (maxChange) { + let maxVal = parseInt(Powers.tableLookup( fields.Powers_castMax, powerRow )) - maxChange; + Powers = Powers.tableSet( fields.Powers_castMax, powerRow, maxVal ); + powerCount = Math.min(maxVal,powerCount-charges)+charges; + } + Powers = Powers.tableSet( fields.Powers_castValue, powerRow, powerCount-charges ); + } + const content = charCS.get('name') + ' is using [' + power + '](! /w gm %{'+powerLib.dB+'|'+(power.hyphened())+'}). ' + + 'Select ' + charCS.get('name') + '\'s token before pressing to see effects.'; + sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); + + } else if (powerCount == 0) { + const content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc=You have already used all **'+itemDesc+'\'s** *'+powerDesc+'* charges for today. ' + + 'You need to allow '+itemDesc+' to have a long rest so it can regain all its powers}}' + + '{{desc1=[Redisplay '+itemDesc+'](~'+magicItem.dB+'|'+item+') or just do something else}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + if (!!miChargeUsed) { + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueType'] ); + let type = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], itemRow ) || 'uncharged', + charge = chargedList.includes(type), + recharge = recharging.includes(type); + if (charge || recharge) Items.tableSet( fields[fieldGroups[table].prefix+'qty'], itemRow, ((parseInt(Items.tableLookup( fields[fieldGroups[table].prefix+'qty'], itemRow )) || 0) + miChargeUsed )); + if (charge) Items.tableSet( fields[fieldGroups[table].prefix+'trueQty'], itemRow, ((parseInt(Items.tableLookup( fields[fieldGroups[table].prefix+'trueQty'], itemRow )) || 0) + miChargeUsed )); + } + } else { + setAttr( charCS, fields.SpellToMem, power ); + setAttr( charCS, fields.Casting_name, item ); + setAttr( charCS, fields.CastingLevel, castLevel ); + setAttr( charCS, fields.MU_CastingLevel, castLevel ); + setAttr( charCS, fields.PR_CastingLevel, castLevel ); + setAttr( charCS, fields.SpellCharges, (powerCount < 0 ? powerCount : powerCount-charges) ); + + args.shift(); + const tokenName = getObj('graphic',tokenID).get('name'), + toWho = sendToWho(charCS,senderId,false,true), + content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc='+tokenName+' is about to use **'+itemDesc+'\'s** '+powerDesc+' power. Is this correct?}}' + + '{{desc1=[Use '+powerDesc+'](! '+(powerLib.api ? '' : toWho)+'%{'+powerLib.dB +'|'+ (power.hyphened()) +'} !magic --button '+ BT.MI_POWER_USED +'|'+ args.join('|')+ ')' + + ' or [Return to '+itemDesc+'](! '+(magicItem.api ? '' : toWho)+'%{'+magicItem.dB+'|'+item+'})\nOr just do something else}}'; + sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); + } + return; + } + + /* + * Restore the uses per day of a single power of a magic item + */ + + const handleRestoreMIpowers = function( args, senderId ) { + + const tokenID = args[0], + charCS = getCharacter(tokenID); + if (!charCS) { + sendError('Incorrect MagicMaster syntax'); + return; + } + + const change = '+-'.includes(args[2][0]), + charges = parseInt(args[2]), + powerName = args[3] || ''; + + let itemName = args[1] || '', + Powers = [], + row, itemRow, itemRowID, table; + + if (/^\d/.test(itemName)) { + row = parseInt(itemName); + itemName = (itemName.split('/'))[1]; + if (_.isUndefined(itemName) || !itemName.length) { + itemName = tableGroupLookup( Items, 'name', row ); + }; + [itemRow,table,itemRowID] = tableGroupIndex( Items, row ); + } else { + [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', itemName ); + row = indexTableGroup( Items, table, itemRow ); + }; + if (_.isUndefined(table) || _.isUndefined(itemRow)) { + sendError('Internal MagicMaster error'); + return; + } + + const itemHyphen = itemName.replace(/\s/g,'-'); + let powersList = (miSpellLookup( charCS, itemHyphen, itemRow, itemRowID, fields.ItemPowersList ) || '').split(','), + action = ((isNaN(charges) || charges > 0) ? 'regained' : 'used'), + powerHyphen, powerObj, powerRow, powerCol, + maxCharges, curCharges; + + if (powerName && powersList.includes(powerName)) { + powersList = [powerName]; + action += ' its '+powerName+' power'; + } else { + action += ' all its powers'; + } + + _.each(powersList, powerName => { + + powerHyphen = powerName.replace(/\s/g,'-'); + powerObj = miSpellLookup( charCS, powerHyphen, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); +// powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+itemHyphen+'+'+itemRow+'-'+powerHyphen, null] ); +// if (!powerObj) powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+powerHyphen, null] ); + if (!powerObj) { + sendError('Invalid item/power combination'); + return; + }; + + powerRow = powerObj.get('current'); + powerCol = powerObj.get('max'); + + if (!Powers[powerCol]) { + Powers[powerCol] = getTable( charCS, fieldGroups.POWERS, powerCol ); + } + + maxCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castMax, powerRow, 1 ) || '1'); + curCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castValue, powerRow, 1 ) || '1'); + if (change && maxCharges >= 0 && !isNaN(charges)) { + Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castMax,powerRow,Math.max(0,(charges + maxCharges))); + Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castValue,powerRow,Math.min(curCharges,(charges + maxCharges))); + } else { + Powers[powerCol] = Powers[powerCol].tableSet( fields.Powers_castValue, powerRow, (!isNaN(charges) ? charges : maxCharges) ); + } + }); + + return; + } + + /* + * Handle storing a spell from a characters memorised + * spells into a spell-storing magic item. + */ + + const handleStoreMIspell = function( args, senderId ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + const isMU = args[0].toUpperCase().includes('MU'), + MIbutton = args[2], + MIrow = args[3], + MIcol = args[4], + spellButton = args[5], + spellRow = args[6], + spellCol = args[7], + item = attrLookup( charCS, fields.ItemChosen ) || '-'; + + let isChange = args[0].toUpperCase().includes('ANY') || args[0].toUpperCase().includes('CHANGE'), + [itemRow,itemTable,itemRowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), (attrLookup( charCS, fields.ItemRowRef ) || '') ); + + const itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,itemRowID), + storeSpells = (itemData.store || 'store').toLowerCase(), + csv = csVer(charCS), + msgField = (csv >= 2.1 ? fields.Spells_msg : fields.Spells_macro); + + if (isNaN(MIbutton) || MIbutton<0 || isNaN(MIrow) || isNaN(MIcol) || isNaN(spellButton) || spellButton<0 || isNaN(spellRow) || isNaN(spellCol)) { + sendError('Internal MagicMaster error'); + return; + } + + isChange = isChange || storeSpells === 'any' || storeSpells === 'change'; + + let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); + + const MIspellsTable = getTable( charCS, fieldGroups.SPELLS, MIcol ), + spellName = SpellsTable.tableLookup( fields.Spells_name, spellRow ).hyphened(), + MIspellName = MIspellsTable.tableLookup( msgField, MIrow ); + + if (!isChange && !stdEqual(spellName, MIspellName )) { + sendParsedMsg( tokenID, messages.fixedSpell, senderId, getObj('graphic',tokenID).get('name')+'\'s magic item'); + makeStoreMIspell( args, senderId, 'Could not store '+spellName+' in '+getObj('graphic',tokenID).get('name')+'\'s spell storing magic item' ); + return; + } + + const level = attrLookup( charCS, fields.CastingLevel ), + spellObj = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spellName, charCS ); + + if (!spellObj.obj) { + sendError('Not found spell definition for '+spellName+'. Unable to store this spell'); + return; + } + let p = MIspellsTable.fieldGroup; + let values = initValues( p ); + + values.valLine( p, 'name', spellName ) + .valLine( p, 'db', (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB) ) + .valLine( p, 'speed', SpellsTable.tableLookup( fields.Spells_speed, spellRow ) ) + .valLine( p, 'castValue', 1 ) + .valLine( p, 'castMax', 1 ) + .valLine( p, 'storedLevel', level ) + .valLine( p, 'spellLevel', String((spellObj.obj[1].type.match(/\d+/) || 1)) ) + .valLine( p, 'cost', 0 ) + .valLine( p, 'msg', spellName ) + .valLine( p, 'macro', ((csv < 2.1) ? spellName : ('%{'+charCS.get('name')+'|'+spellName+'}')) ); + + MIspellsTable.addTableRow( MIrow, values ); + + if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { + SpellsTable = SpellsTable.tableSet( fields.Spells_castValue, spellRow, 0 ); + } + let muRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'mu' ), + prRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'pr' ), + muCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'mu' ), + prCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'pr' ), + muSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellsList ), + prSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemPRspellsList ), + muLevels = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellValues ), + prLevels = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemPRspellValues ); + + if ((!!muRows && !!muCols) || (!!prRows && !!prCols)) { + muRows = (muRows || '').split(','); + muCols = (muCols || '').split(','); + muSpells = (muSpells || '').split(','); + muLevels = (muLevels || '').split(','); + prRows = (prRows || '').split(','); + prCols = (prCols || '').split(','); + prSpells = (prSpells || '').split(','); + prLevels = (prLevels || '').split(','); + let index = muRows.findIndex( (e,i) => e == MIrow && muCols[i] == MIcol ), + muSave = false, prSave = false; + + if (index > -1 && muCols[index] === MIcol) { + if (!isMU) { + muRows.splice(index,1); + muCols.splice(index,1); + muSpells.splice(index,1); + muLevels.splice(index,1); + prRows.push(MIrow); + prCols.push(MIcol); + prSpells.push(spellName); + prLevels.push(level+'.'+level); + prSave = true; + } else { + muRows[index] = MIrow; + muCols[index] = MIcol; + muSpells[index] = spellName; + muLevels[index] = (level+'.'+level); + }; + muSave = true; + } else { + index = prRows.findIndex( (e,i) => e == MIrow && prCols[i] == MIcol ); + if (index > -1 && prCols[index] === MIcol) { + if (isMU) { + prRows.splice(index,1); + prCols.splice(index,1); + prSpells.splice(index,1); + prLevels.splice(index,1); + muRows.push(MIrow); + muCols.push(MIcol); + muSpells.push(spellName); + muLevels.push(level+'.'+level); + muSave = true; + } else { + prRows[index] = MIrow; + prCols[index] = MIcol; + prSpells[index] = spellName; + prLevels[index] = (level+'.'+level); + }; + prSave = true; + } + }; + if (muSave) { + setAttr( charCS, [fields.MIspellRows[0]+item+'-mu+'+itemRowID,fields.MIspellRows[1]], muRows.join() ); + setAttr( charCS, [fields.MIspellCols[0]+item+'-mu+'+itemRowID,fields.MIspellCols[1]], muCols.join() ); + setAttr( charCS, [fields.ItemMUspellsList[0]+item+'+'+itemRowID,fields.ItemMUspellsList[1]], muSpells.join() ); + setAttr( charCS, [fields.ItemMUspellValues[0]+item+'+'+itemRowID,fields.ItemMUspellValues[1]], muLevels.join() ); + } + if (prSave) { + setAttr( charCS, [fields.MIspellRows[0]+item+'-pr+'+itemRowID,fields.MIspellRows[1]], prRows.join() ); + setAttr( charCS, [fields.MIspellCols[0]+item+'-pr+'+itemRowID,fields.MIspellCols[1]], prCols.join() ); + setAttr( charCS, [fields.ItemPRspellsList[0]+item+'+'+itemRowID,fields.ItemPRspellsList[1]], prSpells.join() ); + setAttr( charCS, [fields.ItemPRspellValues[0]+item+'+'+itemRowID,fields.ItemPRspellValues[1]], prLevels.join() ); + }; + }; + args[2] = args[5] = -1; + + makeStoreMIspell( args, senderId, 'Stored '+spellName+' in '+getObj('graphic',tokenID).get('name')+'\'s spell storing magic item' ); + return; + } + + /* + * Add a selected spell or power to a spell-storing item + */ + + async function handleChangeSpellStore( args, senderId ) { + + const del = args[0].toUpperCase().includes('DEL'), + pwSpell = args[0].toUpperCase().includes('PWR'), + tokenID = args[1], + cmd = args[3].toUpperCase(), + retMenu = args[5], + answer1 = args[7], + answer2 = args[8] || answer1, + repSpell = args[9], + spellRow = args[10], + spellCol = args[11], + rep = !!repSpell, + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let item = args[2].hyphened(), + spell = args[6].hyphened(), + itemRow, itemRowID, storedSpellsAttr, storedLevelAttr, table, + spellType = 'ALL'; + + if (/^\d/.test(item)) { + itemRow = parseInt(item); + item = (item.split('/'))[1]; + if (_.isUndefined(item) || !item.length) { + item = tableGroupLookup( Items, 'name', itemRow ); + }; + [itemRow,table,itemRowID] = tableGroupIndex( Items, itemRow ); + } else { + [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); + }; + if (_.isUndefined(table) || _.isUndefined(itemRow)) { + sendError('Internal MagicMaster error'); + return; + } + + if (isPower || pwSpell) { + spellType = 'PW'; + storedSpellsAttr = fields.ItemPowersList; + storedLevelAttr = fields.ItemPowerValues; + if (isMU && !del) spell = 'MU-'+spell; + if (isPR && !del) spell = 'PR-'+spell; + } else if (isMU) { + spellType = 'MU'; + storedSpellsAttr = fields.ItemMUspellsList; + storedLevelAttr = fields.ItemMUspellValues; + } else { + spellType = 'PR'; + storedSpellsAttr = fields.ItemPRspellsList; + storedLevelAttr = fields.ItemPRspellValues; + }; + + let currentList = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr, '', '', '' ).split(',').filter(e=>!!e), + currentValues = miSpellLookup( charCS, item, itemRow, itemRowID, storedLevelAttr, '', '', '' ).split(',').filter(e=>!!e), + newList = !currentList[0]; + +// await moveMIspells( senderId, charCS, itemRow, itemRowID, null, null, null, item, spellType ); + +// log('handleChangeSpellStore: after moveMIspells, newList = '+newList+', currentList = '+currentList); + + if (del || rep) { + const index = currentList.findIndex((s,i) => (s === (rep ? repSpell : spell)) && (!rep || currentValues[i].split('.')[0] == 0)); + if (rep) { + if (index >= 0) { + currentList[index] = spell; + currentValues[index] = answer1+'.'+answer2; + } else { + currentList.push(spell); + currentValues.push(answer1+'.'+answer2); + } + } else if (index >= 0) { + currentList.splice(index,1); + currentValues.splice(index,1); + } + } else { + currentList.push(spell); + currentValues.push(answer1+'.'+answer2); + } + + setAttr( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]], currentList.join(',') ); + setAttr( charCS, [storedLevelAttr[0]+item+'+'+itemRowID,storedLevelAttr[1]], currentValues.join(',') ); + if (newList) { + await moveMIspells( senderId, null, null, null, charCS, itemRow, itemRowID, item, spellType ); + } else { + await moveMIspells( senderId, charCS, itemRow, itemRowID, charCS, itemRow, itemRowID, item, spellType ); + }; + +// log('handleChangeSpellStore: after adding, at '+storedSpellsAttr[0]+item+'+'+itemRowID+', currentList = '+currentList+', and stored currentList = '+attrLookup( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]])); + + if (retMenu === 'STORE-MI-SPELL') { + let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); + if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { + SpellsTable = SpellsTable.tableSet( fields.Spells_castValue, spellRow, 0 ); + } + args = [cmd,tokenID,-1,-1,-1,-1,-1,-1]; + makeStoreMIspell( args, senderId, 'Stored spell '+spell.dispName()+' in '+item.dispName() ); + } else { + args[6] = ''; + makeSpellsMenu( args, senderId, (del ? ('Removed '+spell+' from stored '+(isPower?'powers':'spells')) : ('Added '+spell+' to stored '+(isPower?'powers':'spells'))) ); + } + return; + }; + + /** + * handle where somehow the player has been able to select an empty slot + **/ + + const handlePickupNothing = function( args, pickMI, putSlot, senderId, buy ) { + + const tokenID = args[1], + fromID = args[3], + toID = args[4], + fromRow = args[2], + toRow = args[5], + fromCS = getCharacter(fromID), + toCS = getCharacter(toID); + + if (!fromCS || !toCS){ + sendError('Internal MagicMaster error'); + return; + } + + const fromName = fromCS.get('name'), + toName = toCS.get('name'), + targetID = (tokenID == fromID) ? toID : fromID, + content = messages.nothingToPick + '{{desc1=Trying to pick up "'+pickMI+'" from '+fromName+' and putting in '+toName+'\'s "'+putSlot+'"}}' + + '{{desc2=[Other way round](!magic --button '+(buy ? BT.BUY_STORE : BT.POP_STORE)+'|'+tokenID+'|'+toRow+'|'+toID+'|'+fromID+'|'+fromRow+'|-1)' + + ' or [Pick something else](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP) +'|'+tokenID+'|'+targetID+')}}'; + sendParsedMsg( tokenID, content, senderId ); + return; + }; + + /** + * Handle switching to a treasure menu + **/ + + const handleTreasure = function( args, senderId ) { + + const tokenID = args[1], + charCS = getCharacter( tokenID ), + content = makeLootMenu( senderId, args ); + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + /** + * handle the failure of an attempt to pick pockets + **/ + + const handlePPfailed = function( args, senderId ) { + + const tokenID = args[1], + pickID = args[2], + putID = args[3], + ppRoll = parseInt(args[4],10), + search = putID === tokenID, + targetID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + targetCS = getCharacter( targetID ); + + if (!tokenID || !targetID || !charCS || !targetCS) { + sendError('Invalid MagicMaster parameter'); + return; + }; + + if (isNaN(ppRoll)) { + sendError('Invalid MagicMaster parameter'); + return; + } + + const charName = charCS.get('name'), + targetName = targetCS.get('name'); + + let targetLevel = parseInt(characterLevel( targetCS )), + content = '&{template:'+fields.menuTemplate+'}{{name=Failed pick pocket attempt by '+charName+'}}'; + + if (isNaN(targetLevel)) { + targetLevel = 0; + } + + if (ppRoll > (100-(targetLevel*3))) { + content += '{{desc='+charName+' tried to pick '+targetName+'\'s pocket unsuccessfully and they noticed. What will '+targetName+' do about it?}}'; + sendResponse( targetCS, content, null, flags.feedbackName, flags.feedbackImg, targetID ); + } else { + content += '{{desc='+charName+' tried to pick '+targetName+'\'s pocket, but they did not notice.}}'; + sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); + }; + content = '{{desc=Oh dear! Failed! Nothing to see here... now, did anyone notice?}}'; + return content; + }; + + /** + * Handle toggling the selection of one or more items to pick up or + * put away. Can take a row number or a table name or "All" as the pick + * reference. + **/ + + const handleFlagPicks = function ( args, senderId ) { + + const pickRow = args[2] || -1, + pickID = args[3], + charCS = getCharacter(pickID); + + if (!charCS) throw( 'pickID does not represent a valid character' ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + name; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + + if (isNaN(pickRow)) { + const pickedTable = pickRow.toUpperCase(); + if (pickedTable !== 'ALL' && _.isUndefined(Items[pickedTable])) throw( 'Invalid item table type specified' ); + for (const table in Items) { + if (pickedTable === table || pickedTable === 'ALL') { + for (let row = 0; !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false )); row++) { + if (name !== '-') { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; + }; + }; + } else if (pickRow >=0) { + let [row,table] = tableGroupIndex( Items, pickRow ); +// log('handleFlagPicks: row = '+row+', table = '+table+', chosen = '+Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row )); + if (!_.isUndefined(row) && !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false ))) { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; + }; + + /** + * Handle a character picking or putting away an item to/from a store + * args[] is the standard action|charID|fromID|toID|fromRow|toRow|qty|cost + * qty -1 means not yet chosen, cost -1 means not yet agreed or no cost + **/ + + async function handlePickOrPut( args, senderId ) { + + try { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + offer = (args[0] || '').toUpperCase().includes('OFFER'), + tokenID = args[1], + fromRowRef = args[2], + fromTokenID = args[3], + toTokenID = args[4], + toRowRef = args[5], + newName = (args[8] || '').hyphened(), + charCS = getCharacter( tokenID ), + fromCS = getCharacter( fromTokenID ), + toCS = getCharacter( toTokenID ), + traderCS = buy ? fromCS : toCS, + parseTable = { + itemType:reSpellSpecs.itemType, + hide:reSpellSpecs.hide, + reveal:reSpellSpecs.reveal, + pick:reSpellSpecs.pick, + put:reSpellSpecs.put, + cost:reSpellSpecs.cost, + weight:reSpellSpecs.weight, + }; + + let qty = args[6], + expenditure = args[7]; + + if (isNaN(parseInt(qty))) qty = -1; + + if (!_.isUndefined(expenditure) && expenditure.length) { + expenditure = parseFloat(expenditure); + } + + if (!charCS || !fromCS || !toCS) { + sendError('Invalid MagicMaster button arguments'); + return; + } + if (isNaN(fromRowRef) || fromRowRef<0 || isNaN(toRowRef) || toRowRef<0) { + sendError('Internal MagicMaster error'); + return; + } + + const toMIbag = getTableGroup( toCS, fieldGroups.MI ), + fromMIbag = getTableGroup( fromCS, fieldGroups.MI ); + + let fromIndexes, fromTables, fromIDs, prefix; + + [fromIndexes,fromTables,fromIDs] = tableGroupFind( fromMIbag, 'chosen', 1, true, true ); + + let single = (!_.isUndefined(fromIndexes) && fromIndexes.length <= 1); + let miNames = []; + let miQtys = []; + const pickPocket = (attrLookup( charCS, fields.PickPocket ) || 'false') == 'true', + showType = parseInt(attrLookup( fromCS, fields.ItemContainerHide )); + + if (!pickPocket && (buy || sell) && (_.isUndefined(expenditure) || !expenditure.length) && (_.isUndefined(expenditure) || isNaN(expenditure) || offer)) { + + let MIname = single ? tableGroupLookup( fromMIbag, 'name', fromRowRef ) : 'items'; + let MIcost, MIdata, fromSlotType, fromSlotTrueType, totalQty = 0, + fromTable, fromIndex, fromPrefix, MIqty, MItrueName, MIobj, MIsuperTypes; + + if (!offer) { + expenditure = 0; + let notes = attrLookup( traderCS, fields.AttrNotes ), + match = (notes.match(/n?pcdata=(\[.+?\])/i) || ['',''])[1], + reTrade = {buy:reClassSpecs.buy, sell:reClassSpecs.sell}, + tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade ).parsed, + trade = buy?'sell':'buy', + buyFormula = parseData(match, reTrade)[trade] || tradingRace[trade] || classObjects( traderCS, senderId, reTrade)[0].classData[trade] || (buy?'(cost*(1+((4+2d6)/100)))':'(cost*(1-((4+2d6)/100)))'); + + for (let k=0; k a.concat([b[4].dbName()]), []); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(); + if (MIqty <= 1) { + qty = MIqty; + } else if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + } else if (qty < 0) { + let MItext = (!showType ? MIname : (!MIobj.obj ? MIname : getShownType( MIobj, fromRowRef, MIdata.itemType ))); + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + }; + MIcost = parseFloat(evalAttr((fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0), fromCS)); +// log('handlePickOrPut: cost from table = '+MIcost); + if (!single) qty = parseInt( fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 1); + totalQty += parseInt(qty) || 0; + MIcost = MIcost !== 0 ? MIcost : (!sell ? 0 : MIdata.cost || 0); +// log('handlePickOrPut: MIcost (if zero) now '+MIcost); + MIcost = !buy ? MIcost : (!MIdata.cost.includes('^^') ? MIcost : MIdata.cost); +// log('handlePickOrPut: buy = '+buy+', MIdata.cost = '+MIdata.cost+', MIcost = '+MIcost); + buyFormula = buyFormula.replace(/cost/g,MIcost); +// log('handlePickOrPut: buyFormula = '+buyFormula); + MIcost = parseFloat(evalAttr(buyFormula,charCS)) || 0; +// log('handlePickOrPut: buyFormula = '+buyFormula+', replacced = '+buyFormula.replace(/cost/g,MIcost)+', evaluated = '+MIcost); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(), + fromSlotTrueType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'trueType'], fromIndex ) || fromSlotType).toLowerCase(), + expenditure += (Math.round(100 * MIcost * ((!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType)) ? 1 : qty))/100); +// log('handlePickOrPut: MIcost = '+MIcost+', not splitable = '+(!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType))+', qty = '+qty+', expenditure = '+expenditure); + }; + } else { + totalQty = qty; + }; + if (expenditure) { + setAttr( charCS, fields.Expenditure, expenditure ); + if (args[0].toUpperCase() === BT.BUY_OFFER || args[0].toUpperCase() === BT.SELL_OFFER) { + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Accept Offer' : 'Pay for Goods')+'}}' + + '{{desc='+traderCS.get('name')+' offers '+(sell ? 'to buy the goods from you' : 'to sell you the goods')+' for '+showCost(Math.abs(expenditure))+'. Are you happy to '+(sell ? 'accept' : 'pay')+' this? You currently have '+(attrLookup(charCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(charCS,fields.Money_gold) || 0)+'GP, '+(attrLookup(charCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(charCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(charCS,fields.Money_copper) || 0)+'CP.}}' + + '{{desc1=['+(sell ? 'Sell' : 'Buy')+' goods](!magic --button '+(sell ? BT.SELL_ITEM : (buy ? BT.BUY_ITEM : BT.PICK_ITEM))+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+') or' + + '[Choose something else](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); + } else if (sell && expenditure > spendMoney( traderCS, 0 )) { + let content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, this trader cannot afford to buy the '+MIname+'. Perhaps you have something else more affordable?' + + ' Or you could buy some items from them first.}}{{desc1=[Return to inventory]('+fields.magicMaster+' --button '+BT.SELL_POP+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); + content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, the trader can\'t afford to buy the '+MIname+'. They could buy it for ' + + showCost(Math.abs(expenditure))+' but they only have '+(attrLookup(traderCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(traderCS,fields.Money_gold) || 0)+'GP, ' + +(attrLookup(traderCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(traderCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(traderCS,fields.Money_copper) || 0) + +'CP (which is equivalent to '+showCost(spendMoney(traderCS,0))+'). They\'ll need to sell some stuff first to make money.}}'; + sendResponse( traderCS, content ); + } else { + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Make Offer' : 'Set Cost')+'}}' + + '{{desc=You are thinking of making an offer '+(buy ? ('to sell '+totalQty+' '+MIname+' to ') : ('to buy '+totalQty+' '+MIname+' from '))+charCS.get('name')+' for a total of '+showCost(Math.abs(expenditure))+'. Are you happy with this offer?}}' + + '{{desc1=[Make the offer](!magic --button '+(sell ? BT.SELL_OFFER : BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+')' + + ' or [Haggle a price](!magic --button '+(sell ? BT.SELL_OFFER: BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|?{What offer do you want to make? GP|'+expenditure+'})' + + ' or [Refuse to trade](!magic --message '+tokenID+'|Trade Refused|The person you are attempting to trade with has refused to '+(sell ? 'buy' : 'sell')+' you '+totalQty+' '+MIname+' but feel free to try a different trade --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + sendResponse( traderCS, content ); + } + return; + } + } + + for (let i=0; i a.concat([b[4].dbName()]), []), + MIqty = parseInt( (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 0), 10) || 0, + MIcost = evalAttr( fromMIbag[fromTable].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0, charCS ), + MItext = MIname, + slotInc = 1, + pickQty, charges; + + if (showType) { + MItext = !MIobj.obj ? MItext : getShownType( MIobj, fromRowRef, MIdata.itemType ); + } + + toSlotQty = isNaN(toSlotQty) ? 0 : toSlotQty; + toSlotCharges = isNaN(toSlotCharges) ? 0 : toSlotCharges; + + switch (MIqty) { + case 0: + if (!splitable.includes(fromSlotType)) { + qty = pickQty = 0; + charges = MItrueQty; + } else if (single) { + handlePickupNothing( args, MItext, toSlotName, senderId, buy ); + return; + } else { + continue; + } + break; + + case 1: + qty = 1; + pickQty = charges = MItrueQty; + MIqty = 0; + break; + + default: + if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + charges = pickQty = (qty >= MIqty ? MItrueQty : 1); + if (qty >= MIqty) MIqty = 0; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + pickQty = (recharging.includes(fromSlotType)) ? MIqty : MItrueQty; + charges = MItrueQty; + MIqty = 0; + } else if (single && qty < 0) { + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + } else if (qty < 0 || qty >= MIqty) { + qty = MIqty; + pickQty = charges = MItrueQty; + MIqty = 0; + } else if (qty == 0) { + continue; + } else { + pickQty = charges = qty * Math.ceil(MItrueQty/MIqty); + } + break; + } + let finalQty = pickQty, + finalCharges = charges; + + if (isStackable) { + finalQty = (parseInt(finalQty)||0) + (parseInt(toSlotQty)||0); + finalCharges = (parseInt(finalCharges)||0) + (parseInt(toSlotCharges)||0); + slotInc = 0; + } else if (toSlotType !== '' && (toSlotName !== '-')) { + let content = messages.slotFull; + content += '{{desc9=[Choose another slot](!magic --pickorput|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}'; + sendParsedMsg( tokenID, content, senderId ); + return; + } + + if (!isNaN(expenditure) && expenditure != 0 && (buy || sell) ) { + spendMoney( toCS, Math.abs(expenditure), fromCS ); + } + + const MIbaseCost = sell ? toSlotCost : MIcost; + let p = fieldGroups[toTable].prefix; + + toMIvalues.valLine(p,'name',MIname) + .valLine(p,'trueName',MItrueName) + .valLine(p,'qty',finalQty) + .valLine(p,'trueQty',finalCharges) + .valLine(p,'speed',MIspeed) + .valLine(p,'trueSpeed',MItrueSpeed) + .valLine(p,'cost',(sell ? MIbaseCost : MIcost )) + .valLine(p,'type',MItype) + .valLine(p,'reveal',MIreveal) + .valLine(p,'weight',(MIdata.weight || 1)) + .valLine(p,'trueType',MItrueType); + + toMIbag[toTable].addTableRow( toIndex, toMIvalues ); + + if (!newName || !newName.length || MItrueName !== MIname) { + if (MItrueObj.obj) { + setAbility( toCS, MItrueName, MItrueObj.obj[1].body ); + } else { + log('handlePickOrPut: storing '+MItrueName+' to '+toCS.get('name')+', ability not found in any database or '+fromCS.get('name')); + } + } + + let containerType = (parseInt(attrLookup(toCS, fields.ItemContainerType) || 0) || 0); + containerType = (containerType == 0 ? 1 : (containerType == 2 ? 3 : containerType)); + setAttr( toCS, fields.ItemContainerType, containerType ); + setAttr(charCS, fields.ItemOldContainerType, containerType); + + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MIname ); + if (!stdEqual(MIname,MItrueName)) { + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MItrueName ); + } + checkForBag( toCS, MItrueName, toRowRef ); + if (!!MIdata.pick && !!MIdata.pick.length) { + pickPutCmd( MIdata.pick, toTokenID, toCS, 'magic handlePickOrPut' ); + }; + if (MIqty == 0) { + if (!!MIdata.put && !!MIdata.put.length) { + pickPutCmd( MIdata.put, fromTokenID, fromCS, 'magic handlePickOrPut' ); + }; + fromMIbag[fromTable].addTableRow( fromIndex ); // Blanks this row of the table + setTimeout(() => removeMIability( fromCS, MIname, fromMIbag[fromTable], fromTable ), 100); // Only removes ability if does not exist elsewhere in the equipment list + setTimeout(() => removeMIability( fromCS, MItrueName, fromMIbag[fromTable], fromTable ), 100); + } else { + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex, (MItrueQty - charges) ); + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex, (MIqty - qty) ); + }; + if (single) pickupMessage( args, MIname, MItype, qty, (MItrueQty - qty), finalCharges, senderId ); + miNames.push(MIname); + miQtys.push(qty); + qty = -1; + }; + let content = fields.attackMaster + ' --checkac ' + fromTokenID + '|silent||' + senderId + + ' --checkac ' + toTokenID + '|silent||' + senderId; + sendAPI( content, senderId ); + content = fields.initMaster + ' --checkinit ' + fromTokenID + '|silent' + + ' --checkinit ' + toTokenID + '|silent'; + sendAPI( content, senderId ); + setTimeout( updateCoins, 10, charCS ); + + if (!single) pickupMessage( args, miNames, null, miQtys, null, null, senderId ); + await itemSlotData( toTokenID, toMIbag, senderId ); + await itemSlotData( fromTokenID, fromMIbag, senderId ); + + return; + } catch (e) { + sendDebug('MagicMaster handlePickOrPut: JavaScript '+e.name+': '+e.message+' while searching, looting, storing, buying or selling items'); + sendCatchError('MagicMaster',null,e,'MagicMaster error in handlePickOrPut()'); + return; + } + }; + + /* + * Handle selecting a magic item to store in the + * displayed magic item bag. + */ + + const handleSelectMI = function( args, GMonly, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + MItoStore = args[3], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (!MItoStore || MItoStore.length == 0) { + sendError('Internal MagicMaster error'); + return; + } + + if (MItoStore.toLowerCase() != 'remove') { + let [index,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), MIrowref ); + let itemSpeed = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {speed:reSpellSpecs.speed}, {row:index, rowID:rowID} ).parsed.speed; + setAttr( charCS, fields.ItemCastingTime, itemSpeed ); + setAttr( charCS, fields.ItemSelected, 1 ); + }; + + if (GMonly) { + makeGMonlyMImenu( args, senderId ); + } else { + makeEditBagMenu( args, senderId, 'Selected '+MItoStore+' to store' ); + } + return; + }; + + /* + * Handle selecting a slot in the displayed MI bag + */ + + const handleSelectSlot = function( args, GMonly, senderId ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + let MIrowref = args[2]; + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (!MIrowref || isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let MagicItems = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table] = tableGroupIndex( MagicItems, MIrowref ); + + if (_.isUndefined(index)) { + MagicItems = getTableGroup( charCS, fieldGroups.MI ); + table = 'GEAR'; + MagicItems[table] = MagicItems[table].addTableRow(); + index = MagicItems[table].sortKeys.length-1; + args[2] = MIrowref = indexTableGroup( MagicItems, table, index ); + }; + + const slotItem = MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'name'], index ); + + setAttr( charCS, fields.ItemChosen, slotItem.hyphened() ); + setAttr( charCS, fields.ItemRowRef, MIrowref ); + setAttr( charCS, fields.Expenditure, (MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], index ) || 0 ) ); + setAttr( charCS, fields.ItemSelected, 1 ); + + if (GMonly) { + makeGMonlyMImenu( args, senderId ); + } else { + makeEditBagMenu( args, senderId, 'Selected slot currently containing '+slotItem.dispName() ); + } + return; + } + + /* + * Handle storing an MI in a Magic Item bag. + * Can take either a tokenID or a Character ID. + * A flag parameter determines if this is a GM-only action + */ + + async function handleStoreMI( args, GMonly, senderId ) { + + const cmd = (args[0].toUpperCase().includes('MARTIAL') ? BT.EDIT_MARTIAL : (args[0].toUpperCase().includes('ALLITEMS') ? BT.EDIT_ALLITEMS : BT.EDIT_MI)); + + let tokenID = args[1], + MIrowref = String(args[2] || ''), + replace = (args[3] || '').split('/'), + MIqty = args[4] || '1', + silent = (args[5] || '').toUpperCase() === 'SILENT'; + + const queries = args.slice(6), + charCS = getCharacter( tokenID ); + + if (!getObj( 'graphic', tokenID )) { // i.e. if args[1] is actually a characterID + tokenID = undefined; + silent = true; + } + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const inHand = MIrowref.dbName().startsWith('inhand'), + MIchosen = replace[0], + MIreplace = replace[1], + isRing = MIrowref === '=', + qtyOp = isNaN(parseInt(MIqty[0])) && MIqty[0] !== '=', + reMIspecs = { + qty:reSpellSpecs.qty, + max:reSpellSpecs.maxQty, + speed:reSpellSpecs.speed, + type:reSpellSpecs.recharge, + itemType:reSpellSpecs.itemType, + hide:reSpellSpecs.hide, + reveal:reSpellSpecs.reveal, + pick:reSpellSpecs.pick, + cost:reSpellSpecs.cost, + weight:reSpellSpecs.weight, + }; + + let MItables = getTableGroup( charCS, fieldGroups.MI ), + repQty = '0', +// magicItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ), + typeTable='', + typeIndex; + + let [selIndex,selTable,selRowID] = tableGroupIndex( MItables, parseInt(MIrowref) ); + + const magicItem = getAbility( fields.MagicItemDB, MIchosen, charCS, null, null, null, (isNaN(MIrowref) ? '' : selIndex), (isNaN(MIrowref) ? '' : selRowID) ); + + if (!!magicItem.obj) { + typeTable = getItemTable( magicItem.obj[1].type ); + typeIndex = MItables[typeTable].tableFind( fields[fieldGroups[typeTable].prefix+'name'], '-' ); + }; + if (MIqty[0] === '=') MIqty = MIqty.slice(1); + + if (MIreplace) { + [selIndex,selTable,selRowID] = tableGroupFind( MItables, 'trueName', MIreplace ); + if (!MIqty.length && MIreplace !== '-' && _.isUndefined(selIndex)) return; // If args[4] === '=' but MIreplace cannot be found (e.g. last dose of a potion) don't create a new entry. + if (qtyOp || !MIqty.length) repQty = (_.isUndefined(selIndex) ? '1' : String(MItables[selTable].tableLookup( fields[fieldGroups[selTable].prefix+'qty'], selIndex ))); + }; + if (inHand && isNaN(parseInt(MIrowref))) [selIndex,selTable,selRowID] = tableGroupFind( MItables, 'trueName', MIchosen ); + if (isNaN(parseInt(selIndex)) || selIndex<0) { + const miObj = abilityLookup( fields.MagicItemDB, MIchosen ); + selTable = getItemTable( miObj.obj[1].type ); + selIndex = MItables[selTable].tableFind( fields[fieldGroups[selTable].prefix+'name'], '-' ); + selRowID = MItables[selTable].rowID(selIndex); + }; + + if (queries && queries.length && queries[0].length) _.each( queries, q => setAttr( charCS, [fields.ItemVar[0]+MIchosen.hyphened()+'+'+selRowID+'-'+q.split('=')[0],fields.ItemVar[1]], (q.split('=') || ['',''])[1] )); + const miData = resolveData( MIchosen, fields.MagicItemDB, reItemData, charCS, reMIspecs, {row:(isNaN(MIrowref) ? '' : selIndex ), rowID:(isNaN(MIrowref) ? '' : selRowID)} ).parsed; + + MIqty = Math.floor(evalAttr((qtyOp ? repQty+MIqty : (!MIqty.length ? repQty : MIqty)),charCS) || 0); + if (!qtyOp && MIqty == 0) { + MIqty = (parseInt(evalAttr(miData.qty,charCS)) || 0); + }; + const MImaxQty = qtyOp ? MIqty : (parseInt(evalAttr(miData.maxQty,charCS)) || MIqty); + MIqty = Math.min( MIqty, MImaxQty ); + + if (selTable !== typeTable) { + if (!_.isUndefined(typeIndex) && !isNaN(typeIndex)) MItables[typeTable] = MItables[typeTable].addTableRow( typeIndex ); + selTable = typeTable; + selIndex = typeIndex; + selRowID = MItables[typeTable].rowID(selIndex); + }; + + if (isNaN(parseInt(selIndex))) { + MItables[selTable] = MItables[selTable].addTableRow(); + selTable = MItables[selTable].sortKeys.length-1; + }; + MIrowref = indexTableGroup(MItables,selTable,selIndex); + + const p = MItables[selTable].fieldGroup, + slotName = MItables[selTable].tableLookup( fields[p+'name'], selIndex ), + slotTrueName = MItables[selTable].tableLookup( fields[p+'trueName'], selIndex ), + slotType = MItables[selTable].tableLookup( fields[p+'type'], selIndex ), + containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + + let values = initValues( p ), + MIdisplayName; + + if (!GMonly && slotType.toLowerCase().includes('cursed')) { + if (!silent) sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); + return; + } + await moveMIspells( senderId, charCS, selIndex, selRowID, null, null, null, slotName ); + + if (!stdEqual(slotName,slotTrueName)) await moveMIspells( senderId, charCS, selIndex, selRowID, null, null, null, slotTrueName ); + + if (miData.hide && !['hide','nohide','reveal'].includes(miData.hide)) { + MIdisplayName = miData.hide; + getAbility( fields.MagicItemDB, MIdisplayName, charCS, true, true, MIchosen, selIndex, selRowID ); + } else if (GMonly && (state.MagicMaster.autoHide || (miData.hide && miData.hide === 'hide')) && !!magicItem.obj && reLooksLike.test(magicItem.obj[1].body)) { + MIdisplayName = getShownType( magicItem, MIrowref, miData.itemType ); + getAbility( fields.MagicItemDB, MIdisplayName, charCS, true, true, MIchosen, selIndex, selRowID ); + } else { + MIdisplayName = MIchosen; + } + + values.valLine(p,'name',MIdisplayName) + .valLine(p,'trueName',MIchosen) + .valLine(p,'qty',MIqty) + .valLine(p,'trueQty',MImaxQty) + .valLine(p,'speed',miData.speed) + .valLine(p,'trueSpeed',miData.speed) + .valLine(p,'cost',miData.cost) + .valLine(p,'type',miData.type) + .valLine(p,'trueType',miData.type) + .valLine(p,'reveal',(miData.reveal.toLowerCase() !== 'manual' ? miData.reveal : '')) + .valLine(p,'weight',(miData.weight || 1)); + + MItables[selTable].addTableRow( selIndex, values ); + + if (isRing) { + const ringHand = ((attrLookup( charCS, fields.Equip_leftTrueRing ) === MIreplace) ? BT.LEFTRING : ((attrLookup( charCS, fields.Equip_rightTrueRing ) === MIreplace) ? BT.RIGHTRING : undefined)); + if (!_.isUndefined(ringHand)) { + sendAPI((fields.attackMaster + ' --button ' + ringHand + (GMonly ? '-NOCURSE' : '') + '|' + tokenID + '|' + MIrowref + '|SILENT'), senderId); + } + }; + + if (slotName && slotName !== '-') { + removeMIability( charCS, slotName, MItables[selTable], selTable ); + } + + if (isNaN(containerNo) || (!(containerNo % 2) && (containerNo < 6))) { + setAttr( charCS, fields.ItemContainerType, (isNaN(containerNo) ? 1 : containerNo+1) ); + setAttr(charCS, fields.ItemOldContainerType, attrLookup(charCS, fields.ItemContainerType)); + } + + await moveMIspells( senderId, null, null, null, charCS, selIndex, selRowID, MIchosen ); + checkForBag( charCS, MIchosen, MIrowref ); + if (!!tokenID) { + sendAPI( (fields.attackMaster + ' --checkac ' + tokenID + '|Silent||' + senderId), senderId ); + if (!!miData.pick && !!miData.pick.length) { + pickPutCmd( miData.pick, tokenID, charCS, 'magic handleStoreMI' ); + }; + }; + + sendAPI( (fields.initMaster+' --checkinit '+(tokenID || charCS.id)+'|silent'), senderId ); + setTimeout( updateCoins, 10, charCS ); + + if (silent) { + const hand = inHand ? parseInt(MIrowref.split('/')[1] || '0') : 0; + if (tokenID && inHand && !isRing) sendAPI( (fields.attackMaster + ' --button ' + (['PRIMARY','OFFHAND','BOTH','HAND'][Math.min(hand,3)]) + '-NOCURSE|' + tokenID + '|' + MIchosen + '|' + hand + '||Silent'), senderId ); + sendWait(senderId,0,'Magic handleStoreMI'); + return [selIndex,selTable]; + } + args = [cmd,tokenID,-1,'']; + + if (GMonly) { + makeGMonlyMImenu( args, senderId, MIchosen + ' has been stored in slot '+MIrowref ); + } else { + makeEditBagMenu( args, senderId, MIchosen+' has overwritten '+slotName ); + } + await itemSlotData( tokenID, MItables, senderId ); + return [selIndex,selTable]; + } + + /** + * Handle renaming an item. Make sure that the new name is unique + **/ + + const handleRenameItem = function( args, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + MInewName = (args[4] || '').hyphened(), + override = String(args[5] || '').toLowerCase() === 'true', + charCS = getCharacter( tokenID ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ), + item = getAbility( fields.MagicItemDB, MInewName, charCS, true ); + + const MIoldName = tableGroupLookup( Items, 'name', MIrowref ), + MIhyphenOld = MIoldName.hyphened(); + + const miStoredSpell = function( charCS, oldName, newName, rowID, spell, field ) { + let o = attrLookup( charCS, [field[0]+oldName+'+'+rowID+'-'+spell,null] ); + if (!o) { + o = attrLookup( charCS, [field[0]+oldName+'-'+spell,null] ); + } + if (!o) { + o = attrLookup( charCS, [field[0]+spell,null] ); + } + if (o) o.set('name',field[0]+newName+'+'+rowID+'-'+spell); + }; + + if (!MInewName || !MInewName.length) { + sendFeedback( '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s Magic Item Bag}}{{desc=Can\'t rename '+MIoldName+' to an empty string. Try a different name.}}{{desc1=[Try another Name](!magic --button '+args.join('|')+')\n[Return to Menu](!magic --gm-edit-mi '+tokenID+')}}' ); + + } else if (!override && !!item.obj) { + args[4] = '?{What do you want to call '+MIoldName+'?}'; + sendFeedback( '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s Magic Item Bag}}{{desc=An item called '+MInewName+' already exists. Do you want a different name?}}{{desc1=[Try another Name](!magic --button '+args.join('|')+')\n[Use '+MInewName+' anyway](!magic --button GM-RenameMI|'+tokenID+'|'+MIrowref+'||'+MInewName+'|true)\n[Return to Menu](!magic --gm-edit-mi '+tokenID+')}}' ); + } else { + item = getAbility( fields.MagicItemDB, MIoldName, charCS, null, null, null, index, rowID ); // Check if this should actually be an abilityLookup() + if (!item.obj) return; + item.obj[0].set('name',MInewName); + const key = 'ababzzqqrst', + oldDispName = MIoldName.replace(/-/g,' '), + action = item.obj[1].body.replace(new RegExp(MIoldName,'img'),key).replace(new RegExp(oldDispName,'img'),args[4]).replace(new RegExp(key,'img'),MInewName); + setAbility( charCS, MInewName, action ); + + Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'name'], index, MInewName ); + Items[table] = getTableField( charCS, Items[table], fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); + Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueName'], index, MInewName ); + + const MUspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemMUspellsList[0], null] ), + PRspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPRspellsList[0], null] ), + powerObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPowersList[0], null] ); + + if (MUspellObj) { + MUspellObj.set('name',fields.ItemMUspellsList[0]+MInewName+'+'+rowID); + const spellList = MUspellObj.get('current').split(','); + _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'mu' ); + if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-mu+'+rowID ); + } + if (PRspellObj) { + PRspellObj.set('name',fields.ItemPRspellsList[0]+MInewName+'+'+rowID); + const spellList = PRspellObj.get('current').split(','); + _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pr' ); + if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pr+'+rowID ); + } + if (powerObj) { + powerObj.set('name',fields.ItemPowersList[0]+MInewName+'+'+rowID); + const spellList = powerObj.get('current').split(','); + _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIpowerPrefix )); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pw' ); + if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pw+'+rowID ); + } + let objName; + filterObjs( obj => { + if (obj.get('_type') !== 'attribute' || obj.get('_characterid') !== charCS.id) return false; + objName = obj.get('name'); + if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+index+'-')) { + obj.set('name',objName.replace( MIhyphenOld, MInewName ).replace('+'+index+'-','+'+rowID+'-')); + } else if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+rowID)) { + obj.set('name',objName.replace( MIhyphenOld, MInewName )); + } else if (objName == fields.CastingTimePrefix[0]+MIhyphenOld) { + setAttr( charCS, [fields.CastingTimePrefix[0]+MInewName,fields.CastingTimePrefix[1]], obj.get(fields.CastingTimePrefix[1]) ); + setAttr( charCS, [fields.ItemChargeType[0]+MInewName,fields.ItemChargeType[1]], obj.get(fields.ItemChargeType[1]) ); + } else if (objName === fields.ItemChosen[0]) obj.set(fields.ItemChosen[1],MInewName); + return false; + }); + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, 'Renamed "'+MIoldName.dispName()+'" as "'+MInewName.dispName()+'"' ); + + } + return; + }; + + /* + * Handle changing the displayed magic item name to that selected + * without changing what it actually is. Only available to GM + */ + + const handleHideMI = function( args, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'type'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueType'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'reveal'] ); + + Items = Items.tableSet( fields[fieldGroups[table].prefix+'name'], index, MIchosen ); + Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) ); + const reveal = resolveData( Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), fields.MagicItemDB, reItemData, charCS, {reveal:reSpellSpecs.reveal}, {row:index, rowID:rowID} ).parsed.reveal; + Items = Items.tableSet( fields[fieldGroups[table].prefix+'reveal'], index, (reveal.toLowerCase() !== 'manual' ? reveal : '')); + + const newItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ); + if (newItem.obj) Items = Items.tableSet( fields[fieldGroups[table].prefix+'type'], index, newItem.obj[1].charge ); + + getAbility( fields.MagicItemDB, MIchosen, charCS, true, playerIsGM(senderId), Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), index, rowID ); + + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, 'Slot '+MIrowref+' is now displayed as '+MIchosen ); + return; + } + + /* + * Handle removing an MI from a Magic Item bag. + * Use a flag to check if this is being done by the GM. + */ + + async function handleRemoveMI( args, GMonly, senderId, silent=false, delAbility=true ) { + + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + Items = getTable( charCS, fieldGroups[table] ); + + const slotType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) || '', + slotTrueType = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], index ) || '', + slotTrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ) || ''; + + if (!GMonly && (slotType.toLowerCase().includes('cursed') || slotTrueType.toLowerCase().includes('cursed'))) { + sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); + return; + } + const putCmd = resolveData( slotTrueName, fields.MagicItemDB, reItemData, charCS, {put:reSpellSpecs.put}, {row:index, rowID:rowID} ).parsed.put; + if (!!putCmd && !!putCmd.length) pickPutCmd( putCmd, tokenID, charCS, 'magic handleRemoveMI' ); + + Items.addTableRow( index ); + await moveMIspells( senderId, charCS, index, rowID, null, null, null, slotTrueName, 'ALL', true ); + sendAPI( fields.attackMaster+' --blank-weapon '+tokenID+'|'+MIchosen+' --checkac ' + tokenID + '|Silent||' + senderId); + + if (delAbility) { + removeMIability( charCS, MIchosen, Items, table ); + removeMIability( charCS, slotTrueName, Items, table ); + }; + args[2] = -1; + args[3] = ''; + + sendAPI( (fields.initMaster+' --checkinit '+tokenID+'|silent'), senderId ); + setTimeout( updateCoins, 10, charCS ); + + if (silent) { + sendWait(senderId,0,'Magic handleRemoveMI'); + return; + } + + if (GMonly) { + makeGMonlyMImenu( args, senderId, 'Slot '+MIrowref+' has been blanked' ); + } else { + makeEditBagMenu( args, senderId, 'Slot '+MIrowref+' has been removed' ); + } + await itemSlotData( tokenID, null, senderId ); + return; + }; + + /* + * Handle changing the type of a Magic Item. Only available to the GM. + */ + + const handleChangeMItype = function( args, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID); + + let newType = args[4]; + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table] = tableGroupIndex( Items, MIrowref ); + + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'type'] ); + Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueType'] ); + + const MIname = Items.tableLookup( fields[fieldGroups[table].prefix+'name'], index ), + MItrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ); + + if (newType === 'removeCurse') { + Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ).replace(/cursed\+/i,'').replace(/cursed/i,'uncharged') ); + newType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ).replace(/cursed\+/i,'').replace(/cursed/i,'uncharged'); + } + + Items = Items.tableSet( fields[fieldGroups[table].prefix+'type'], index, newType ); + + if (MIname === MItrueName) { + Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, newType ); + } + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+' has been changed to be type '+newType ); + + sendAPI( fields.attackMaster + ' --checkac ' + tokenID + '|quiet||' + senderId, senderId ); + + return; + } + + /* + * Handle changing the number of charges. A parameter determines if + * the displayed charges, the actual charges or both are set. + */ + + async function handleChangeMIcharges( args, changeType, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + MInewQty = args[4], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + const MIname = tableGroupLookup( MItables, 'name', MIrowref ) || '-'; + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'trueQty' ); + + let [index,table] = tableGroupIndex( MItables, MIrowref ); + + if (changeType == 'Displayed' || changeType == 'Both') { + MItables[table] = MItables[table].tableSet( fields[fieldGroups[table].prefix+'qty'], index, MInewQty ); + } + if (changeType == 'Actual' || changeType == 'Both') { + MItables[table] = MItables[table].tableSet( fields[fieldGroups[table].prefix+'trueQty'], index, MInewQty ); + } + setTimeout( updateCoins, 10, charCS ); + + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+'\'s '+changeType+' quantity has been changed to '+MInewQty ); + await itemSlotData( tokenID, null, senderId ); + return; + } + + /* + * Handle change the cost of an MI, to support shops and Inns + */ + + const handleSetMIcost = function( args, senderId ) { + + const tokenID = args[1], + MIrowref = args[2], + newMIcost = args[4], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (isNaN(MIrowref) || MIrowref<0) { + sendError('Internal MagicMaster error'); + return; + } + + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'cost' ); + + let [index,table] = tableGroupIndex( MItables, MIrowref ); + const MIname = MItables[table].tableLookup( fields.Items_trueName, MIrowref ) || '-'; + + MItables[table].tableSet( fields.Items_cost, MIrowref, newMIcost ); + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+' now costs '+newMIcost+'GP' ); + return; + } + + /* + * Handle adding a row to the MIbag. This is usually called as a + * command in front of a command string that will call a follow-on, + * meaning a shift() creates the follow-on command call to doButton() + */ + + const handleAddMIrow = function( args, senderID ) { + + args.shift(); + + const tokenID = args[1], + table = args[3], + charCS = getCharacter(tokenID); + + getTable(charCS, fieldGroups[table]).addTableRow(); + + args.splice(3,1); + doButton( args, senderID ); + return; + } + + /* + * Handle blanking the selected Magic Item bag. + */ + + const handleBlankMIBag = function( args ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + const content = '&{template:'+fields.menuTemplate+'}{{name=TOTALLY BLANK THE MI BAG}}' + + '{{desc=Are you REALLY sure you want to delete the complete MI Bag with all its contents?}}' + + '{{desc1=[Yes](!magic --button GM-ConfirmedBlank|'+tokenID+'|-1|) or [No](!magic --button GM-NoBlank|'+tokenID+'|-1|)}}'; + + sendFeedback(content,flags.feedbackName,flags.feedbackImg,tokenID,charCS); + return; + } + + /* + * The GM confirmed they want to Blank the MI Bag + */ + + const handleConfirmedBlank = function( args, senderId ) { + + const tokenID = args[1], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + let Items = getTableGroup( charCS, fieldGroups.MI ); + for (const table in Items) { + if (table.dbName() === 'coins') continue; + for (let i=0; i { + + try { + let itemName, + spellsList = ''; + + const charCS = getCharacter(token.id); + if (!(!charCS || !_.isUndefined(namesList[charCS.id]) || charCS.get('name').toLowerCase().includes('-db'))) { + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + itemList = [], + i = -1, + itemRow, itemRowID, table; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'trueName' ); + while (!_.isUndefined(itemName = tableGroupLookup( Items, 'name', ++i, false ))) { + itemList.push(itemName,tableGroupLookup( Items, 'trueName', i )); + [itemRow,table,itemRowID] = tableGroupIndex( Items, i ); + itemName = itemName.replace(/\s/g,'-'); + itemList = itemList.concat(miSpellLookup( charCS, itemName, itemRow, itemRowID, fields.ItemMUspellsList, '', '', '' ).split(','), + miSpellLookup( charCS, itemName, itemRow, itemRowID, fields.ItemPRspellsList, '', '', '' ).split(','), + miSpellLookup( charCS, itemName, itemRow, itemRowID, fields.ItemPowersList, '', '', '' ).split(',')); + } + + _.each(spellLevels, (caster,k) => { + _.each(caster, (l,n) => { + if (l.book != 0) { + spellsList += (attrLookup( charCS, [fields.Spellbook[0]+l.book,fields.Spellbook[1]] ) || '')+'|'; + } + }); + }); + itemList = itemList.concat(spellsList.split('|')); + itemList.push(fields.Prev_round[0]+token.id); + + if (itemList.length) { + if (_.isUndefined(namesList[charCS.id])) namesList[charCS.id] = []; + namesList[charCS.id] = _.chain(itemList).filter( n => !!n ).sort().uniq(true).value(); + } + } + } catch (e) { + log('MagicMaster getNamesList: JavaScript '+e.name+': '+e.message+' while doing a tidy'); + sendCatchError('MagicMaster',null,e,'MagicMaster error in handleCStidy()'); + namesList = undefined; + } finally { + setTimeout(() => { + resolve(namesList); + }, 1); + } + }); + }; + + if ((!tokenList || !tokenList.length) && silent) { + tokenList = filterObjs( obj => (obj.get('type') === 'graphic' && obj.get('subtype') === 'token' && (!(!obj.get('represents') || !obj.get('represents').length)))); + }; + tokenList = tokenList.filter( n => !!n ); + for (const token of tokenList) { + namesList = await getNamesList( token, namesList ); + if (_.isUndefined(namesList)) return; + } + let charID, objName, objCurrent, objMax, foundName, + dbItem, attack, menuCmd, owned; + objList = filterObjs( obj => { + if (obj.get('type') != 'attribute' && obj.get('type') != 'ability') return false; + charID = obj.get('characterid'); + if (_.isUndefined(namesList[charID])) return false; + objName = obj.get('name'); + objCurrent = String(obj.get('current') || ''); + objMax = String(obj.get('max') || ''); + if (obj.get('type') !== 'ability') { + if (objName.startsWith('repeating_')) return false; + foundName = undefined; + if (objName.startsWith(fields.CastingTimePrefix[0])) foundName = objName.substring(fields.CastingTimePrefix[0].length) + else if (objName.startsWith(fields.ItemMUspellsList[0])) foundName = objName.substring(fields.ItemMUspellsList[0].length) + else if (objName.startsWith(fields.ItemPRspellsList[0])) foundName = objName.substring(fields.ItemPRspellsList[0].length) + else if (objName.startsWith(fields.ItemPowersList[0])) foundName = objName.substring(fields.ItemPowersList[0].length) + else if (objName.startsWith(fields.MIspellPrefix[0])) foundName = objName.substring(fields.MIspellPrefix[0].length) + else if (objName.startsWith(fields.MIpowerPrefix[0])) foundName = objName.substring(fields.MIpowerPrefix[0].length) + else if (objName.startsWith(fields.Prev_round[0])) foundName = objName + else if (objName.startsWith(fields.ItemVar[0])) foundName = objName.substring(fields.ItemVar[0].length,objName.lastIndexOf('+')); + return (!!foundName && ((!namesList[charID].some(elem => (!!elem.dbName() && foundName.dbName().includes(elem.dbName())))) || !(objCurrent+objMax).length)) + || ((objName.startsWith(fields.Magical_hitAdj[0]) || objName.startsWith(fields.Magical_dmgAdj[0])) && !parseInt(objCurrent || 0) && !parseInt(objMax || 0)); + } else { + dbItem = false; + attack = objName.startsWith('Do-not-use'); + menuCmd = obj.get('istokenaction'); + owned = namesList[charID].includes(objName); + if (!menuCmd && !owned && !attack) { + objName = (objName || '').dbName(); + dbItem = _.some(DBindex, (d) => !_.isUndefined(d[objName])); + } + return (attack || (!menuCmd && !owned && dbItem)); + } + }); + if (!silent) { + sendFeedback( '&{template:'+fields.messageTemplate+'}{{desc='+objList.length+' objects have been removed from '+_.size(namesList)+' characters.}}' ); + } else { + log(objList.length+' objects have been removed from '+_.size(namesList)+' characters.'); + sendWait(findTheGM(),0,'Magic handleCStidy'); + } + + for (const obj of objList) { + obj.remove(); + } + return; + } catch (e) { + sendCatchError('MagicMaster',null,e,'MagicMaster handleCStidy()'); + } + }; + + /* + * Copy a character to a new character sheet e.g. to dump corrupted attributes + */ + + const handleCleanCS = function( charCS, silent=false ) { + + const newCS = createObj( 'character', { + name: (charCS.get('name')), + avatar: charCS.get('avatar'), + inplayerjournals: charCS.get('inplayerjournals'), + controlledby: charCS.get('controlledby') + }); + charCS.get('bio', function(bio) { + newCS.set('bio',bio); + }); + charCS.get('gmnotes',function(gmnotes) { + newCS.set('gmnotes',gmnotes); + }); + + let type; + const objList = filterObjs( obj => { + type = obj.get('type'); + if (type === 'graphic' && obj.get('subtype') === 'token') { + if (obj.get('represents') !== charCS.id) return false; + obj.set('represents',newCS.id); + return false; + } + if (type !== 'attribute' && type !== 'ability') return false; + if (obj.get('characterid') !== charCS.id) return false; + if (obj.get('name').length && obj.get('name') != 'Untitled') { + if (type !== 'ability') { + createObj( 'attribute', { + characterid: newCS.id, + name: obj.get('name'), + current: obj.get('current'), + max: obj.get('max') + }); + } else { + createObj( 'ability', { + characterid: newCS.id, + name: obj.get('name'), + description: obj.get('description'), + action: obj.get('action'), + istokenaction: obj.get('istokenaction') + }); + }; + }; + return true; + }); + + // Remove all objects on objList + // then remove charCS + + setTimeout( () => { + for (const obj of objList) { + obj.remove(); + } + charCS.remove(); + }, 500); + + if (!silent) sendFeedback('&{template:'+fields.messageTemplate+'}{{name='+newCS.get('name')+' has been cleaned}}{{desc=The character sheet for '+newCS.get('name')+' has been cleaned of any corrupted attributes or abilities.}}'); + + return newCS; + } + + /* + * Handle changes to the Strength of a character, which is not + * a linear progression due to Exceptional Strength + */ + + async function handleStrengthChange( tokenID, field, increment, senderId, silent=true ) { // tokenID + + let newStr, newExp, + original = '', + changeBy = 0, + change = (isNaN(increment[0]) ? increment[0] : '+'); + + const charCS = getCharacter( tokenID ); + + if (!charCS || !field) { + sendError('Invalid token or field name when handling an attribute change.'); + return; + } + let curStrength = attrLookup( charCS, [field+'-real','current']); + if (!curStrength || isNaN(parseInt(curStrength))) curStrength = attrLookup( charCS, [field,'current'] ); + if (!curStrength || isNaN(parseInt(curStrength))) { + sendError('Invalid '+field+' value on character sheet when handling an attribute change.'); + return; + } + + increment = parseInt(evalAttr(((change !== '-' && isNaN(increment[0])) ? increment.slice(1) : increment),charCS)) || 0; + + let strData = curStrength.match(/(\-?\d+)(?:\((\d+)\))?/); + strData[1] = parseInt(strData[1]); + strData[2] = !_.isUndefined(strData[2]) ? (parseInt(strData[2]) || 100) : strData[2]; + + let maxStrength = attrLookup( charCS, [field,'max'] ); + if ((!maxStrength || increment == 0) && strData[1] > 0 && strData[1] < 26) { + setAttr( charCS, [field,'max'], (maxStrength = curStrength) ); + } + let originalData = maxStrength.match(/(\d+)(?:\((\d+)\))?/); + originalData[1] = parseInt( originalData[1] ); + originalData[2] = (!_.isUndefined(originalData[2])) ? (originalData[2] = parseInt(originalData[2]) || 100) : strData[2]; + + if (change === '=') increment = increment - strData[1]; + + if (increment != 0) { + + newStr = (change === '*' ? (strData[1] * increment) : ((change === '/') ? (strData[1] / increment) : (strData[1] + increment))); + + newStr = ((change === '*' && increment < 1) || (change === '/' && increment > 1) || increment < 0) ? Math.ceil(newStr) : Math.floor(newStr); + + if (strData[2]) { + if (strData[1] == originalData[1] && ((increment < 0 && strData[2] > originalData[2]) || (increment > 0 && strData[2] < originalData[2]))) { + newStr = originalData[1]; + newExp = originalData[2]; + original = 'back to the original value of '; + } else if ((change === '*' && increment < 1) || (change === '/' && increment > 1) || increment < 0) newStr++; + } else { + if (originalData[2] && ((originalData[1] >= strData[1] && originalData[1] < newStr) || (originalData[1] < strData[1] && originalData[1] >= newStr))) { + newStr = originalData[1]; + newExp = originalData[2]; + original = 'back to the original value of '; + } else if ((originalData[1] > strData[1] && originalData[1] < newStr) || (originalData[1] < strData[1] && originalData[1] > newStr)) { + newStr = originalData[1]; + original = 'back to the original value of '; + } + } + changeBy = newStr - strData[1]; + if (strData[2] && ((change == '*' && increment < 1) || (change == '/' && increment > 1) || increment < 0)) changeBy--; + if (newExp && ((change == '*' && increment > 1) || (change == '/' && increment < 1) || increment > 0)) changeBy++; + + setAttr( charCS, [field+'-real','current'], newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + setAttr( charCS, [field,'current',,true], (Math.max(1,Math.min(newStr,25)))+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + } + if (!silent) { + const content = '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s '+field+'}}{{desc='+charCS.get('name')+'\'s '+field + + (increment != 0 ? (' has changed by '+changeBy+', to be '+original+newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '')) : (' has been memorised as an original roll')) +'}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); + } else { + sendWait(senderId,0,'Magic handleStrengthChange'); + } + await itemSlotData( tokenID, null, senderId, false ); + } + + /* + * Handle a Show More or Show Less button on a + * spell or item description. Uses a message ID + * passed back by the Library output parser + * to recall the message text + */ + + const handleShowMore = function( args, senderId ) { + +// log('handleShowMore: called, showMoreObj[args[1]] = '+showMoreObj[args[1]]); + sendAPI( showMoreObj[args[1]], senderId, '', true ); + showMoreObj[args[1]] = undefined; + }; + +// ------------------------------------------------------------- Command Action Functions --------------------------------------------- + + /** + * Show help message + */ + + const showHelp = function() { + + const handoutIDs = getHandoutIDs(); + const content = '&{template:'+fields.menuTemplate+'}{{title=MagicMaster Help}}{{MagicMaster Help=For help on using MagicMaster, and the !magic commands, [**Click Here**]('+fields.journalURL+handoutIDs.MagicMasterHelp+')}}{{Spells & Magic Items Help=For help on the Spells, Powers and Magic Items databases, [**Click Here**]('+fields.journalURL+handoutIDs.MagicDatabaseHelp+')}}{{Effects Database=For help on using and adding Effects and the Effects Database, [**Click Here**]('+fields.journalURL+handoutIDs.EffectsDatabaseHelp+')}}{{Class Database=For help on using and adding to the Class Database, [**Click Here**]('+fields.journalURL+handoutIDs.ClassRaceDatabaseHelp+')}}{{Character Sheet Setup=For help on setting up character sheets for use with RPGMaster APIs, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterCharSheetSetup+')}}{{RPGMaster Templates=For help using RPGMaster Roll Templates, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterLibraryHelp+')}}'; + + sendFeedback(content,flags.feedbackName,flags.feedbackImg); + }; + + /* + * Handle casting a spell + */ + + const doCastSpell = function( args, selected, senderId ) { + + if (!args) return; + if (args[0] && !args[1] && selected && selected.length) { + args[1] = selected[0]._id; + } else if (args.length < 2) { + sendDebug('doCastSpell: invalid arguments, missing caster type or token_id'); + sendResponseError(senderId,'Missing caster type or token ID'); + return; + } + + const chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'); + + args = setCaster( args, messages.castSpellClass, senderId ); + if (!args) { + return; + } + + args[4] = args[3] = args[2] = -1; + args[5] = chargedItem; + + makeCastSpellMenu( args, senderId ); + return; + } + + /* + * Use another charge of the same spell/power/MI + * if there are any charges left + */ + + const doCastAgain = function( args, senderId ) { + + if (!args) return; + + if (args.length < 2) { + sendDebug('doCastAgain: invalid arguments, missing caster type or token_id'); + sendResponseError(senderId,'Missing caster type or token ID'); + return; + } + const isPower = args[0].toUpperCase().includes('POWER'), + isMU = args[0].toUpperCase().includes('MU'), + tokenID = args[1], + charCS = getCharacter(tokenID); + + let spellName = args[2]; + + if (!charCS) { + sendDebug('doCastAgain: invalid token_id'); + sendResponseError(senderId,'Invalid token selected'); + return; + } + + const spellRow = attrLookup( charCS, fields.SpellRowRef ), + spellCol = attrLookup( charCS, fields.SpellColIndex ), + firstColNum = isPower ? fields.PowersFirstColNum : fields.SpellsFirstColNum, + col = (firstColNum || spellCol != 1) ? spellCol : '', + spellCharges = parseInt((attrLookup( charCS, fields.Spells_castValue, {tableDef:(isPower ? fields.Powers_table[0] : fields.Spells_table[0]), row:spellRow, col:spellCol} ) || 0),10); + + if (spellCharges <= 0) { + sendParsedMsg( tokenID, messages.noMoreCharges, senderId ); + return; + } + + if (!spellName || spellName.length == 0) { + spellName = attrLookup( charCS, fields.SpellToMem ) || '-'; + } + + args[0] = isPower ? BT.USE_POWER : (isMU ? BT.CAST_MUSPELL : BT.CAST_PRSPELL); + args[3] = spellRow; + args[4] = spellCol; + args[5] = spellName; + + makeCastAgainMenu( args, senderId ); + return; + } + + /* + * Target a spell that requires a "to-hit" roll at a token + */ + + const doTouch = function( args, isGM ) { + + if (!args) return; + + if (args.length < 4) { + sendError('Too few targeting arguments'); + return; + } + + const tokenID = args[0], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + handleSpellTargeting( args, isGM ); + return; + } + + /* + * Create a menu to change the memorised spells for the day + */ + + const doMemoriseSpells = function( args, selected, senderId ) { + + if (!args) return; + if (args[0] && !args[1] && selected && selected.length) { + args[1] = selected[0]._id; + } else if (args.length < 2) { + sendDebug('doMemoriseSpells: invalid arguments, missing caster type or token_id'); + sendResponseError(senderId,'Missing caster type or token ID'); + return; + }; + + args = setCaster( [args[0],args[1],'','','',args[2]], messages.memSpellClass, senderId ); + if (!args) { + return; + } + + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + tokenID = args[1], + charCS = getCharacter(tokenID), + classObjs = classObjects( charCS, senderId ), + isWiz = classObjs.some( c => c.base === 'wizard' ), + isPriest = classObjs.some( c => c.base === 'priest' ); + + if ((isMU && !isWiz) || (isPR && !isPriest) || (isMU && isPR && !(isWiz || isPriest))) { + sendParsedMsg( tokenID, messages.wrongSpellCaster, senderId ); + } else { + args = (isMI) ? [args[0],args[1],-1,-1,-1,-1,-1,-1] : [args[0],args[1],1,-1,-1,'']; + if (isMI && (isMU || isPR)) { + makeStoreMIspell( args, senderId ); + } else { + makeManageSpellsMenu( args, senderId ); + } + }; + return; + } + + /* + * Change the number of power uses per day + */ + + const doChangePerDay = function( args, selected, senderId ) { + + if (!args) return; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (args.length < 3) { + sendError('Missing token ID or power name when trying to set power uses per day'); + return; + } + const tokenID = args[0], + power = args[1], + change = args[2], + charCS = getCharacter(tokenID); + if (!charCS) { + sendError('Invalid character trying to set power uses per day',msg_orig[senderId]); + return; + } + let [row,col] = powerRowCol( charCS, power ); + if (_.isUndefined(row)) { + sendError('Invalid power name when trying to set uses per day',msg_orig[senderId]); + return; + }; + let upd = String(attrLookup( charCS, fields.Powers_castMax, {tableDef:fields.Powers_table,row:row,col:col} )); + if (_.isUndefined(upd)) { + sendError('Invalid power object when trying to set uses per day',msg_orig[senderId]); + return; + }; + if (change[0] === '=') { + upd = evalAttr(change.slice(1)); + } else if (isNaN(parseInt(change[0]))) { + upd = evalAttr(upd + change); + } else { + upd = evalAttr(upd + '+' + change); + }; + + handleMemoriseSpell([BT.MEMALL_POWERS,tokenID,1,row,col,power,upd],senderId); + return; + } + + /* + * Create a menu to see what spells the character has memorised for the day, + * and allow selection to see the description of each spell. + */ + + const doViewMemorisedSpells = function( args, selected, senderId ) { + + if (!args) return; + if (args[0] && !args[1] && selected && selected.length) { + args[1] = selected[0]._id; + } else if (args.length < 2) { + sendDebug('doViewMemorisedSpells: invalid arguments, missing caster type or token_id'); + sendResponseError(senderId,'Missing caster type or token ID'); + return; + } + + args = setCaster( [args[0],args[1],args[3],'','',args[2]], messages.viewSpellClass, senderId ); + if (!args) return; + + args[2] = args[3] = args[4] = -1; + args[5] = ''; + + makeViewMemSpells( args, senderId ); + return; + } + + /* + * Attempt to learn a spell from a spellbook or scroll (or any other valid + * magic item that has stored spells + */ + + const doLearnSpell = function( args, selected, senderId ) { + + if (!args) return; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (args.length < 2) { + sendError('Missing token ID or spell name when trying to learn a spell',msg_orig[senderId]); + return; + } + const charCS = getCharacter(args[0]); + if (!charCS) { + sendError('Invalid character trying to learn a spell',msg_orig[senderId]); + return; + } + args.unshift(''); + handleLearnSpell( args, senderId ); + return; + }; + + /* + * Function to View or Use a Magic Item + * possible actions are BT.VIEW_MI or BT.USE_MI + */ + + const doViewUseMI = function( args, action, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doViewUseMI: invalid number of parameters'); + sendResponseError(senderId,'Missing token ID'); + return; + } + + const tokenID = args[0], + charCS = getCharacter(tokenID); + + if (!charCS) { + sendResponseError(senderId,'Invalid token selected'); + return; + } + setAttr( charCS, fields.CastingLevel, casterLevel( charCS, 'MI' )); + setAttr( charCS, fields.MU_CastingLevel, casterLevel( charCS, 'MU' )); + setAttr( charCS, fields.PR_CastingLevel, casterLevel( charCS, 'PR' )); + + makeViewUseMI( [action, tokenID, -1], senderId ); + return; + + } + + /* + * Specify a power to use from a Magic Item (isUse = false) + * or actually use the Magic Item power (isUse = true) + */ + + const doSelectMIpower = function( args, isUse, senderId ) { + + if (!args) return; + + if (args.length < 3) { + sendDebug('doSelectMIpower: invalid number of arguments'); + sendResponseError(senderId,'Incorrect MagicMaster syntax'); + return; + } + args.unshift(''); + handleSelectMIpower( args, isUse, senderId ); + + return; + } + + /* + * Restore uses per day of a specific power of a specific magic item + */ + + const doRestoreMIpowers = function( args, senderId ) { + + if (!args) return; + + if (args.length < 2) { + sendDebug('doRestoreMIpowers: invalid number of arguments'); + sendResponseError(senderId,'Incorrect MagicMaster syntax'); + return; + } + handleRestoreMIpowers( args, senderId ); + + return; + } + + /* + * Deal with requests to undertake a rest, either short or long, or + * if undetermined, ask the player which to do. Only enable a + * long rest if the DM has enabled it. + */ + + const doRest = function( args, selected, senderId ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doRest: invalid arguments, missing token_id'); + sendResponseError(senderId,'Token not specified'); + return; + } + + const tokenID = args[0], + restType = (args[1] || 'SELECT').toUpperCase(), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let timeSpent = args[3]; + + if (casterType.includes('MI') && casterType.includes('POWER')) { + handleRest( args, senderId ); + return; + } + + const curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doRest: invalid token_id'); + sendResponseError(senderId,'Invalid token specified'); + return; + } + if (_.isUndefined(timeSpent)) { + timeSpent = parseInt(attrLookup( charCS, fields.Timespent ) || 0); + } + if (isNaN(timeSpent)) timeSpent = 1; + + if (restType.toUpperCase() !== 'SELECT') { + const charRetail = parseData('['+((attrLookup( charCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {name:reClassSpecs.name,buy:reClassSpecs.buy,sell:reClassSpecs.sell}); + if (charRetail.buy || charRetail.sell) { + sendAPI( fields.commandMaster+' --restock '+tokenID, senderId ); + }; + }; + + switch (restType.toUpperCase()) { + + case 'LONG': + if (timeSpent == 0) { + sendParsedMsg( tokenID, messages.noLongRest, senderId ); + break; + } + handleRest( args, senderId ); + setAttr( charCS, fields.Timespent, 0 ); + if (!isNaN(args[3])) sendParsedMsg( tokenID, (messages.restHeader + '{{' + inGameDate(handleTimePassing( charCS, timeSpent )) + '=' + messages.longRest), senderId ); + sendAPI(fields.roundMaster+' --rest long|'+tokenID); + break; + + case 'SHORT': + handleRest( args, senderId ); + sendParsedMsg( tokenID, messages.shortRest, senderId ); + sendAPI(fields.roundMaster+' --rest short|'+tokenID); + break; + + case 'SELECT': + default: + makeRestSelectMenu( args, (timeSpent != 0), senderId ); + break; + + } + getTable( charCS, fieldGroups.COINS ).removeBlankLines(); + return; + } + + /* + * Reset a single selected MI Bag slot, so that the + * actual name and speed are displayed. + */ + + const doResetSingleMI = function( args, senderId, selected ) { + + const tokenID = args[0], + reveal = (args[2] || '').toLowerCase(), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let MIrowref = args[1], + index = MIrowref, + MIname, inHandRow, table; + + if (!charCS) { + charCS = getObj('character',tokenID); + } + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + InHand = getTable( charCS, fieldGroups.INHAND ); + + if (isNaN(MIrowref)) { + MIname = MIrowref; + [MIrowref,table] = tableGroupFind( Items, 'name', MIname ); + } else { + MIname = tableGroupLookup( Items, 'name', MIrowref ); + [MIrowref,table] = tableGroupIndex( Items, MIrowref ); + } + if (_.isUndefined(table) || _.isUndefined(MIrowref)) { + sendError('Internal MagicMaster error'); + return; + } + Items = getTable( charCS, fieldGroups[table] ); + const MItrueName = Items.tableLookup( fields[Items.fieldGroup+'trueName'], MIrowref, '-' ); + Items = Items.tableSet( fields[Items.fieldGroup+'name'], MIrowref, MItrueName ); + Items = Items.tableSet( fields[Items.fieldGroup+'speed'], MIrowref, Items.tableLookup( fields.Items_speed, MIrowref )); + Items = Items.tableSet( fields[Items.fieldGroup+'type'], MIrowref, Items.tableLookup( fields.Items_trueType, MIrowref )); + Items = Items.tableSet( fields[Items.fieldGroup+'reveal'], MIrowref, '' ); + + if (!_.isUndefined(inHandRow = InHand.tableFind( fields.InHand_trueName, MItrueName ))) { + InHand = InHand.tableSet( fields.InHand_name, inHandRow, MItrueName ); + } + if (MItrueName.trueCompare(attrLookup( charCS, fields.Equip_leftTrueRing ))) setAttr( charCS, fields.Equip_leftRing, MItrueName ); + if (MItrueName.trueCompare(attrLookup( charCS, fields.Equip_rightTrueRing ))) setAttr( charCS, fields.Equip_rightRing, MItrueName ); + if (reveal.toLowerCase() !== 'silent') { + if (reveal && reveal.length) { + const item = abilityLookup( fields.MagicItemDB, MItrueName, charCS ); + doDisplayAbility( [tokenID,item.dB,index+'/'+MItrueName], senderId, selected ); + } else if (curToken) { + makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MItrueName+' has been reset' ); + } + } + removeMIability( charCS, MIname, Items, table ); + return; + } + + /* + * Set a new maximum number of charges for a Magic Item. This is + * mainly used for magic items that regain a variable number of + * charges per day. Command is either ADD (adds value to current charges + * and sets as the max charges), SET (overwrites current max charges), + * or DEDUCT (deducts charges from the current number of charges). + * SELFCHARGE value 0 sets current to max, 01,02,... (note the preceding 0) + * or more increments current by the value unless the max is reached. + */ + + const doChangeCharges = function( args, selected, senderId ) { + + sendWait( senderId, 0, 'Magic doChangeCharges' ); + if (!args) return; + if (!args[0] && args[1] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0] || !args[1]) { + sendError('Missing item name, recharges or token ID'); + return; + } + const tokenID = args[0], + command = args[1][0] == '-' ? 'DEDUCT' : (args[1][0] == '+' ? 'ADD' : (args[1][0] == '0' ? 'SELFCHARGE' : 'SET')), + MIname = args[2], + chargeOverride = args[4] || '', + fail = args[6] || '', + charCS = getCharacter(tokenID); + + let maxCharges = parseInt(args[3]), + success = args[5] || '', + r, i, charges, table, rowID, MIrow, Items; + + try { + charges = args[1]; // .match(/[\d\/\*\+\-]+/); + charges = Math.abs(parseFloat(evalAttr(charges,charCS))); + } catch { + charges = 0; + } + if (!charCS || isNaN(charges)) { + sendError('Incorrect MagicMaster syntax'); + return; + } + + if (MIname && MIname.length>0) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); + [r,table,rowID] = tableGroupFind( Items, 'trueName', MIname ); + MIrow = indexTableGroup( Items, table, r ); + if (_.isUndefined(r)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + [r,table,rowID] = tableGroupFind( Items, 'name', MIname ); + MIrow = indexTableGroup( Items, table, r ); + }; + }; + if (_.isUndefined(r)) { + MIrow = attrLookup( charCS, fields.ItemRowRef ); + [r,table,rowID] = tableGroupIndex( Items, MIrow ); + } + if (_.isUndefined(r)) { + sendError('Magic Item "'+MIname+'" not found in '+charCS.get('name')+'\'s items'); + return; + } + Items = getTable( charCS, fieldGroups[table] ); + + const MImaxQty = Items.tableLookup( fields[Items.fieldGroup+'trueQty'], r ) || maxCharges || 1, + MItype = (chargeOverride || Items.tableLookup( fields[Items.fieldGroup+'trueType'], r ) || '').toLowerCase(), + absorbing = MItype.includes('absorbing'), + exploding = MItype.includes('exploding'); + + switch (command.toUpperCase()) { + case 'ADD': + i = (parseInt( Items.tableLookup(fields[Items.fieldGroup+'qty'], r) ) || 0); // attrLookup( charCS, fields.Items_qty, fields.Items_table, r ) || 0); + charges = charges + i; + case 'SET': + if (absorbing && isNaN(maxCharges)) maxCharges = MImaxQty; + if (!isNaN(maxCharges) && maxCharges < charges) charges = maxCharges; + if (absorbing && (charges > MImaxQty)) { + if (exploding) { + handleRemoveMI( ['', tokenID, MIrow, MIname], false, senderId, true ); + } else { + charges = MImaxQty; + } + success = ''; + }; + Items.tableSet( (absorbing ? fields[Items.fieldGroup+'qty'] : fields[Items.fieldGroup+'trueQty']), r, charges ); + break; + case 'DEDUCT': + if (!handleViewUseMI( ['',tokenID,MIrow], true, senderId, charges, chargeOverride )) success = ''; + break; + case 'SELFCHARGE': + i = 1+(parseInt( Items.tableLookup(fields[Items.fieldGroup+'qty'], r) ) || 0); + const m = (!isNaN(maxCharges)) ? maxCharges : (parseInt( Items.tableLookup(fields[Items.fieldGroup+'trueQty'], r) ) || 0); + if (charges != 0 && i < m) { + sendAPI('!rounds --target-nosave caster|'+tokenID+'|'+MIname+'-recharge|'+charges+'|-1|'+MIname+' is recharging|stopwatch'); + } else { + i = m; + } + Items.tableSet( fields[Items.fieldGroup+'qty'], r, i ); + Items.tableSet( fields[Items.fieldGroup+'trueQty'], r, m ); + break; + default: + log('doChangeCharges: invalid command'); + } + + if (success || fail) { + if (success[0] === '!') { + sendAPI(success,senderId); + } else if (fail[0] === '!') { + sendAPI(fail,senderId); + } else { + sendResponse( charCS, '&{template:'+(success ? fields.menuTemplate : fields.warningTemplate)+'}{{name='+MIname.replace(/-/g,' ')+'}}{{desc='+(success || fail)+'}}' ); + }; + } + return; + } + + /* + * Display a menu of actions for spell use. First, determine the type + * spellbooks the character has (PR, MU or both). If a type is provided as + * an argument and the character has such a spellbook, display the menu. If + * does not have the specified type, display an error message to the player. + * If no type is specified, display the appropriate spellbook menu or, + * if the character has both types, ask which the player wants to use. + */ + + const doSpellsMenu = function( args, selected, senderId ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doSpellsMenu: invalid arguments, missing token_id'); + sendResponseError(senderId,'No token selected'); + return; + } + + const tokenID = args[0], + isMU = args[1] && args[1].toUpperCase().includes('MU'), + isPR = args[1] && args[1].toUpperCase().includes('PR'), + isPower = args[1] && args[1].toUpperCase().includes('POWER'), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doSpellsMenu: invalid token_id'); + sendResponseError(senderId,'No token specified'); + return; + } + + var muLevel = casterLevel( charCS, 'MU' ), + prLevel = casterLevel( charCS, 'PR' ); + + if (isMU) { + if (muLevel > 0) { + makeMUSpellsMenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noMUspellbook, senderId ); + } + } else if (isPR) { + if (prLevel > 0) { + makePRSpellsMenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noPRspellbook, senderId ); + } + } else if (isPower) { + makePowersMenu( args, senderId ); + } + + if (!isMU && !isPR && !isPower) { + if (muLevel > 0 && prLevel > 0) { + sendParsedMsg( tokenID, messages.chooseSpellMenu, senderId ); + } else if (muLevel > 0) { + makeMUSpellsMenu( args, senderId ); + } else if (prLevel > 0) { + makePRSpellsMenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noSpellbooks, senderId ); + } + } + }; + + /** + * Function to allow the DM to add spells to a spell-storing + * magic item (instead of programming in the database) + **/ + + const doStoreSpells = function( args, senderId ) { + + if (!args) return; + + if (args.length < 2) { + sendDebug('doStoreSpells: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster parameters'); + return; + } + + const tokenID = args[0], + cmd = (args[2] || '').toUpperCase(), + level = args[3] || 1, + retMenu = args[4] || 'VIEW-ITEM', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doStoreSpells: invalid token_id'); + sendResponseError(senderId,'Invalid token specified'); + return; + }; + + let item = (args[1] || '').split('/'); + + item = item.length > 1 ? item[1] : item[0]; + const ability = getAbility( fields.MagicItemDB, item, charCS ); + if (!ability.obj || !ability.obj.length) { + sendDebug('doStoreSpells: invalid item name'); + sendResponseError(senderId,'Invalid item specified'); + return; + }; + const isSpell = reCastViewMIspellCmd.test(ability.obj[1].body), + isPower = reCastViewMIpowerCmd.test(ability.obj[1].body); + + if (isSpell || isPower) { + setCaster( ['MI',tokenID,level,item], '', senderId ); + args.unshift((isSpell && isPower) ? 'BOTH' : (isPower ? 'POWERS' : 'SPELLS')); + if (!cmd) { + args[3] = (isSpell ? 'MU' : 'POWER') + (isSpell && isPower ? '-ALL' : ''); + } + args[4] = level; + args[5] = retMenu; + args[6] = ''; + makeSpellsMenu( args, senderId ); + } else { + sendFeedback( '&{template:'+fields.menuTemplate+'}{{name=Invalid Item}}' + + '{{desc='+item+' cannot store spells or powers as it lacks a button to use them. Choose a different item.}}' + + '{{desc1=[Return to main menu](!magic --gm-edit-mi '+tokenID+')}}', flags.feedbackName, fields,feedbackImg, tokenID, charCS ); + }; + return; + } + + /** + * Deal with the character trying to find traps set on any + * target. Generally works best with Drag & Drop containers, + * otherwise asks the GM if there is a trap. + **/ + + const doFindTraps = function( args, senderId ) { + + if (!args) return; + if (args.length != 3) { + sendDebug('doFindTraps: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + } + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickToken = getObj('graphic',pickID), + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ); + + if (!charCS || !putCS || !pickToken) { + sendDebug('doFindTraps: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + const pickName = pickToken.get('name'), + putName = putCS.get('name'); + setAttr( putCS, ['target-level', 'current'], (pickCS ? characterLevel(pickCS) : 6) ); + setAttr( putCS, ['target-token', 'current'], pickName ); + + if (pickCS) { + setAttr( pickCS, ['search-id', 'current'], pickID ); + setAttr( pickCS, fields.Container_pick, pickID ); + setAttr( pickCS, fields.Container_put, putID ); + setAttr( pickCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); + setAttr( pickCS, fields.Trap_status, (attrLookup( pickCS, fields.Trap_status ) || 'Armed')); + setAttr( pickCS, fields.Lock_status, (attrLookup( pickCS, fields.Lock_status ) || 'Locked')); + const findTraps = findObjs({_type:'ability',characterid:pickCS.id,name:'Trap-2'},{caseInsensitive:true}); + if (findTraps && findTraps.length) { + sendAPImacro( senderId, putID, pickID, findTraps[0].get('name') ); + sendWait(senderId,0,'Magic doFindTraps'); + if (csVer(pickCS) < 3.5 && ((attrLookup( pickCS, fields.Gender ) || '').dbName() === 'container')) { + const lock = (attrLookup( pickCS, fields.Container_lock ) || ''), + trap = (attrLookup( pickCS, fields.Container_trap ) || ''); + sendAPI( fields.commandMaster + ' --button '+BT.LOCKTYPE+'|'+pickID+'|'+lock+'|silent' ); + sendAPI( fields.commandMaster + ' --button '+BT.TRAPTYPE+'|'+pickID+'|'+trap+'|silent' ); + setAttr( pickCS, fields.msVersion, '3.5' ); + } + return; + } + } + const chance = Math.max((parseInt(attrLookup( charCS, [fields.Find_Traps[0]+fields.Thief_postfix[0],fields.Find_Traps[1]] )) || 5),5); + let content = '&{template:RPGMwarning}{{desc='+putCS.get('name')+' has just attempted to *Find Traps* on '+pickName+' which does not have a *Trap-2* or *Find Traps* macro. ' + + 'Their *Find/Remove Traps* chance is [['+chance+']]%}}'; + sendFeedback( content ); + const findTrapMacro = (state.MagicMaster.gmRolls ? 'GM-Roll-' : '')+'Magic-FindTrap'; + getAbility( fields.AbilitiesDB, findTrapMacro, charCS ); + getAbility( fields.AbilitiesDB, 'Magic-NoTrap', charCS ); + getAbility( fields.AbilitiesDB, 'Magic-NotFoundTrap', charCS ); + getAbility( fields.AbilitiesDB, 'Magic-FoundTrap', charCS ); + getAbility( fields.AbilitiesDB, 'Magic-RemoveTrap', charCS ); + getAbility( fields.AbilitiesDB, 'Magic-FoundMagicalTrap', charCS ); + getAbility( fields.AbilitiesDB, 'Magic-RemoveMagicalTrap', charCS ); + content = '&{template:RPGMdefault}{{title=Find Traps}}{{desc=Do you want to search '+pickName+' for traps? Your chance of success would appear to be [['+chance+']]%, but that might alter with circumstance}}{{desc1=[Yes]('+(state.MagicMaster.gmRolls ? ('!magic --display-ability gm|'+putID+'|'+putCS.id+'|GM-Roll-Magic-FindTrap|gm{Find Traps Roll? Chance is '+chance+'%/1d100,[[1d100]]/Succeed,[[1d'+chance+']]/Fail,[['+chance+'+1d'+(99-chance)+']]}') : ('~'+putName+'|Magic-FindTrap'))+') or [No](!magic --message '+tokenID+'|Not Finding Traps|OK, having thought about your chance of success, you decide to let someone else have a go...)}}'; + setAttr( charCS, fields.PlayerID, senderId ); + sendResponse( charCS, content, senderId ); + }; + + /* + * Function to display the menu for picking up or putting away Magic Items + * from one Magic Item bag into another Magic Item bag. + */ + + const doPickOrPut = function( args, senderId, buy=false ) { + + if (!args) return; + + if (args.length < 3) { + sendError('Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickPocket = (!buy && !!args[4] ? 'true' : 'false'), + charCS = getCharacter( tokenID ), + pickCS = getCharacter( pickID ); + + let menuType = args[3]; + + if (!tokenID || !putID || !pickID || !charCS || !pickCS) { + sendError('One or more invalid tokens specified'); + return; + }; + setAttr( charCS, fields.PickPocket, pickPocket ); + + let playerConfig = getSetPlayerConfig( senderId ); + + if (menuType && ['short','long'].includes(menuType.toLowerCase())) { + playerConfig.pickOrPutType = menuType.toLowerCase(); + getSetPlayerConfig( senderId, playerConfig ); + } else if (playerConfig && playerConfig.pickOrPutType) { + menuType = playerConfig.pickOrPutType; + } else { + if (!playerConfig) { + playerConfig = {}; + } + playerConfig.pickOrPutType = menuType = 'short'; + getSetPlayerConfig( senderId, playerConfig ); + }; + + setAttr( charCS, fields.ItemRowRef, -1 ); + setAttr( charCS, fields.ItemCastingTime, 0 ); + setAttr( charCS, [fields.Expenditure[0],'current'], 0 ); + setAttr( charCS, [fields.Expenditure[0],'max'], 0 ); + + clearItemSelection( pickCS ); + + args = ['POPmenu',tokenID,-1,pickID,putID,-1]; + makeShortPOPmenu( args, senderId, buy ); + return; + }; + + /** + * Function to deal with a character interacting with a target, either + * an inanimate chest or other MI store, or with an animate, possibly + * intelligent creature that might detect their action. In either case, + * the target might also be trapped. + **/ + + const doSearchForMIs = function( args, senderId, buy=false ) { // get + + if (!args) return; + + const msg = args; + if (args.length != 3) { + sendDebug('doSearchForMIs: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + } + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + search = (tokenID === putID), + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickToken = getObj('graphic',pickID), + pickCS = getCharacter( pickID ), + containerCS = getCharacter( containerID ); + + if (!charCS || !putCS) { + sendDebug('doSearchForMIs: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + + if (!pickCS && !!pickToken) { + doFindTraps( args, senderId ); + return; + } + + if (!pickCS) { + sendDebug('doSearchForMIs: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens selected'); + return; + }; + + + if (csVer(containerCS) < 3.5 && ((attrLookup( containerCS, fields.Gender ) || '').dbName() === 'container')) { + let lock = (attrLookup( containerCS, fields.Container_lock ) || ''), + trap = (attrLookup( containerCS, fields.Container_trap ) || ''); + sendAPI( fields.commandMaster + ' --button '+BT.LOCKTYPE+'|'+containerID+'|'+lock+'|silent' ); + sendAPI( fields.commandMaster + ' --button '+BT.TRAPTYPE+'|'+containerID+'|'+trap+'|silent' ); + setAttr( containerCS, fields.msVersion, '3.5' ); + } + + setAttr( charCS, ['target-level', 'current'], characterLevel(pickCS) ); + setAttr( charCS, ['target-token', 'current'], pickCS.get('name') ); + setAttr( containerCS, ['search-id', 'current'], containerID ); + setAttr( containerCS, fields.Container_pick, pickID ); + setAttr( containerCS, fields.Container_put, putID ); + setAttr( containerCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); + + let MIBagSecurity = parseInt(attrLookup( containerCS, fields.ItemContainerType )) || 0; +// buy = buy || retailers.includes(attrLookup( containerCS, fields.Profession )); + + const intelligence = Math.max( (parseInt(attrLookup( containerCS, fields.Intelligence )) || 0), (parseInt(attrLookup( containerCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( containerCS, fields.HP )) || 0; + + if (buy && ((MIBagSecurity != 2 && MIBagSecurity != 3 && MIBagSecurity != 7) || hp <= 0 || intelligence <= 3)) { + const content = '&{template:'+fields.warningTemplate+'}{{title=Not a Sentient Creature}}{{desc=Either this creature has never been sentient, or they are no longer sentient. You cannot trade with non-sentient beings!}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } else if (buy) { + const charRetail = parseData('['+((attrLookup( containerCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}), + classRetail = classObjects( containerCS, senderId, {buy:reClassSpecs.buy,sell:reClassSpecs.sell})[0].classData, + raceRetail = resolveData( (attrLookup( containerCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, containerCS, {buy:reClassSpecs.buy,sell:reClassSpecs.sell} ).parsed, + sells = !!charRetail.sell || !!classRetail.sell || !!raceRetail.sell, + buys = !!charRetail.buy || !!classRetail.buy || !!raceRetail.buy; + buy = search ? sells : buys; + if (!buy) { + const content = '&{template:'+fields.menuTemplate+'}}{{title=Nothing to '+(search ? 'Buy' : 'Sell')+'}}{{desc=I\'m sorry, but I am not someone who '+(search ? 'sells' : 'buys')+' items. Perhaps you\'d do better talking to a retailer in a shop in town?}}'; + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + }; + + if (MIBagSecurity === 6 || buy) { + doPickOrPut( msg, senderId, buy ); + return; + } else if (MIBagSecurity === 4 || MIBagSecurity === 5) { + const trapVersion = (attrLookup( containerCS, ['trap-version', 'current'] ) || 0); + let trapName = 'trap-'+trapVersion, + trapMacro = findObjs({ _type : 'ability', characterid : containerCS.id, name : trapName }, {caseInsensitive: true}); + if (!trapMacro || trapMacro.length === 0) { + trapName = 'Check-for-MIBag-'+trapVersion; + trapMacro = findObjs({ _type : 'ability', characterid : containerCS.id, name : trapName }, {caseInsensitive: true}); + } + if (!trapMacro || trapMacro.length === 0) { + trapName = 'trap'; + trapMacro = findObjs({ _type : 'ability', characterid : containerCS.id, name : trapName }, {caseInsensitive: true}); + } + if (trapMacro && trapMacro.length) { + sendAPImacro( senderId, tokenID, containerID, trapName ); + sendWait(senderId,0,'Magic doSearchForMIs'); + } else { + sendDebug('doSearchForMIs: Not found trapMacro'); + MIBagSecurity = 1; + } + }; + if (!search && MIBagSecurity < 0) { + sendParsedMsg( putID, messages.noStoring, senderId ); + return; + } else if ((MIBagSecurity < 4 || MIBagSecurity == 7) && (!search || MIBagSecurity < 2 || hp <= 0 || intelligence <= 0)) { + doPickOrPut( msg, senderId ); + } else if (MIBagSecurity < 4 || MIBagSecurity == 7) { + + // target is a creature that might detect any snooping. + // A pick pockets roll is necessary + + const content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets}}' + + '{{desc=Are you trying to '+(search ? 'pick ' : 'sneak something into ')+containerCS.get('name')+'\'s pocket?\n' + + '[Yes](!magic --pickpockets '+tokenID+'|'+pickID+'|'+putID+'|[[?{Roll vs Pick Pockets|1d100}]])' + + ' or [No](!magic --message '+tokenID+'|Pick Pocket|OK, not making the attempt)' + + '\nor I\'m trying to [buy items](!magic --buy '+tokenID+'|'+pickID+'|'+putID+') from '+containerCS.get('name')+'}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + }; + return; + } + + /** + * Function to display the Edit MI Bag menu + */ + + const doEditMIbag = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doEditMIbag: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + } + + const tokenID = args[0], + cmd = (_.isUndefined(args[1]) || args[1].toUpperCase() == 'MAGICAL') ? BT.EDIT_MI : (args[1].toUpperCase() == 'MARTIAL' ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS), + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doEditMIbag: invalid ID arguments'); + sendResponseError(senderId,'Invalid token specified'); + return; + }; + + args = [cmd,tokenID,-1,'']; + makeEditBagMenu( args, senderId ); + return; + } + + /** + * Function to support picking of pockets and trapped chests, using + * options and ability macros set in the target character sheet. + **/ + + const doPickPockets = function( args, senderId ) { + + if (!args) return; + if (args.length != 4) { + sendDebug('doPickPockets: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + } + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + ppRoll = parseInt(args[3],10), + search = putID === tokenID, + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ); + + if (!charCS || !containerID) { + sendDebug('doPickPockets: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + + if (isNaN(ppRoll)) { + sendDebug('doPickPockets: invalid dice roll argument'); + sendResponseError(senderId,'Invalid dice roll entered'); + return; + }; + + const pick_pockets = Math.max(parseInt(attrLookup( charCS, [fields.Pick_Pockets[0]+fields.Thief_postfix[0], fields.Pick_Pockets[1]] ) || 0),state.attackMaster.thieveCrit), + pp_target = (Math.min(Math.ceil(Math.max(pick_pockets,0)),96)); + let content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets '+(search ? 'for items' : 'to place items')+'}}' + + '{{Target=[['+pp_target+']]}}' + + '{{Rolled=[[' + ppRoll + ']]}}' + + '{{Result=Rolled<=Target}}'; + + if (ppRoll <= pp_target) { + content += '{{desc=Press [Succeeded](!magic --pickorput '+tokenID+'|'+pickID+'|'+putID+'||true) to view items to pick from}}'; + } else { + args.unshift('PPfailed'); + content += handlePPfailed( args, senderId ); + } + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + }; + + /* + * Add a magic item directly to a creature or container, with + * additional options to replace another item and/or take the + * added item in-hand + */ + + const doAddItem = function( args, senderID, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doEditMIbag: invalid number of parameters'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + } + + const tokenID = args[0], + miRowRef = args[1], + miChosen = args[2], + isGM = (args[5] || '').toUpperCase() === 'NOCURSE', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doAddItem: invalid ID argument'); + sendResponseError(senderId,'Invalid token specified'); + return; + }; + + let miInHand = (args[4] || '='), + hand = ''; + + if (miRowRef.length && isNaN(miRowRef) && miInHand === '=') { + hand = getTableField( charCS, {}, fields.InHand_table, fields.InHand_trueName ).tableFind( fields.InHand_trueName, miRowRef ); + miInHand = _.isUndefined(hand) ? '' : hand; + hand = (miRowRef === attrLookup( charCS, fields.Equip_leftTrueRing) || miRowRef === attrLookup( charCS, fields.Equip_rightTrueRing )) ? '=' : ''; + }; + + args.unshift(''); + args[2] = String(miInHand).length && !isNaN(miInHand) ? 'inhand/'+miInHand : (String(miRowRef).length && !isNaN(miRowRef) ? miRowRef : hand); + args[3] = String(miRowRef).length && !isNaN(miRowRef) ? miRowRef : miChosen+'/'+miRowRef; + args.splice(5,2); + + handleStoreMI( args, isGM, senderID ); + }; + + /* + * Handle the Config command, to configure the API + */ + + const doConfig = function( args ) { + + if (!args || args.length < 2) { + makeConfigMenu( args ); + return; + } + + const flag = args[0].toLowerCase(), + value = args[1].toLowerCase() === 'true'; + let msg = ''; + + switch (flag.toLowerCase()) { + case 'specialist-rules': + state.MagicMaster.spellRules.specMU = value; + msg = value ? 'Only rules-based specialists get extra spell' : 'Any specialist gets extra spell'; + break; + + case 'spell-num': + state.MagicMaster.spellRules.strictNum = value; + msg = value ? 'Spells per level restricted to rules' : 'Misc spells per level supported'; + break; + + case 'all-spells': + state.MagicMaster.spellRules.allowAll = value; + msg = value ? 'Spell Schools/Spheres not restricted' : 'Spell Schools/Spheres restricted by Class'; + break; + + case 'all-powers': + state.MagicMaster.spellRules.allowAnyPower = value; + msg = value ? 'Class Powers not restricted by level' : 'Class Powers restricted by level'; + break; + + case 'custom-spells': + state.MagicMaster.spellRules.denyCustom = value; + msg = value ? 'Custom items only from user databases' : 'Distributed custom items allowed'; + updateDBindex(true); + break; + + case 'auto-hide': + state.MagicMaster.autoHide = value; + msg = value ? 'Hideable items hidden automatically' : 'Hideable items hidden manually'; + break; + + case 'reveal': + state.MagicMaster.reveal = value; + msg = value ? 'Hidden items revealed when used' : 'GM reveals hidden items manually'; + reSpellSpecs.reveal.def = value ? 'use' : ''; + break; + + case 'view-action': + state.MagicMaster.viewActions = value; + msg = value ? 'Item/Spell action buttons active when viewing' : 'Item/Spell action buttons greyed out when viewing'; + break; + + case 'alpha-lists': + state.MagicMaster.alphaLists = value; + msg = 'Lists will '+(value ? '' : 'not')+' be alphabeticised'; + break; + + case 'gm-rolls': + state.MagicMaster.gmRolls = value; + msg = value ? 'GM rolls skill-based chances' : 'Player rolls skill-based chances'; + break; + + case 'encumbrance': + state.MagicMaster.encumbrance = value; + msg = value ? 'Encumbrance penalties applied' : 'Encumbrance ignored'; + break; + + default: + sendError('Invalid Config Command syntax'); + return; + } + makeConfigMenu( args, msg ); + return; + } + + /** + * Add or subtract an increment to the Strength value, + * taking into account any Exceptional Strength set + **/ + + const doStrengthChange = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doStrengthChange: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + increment = args[1], + field = args[2] || fields.Strength[0], + silent = (args[3] || 'SILENT').toUpperCase() == 'SILENT', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendDebug('doStrengthChange: invalid ID argument'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + handleStrengthChange( tokenID, field, increment, senderId, silent ); + return; + } + + /** + * Boost or drain levels from the selected character/creature. The handler + * will ask from which class when multi-class character is selected and + * the class to change is not in the argument list + **/ + + const doLevelChange = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doStrengthChange: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + const change = (parseInt(args[1]) || -1), + charCS = getCharacter(args[0]); + + if (!charCS) { + sendDebug('doLevelChange: invalid ID argument'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + if (!change || isNaN(change)) { + sendDebug('doLevelChange: invalid level change value'); + sendResponseError(senderId,'Level change requested ('+args[1]+') is invalid'); + return; + }; + handleLevelDrain( [args[0],args[1],'','',args[2],0,args[3]], senderId ); + } + + /** + * Present the Magic Item Bag menu for the tokenID passed, if it has one + **/ + + const doMIBagMenu = function( args, senderId, selected ) { + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doMIBagMenu: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ); + + if (!curToken){ + sendDebug('doMIBagMenu: Invalid tokenID: ' + tokenID); + sendResponseError(senderId,'Invalid token specified'); + return; + } + + const tokenName = curToken.get('name'), + charCS = getCharacter(tokenID); + + const content = '&{template:'+fields.menuTemplate+'} {{name=' + tokenName + '\'s\n' + + 'Items & Equipment Menu}}' + + '{{Section1=[Use a Magic Item](!magic --use-mi '+tokenID+')' + + '[View your Item bag](!magic --view-mi '+tokenID+')}}' + + '{{Section2=[Find Traps](!magic --find-traps '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Search for Items & Treasure](!magic --search '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Store Items](!magic --search '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})}}' + + '{{Section3=[Buy Items from someone](!magic --buy '+tokenID+'|@{target|Buy from whom?|token_id}|'+tokenID+')' + + '[Sell Items to someone](!magic --sell '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})' + + '[Pick someone\'s Pocket](!magic --search '+tokenID+'|@{target|Pick who\'s pocket?|token_id}|'+tokenID+')}}' + + '{{Section4=[Change Your Items](!magic --edit-mi '+tokenID+')}}'; + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + }; + + /* + * Call up the GM's Edit MI bag menu, which allows the GM + * change MIs to be cursed, hide the real name, reveal items + * once identified, change displayed & actual quantities etc. + */ + + var doGMonlyMImenu = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendError('Invalid MagicMaster syntax'); + return; + }; + + const tokenID = args[0], + charCS = getCharacter(tokenID); + + args = ['GM-MIMENU', tokenID, -1, '' ]; + + if (!!charCS) { + clearItemSelection( charCS ); + makeGMonlyMImenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noChar, senderId ); + }; + return; + } + + /* + * Set when a hidden item should be revealed to the player. This + * can be when the item is first viewed, first used, after a long + * rest, or only manually by the GM using the GM-edit-MI Reset Single + * function. + */ + + const doSetReveal = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendError('Invalid MagicMaster syntax'); + return; + }; + + const tokenID = args[0], + hiddenItem = args[1] || '', + revealType = (args[2] || '').toLowerCase(), + dispMenu = (args[4] || '').toUpperCase() === 'MENU', + charCS = getCharacter(tokenID); + + let MIrowref = parseInt(args[3]); + + if (!charCS) { + sendError('Invalid token specified'); + return; + } + + if (revealType && !['view','use','rest'].includes(revealType)) { + sendError('Invalid reveal type specified'); + return; + } + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ), + table; + + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'name' ); + + if (isNaN(MIrowref)) { + [table,MIrowref] = tableGroupFind( Items, 'trueName', hiddenItem ); + } else { + [MIrowref,table] = tableGroupIndex( Items, MIrowref ); + } + if (_.isUndefined(MIrowref) || isNaN(MIrowref)) { + sendError('Invalid Item specified'); + return; + } + + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'reveal'] ); + Items.tableSet( fields[fieldGroups[table].prefix+'reveal'], MIrowref, revealType ); + + if (dispMenu) { + makeGMonlyMImenu( ['', tokenID, -1, ''], senderId, 'Set '+hiddenItem+' to be revealed '+(!revealType ? 'manually by GM' : ('on '+revealType)) ); + } + return; + }; + + /* + * Display the dialog explaining the encumbrance and + * move of a character/NPC. + */ + + async function doCheckMove( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doCheckMove: Invalid number of arguments'); + sendResponseError(senderId,'Valid token not specified'); + return; + }; + + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendResponseError(senderId,'Invalid token specified'); + return; + } + + await itemSlotData( tokenID, null, senderId ); + if (!silent) sendAPI( fields.attackMaster+' --button '+BT.CHECK_MOVE+'|'+tokenID ); + return; + }; + + /* + * RED: v1.012 A menu to allow players to choose light sources + */ + + const doLightSourcesMenu = function( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doLightSourcesMenu: Invalid number of arguments'); + sendResponseError(senderId,'Valid token not specified'); + return; + }; + + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let lightSource = 'None'; + + if (!charCS) { + sendDebug('doLightSourcesMenu: Invalid tokenID: ' + tokenID); + sendResponseError(senderId,'Invalid token specified'); + return; + } + if (!curToken) { + curToken = charCS; + lightSource = attrLookup( charCS, fields.LightSource ) || 'None'; + } else { + const lowLight = curToken.get('emits_low_light'), + lightDist = parseInt(curToken.get('low_light_distance')); + lightSource = (!lightDist ? 'None' : (lightDist <= 5 ? 'Weapon' : (lightDist <= 15 ? 'Torch' : (lightDist <= 30 ? 'Hooded' : (lightDist <= 60 ? (!lowLight ? 'Bullseye' : 'ContLight') : 'Beacon'))))); + }; + + const weaponSwitch = (lightSource === 'Weapon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Weapon)Off'), + torchSwitch = (lightSource === 'Torch') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Torch)Off'), + hoodedSwitch = (lightSource === 'Hooded') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Hooded)Off'), + bullseyeSwitch = (lightSource === 'Bullseye') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Bullseye)Off'), + contLightSwitch = (lightSource === 'ContLight') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|ContLight)Off'), + beaconSwitch = (lightSource === 'Beacon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Beacon)Off'), + + content = '&{template:'+fields.menuTemplate+'}{{name=Manage '+(curToken.get('name'))+'\'s Light Sources}}' + + '{{desc=Current state indicated by a green button like On. ' + + 'Select a red button to turn the current source off and choose a different one.}}' + + '{{desc1=In order of illumination' + + ''+weaponSwitch+'' + + ''+torchSwitch+'' + + ''+hoodedSwitch+'' + + ''+bullseyeSwitch+'' + + ''+contLightSwitch+'' + + ''+beaconSwitch+'' + + '
Magic Weapon5ft
Torch15ft
Hooded Lantern30ft
Bullseye Lantern60ft beam
Cont-Light gem60ft
Beacon Lantern240ft beam
}}'; + + + sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); + return; + } + + async function doLightSource( args, dispMenu, senderId ) { + + const changeTokenLight = function( token, newSource ) { + + return new Promise(resolve => { + let errFlag = false; + try { +// log('changeTokenLight: called to set token '+token.get('name')+' on page '+getObj('page',token.get('_pageid')).get('name')+' to have '+newSource+' light'); + switch (newSource.toLowerCase()) { + case 'weapon': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 5, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'torch': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 15, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'hooded': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 15, low_light_distance: 30, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'contlight': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 50, low_light_distance: 60, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'bullseye': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 60, low_light_distance: 60, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 19 + }); + break; + + case 'beacon': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 240, low_light_distance: 240, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 21 + }); + break; + + case 'none': + default: + token.set({emits_bright_light: false, emits_low_light: false, + bright_light_distance: 0, low_light_distance: 0, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_dim_light_centre: 180, directional_dim_light_total: 360, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + }; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve(errFlag); + }, 10); + } + }); + }; + + if (!args) return; + if (args.length != 2) { + sendDebug('doLightSource: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + newSource = args[1], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let tokenList = [], + errFlag = false; + + if (!charCS) { + sendDebug('doLightSource: Invalid tokenID: ' + tokenID); + sendResponseError(senderId,'Invalid token specified'); + return; + } +// log('doLightSource: calling for '+(!curToken ? ('character '+charCS.get('name')) : ('token'+curToken.get('name')))+', lightSource '+newSource); + + if (!curToken){ + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== tokenID ))); + } else { + let name = curToken.get('name'), + represents = curToken.get('represents'); + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== represents || obj.get('name') !== name))); +// log('doLightSource: specific token name = '+name+', tokenList has '+tokenList.length+' entries'); + }; + + for (const token of tokenList) { + errFlag = await changeTokenLight( token, newSource ); + if (errFlag) break; + }; + + setAttr( charCS, fields.LightSource, newSource ); + if (tokenList && tokenList.length) setDefaultTokenForCharacter( charCS, curToken || tokenList[0] ); + + if (dispMenu) { + doLightSourcesMenu( args, senderId ); + } else { + sendWait(senderId,0,'Magic doLightSource'); + } + return; + }; + + /* + * Display a simple message to the specified range of players + */ + + const doMessage = function( args, selected, senderId ) { + + sendWait(senderId,0,'Magic doMessage'); + + if (!args) args = []; + let sel = ''; + if (selected && selected.length) { + sel = selected[0]._id; + } + + if (args.length <=2) { + sendDebug('doMessage: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + let cmd = (args[0] || '-').toLowerCase(), + tokenID = args[1] || sel, + charCS = getCharacter(tokenID), + isCmd = ['gm','whisper','w','character','c','standard','s','public','p'].includes(cmd); + + if (!getObj('graphic',tokenID) && !charCS && !isCmd) { + args.unshift('standard'); + cmd = (args[0] || '').toLowerCase(); + tokenID = args[1] || sel; + charCS = getCharacter(tokenID); + } + cmd = cmd.toLowerCase(); + if (!charCS && cmd !== 'gm') { + sendError( 'No token selected' ); + return; + } + + let msg = '&{template:'+fields.messageTemplate+'}{{name=' + (args[2] || '') + '}}{{desc=' + parseStr(args[3] || '',msgReplacers) + '}}'; + const reVals = /\^\^(\d+)\^\^/; + const valRes = ( a, v ) => args[v] || ''; + const reAttrs = /\^\^([^\|\^]+)\|?(max|current)?\|?([^\|\^]+)?\^\^/i; + const attrRes = ( a, v, m = 'current', d = '0' ) => attrLookup( charCS, [v,m,d] ) || ''; + + while (reVals.test(msg)) msg = msg.replace(reVals,valRes); + if (!!charCS) while (reAttrs.test(msg)) msg = msg.replace(reAttrs,attrRes); + + switch (cmd.toLowerCase()) { + case 'gm': + sendFeedback(msg); + break; + case 'whisper': + case 'w': + sendResponse(charCS,msg,senderId); + break; + case 'character': + case 'c': + sendResponse(charCS,msg); + break; + case 'standard': + default: + msg = sendMsgToWho(charCS,senderId,msg); + case 'public': + sendPublic(msg,charCS,senderId); + break; + } + if (args[4] && args[4].length && args[4][0] === '!') { + while (reVals.test(args[4])) args[4] = args[4].replace(reVals,valRes); + sendAPI( parseStr(args[4],msgReplacers), senderId ); + } + } + + /* + * Tidy up a specified character sheet, removing Spell and Magic Item + * attribute and ability objects that are no longer for items held and + * spells no longer in any spell book. Attack ability objects will all + * be removed. All of these will be recreated as and when these items, + * spells or attacks are again picked up, added to spell books, or used + * for attacks. + */ + + const doTidyCS = function( args, selected ) { + + let tokenList = []; + if (args && args[0]) { + let token = getObj('graphic',args[0]); + if (!token) { + sendError('Valid token not specified'); + return; + } + tokenList.push(token); + } else if (selected && selected.length) { + selected.map( s => tokenList.push(getObj('graphic',s._id))); + } + + handleCStidy( tokenList, (args[1] || '').toUpperCase() === 'SILENT' ); + return; + } + + /* + * Tidy up a specified character sheet, removing Spell and Magic Item + * attribute and ability objects that are no longer for items held and + * spells no longer in any spell book. Attack ability objects will all + * be removed. All of these will be recreated as and when these items, + * spells or attacks are again picked up, added to spell books, or used + * for attacks. + */ + + const doCleanCS = function( args, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doCopyCS: Invalid arguments'); + sendResponseError(senderId,'Valid token not specified'); + return; + }; + + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + + if (!curToken || !charCS) { + sendDebug('doCopyCS: Invalid tokenID: ' + tokenID); + sendResponseError(senderId,'Invalid token specified'); + return; + } + + handleCleanCS( charCS, silent ); + handleCStidy( [curToken], false ); + return; + } + + + /* + * check for correct syntax of a 'write database' command, then + * call the function to write the specified character sheet database + * to a handout in object format to be cut&pasted to an API + */ + + const doWriteDB = function(args) { + + const dbName = args[0], + dbVersion = args[1], + filter = args[2] || ''; + + let dbHandout; + + if (dbVersion && dbVersion.length && (dbVersion !== '=') && isNaN(parseFloat(dbVersion))) { + sendError( 'Invalid database version number' ); + return; + }; + + if (dbName && dbName.length) { + if (!(dbHandout = saveDBtoHandout( dbName, dbVersion, filter ))) { + sendError( 'Unable to write db object for '+dbName ); + } else { + sendFeedback( 'Created db object in handout '+dbHandout.get('name'), flags.feedbackName ); + } + + } else { + sendFeedback('Writing all api databases extracted as character sheets to handouts',flags.feedbackName); + _.each( dbNames, (db,k) => saveDBtoHandout( k.replace(/_/g,'-'), dbVersion )); + } + + return; + }; + + /* + * Update databases to latest versions held in API + */ + + async function doUpdateDB(args, senderId, silent) { + + try { + const dbName = args[0]; + let forceIndexUpdate = false; + + if (dbName && dbName.length) { + const dbLabel = dbName.replace(/-/g,'_'), + dbList = Object.keys(dbNames).filter(k => k.startsWith(dbLabel)); + if (dbList && dbList.length > 1) { + sendFeedback('&{template:'+fields.messageTemplate+'}{{title=Extract Database}}{{desc=Multiple databases start with '+dbName+'. [Select the one you want](!magic --extract-db ?{Choose which to extract|'+dbList.join('|')+'}) }}',senderId); + return; + } else if (!dbList || !dbList.length || !dbNames[dbLabel]) { + sendError('Not found database '+dbName); + } else { + log('Updating database '+dbName); + sendFeedback('Updating database '+dbName,flags.feedbackName,flags.feedbackImg); + let result = await buildDB( dbName, dbNames[dbLabel], senderId, silent ); + forceIndexUpdate = true; + } + } else if (_.some( dbNames, (db,dbName) => db.api.includes('magic') && checkDBver( dbName, db, silent ))) { + log('Updating all MagicMaster databases'); + sendFeedback(design.info_msg+'Updating all MagicMaster databases
',flags.feedbackName,flags.feedbackImg); + _.each( dbNames, (db,dbName) => { + if (db.api.includes('magic')) { + const dbCS = findObjs({ type:'character', name:dbName.replace(/_/g,'-') },{caseInsensitive:true}); + if (dbCS && dbCS.length) { + setAttr( dbCS[0], fields.dbVersion, 0 ); + } + } + }); + let result; + for (const name in dbNames) { + if (dbNames[name].api.includes('magic')) { + result = await buildDB( name, dbNames[name], senderId, silent ); + } + } + forceIndexUpdate = true; + + }; + apiDBs.magic = true; + sendAPI('!attk --nowaitmsg --index-db magic'); + sendAPI('!cmd --nowaitmsg --index-db magic'); + updateDBindex(forceIndexUpdate); + return; + } catch (e) { + sendCatchError('MagicMaster',(senderId ? msg_orig[senderId] : null),e,('MagicMaster doUpdateDB()')); + } + } + + /* + * Copy ability macros that include API commands that affect or + * use token markers into a user-supplied database to allow + * GMs / game creators to change markers easily + */ + + const doExtractMarkers = function (args) { + + const APIdbName = args[0], + UserDbName = args[1], + itemClass = args[2] || 'specs'; + + if (APIdbName && APIdbName.length && UserDbName && UserDbName.length) { + const dbLabel = UserDbName.replace(/-/g,'_'); + if (dbNames[dbLabel]) { + sendError(UserDbName+' is an API dataabse and cannot be overwritten'); + return; + } + sendFeedback('Copying marker commands from '+APIdbName+' and merging with '+UserDbName,flags.feedbackName); + copyMarkerCSdb( APIdbName, UserDbName, itemClass ); + } else { + sendError('Invalid parameters'); + }; + + return; + } + + /* + * Set the SpellCharges attribute on the selected character to + * the number of charges left on the specified spell, power or item + */ + + const doSetCharges = function( args, selected, senderId ) { + + if (!args) args=[]; + if ((!args[0] || !args[0].length) && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doSetCharges: Invalid number of arguments'); + sendResponseError(senderId,'Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + type = (args[1] || 'MI').toUpperCase(), + item = args[2] || '-', + silent = ((args[3] || '').toLowerCase() === 'silent'), + charCS = getCharacter(tokenID); + + let qty = 0; + + if (!charCS) { + sendDebug('doSetCharges: invalid ID argument'); + sendResponseError(senderId,'One or more invalid tokens specified'); + return; + }; + if (!['MU','PR','POWER','MI','MIPOWER'].includes(type)) { + sendError('Invalid item type specified'); + return; + }; + + if (type === 'MI') { + let Tables = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); + let [table,index] = tableGroupFind( Tables, 'trueName', item ); + if (!_.isUndefined(index)) { + Tables = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); + qty = Tables.tableLookup( fields[fieldGroups[table].prefix+'qty'], index, false ); + }; + } else { + var levelSpells = shapeSpellbook( charCS, type ); + let Tables, index, c, w; + for (let lv=1; lv < levelSpells.length && _.isUndefined(qty); lv++) { + c = levelSpells[lv].base; + w = 1; + do { + Tables = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); + index = Tables.tableFind( fields.Spells_name, item ); + if (!_.isUndefined(index)) { + Tables = getTableField( charCS, Tables, fields.Spells_table, fields.Spells_castValue, c ); + qty = Tables.tableLookup( fields.Spells_castValue, index, false ); + }; + c++; + } while ((w <= fields.SpellsCols) && _.isUndefined(qty)); + }; + }; + + setAttr( charCS, fields.SpellCharges, (_.isUndefined(qty) ? '0' : String(qty)) ); + + if (silent) return qty; + + let content = '&{template:'+fields.messageTemplate+'}{{name=Quantity of '+item+'}}{{desc='+(_.isUndefined(qty) ? (item+' has not been found on '+charCS.get('name')) : (charCS.get('name')+' has '+qty+' '+item+'s'))+'}}'; + sendResponse( charCS, content, senderId ); + }; + + /* + * Handle a button press, and redirect to the correct handler + * Note: keep as "var" to allow direct calls from code + */ + + var doButton = function( args, senderId, selected ) { + + if (!args) return; + + const handler = args[0].toUpperCase(); + + switch (handler) { + + case BT.SECTIONS_OPTION: + case BT.VIEWMI_OPTION: + case BT.USEMI_OPTION: + case BT.EDITMI_OPTION: + case BT.EDITMARTIAL_OPTION: + case BT.EDITALLITEMS_OPTION: + case BT.PICKMI_OPTION: + case BT.PUTMI_OPTION: + case BT.ALPHALIST_OPTION: + + handleOptionButton( args, senderId ); + break; + + case BT.MU_SPELL : + case BT.PR_SPELL : + case BT.MI_SPELL : + case BT.MI_POWER : + case BT.MI_SCROLL : + case BT.POWER : + + handleChooseSpell( args, senderId ); + break; + + case BT.CAST_MUSPELL : + case BT.CAST_PRSPELL : + case BT.CAST_MISPELL : + case BT.CAST_MIPOWER : + case BT.CAST_SCROLL : + case BT.USE_POWER : + + handleCastSpell( args, senderId ); + break; + + case BT.EDIT_MUSPELLS : + case BT.EDIT_PRSPELLS : + case BT.EDIT_POWERS : + case BT.EDIT_MIPOWERS : + case BT.EDIT_MIMUSPELLS : + case BT.EDIT_MIPRSPELLS : + case BT.EDIT_MISPELLS : + + handleRedisplayManageSpells( args, senderId ); + break; + + case BT.VIEW_MUSPELL : + case BT.VIEW_PRSPELL : + case BT.VIEW_POWER : + case BT.VIEW_MI_MUSPELL : + case BT.VIEW_MI_PRSPELL : + case BT.VIEW_MI_MUSCROLL : + case BT.VIEW_MI_PRSCROLL : + case BT.VIEW_MI_POWER : + case BT.VIEW_MI_SPELL : + case BT.VIEW_MI_SCROLL : + case BT.REVIEW_MUSPELL : + case BT.REVIEW_PRSPELL : + case BT.REVIEW_POWER : + case BT.REVIEW_MI : + case BT.REVIEW_MARTIAL_MI : + case BT.REVIEW_ALLITEMS_MI : + case BT.REVIEW_MIPOWER : + case 'GM-REVIEWMI' : + +// handleReviewSpell( args, senderId ); + break; + + case BT.MEM_MUSPELL : + case BT.MEM_PRSPELL : + case BT.MEM_POWER : + case BT.MEM_MIPOWER : + + handleMemoriseSpell( args, senderId ); + break; + + case BT.MEMALL_POWERS : + + handleMemAllPowers( args, senderId ); + break; + + case BT.VIEWMEM_MUSPELLS : + case BT.VIEWMEM_PRSPELLS : + case BT.VIEWMEM_POWERS : + case BT.VIEWMEM_MI_MUSPELLS : + case BT.VIEWMEM_MI_PRSPELLS : + case BT.VIEWMEM_MI_SPELLS : + case BT.VIEWMEM_MI_SCROLL : + case BT.VIEWMEM_MI_POWERS : + + makeViewMemSpells( args, senderId ); + break; + + case BT.LEARNT_MUSPELL : + + handleLearnSpell( args, senderId ); + break; + + case BT.EDIT_NOSPELLS: + + makeMiscSpellsEdit( args, senderId ); + break; + + case BT.MISC_SPELL: + + handleSetMiscSpell( args, senderId ); + break; + + case BT.CHOOSE_VIEW_MI: + case BT.CHOOSE_USE_MI: + + makeViewUseMI( args, senderId ); + break; + + case BT.REDO_CHOOSE_MI: + case BT.REDO_MARTIAL_MI: + case BT.REDO_ALLITEMS_MI: + case BT.EDIT_MI: + case BT.EDIT_MARTIAL: + case BT.EDIT_ALLITEMS: + + makeEditBagMenu( args, senderId ); + break; + + case BT.VIEW_MI: + case BT.USE_MI: + handleViewUseMI( args, playerIsGM(senderId), senderId ); + break; + + case BT.ADD_MIROW: + + handleAddMIrow( args, senderId ); + break; + + case BT.MU_TO_STORE: + case BT.PR_TO_STORE: + case BT.MU_MI_SLOT: + case BT.PR_MI_SLOT: + case BT.MU_TO_STORE_ANY: + case BT.PR_TO_STORE_ANY: + case BT.MU_MI_SLOT_ANY: + case BT.PR_MI_SLOT_ANY: + case BT.MU_TO_STORE_ADD: + case BT.PR_TO_STORE_ADD: + case BT.MU_MI_SLOT_ADD: + case BT.PR_MI_SLOT_ADD: + + handleSelectMIspell( args, senderId ); + break; + + case BT.MISTORE_MUSPELL: + case BT.MISTORE_PRSPELL: + case BT.MISTORE_MUSPELL_ANY: + case BT.MISTORE_PRSPELL_ANY: + case BT.MISTORE_MUSPELL_ADD: + case BT.MISTORE_PRSPELL_ADD: + + handleStoreMIspell( args, senderId ); + break; + + case BT.MI_POWER_USED: + + handleSelectMIpower( args, true, senderId ); + break; + + case BT.MI_POWER_CHARGE_USED: + + handleSelectMIpower( args, false, senderId ); + break; + + case BT.LEVEL_CHANGE: + + args.shift(); + handleLevelDrain( args, senderId ); + break; + + case 'CHOOSE_SPELLS': + case 'CHOOSE_POWERS': + case 'CHOOSE_BOTH': + + makeSpellsMenu( args, senderId ); + break; + + case 'REVIEW_SPELLS': + case 'REVIEW_POWERS': + case 'REVIEW_BOTH': + + handleRevStore( args, senderId ); + break; + + case 'ADD_TO_SPELLS': + case 'ADD_TO_POWERS': + case 'ADD_TO_BOTH': + case 'ADD_PWR_TO_SPELLS': + case 'ADD_PWR_TO_POWERS': + case 'ADD_PWR_TO_BOTH': + case 'DEL_SPELLS': + case 'DEL_POWERS': + case 'DEL_BOTH': + case 'DEL_PWR_FROM_SPELLS': + case 'DEL_PWR_FROM_POWERS': + case 'DEL_PWR_FROM_BOTH': + + handleChangeSpellStore( args, senderId ); + break; + + case BT.POP_PICK : + + handleFlagPicks( args, senderId ); + makeShortPOPmenu( args, senderId, false ); + break; + + case BT.BUY_PICK : + case BT.SELL_PICK : + + handleFlagPicks( args, senderId ); + makeShortPOPmenu( args, senderId, true ); + break; + + case 'POPQTY' : + case 'BUY_POPQTY' : + case 'SELL_POPQTY' : + case 'POPBUY' : + case 'POPRENAME' : + case 'POPSUBMIT' : + case BT.SELL_ITEM : + case BT.BUY_ITEM : + case BT.PICK_ITEM : + case BT.POP_STORE : + case BT.BUY_STORE : + case BT.SELL_STORE : + case BT.BUY_OFFER : + case BT.SELL_OFFER : + + sendWait( senderId, 1, 'Magic doButton sell/buy/store' ); + setTimeout( handlePickOrPut, 10, args, senderId ); + break; + + case BT.PICK_POP : + + args.shift(); + doPickOrPut( args, senderId, false ); + break; + + case BT.BUY_POP : + case BT.SELL_POP : + + args.shift(); + doPickOrPut( args, senderId, true ); + break; + + case 'PPFAILED' : + + handlePPfailed( args, senderId ); + break; + + case 'POPTREASURE' : + case BT.BUY_TREASURE : + + handleTreasure( args, senderId ); + break; + + case 'GM-MIMENU': + + makeGMonlyMImenu( args, senderId ); + break; + + case BT.CHOOSE_MI : + case BT.CHOOSE_MARTIAL_MI: + case BT.CHOOSE_ALLITEMS_MI: + case 'GM-MITOSTORE': + + handleSelectMI( args, (handler === 'GM-MITOSTORE'), senderId ); + break; + + case BT.SLOT_MI : + case BT.SLOT_MARTIAL_MI: + case BT.SLOT_ALLITEMS_MI: + case 'GM-MISLOT': + + handleSelectSlot( args, (handler == 'GM-MISLOT'), senderId ); + break; + + case BT.STORE_MI : + case BT.STORE_MARTIAL_MI: + case BT.STORE_ALLITEMS_MI: + case 'GM-STOREMI': + + handleStoreMI( args, (handler.toUpperCase() == 'GM-STOREMI'), senderId ); + break; + + case 'GM-HIDEMI': + + handleHideMI( args, senderId ); + break; + + case BT.REMOVE_MI : + case BT.REMOVE_MARTIAL_MI: + case BT.REMOVE_ALLITEMS_MI: + case 'GM-DELMI': + + handleRemoveMI( args, (handler.toUpperCase() == 'GM-DELMI'), senderId ); + break; + + case 'GM-MIALPHAON': + case 'GM-MIALPHAOFF': + + makeGMonlyMImenu( args, senderId, '', (handler === 'GM-MIALPHAON') ); + break; + +/* case 'GM-SETMICOST': + + handleChangeMItype( args, senderId ); + break; +*/ + case 'GM-CHANGEDISPCHARGES': + + handleChangeMIcharges( args, 'Displayed', senderId ); + break; + + case 'GM-CHANGEACTCHARGES': + + handleChangeMIcharges( args, 'Actual', senderId ); + break; + + case 'GM-RESETSINGLEMI': + + args.shift(); + doResetSingleMI( args, senderId, selected ); + break; + + case 'GM-RENAMEMI': + + handleRenameItem( args, senderId ); + break; + + case 'GM-CHANGEMITYPE': + + handleChangeMItype( args, senderId ); + break; + + case 'GM-SETMICOST': + + handleSetMIcost( args, senderId ); + break; + + case 'GM-SETTOKENTYPE': + + handleSetContainerType( args, senderId ); + break; + + case 'GM-SETTOKENSIZE': + + handleSetContainerSize( args, senderId ); + break; + + case 'GM-HIDEASTYPES': + + handleSetShownType( args, senderId ); + break; + + case 'GM-TREASUREMENU': + + makeEditTreasureMenu( args, senderId ); + break; + + case 'GM-ADDTREASURE': + + handleAddTreasure( args, senderId ); + break; + + case 'GM-EDITTREASURE': + + handleEditTreasure( args, senderId ); + break; + + case 'GM-DELETETREASURE': + + handleDeleteTreasure( args, senderId ); + break; + + case 'GM-DELTREASURE': + + handleConfirmedDelTreasure( args, senderId ); + break; + + case 'GM-NOBLANK': + case 'GM-NODELTREASURE': + + handleNo( args, senderId ); + break; + + case 'GM-BLANKBAG': + + handleBlankMIBag( args, senderId ); + break; + + case 'GM-CONFIRMEDBLANK': + + handleConfirmedBlank( args, senderId ); + break; + + case 'SHOWMORE': + + handleShowMore( args, senderId ); + break; + + default: + + sendError( 'Invalid MagicMaster button call' ); + return; + }; + + }; + +/* ------------------------------------- Handle handshakes -------------------------------- */ + + /** + * Handle a database indexing handshake + **/ + + const doIndexDB = function( args ) { + + apiDBs[args[0]] = true; + updateDBindex(); + sendFeedback('Databases re-indexed'); + return; + }; + + /** + * Handle handshake request + **/ + + const doHsQueryResponse = function(args) { + if (!args) return; + const from = args[0] || '', + func = args[1] || '', + funcTrue = ['spellmenu','mem-spell','view-spell','cast-spell','cast-again','mimenu','edit-mi','view-mi','use-mi','mi-charges','mi-power','touch','rest','gm-edit-mi','search','pickorput','lightsources', + 'light','changelight','help','check-db','debug'].includes(func.toLowerCase()), + cmd = '!'+from+' --noWaitMsg --hsr magic'+((func && func.length) ? ('|'+func+'|'+funcTrue) : ''); + + sendAPI(cmd); + return; + }; + + /** + * Handle the response to a handshake query + **/ + + const doHandleHsResponse = function(args) { + if (!args) { + sendError('Invalid handshake response received'); + return; + } + const from = args[0] || '', + func = args[1] || '', + funcExists = (!!args[2]) || false; + + if (!apiCommands[from]) { + apiCommands[from] = {}; + } + apiCommands[from].exists = true; + if (func && func.length) { + apiCommands[from][func] = funcExists; + } + return; + } + + /** + * Handle Pending Requests + */ + + const doRelay = function(args,senderId) { + if (!args) return; + + let carry, + hash; + args = args.split(' %% '); + if (!args) { log(args); return; } + hash = args[0]; + if (hash) { + hash = hash.match(/hc% .+/); + if (!hash) { log(hash); return; } + hash = hash[0].replace('hc% ',''); + carry = args[1]; + if (carry) + {carry = carry.trim();} + let pr = findPending(hash); + if (pr) { + pr.doOps(carry); + clearPending(hash); + } else { + sendDebug('doRelay: Selection Invalidated'); + sendResponseError(senderId,'Selection Invalidated'); + } + } + }; + + /** + * Debugging routine to get table info of an item + **/ + + const doGetRowInfo = function(args) { // rowID + const tokenID = args[0], + table = args[1] || '', + row = parseInt(args[2]), + miName = args[3] || '', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid token selected'); + return; + }; + + let Items = getTableGroup( charCS, fieldGroups.MI ); + if (!Items) { + sendError('Invalid table group'); + return; + }; + if (miName.length) { +// log('miName defined as '+miName); + let [miRow,miTable,miRowID] = tableGroupFind( Items, 'name', miName ); + sendFeedback('Item '+miName+' is at row '+miRow+' of table '+miTable+', with the rowID = '+miRowID); + }; + if (table.length && !isNaN(row)) { +// log('table is '+table+' and row is '+row); + sendFeedback('Table '+table+' row '+row+' has a rowID = '+Items[table].rowID(row)); + }; + if (!table.length && !isNaN(row)) { +// log('table should be empty but is '+table.length+' long as '+table+', row is '+row); + let [miRow,miTable,miRowID] = tableGroupIndex(Items,row); + sendFeedback('Group row '+row+' is in table '+miTable+' row '+miRow+', with ID '+miRowID); + }; + return; + }; + + +// -------------------------------------------------------- Event Handlers -------------------------------------------------- + + /** + * Handle chat message event + * RED: v1.213 Updated to allow multiple actions per call + * This allows procedural/linear processing of activity and overcomes + * some of the limitations of Roll20 asynchronous processing + */ + + + const handleChatMessage = function(msg) { + let args = processInlinerolls(msg), + senderId = findThePlayer(msg.who), + selected = msg.selected, + t = 2; + + const doMagicCmd = function( e, selected, senderId, isGM ) { + var arg = e, i=arg.indexOf(' '), cmd, argString; + sendDebug('Processing arg: '+arg); + + try { + if (!sendGMquery( 'magic', arg, senderId )) { + + cmd = (i<0 ? arg : arg.substring(0,i)).trim().toLowerCase(); + argString = (i<0 ? '' : arg.substring(i+1).trim()); + arg = argString.split('|'); + + switch (cmd.toLowerCase()) { + // RED: v1.213 If in debugging mode, allow debugger to execute GM + // type commands + case 'display-ability': + doDisplayAbility(arg,selected,senderId,flags.feedbackName,flags.feedbackImg); + break; + case 'cast-spell': + doCastSpell(arg,selected,senderId); + break; + case 'cast-again': + doCastAgain(arg,senderId); + break; + case 'mem-spell': + doMemoriseSpells(arg,selected,senderId); + break; + case 'view-spell': + doViewMemorisedSpells(arg,selected,senderId); + break; + case 'learn-spell': + doLearnSpell(arg,selected,senderId); + break; + case 'power-per-day': + doChangePerDay(arg,selected,senderId); + break; + case 'mem-all-powers': + handleMemAllPowers([BT.MEMALL_POWERS,arg[0],1,-1,-1,'',''], senderId, true ); + break; + case 'mem-all-spells': + arg = [arg[0],arg[1],1,-1,-1,'','']; + handleMemAllPowers(arg, senderId, true ); + break; + case 'touch': + sendWait(senderId,0,'Magic --touch'); + doTouch(arg,senderId); + break; + case 'target': + sendError('Targeting commands have moved to RoundMaster'); + break; + case 'spellmenu': + doSpellsMenu(arg,selected,senderId); + break; + case 'rest': + doRest(arg,selected,senderId); + break; + case 'reset-single': + case 'resetsingle': + doResetSingleMI(arg,senderId,selected); + break; + case 'pickorput': + doPickOrPut(arg,senderId); + break; + case 'addmi': + case 'add-mi': + doAddItem(arg,senderId,selected); + break; + case 'mimenu': + doMIBagMenu(arg,senderId,selected); + break; + case 'view-mi': + doViewUseMI(arg,BT.VIEW_MI,senderId,selected); + break; + case 'use-mi': + doViewUseMI(arg,BT.USE_MI,senderId,selected); + break; + case 'mi-charges': + doChangeCharges(arg,selected,senderId); + break; + case 'query-qty': + case 'queryqty': + doSetCharges(arg,selected,senderId); + break; + case 'mi-power': + doSelectMIpower(arg,false,senderId); + break; + case 'mi-rest': + doRestoreMIpowers(arg,senderId); + break; + case 'edit-mi': + doEditMIbag(arg,senderId,selected); + break; + case 'store-spells': + if (isGM) doStoreSpells(arg,senderId); + break; + case 'set-reveal': + if (isGM) doSetReveal(arg,senderId,selected); + break; + case 'buy': + case 'sell': + doSearchForMIs(arg,senderId,true); + break; + case 'search': + doSearchForMIs(arg,senderId,false); + break; + case 'find-traps': + doFindTraps(arg,senderId); + break; + case 'pickpockets': + doPickPockets(arg,senderId); + break; + case 'gm-edit-mi': + if (isGM) doGMonlyMImenu(arg,senderId,selected); + break; + case 'change-attr': + doStrengthChange(arg,senderId,selected); + break; + case 'level-change': + doLevelChange(arg,senderId,selected); + break; + case 'check-move': + doCheckMove(arg,senderId,selected); + break; + case 'lightsources': + doLightSourcesMenu(arg,senderId,selected); + break; + case 'light': + doLightSource(arg,false,senderId); + break; + case 'changelight': + doLightSource(arg,true,senderId); + break; + case 'tidy': + doTidyCS(arg,selected); + break; + case 'clean': + doCleanCS(arg,selected); + break; + case 'message': + doMessage(arg,selected,senderId); + break; + case 'disp-config': + sendAPI('!rpgm '+senderId+' --disp-config', senderId); + break; + case 'options': + sendAPI('!rpgm '+senderId+' --options '+arg.join('|'), senderId); + break; + case 'write-db': + if (isGM) doWriteDB(arg,senderId); + break; + case 'extract-db': + case 'update-db': + sendWait( senderId, 0, 'Magic --extract-db' ); + if (isGM) doUpdateDB(arg,senderId,false); + break; + case 'check-db': + if (isGM) checkDB( arg ); + break; + case 'index-db': + if (isGM) doIndexDB(arg,senderId); + break; + case 'extract-markers': + if (isGM) doExtractMarkers(arg,senderId); + break; + case 'config': + if (isGM) doConfig(arg,senderId); + break; + case 'update-cs': +// log('magicMaster handleChatMessage: something issued a --update-cs command'); + if (isGM) updateCharSheets(arg,senderId); + break; + case 'handout': + case 'handouts': + if (isGM) updateHandouts(handouts,false,senderId); + break; + case 'hsq': + case 'handshake': + sendWait( senderId, 0, 'Magic --hsq' ); + doHsQueryResponse(arg); + break; + case 'hsr': + sendWait( senderId, 0, 'Magic --hsr' ); + doHandleHsResponse(arg); + break; + case 'button': + doButton(arg,senderId,selected); + break; + case 'help': + showHelp(senderId); + break; + case 'relay': + doRelay(argString,senderId); + break; + case 'debug': + // RED: v1.207 allow anyone to set debug and who to send debug messages to + doSetDebug(argString,senderId); + break; + case 'nowaitmsg': + case 'skip': + // RED: v4.1 added to allow viewed abilities to not execute certain live commands + break; + case 'get-rowid': + doGetRowInfo(arg); + break; + default: + sendFeedback('Invalid command " '+msg.content+' "',flags.feedbackName); + showHelp(isGM); + break; + } + } + } catch (err) { + log('MagicMaster handleChatMsg: JavaScript '+err.name+': '+err.message+' while processing command '+cmd+' '+argString); + sendCatchError('MagicMaster',msg_orig[senderId],err); + } + } + + msg_orig[senderId] = msg; + + if (msg.type !== "api") return; + // Make sure libRPGMaster exists, and has the functions that are expected + if('undefined' === typeof libRPGMaster + || (['getTableField','getTable','initValues','attrLookup','setAttr'].find(k=> + !libRPGMaster.hasOwnProperty(k) || 'function' !== typeof libRPGMaster[k] + )) + ) { + if (flags.notifyLibErr) { + flags.notifyLibErr = !flags.notifyLibErr; + setTimeout( () => flags.notifyLibErr = !flags.notifyLibErr, 10000 ); + // notify of the missing library + sendChat('',`/w gm
Missing dependency: libRPGMaster
`); + } + return; + }; + if (args.indexOf('!magic') !== 0 && args.indexOf('!mibag') !== 0) + {return;} + + sendDebug('MagicMaster called'); + time = Date.now(); + + args = args.split(' --'); + const senderMod = args.shift().split(' '); + if (senderMod.length > 1) senderId = fixSenderId( [senderMod[1]], selected, senderId ); + + if (_.isUndefined(senderId) || _.isUndefined(getObj('player',senderId))) { + sendDebug('senderId undefined, looking for GM'); + if (_.isUndefined(senderId = findTheGM())) { + sendDebug('Unable to findTheGM'); + return; + } else { + sendDebug('found the GM'); + } + } else { + sendDebug('senderId is defined as ' + getObj('player',senderId).get('_displayname')); + }; + + const isGM = (playerIsGM(senderId) || state.MagicMaster.debug === senderId); + + if (!flags.noWaitMsg && args[0] && !args[0].toLowerCase().startsWith('nowaitmsg')) sendWait(senderId,2,'Magic cmd '+args[0].split(' ')[0]); + + _.each(args, function(e) { + setTimeout( doMagicCmd, (1*t++), e, selected, senderId, isGM ); + }); + }; + +// -------------------------------------------------------------- Register the API ------------------------------------------- + + /* + * Register msgicMaster API with the + * commandMaster API + */ + + var cmdMasterRegister = function() { + const cmd = fields.commandMaster + + ' --nowaitmsg' + + ' --register Cast_MU_spell|Cast a Wizard spell|magic|~~cast-spell|MU%%`{selected|token_id}' + + ' --register Cast_PR_spell|Cast a Priest spell|magic|~~cast-spell|PR%%`{selected|token_id}' + + ' --register Cast_spell|Ask for which type of spell to cast|magic|~~cast-spell|MU-PR%%`{selected|token_id}' + + ' --register Spells_menu|Open a menu with spell management functions|magic|~~spellmenu|`{selected|token_id}' + + ' --register Use_power|Use a Power|magic|~~cast-spell|POWER%%`{selected|token_id}' + + ' --register Powers_menu|Open a menu with power management functions|magic|~~spellmenu|`{selected|token_id}%%POWERS' + + ' --register Use_magic_item|Use a Magic Item from character\'s bag|magic|~~use-mi|`{selected|token_id}' + + ' --register Magic_Item_menu|Open a menu of Magic Item management functions|magic|~~mimenu|`{selected|token_id}' + + ' --register Rest|Perform Short or Long rests|magic|~~rest|`{selected|token_id}'; + sendAPI( cmd ); + return; + }; + + /** + * Handle a change to the page the Player ribbon is on + **/ + + const handleChangePlayerPage = function(obj,prev) { + + try { + const page = Campaign().get('playerpageid'), + tokens = filterObjs( obj => { + if (obj.get('type') != 'graphic' || obj.get('subtype') != 'token') return false; + if (obj.get('pageid') != page) return false; + return (!!obj.get('represents') && !!obj.get('represents').length); + }); + if (!!tokens && (_.size(tokens) > 0)) { + handleCStidy( tokens, true ); + } + } catch (e) { + sendCatchError('MagicMaster',null,e,'MagicMaster handleChangePlayerPage()'); + } + return; + } + + /** + * Handle a token being added to a page. Check if this is the + * current Player page and, if so, tidy it's character sheet. + */ + + const handleChangeToken = function(obj,prev) { + + try { + if (!obj) + {return;} + + if (obj.get('name') == prev['name']) + {return;} + + if (obj.get('_pageid') == Campaign().get('playerpageid') && obj.get('represents') && obj.get('represents').length) { + handleCStidy( [obj], true ); + } + } catch (e) { + sendCatchError('MagicMaster',null,e,'MagicMaster handleChangeToken()'); + } + return; + } + + /** + * Set the magicMaster version of a new character sheet + */ + + const handleAddCharacter = function(obj) { + + try { + if (!obj) return; + setAttr( obj, fields.msVersion, version ); + } catch (e) { + sendCatchError('MagicMaster',null,e,'MagicMaster handleAddCharacter()'); + } + } + + /** + * Set the charType of a dead creature to 6 (dead) + */ + + const handleTokenDeath = function(obj,prev) { + try { + if (!obj) return; + const charCS = getCharacter( obj.id ); + if (!charCS) return; + if (obj.get("status_dead")) { + // If the token dies and is marked as "dead" by the GM + // set its container type to 6 (dead). + setAttr(charCS, fields.ItemOldContainerType, attrLookup(charCS, fields.ItemContainerType)); + setAttr(charCS, fields.ItemContainerType, 6); + } else { + setAttr(charCS, fields.ItemContainerType, (attrLookup(charCS, fields.ItemOldContainerType) || 1)); + } + } catch (e) { + sendCatchError('MagicMaster',null,e,'MagicMaster handleTokenDeath()'); + } + return; + }; + + + /** + * Register and bind event handlers + */ + var registerAPI = function() { + on('chat:message',handleChatMessage); + on('change:campaign:playerpageid',handleChangePlayerPage); + on('change:graphic:name',handleChangeToken); + on('change:graphic:statusmarkers',handleTokenDeath); + on('add:character',handleAddCharacter); + }; + + return { + init: init, + registerAPI: registerAPI + }; + +}()); + +on("ready", function() { + 'use strict'; + MagicMaster.init(); + MagicMaster.registerAPI(); +}); + +{try{throw new Error('');}catch(e){API_Meta.MagicMaster.lineCount=(parseInt(e.stack.split(/\n/)[1].replace(/^.*:(\d+):.*$/,'$1'),10)-API_Meta.MagicMaster.offset);}} diff --git a/MagicMaster/MagicMaster.js b/MagicMaster/MagicMaster.js index d09493aa1..c6d29fb01 100644 --- a/MagicMaster/MagicMaster.js +++ b/MagicMaster/MagicMaster.js @@ -117,14 +117,21 @@ API_Meta.MagicMaster={offset:Number.MAX_SAFE_INTEGER,lineCount:-1}; * v5.0.2 05/10/2025 Add (temporary?) fix to API button cmd / macro pair action. * v5.0.3 17/10/2025 Fixed crash on calling !magic without any command. Fixed sloppy checking of spell * schools and spheres. + * v5.1.0 25/09/2025 Converted var declarations to use let and const where possible. Tried to enhance + * speed of algorithms. + * v5.2.0 18/11/2025 Added selection of multiple items to pick, put, buy or sell with traders and + * containers. Used new hyperlink RPGM template syntax to add hyperlinks to select + * all of a type of item, or all items in the container. + * v5.3.0 23/12/2025 Added encumbrance. Updated attrLookup() and resolveData() to use objects for + * optional parameters. Fixed viewing spell storing MIs in innanimate containers. */ -var MagicMaster = (function() { // eslint-disable-line no-unused-vars +const MagicMaster = (function() { // eslint-disable-line no-unused-vars 'use strict'; - var version = '5.0.3', - author = 'RED', - pending = null; - const lastUpdate = 1760686967; + const version = '5.3.0'; + const author = 'RED'; + let pending = null; + const lastUpdate = 1777318205; /* * Define redirections for functions moved to the RPGMaster library @@ -133,7 +140,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const getRPGMap = (...a) => libRPGMaster.getRPGMap(...a); const getHandoutIDs = (...a) => libRPGMaster.getHandoutIDs(...a); const setAttr = (...a) => libRPGMaster.setAttr(...a); - const attrLookup = (...a) => libRPGMaster.attrLookup(...a); + const attrLookup = (...a) => libRPGMaster.newAttrLookup(...a); const setAbility = (...a) => libRPGMaster.setAbility(...a); const miSpellLookup = (...a) => libRPGMaster.miSpellLookup(...a); const abilityLookup = (...a) => libRPGMaster.abilityLookup(...a); @@ -179,7 +186,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const parseClassDB = (...a) => libRPGMaster.parseClassDB(...a); const parseData = (...a) => libRPGMaster.parseData(...a); const parseStr = (...a) => libRPGMaster.parseStr(...a); - const resolveData = (...a) => libRPGMaster.resolveData(...a); + const resolveData = (...a) => libRPGMaster.newResolveData(...a); const getSetPlayerConfig = (...a) => libRPGMaster.getSetPlayerConfig(...a); const makeConfigMenu = (...a) => libRPGMaster.makeConfigMenu(...a); const sendToWho = (...m) => libRPGMaster.sendToWho(...m); @@ -240,7 +247,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * are used. */ - const design = { + const design = Object.freeze({ turncolor: '#D8F9FF', roundcolor: '#363574', statuscolor: '#F0D6FF', @@ -252,15 +259,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars apply_icon: 'https://s3.amazonaws.com/files.d20.io/images/11407460/cmCi3B1N0s9jU6ul079JeA/thumb.png?1439137300', bag_icon: 'https://s3.amazonaws.com/files.d20.io/images/335981697/ocKqy1UIfPMSD-TYEO6oXA/thumb.png?1680722832', info_msg: '
', - grey_button: '"display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: dimgrey; font-weight: extra-light;"', - dark_button: '"display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: black; font-weight: normal;"', - selected_button: '"display: inline-block; background-color: white; border: 1px solid red; padding: 4px; color: red; font-weight: bold;"', - green_button: '"display: inline-block; background-color: white; border: 1px solid lime; padding: 4px; color: darkgreen; font-weight: bold;"', + grey_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: gray; font-weight: extra-light; padding: 1px 5px;"', + dark_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: black; font-weight: normal; padding: 1px 5px;"', + selected_button: '"display: inline-block; background-color: white; border: 1px solid red; border-radius: 5px ; color: red; font-weight: bold; padding: 1px 5px;"', + green_button: '"display: inline-block; background-color: white; border: 1px solid lime; border-radius: 5px ; color: darkgreen; font-weight: bold; padding: 1px 5px;"', boxed_number: '"display: inline-block; background-color: yellow; border: 1px solid blue; padding: 2px; color: black; font-weight: bold;"', success_box: '"display: inline-block; background-color: yellow; border: 1px solid lime; padding: 2px; color: green; font-weight: bold;"', failure_box: '"display: inline-block; background-color: yellow; border: 1px solid red; padding: 2px; color: maroon; font-weight: bold;"', // grey_action: '<span style="display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: dimgrey; font-weight: extra-light;">$2</span>$4', - }; + }); /* * MagicMaster related help handout information. @@ -268,20 +275,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const handouts = Object.freeze({ MagicMaster_Help: {name:'MagicMaster Help', - version:3.11, + version:3.13, avatar:'https://s3.amazonaws.com/files.d20.io/images/257656656/ckSHhNht7v3u60CRKonRTg/thumb.png?1638050703', bio:'
' - +'MagicMaster Help v3.11' + +'MagicMaster Help v3.13' +'
' +'
' +'

MagicMaster API v'+version+'

' +'

and later

' +'
' +'

New: in this Help Handout

' - +'

New: The ability to buy and sell with Traders

' - +'

New: Services such as purchaseable weapon proficiency training

' - +'

New: --clean command to fix any (rare) corrupted character sheets

' - +'

New: Use of character sheet fields in RPGM maths

' + +'

New: Ability to select multiple items to buy or sell

' + +'

New: Ability to pick up, loot or store multiple items at the same time

' + +'

Updated: --mi-charges can take API commands as success and/or fail parameters

' + +'

New: Calculation of encumbrance (configurable) and --check-move command

' +'
' +'

The MagicMaster API provides functions to manage all types of magic, including Wizard & Priest spell use and effects; Character, NPC & Monster Powers; and discovery, looting, use and cursing of Magic Items. All magical aspects can work with the RoundMaster API to implement token markers that show and measure durations, and produce actual effects that can change token or character sheet attributes temporarily for the duration of the spell or permanently if so desired. They can also work with the InitiativeMaster API to provide menus of initiative choices and correctly adjust individual initiative rolls, including effects of Haste and Slow and similar spells. This API can also interact with the MoneyMaster API (under development) to factor in the passing of time, the cost of spell material use, the cost of accommodation for resting, and the cost of training for leveling up as a spell caster (Wizard, Priest or any other).

' +'

Syntax of MagicMaster calls

' @@ -305,14 +312,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

The Ability Macros for spells and powers include descriptions of the spell they represent (limited, I\'m afraid, to avoid copyright issues), and also can optionally have API Buttons embedded in them which, if selected by the Player, can enact the actions of the spell or power. The API Buttons call one or more of the API commands listed in this document, or commands provided by other APIs. This is most powerful when combined with the RoundMaster API to implement token statuses and status markers with durations and effect macros, enabling the spells & powers to make temporary (or permanent, if desired) changes to the targeted creature\'s token and character sheet attributes.

' +'

The best way to learn about these capabilities is to look at example spell definitions in the databases and use those spells or powers to see what they do.

' +'

Types of Item Provided

' - +'

The Item database is currently split into twelve parts: Weapons, Ammunition, Armour, Equipment, Lights, Potions, Scrolls & Spellbooks, Treasure, Wands Staves & Rods, Rings, Miscellaneous, custom items of all these types, and now New: Services. More might be added in future releases, and any DM can add more databases with their own items.

' + +'

The Item database is currently split into twelve parts: Weapons, Ammunition, Armour, Equipment, Lights, Potions, Scrolls & Spellbooks, Treasure, Wands Staves & Rods, Rings, Miscellaneous, custom items of all these types, and now Services. More might be added in future releases, and any DM can add more databases with their own items.

' +'

Many magic items have actions that they can perform in the same way as Spells & Powers, using API Buttons in their macros that call MagicMaster API commands, or commands from other APIs. As with spells & powers, this is most powerful when combined with the capabilities of the RoundMaster API.

' +'

Items can have stored spells (like Rings of Spell Storing) and the spells can be cast from them, and/or can have powers that can be consumed and are refreshed each day. Again, using the RoundMaster API, the spells and powers can have temporary or permanent effects on Tokens and Character Sheets, if desired. Some items can even store other items, such as a Bag of Holding.

' +'

Adding Items to the Character

' +'

Classes are set using the CommandMaster API or via the AttackMaster !attk --other-menu menu (or can be set manually on the Character Sheet). Classes can be those provided in the Class-DB, or any other class. Class names that are not in the database will adopt the attributes of the standard classes depending on the character sheet field the class name and level are entered into: Warrior, Wizard, Priest, Rogue, and Psion. Depending on the settings selected by the GM under the --config menu, the choise of class will restrict or grant the character\'s ability to use certain items and cast certain spells.

' +'

The MagicMaster API provides commands to perform menu-driven addition of items to the Character Sheet. Using these commands will set up all the necessary fields so that the Player can use the items with the other APIs - if using MagicMaster then items should not be added directly to the Character Sheet.

' +'

Items can also be acquired by finding them in chests or on tables (simply tokens with images of chests or tables that represent Character Sheets with items added to them) that can be looted, or even dead bodies of NPCs that have been killed in battle. MagicMaster provides commands that support a menu-driven way to perform looting. Characters, especially Rogues, can even try to Pick Pockets to take items from NPCs (or even other Characters...), though failure may alert the DM (or other Player) to the attempt. Containers can even be trapped, with magical consequences if the trap goes off! On the other hand, Characters can also put items away into chests or onto tables or other storage places, or give them to other Characters or NPCs.

' - +'

New: Trading Items & Services

' + +'

New:Encumbrance

' + +'

Almost all items weigh something, and there is a limit to what a character of a particular strength can carry. When items are added to a character, NPC, creature, or other container the total weight carried is calculated, including the weight of items in bags carried. This weight can be displayed by viewing the item list. As this weight increases, it can "encumber" the carrier - slowing movement, impacting the ability to fight and reducing their ability to dodge so impacting AC. The degree of encumbrance is tracked by the API and the appropriate penalties applied (unless disabled by the GM using a configuration option). The Attk Menu > Check Movement dialog (or !magic --check-move command) will display how the encumbrance is calculated from carried items and current modifications to movement (AttackMaster API is required).

' + +'

While some magical items may have a weight that needs to be born by the carrier, they may not "encumber" the carrier or impact movement, attacks or AC. Magical armour has this effect. Data in the MI database sets the weights and encumbrance values for each item. See the Items Database Help handout for more information.

' + +'

Trading Items & Services

' +'

From v4.1 of the RPGMaster suite, characters can be defined as Traders, with the ability to buy & sell items in their inventories. This even includes Drag & Drop Innkeepers, Shopkeepers, and Blacksmiths in their Forge (and many others listed under the [Services] button on the Drag & Drop dialog), from which Player Characters (and others) can buy equipment and items from as well as sell items to in exchange for money. Training Schools also exist that sell training in weapon proficiencies and even levelling up. See the Class Database Help and Race & Creature Database Help handouts for more information.

' +'

All items in the API databases have been given monetary values, based on the rules stated in the DMG and the Dungeon Master Option: High Level Campaigns for the cost of creating the items (sometimes adjusted for game balance). This cost is then adjusted by each Trader depending on the trading margin each has defined using their buy: and sell: data tag formulas. This means the same item can be offered at different prices by two different traders: indeed, many margin calculations are based on a degree of variability based on a dice roll so the price of an item from a single Trader can vary over time. The trading system also allows the Trader (or the GM or player controlling the Trader) to haggle a price with the player controlling the PC.

' +'

A coin system is now included for each character consisting of numbers of Platinum, Gold, Electrum, Silver and Copper Coin items being held in each character\'s inventory. The quantity of these coins are automatically reflected to the Currency fields on the character sheet. The coin numbers are updated as trades are made: Traders cannot go "overdrawn" with negative numbers of coins (to ensure there is a balance of buying & selling to preserve game balance), but player characters and other NPCs are not prevented from doing so - the DM should keep an eye on borrowing levels and impose penalties (such as interest charges) for excessive overdrafts. Coins can be stored into and recovered (or looted) from containers (such as chests, or perhaps containers called "bank accounts").

' @@ -349,29 +359,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'--view-mi [token_id]
' +'--use-mi [token_id]
' +'--add-mi [token_id]|(mi-to-replace/row#)|mi-to-add|quantity|hand#|[NOCURSE]|[SILENT]
' - +'--mi-charges token_id|value|[mi_name]|[maximum]|[charge_override]
' + +'--mi-charges token_id|value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
' +'--mi-power token_id|power_name|mi_name|[casting-level]
' +'--store-spells token_id|mi-name
' +'--mem-spell (MI-MU/MI-PR)[-ANY/-ADD/-CHANGE]|[token_id]|[mi-name]
' +'--view-spell (MI/MI-MU/MI-PR/MI-POWER)|[token_id]|[mi-name]
' +'--cast-spell (MI/MI-POWER)|[token_id]|[casting_level]|[casting_name]|[CHARGED]|[mi-name]
' - +'--learn-spell [token_id]|spell_name' + +'--learn-spell [token_id]|spell_name
' + +'New:--check-move [token_id]|[SILENT]' +'

3.Spell, power & magic item effects and resting

' +'
!rounds --target CASTER|caster_token_id|caster_token_id|spell_name|duration|increment|[msg]|[marker]
'
 							+'!rounds --target (SINGLE/AREA)|caster_token_id|target_token_id|spell_name|duration|increment|[msg]|[marker]
'
 							+'--touch token_id|effect-name|duration|per-round|message|marker
'
 							+'--level-change [token_id]|[# of levels]|[HP change]|[class]
'
 							+'--change-attr [token_id]|change|[field]|[SILENT]
'
-							+'Updated: --rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale / spellname]
'
+							+'--rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale / spellname]
'
 							+'--mi-rest [token_id]|mi_name|[charges]|[power_name]
'
 							+'--query-qty [token_id]|(MU/PR/POWER/MI/MIPOWER)|item|[SILENT]
' +'

4.Treasure & Item container management

' - +'
Updated: --gm-edit-mi [token_id]
'
+							+'
--gm-edit-mi [token_id]
'
 							+'--find-traps token_id|pick_id|put_id
'
-							+'Updated:--search token_id|pick_id|put_id
'
+							+'--search token_id|pick_id|put_id
'
 							+'--pickorput token_id|pick_id|put_id|[SHORT/LONG]
'
-							+'New: --buy token_id|pick_id|put_id
'
-							+'New: --sell token_id|pick_id|put_id
'
+							+'--buy token_id|pick_id|put_id
'
+							+'--sell token_id|pick_id|put_id
' +'

5.Light source management

' +'
--lightsources [token_id]
'
 							+'--light token_id|(NONE/WEAPON/TORCH/HOODED/CONTLIGHT/BULLSEYE/BEACON)
' @@ -380,8 +391,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'--message [who|][token_id]|title|message|[command]|[var1]|[var2]...
' +'--display-ability [who|][token_id]|database|db_item|[dice_roll1]|[dice_roll2]|[target_id]
' +'--tidy [token_id]|[SILENT]
' - +'New: --clean [token_id]|[SILENT]
' - +'Update:--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/REVEAL/VIEW-ACTION/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
' + +'--clean [token_id]|[SILENT]
' + +'Updated:--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/REVEAL/VIEW-ACTION/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
' +'--check-db [db-name]
' +'--extract-db [db-name]
' +'--handshake from | [cmd]
' @@ -454,17 +465,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

This command can be used to add a named item from the databases to a character, NPC, creature or other container without going through other dialogs to select the item. It will add the item to a numbered row in the equipment list or, more usefully, replace a named item that already exists in the list (or \'-\' to find an empty row). If the item is one that can be taken in-hand (e.g. a weapon or a shield, or a magic item like a wand or staff), the optional \'hand number\' can be used to specify which hand to take it in. 0=prime hand,1=offhand,2=both,3 onwards for other hands, or just \'=\' (or blank) means replace in-hand if mi-to-replace is in-hand or worn as a ring - if the item is not one that can be held the item will not be taken in-hand. If the item to be replaced is cursed, it will not be replaced and an error message will be displayed unless the NOCURSE option is used. Finally, the command will pop up the edit-mi dialog or the gm-edit-mi dialog (if NOCURSE is specified) showing the resulting equipment list unless the SILENT flag is also used.

' +'

The quantity can be a number to set the amount of the item to add. If preceeded by an operator (such as \'+\', \'-\', \'*\', or \'/\'), the quantity will modify the quantity of the item replaced (up to the maximum quantity of the replaced item). If the quantity is just \'=\' the quantity will set to the same as the replaced item, or 1 for an added item, or if the item to be replaced is not found and quantity is \'=\', the item will not be added.

' +'

2.6 Add, set or deduct Magic Item charges

' - +'
--mi-charges token_id|[+/-/0]value|[mi_name]|[maximum]|[charge_override]
' - +'

Takes a mandatory token ID, a mandatory value preceeded by an optional + or -, an optional magic item name, an optional maximum value, and an optional magic item charge type override as arguments.

' - +'

Does not display anything but alters the number of current or recoverable charges on an item. By default, alters the last magic item used by the character, or will affect the named magic item. Warning: a character can have two items of the same name, and there is no guarantee which will be affected if the name is used.

' + +'
Updated: --mi-charges token_id|[+/-/0]value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
' + +'

Takes a mandatory token ID, a mandatory value preceeded by an optional + or -, an optional magic item name, an optional maximum value, an optional magic item charge type override, a success message or ccommand, and a fail message or command as arguments.

' + +'

Alters the number of current or recoverable charges on an item. By default, alters the last magic item used by the character, or will affect the named magic item. Warning: a character can have two items of the same name, and there is no guarantee which will be affected if the name is used.

' +'

Remember: using a Charged, Recharging, Rechargeable or Self-Charging Magic Item will automatically use 1 charge on use (unless the ItemData specification includes the field c:0, in which case no charges will automatically be deducted on use). If the c: tag is not used, or is anything other than 0, then charges will be deducted (default 1 charge) on use of the item. In addition, that one charge deduction always happens - if an effect of a Magic Item uses 2 charges, only 1 more needs to be deducted.

' +'

Note: \'-\' reduces current remaining charges, \'+\' adds to the maximum recoverable charges, no + or - sets the maximum recoverable charges, and \'0\' (or starting with 0 e.g. \'01\') the item will recharge to the set or current maximum. This command cannot otherwise be used to increase the current remaining charges unless the item is of type absorbing.

' +'

Using minus \'-\' before the value will deduct charges from the current quantity/charges: e.g. if using an optional power of the item that uses more than 1 charge. Using + before the value will add the value to the number of recoverable charges (overnight or rechargeable to), up to any specified maximum (often used for magic items that regain variable numbers of charges overnight). Just using the value without + or - will just set the number of recoverable charges to the given value. This command is not required to recharge self-charging items but can be used to change the maximum number of charges they will self-charge up to.

' +'

Absorbing items can gain charges in use from other sources, so the --mi-charges command works differently: \'-\' reduces both current and maximum charges and \'+\' only increases current charges (but only to maximum and not beyond). Using neither \'-\' or \'+\' will set the current charges (but, again, only up to the maximum).

' +'

The charge-override can be used to temporarily change the charge behaviour of the magic item. Specifying an override will cause the magic item to behave as if its charging type was that of the override only for this call. Thus charges could be deducted from an uncharged item by overriding by rechargeable or charged.

' + +'

Updated: If the command is able to sucessfully change the number of charges and the item remains in existance, the optional *success* command will be executed or message displayed. If not, if the item "expires" with no remaining charges, or if the command fails for any other reason an optional *fail* command will be executed or message displayed.

' +'

2.7 Use a Magic Item power

' +'
--mi-power token_id|[type-]power_name|mi_name|[casting-level]
' - +'

Takes a mandatory token ID, mandatory power name (optionally prefixed by a power type), mandatory magic item name (New which can be several names separated by forward slash), and an optional casting level as parameters.

' + +'

Takes a mandatory token ID, mandatory power name (optionally prefixed by a power type), mandatory magic item name (which can be several names separated by forward slash), and an optional casting level as parameters.

' +'

Magic Items, especially artefacts, can have their own powers that can be used a specified number of times a day, or at will. This command can be used in API buttons in the Magic Item macro to call on that power. The power name and the magic item name (or names, especially where items that change with use have powers) must be specified to select the right power. If a casting level is specified, any relevant impacts on use of the power will be taken into account: it is often the case that magic items use powers at specific levels. If not specified, the item using Character\'s level is used (user does not need to be a spell caster).

' +'

Generally, magic item powers have unique names, though they do not have to. Such magic items require specific setting up by the DM - see later sections. However, powers can have a prefix that indicates a power type that specifies the power is in fact a Wizard spell (MU-), a Priest spell (PR-), or a Magic Item (MI-) or (for completeness) confirmed as a Power (PW-). Specifying a power type prefix means the appropriate database types will be searched for the named power - thus (for instance) a Wizard or Priest spell can be specified as a Magic Item power without having to program a duplicate in the Powers Databases. If no power type prefix is specified, the system will first search for a matching power in the Powers Databases (both API-supplied and user-supplied), then all Wizard spell databases, then Priest spell databases, then all Magic Item databases, and finally the character sheet of the creature wielding the Magic Item.

' +'

2.8 Add spells to a spell-storing Magic Item

' @@ -495,6 +507,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'
  • Check that the spell is of a level the character can cast;
    • ' +'
  • Present a dialog to the player to roll "Spell Knowledge" with a target pre-adjusted for specialism;
    • ' +'
  • If all of the above checks are passed, add the spell to the character\'s correct level of spellbook.
    • ' + +'

    2.12 New:Check Weights and Encumbrance

    ' + +'
    --check-move [token_id]|[SILENT]
    ' + +'

    Takes an optional token_id which defaults to that of the currently selected token, followed by an optional litteral command of SILENCE (case insensitive).

    ' + +'

    This command calculates the weight and encumbrance of items listed as carried on the character sheet represented by the itentified token. This includes the weight contained in any items classified as bags (such as backpacks) modified by the weight and encumbrance specification of the bag (e.g. a Bag of Holding will only weigh a set amount regardless of what it contains). Items (including bags) can have a different encumbrance from their weight (e.g. magical armour has a weight but no encumbrance). These values are specified in the item specification in the MI databases (see the Item Database Help handout).

    ' + +'

    Items carried can also modify the calculated movement. For example, Boots of Speed will always set the movement rate to 12 regardless of encumbrance, though if weight carried exceeds the maximum possible for the strength of the character the GM may say movement should be zero despite the boots (the API does not restrict Boots of Speed).

    ' + +'

    If the AttackMaster API is loaded and SILENT is not specified, a dialog will appear displaying all elements that make up the calculation of weight, encumbrance and movement. The effect on attacks will also be applied to that character/NPC/Creature.

    ' + +'

    If the RoundMaster API is loaded and the character is calculated as being encumbered to any degree, a status will be placed on the identified token indicating the encumbrance and resulting movement limit, and the effect on AC will automatically be applied.

    ' + +'

    While weight and encumbrance will always be calculated, their effects on attacks and AC can be disabled by the GM using a configuration option. The AttacksMaster API and RoundMaster API are required for full functionality of Encumbrance.

    ' +'
    ' +'

    3.Spell, power & magic item effects and resting

    ' +'

    If this API is used in conjunction with the RoundMaster API, Magic Items, Spells & Powers can all place status markers on tokens, and also cause real Effects to alter token & character sheet attributes and behaviours: when cast; during each round of their duration; and when they expire. See the RoundMaster documentation for further information, especially on Effects and the Effects Database.

    ' @@ -513,7 +533,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    3.2 Cast a spell that requires a "touch" attack roll

    ' +'
    --touch token_id|effect-name|duration|per-round|[message]|[marker]
    ' +'

    Takes mandatory token ID, effect name, duration of the effect, an increment to the duration per round (often -1), an optional message each round for the targeted token, and an optional status marker to use (if not supplied, the DM or user will be asked to select one).

    ' - +'

    Note: this command requires RoundMaster API to also be loaded, but is a !magic command.

    ' + +'

    Note: this command requires RoundMaster API to also be loaded, but this is a !magic command.

    ' + +'

    Note: This is a legacy command that has been superceeded by "Touch" being able to be taken in-hand as a weapon. It is retained for backwards compatability.

    ' +'

    Sets up the Character represented by the specified token ready for an "Attack Roll" to deliver a touch attack for a spell or power or magic item use that requires an attack. The parameters are those that will be passed to the !rounds --target command if the attack is successful (see above).

    ' +'

    To use this command, add it as part of a spell, power or MI macro in the appropriate database, before or after the body of the macro text (it does not matter which, as long as it is on a separate line in the macro - the Player will not see the command). Then include in the macro (in a place the Player will see it and be able to click it) an API Button call [Button name](~Selected|To-Hit-Spell) which will run the Ability "To-Hit-Spell" on the Character\'s sheet (which has just been newly written there or updated by the --touch command).

    ' +'

    Thus, when the Player casts the Character\'s spell, power or MI, they can then press the API Button when the macro runs and the attack roll will be made. If successful, the Player can then use the button that appears to mark the target token and apply the spell effect to the target.

    ' @@ -528,7 +549,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Mainly used to support magical effects and creature attacks that drain or add to attributes such as Strength, this command specifically deals with aspects such as Exceptional Strength, remembering if a Character has exceptional strength as a characteristic and taking it into account as the value is changed. Going up or down from the original rolled value and then back the other way will include as a step the exceptional, percentage value. If the change requested would take the value past the original rolled value, the change will only go as far as the original value, whatever change was requested. However, the change can then continue with subsequent calls to beyond the original value with subsequent calls.

    ' +'

    The optional operator before the increment will work in (hopefully) an obvious way: \'+\' adds to the attribute value, \'-\' subtracts, \'*\' multiplies (e.g. *2 will double the current attribute value), \'/\' will divide (e.g. /2 halves it), and \'=\' sets the value to that given. The value in each case can be a formula using RPGM maths operators.

    ' +'

    Note:Should the rolled value need to change permanently to a new rolled value, the change value of 0 (zero) will reset the remembered original rolled value to the current value of the attribute - this is not needed the first time the command is used on a character sheet, which will trigger this value to be remembered for the first time.

    ' - +'

    3.5 Updated: Perform Short or Long Rests

    ' + +'

    3.5 Perform Short or Long Rests

    ' +'
    --rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale/spellname]
    ' +'

    Takes an optional token ID (if not specified, uses the selected token), an optional rest type, short or long, an optional magic type to regain charges for, and an optional timescale for days passing OR an optional spell or power name to individually rest.

    ' +'

    Most magic requires the character to rest periodically to study spell books, rememorise spells, and regain powers and charges of magic items. This command implements both Short and Long rests.

    ' @@ -538,7 +559,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    A Long rest can only be undertaken if certain conditions are met: either the optional Timescale (in days) must be specified as 1 or more days, or the Character Sheet must have a Roll20 attribute called Timescale, current, set to a value of 1 or more (can be set by InitiativeMaster API --end-of-day command). An internal date system is incremented: an attribute on the Character Sheet called In-Game-Day is incremented by the Timescale, and Timescale is then set to 0.

    ' +'

    If the InitiativeMaster API is being used, the system will interact with the "End of Day" command to allow rests to be coordinated with the choice of accommodation (and its cost...!) or with earnings made for the day\'s adventuring.

    ' +'

    Instead of the timescale parameter, a spell or power name can be provided as the 4th parameter. In this case, all memorised instances of that specific spell or power (depending on the magic type selected) will be "rested".

    ' - +'

    New:Warning: Undertaking a rest of either type on a Trader (see "Adding Items to the Character" above) will "restock" the Trader\'s inventory, which first empties all previously held items of all types except coins, and then restocks the inventory using the original definition of the Trader\'s items in the relevant database. If the Trader has items in their inventory that they want to keep, it is recommended that they use a Drag & Drop container to store those items in to keep them safe.

    ' + +'

    Warning: Undertaking a rest of either type on a Trader (see "Adding Items to the Character" above) will "restock" the Trader\'s inventory, which first empties all previously held items of all types except coins, and then restocks the inventory using the original definition of the Trader\'s items in the relevant database. If the Trader has items in their inventory that they want to keep, it is recommended that they use a Drag & Drop container to store those items in to keep them safe.

    ' +'

    3.6 Perform a Single Item Rest

    ' +'
    --mi-rest [token_id]|mi_name|[charges]|[power_name]
    ' +'

    Takes an optional Token ID (defaults to the selected token), a mandatory magic item name (case insensitive), an optional number of charges to recharge to, and an optional power name (case insensitive).

    ' @@ -549,7 +570,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Some spells, powers, and magic items need to know how many charges they have left in order to impact the effect they have. The quantity is difficult to find from the table entry in macro code unless the row number is known, so this command finds the item for the macro and saves the current quantity in the character sheet attribute that can be accessed using @{selected|spellcharges}. Generally a call to this command should be outside of any roll template so that the command runs before the roll template is displayed and any API buttons become available.

    ' +'
    ' +'

    4.Treasure & Item container management

    ' - +'

    Updated: 4.1 DM/GM version of Magic Item management

    ' + +'

    4.1 DM/GM version of Magic Item management

    ' +'
    --gm-edit-mi [token_id]
    ' +'

    Takes an optional token ID. If token ID is not specified, uses the selected token.

    ' +'

    This command opens a menu showing all the items in the Items table of the character sheet associated with the specified token. Unlike the Player version of the command (--edit-mi), this command shows all attributes of every magic item, including those of hidden and cursed items, and also offers an additional lists of "DM Only" items from the item databases, tradeable services, treasure items and other lists restricted to GM use.

    ' @@ -567,7 +588,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' Reset Qty to Max:Allows the DM to reset the quantity of the selected Bag slot to the actual (max) values.' +' Reveal Now:Only available when a hidden item is selected. Reveals the item, setting the displayed name to the actual name, which will function as the revealed item from that point on.' +' Reveal MI:Allows selection of when a hidden item is revealed: MANUALLY by DM (the default) using the Reveal Now button; on VIEWING the item; or on USING the item; or on a long REST. From the point the item is revealed onwards, the item will behave as the revealed item.' - +' Update:
    Edit Treasure:Mainly for use on Magic Item containers, such as Treasure Chests, but also useful for NPCs and Monsters. Allows the DM to add text only treasure descriptions to the container. The displayed menu allows [Add], [Edit], and [Delete] functions to manage multiple lines/rows of treasure description. This is less useful now: instead consider adding items from the [Treasure] and [Coins] lists to the container, which are then saleable to Traders for money.' + +'
    Edit Treasure:Mainly for use on Magic Item containers, such as Treasure Chests, but also useful for NPCs and Monsters. Allows the DM to add text only treasure descriptions to the container. The displayed menu allows [Add], [Edit], and [Delete] functions to manage multiple lines/rows of treasure description. This is less useful now: instead consider adding items from the [Treasure] and [Coins] lists to the container, which are then saleable to Traders for money.' +' Container Type:Sets the type of the Magic Item container or Bag. Available choices are: Untrapped container, Trapped container, Force to be an Inanimate Container, Force to be a Sentient creature. If searched, Inanimate objects can be looted without penalty; Sentient beings require a Pick Pockets check; Trapped containers call a Trap ability macro on the container\'s character sheet to determine the effect. See the --search command below.' +' Container Size:Sets the maximum number of items that can be stored in the selected Character\'s/containers bag. The default is 18 items, though identical items can be stacked.' +' Show As:Sets what level of item description a Player sees when looting a container. Either "Show as Item Types" (e.g. potion, scroll, melee weapon, etc), or "Show as Item Names" (default) which shows the display names of the items. Once picked up from the container, will always show their display names.' @@ -577,7 +598,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to check for traps, mandatory token ID of the token doing the checking.

    ' +'

    This command will check a token for any traps. If the container represented by the token was created using the Drag & Drop container system (see CommandMaster API documentaion for details of the Drag & Drop container system) this command will start the selected container\'s "Find & Remove Traps" programmed sequence, with a (small) chance of the trap (if any) being triggered. If the trap is successfully removed, the container may still be locked but will no longer be trapped. If the token represents any other type of character, container, creature or object a standard "Find/Remove Traps" sequence will ensue, resulting in the party (and the GM) being alerted to the success or otherwise of the outcome.

    ' +'

    In either case, the default approach to the Find Traps roll is that the GM is asked to make it - being presented with a drop-down list of options that includes (a) just rolling 1d100 against the character\'s chance, (b) forcing a successful roll (e.g. if they were meant to find it), and (c) forcing a failure to find a trap (e.g. if there is no trap to be found). The GM can use the !magic --config command to change this action so that the player always rolls to Find Traps, though this might result in an indication for a (non-Drag & Drop) container indicating success for a container that is not trapped!

    ' - +'

    Updated: 4.3 Searching/Storing tokens with Items and Treasure

    ' + +'

    4.3 Searching/Storing tokens with Items and Treasure

    ' +'
    --search token_id|pick_id|put_id
    ' +'

    Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to search and pick up items from, mandatory token ID of the token to put picked up items into.

    ' +'

    This command can be used to pick the pockets of an NPC or even another Player Character, as well as to loot magic item and treasure containers such as Chests and dead bodies. It can also be used for putting stuff away, storing items from the character\'s Item Bag into a container, for instance if the MI Bag is getting too full (it is limited to the number of items specified via the --gm-edit-mi menu, though similar items can be stacked). The effect of this command depends on the type of the container: intelligent characters, NPCs and creatures (even if only with animal intelligence of 1) are considered sentient unless they are dead (Hit Points equal to or less than zero). The trapped container status is set by any Drag & Drop container, or via the GM\'s [Add Items] button or !magic --gm-edit-mi command. All other containers (tokens with character sheets) are considered inanimate and untrapped. Any status can also be overridden if so desired by resetting the container type using the Add Items dialog to set the type to a different value - a sentient creature can be forced to be inanimate (i.e. does not need a pick pockets roll), and visa-versa (e.g. luggage Terry Pratchett style).

    ' @@ -587,13 +608,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' Sentient Creature:if searching, a Pick Pockets check is undertaken - the Player is asked to roll a dice and enter the result (or Roll20 can do it for them), which is compared to the Pick Pockets score on their character sheet. If successful, a message is displayed in the same way as an Inanimate object. If unsuccessful, a further check is made against the level of the being targeted to see if they notice, and the DM is informed either way. The DM can then take whatever action they believe is needed. Of course, you can always freely give/store items to another creature.' +' Trapped container:Traps can be as simple or as complex as the DM desires. Traps may be nothing more than a lock that requires a Player to say they have a specific key, or a combination that has to be chosen from a list, and nothing happens if it is wrong other than the items in the container not being displayed. Or setting a trap off can have damaging consequences for the character searching or the whole party. It can just be a /whisper gm message to let the DM know that the trapped container has been searched. Searching a trapped container with this command calls an ability macro called "Trap-@{container_name|version}" on the container\'s character sheet: if this does not exist, it calls an ability macro just called "Trap". The first version allows the Trap macro to change the behaviour on subsequent calls to the Trap functionality (if using the ChatSetAttr API to change the version attribute), for instance to allow the chest to open normally once the trap has been defused or expended. This functionality requires confidence in Roll20 macro programming.
    Important Note: all Character Sheets representing Trapped containers must have their \'ControlledBy\' value (found under the [Edit] button at the top right of each sheet) set to \'All Players\'. Otherwise, Players will not be able to run the macros contained in them that operate the trap!' +'' - +'

    Updated:Note: Some items are not stackable - they are single items with charges such as a wand or rod, or a spell-storing item which must retain its uniqueness so the spells remain associated. Previously, non-stackable items like these needed to have unique names in the container to retain their unique identity. However, this is strictly speaking no longer the case - the APIs now use unique object identifiers "under the hood". However, you may want to give similar items different names in order to differentiate them,

    ' + +'

    Note: Some items are not stackable - they are single items with charges such as a wand or rod, or a spell-storing item which must retain its uniqueness so the spells remain associated. Previously, non-stackable items like these needed to have unique names in the container to retain their unique identity. However, this is strictly speaking no longer the case - the APIs now use unique object identifiers "under the hood". However, you may want to give similar items different names in order to differentiate them,

    ' +'

    4.4 Looting and storing without searching a container

    ' +'
    --pickorput token_id|pick_id|put_id|[SHORT/LONG]
    ' +'

    Takes a mandatory token ID for the Player\'s character, a mandatory token ID for the token to pick items from, a mandatory token ID for the token to put items in to, and an optional argument specifying whether to use a long or a short menu.

    ' +'

    This command displays a menu from which items on the character sheet associated with the Pick token can be selected to put in the character sheet associated with the Put token. The Player character\'s token can be either the Put token (if picking up items from a container) or the Pick token (if storing items from their sheet into the container). The other token can be another Player Character (useful for one character giving a magic item to another character) or any other selectable token with a character sheet. No traps or sentient being checks are made by this command - this allows the DM to allow Players to bypass the searching functionality when looting a container or storing items in it. Note: the Player\'s Magic Item menu (accessed via the --mimenu command) does not have an option to loot without searching.

    ' +'

    There are two forms of this menu - the Long form displays all items in the container as individual buttons for the Player to select from, and a single button to store the item: this is generally OK when looting containers with not much in them. The Short form of the menu shows only two buttons: one button which, when clicked, brings up a pick list of all the items in the Pick container, and another button to store the item in the Put container: this is generally best for when a character is storing something from their character sheet items into a chest or other container, or giving an MI to another character, as a character\'s sheet often has many items in it which can make a Long menu very long. Each type of menu has a button on it to switch to the other type of menu without re-issuing the command. If not specified in the command, the type of menu the Player last used in this campaign is remembered and used by the system.

    ' - +'

    New: 4.5 Buying and Selling

    ' + +'

    4.5 Buying and Selling

    ' +'
    --buy token_id|pick_id|put_id
    '
 							+'--sell token_id|pick_id|put_id
    ' +'

    Takes a mandatory token ID for the player\'s character, a mandatory token ID for the token to pick items from, and a mandatory token ID for the token to put items in to.

    ' @@ -646,13 +667,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    This command takes an optional token_id. If not specified, the command will act on the character sheets represented by all currently selected tokens.

    ' +'

    This command tidies up the character sheet, removing Spell and Magic Item attribute and ability objects that are no longer for items held, and for spells no longer in any spell book. Attack ability objects will also all be removed. All of these will be recreated as and when these items, spells or attacks are again picked up, added to spell books, or used for attacks. This simplifies and speeds up the system, removing redundant processing and memory usage.

    ' +'

    Note: this command is automatically run whenever the DM moves the "Player Ribbon" to a new map page, for every token on that map page that represents a character sheet, and also whenever a character token is dragged onto the active Player page. This continually tidies the system while not imposing a heavy overhead on processing.

    ' - +'

    6.5 New: Recover a corrupt character sheet

    ' + +'

    6.5 Recover a corrupt character sheet

    ' +'
    --clean [token_id]|[SILENT]
    ' +'

    Takes an optional token ID (uses selected token if not specified), and an optional SILENT argument to supress messages.

    ' +'

    Very rarely, a character sheet can become corrupt, for instance so that attributes become read-only for no apparent reason. This command creates an identical copy of the character sheet with all attributes, abilities and table entries copied across. It then updates all tokens that did point to the previous sheet to use the new one, and then deletes the original, corrupt sheet. Finally, it conducts a --tidy command on the new sheet.

    ' +'

    Warning: this is a radical solution and there may well have been a valid reason why the original character sheet became corrupted. It is recommended that all options are explored before using a --clean command.

    ' - +'

    6.6Update: Configure API behavior

    ' - +'
    --config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
    ' + +'

    6.6 Updated:Configure API behavior

    ' + +'
    --config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/ALPHA-LISTS/GM-ROLLS/ENCUMBRANCE] | [TRUE/FALSE]
    ' +'

    Takes two optional arguments, the first a switchable flag name, and the second TRUE or FALSE.

    ' +'

    Allows configuration of several API behaviors. If no arguments given, displays menu for DM to select configuration. Parameters have the following effects:

    ' +'' @@ -664,10 +685,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' ' +' ' +' ' - +' ' - +' ' + +' ' + +' ' +' ' +' ' + +' ' +'
    ALL-POWERSClass powers not restricted by levelClass powers are restricted by level as per spec
    CUSTOM-SPELLSNo distributed custom spells/items allowed (but CS DB allowed)All custom spells and items allowed
    AUTO-HIDEItems defined to be hideable will be automatically hidden when added to containersHideable items must be hidden manually if desired
    REVEALAuto-hidden items will reveal themselves when usedThe GM will need to reveal auto-hidden items manually
    VIEW-ACTIONAction API buttons on items/spells clickable when viewedAction API buttons greyed out when viewed
    REVEALAuto-hidden items will reveal themselves when usedThe GM will need to reveal auto-hidden items manually
    VIEW-ACTIONAction API buttons on items/spells clickable when viewedAction API buttons greyed out when viewed
    ALPHA-LISTSLong lists will automatically be split into alpha listsWhole long lists will be displayed for selection
    GM-ROLLSGM is asked to roll thievish skill-based chances when using Find TrapsPlayer rolls skill-based chances for Find Traps
    ENCUMBRANCEEncumbrance rules are applied as per PHBWeight, Encumbrance & Move calculated but no adverse effects applied
    ' +'

    6.7 Check database completeness & integrity (GM only)

    ' +'
    --check-db [ db-name ]
    ' @@ -709,6 +731,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars var reSpellSpecs; var reClassSpecs; var reWeapSpecs; + var reACSpecs; var saveFormat; var spellsPerLevel; var casterLevels; @@ -717,6 +740,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars var wisdomSpells; var spellLevels; var showMoreObj; + var encumberDef; /* * MagicMaster specific global data tables and variables. @@ -736,7 +760,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const messages = Object.freeze({ header: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}', restHeader: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^ is Resting}}', - noChar: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Items Bag}}{{desc=^^cname^^ does not have an associated Character Sheet, and so cannot have a Magic Item Bag.}}', + noChar: '&{template:'+fields.warningTemplate+'} {{name=^^tname^^\'s\nMagic Items Bag}}{{desc=^^tname^^ does not have an associated Character Sheet, and so cannot have a Magic Item Bag.}}', noMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Items Bag}}{{desc=^^cname^^ does not have a Magic Item bag! Perhaps you ought to invest in one... Go and find an appropriate vendor (ask the DM).}}', oldMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=^^cname^^ has an old v3 Magic Item bag, which will not hold the latest, cutting edge Magic Items! Perhaps you ought to invest in a new one... Go and find an appropriate vendor (ask the DM).}}', cursedSlot: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=Oh what a shame. No, you can\'t overwrite a cursed item with a different item. You\'ll need a *Remove Curse* spell or equivalent to be rid of it!}}', @@ -753,7 +777,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars longRest: 'After a good long rest, ^^cname^^ has regained their powers, read their spellbooks and rememorised their spells, and magic items that recharge have regained their charges.}}', noLongRest: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Unable to Rest}}{{desc=I don\'t think the DM has declared it is time for a rest yet, perhaps due to system lag.}}{{desc1=[Try Again](!magic --rest ^^tid^^|long) once the DM says you can}}', noMoreCharges: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ Has No Charges}}{{desc=^^cname^^ has used all the charges of the Power, Spell or Magic Item that they are using, and needs to rest before any charges are available again.}}', - miBagFull: '&{template:'+fields.warningTemplate+'} {{name=^^c2name^^ MI Bag Full}}{{desc=There are no slots left in the selected container for any more items to store}}', + miBagFull: '&{template:'+fields.warningTemplate+'} {{name=^^c2name^^ Can\'t Store That}}{{desc=There are not enough slots left to store the selected item(s)}}', fixedSpell: '&{template:'+fields.warningTemplate+'} {{name=Fixed MI Spell Slot}}{{desc=The chosen slot in your spell-storing Magic Item is fixed to be the named spell. You may only refresh it with the same spell}}', convertItems: '&{template:'+fields.warningTemplate+'} {{name=Converting Items Bag}}{{desc=Please wait while I convert your Items Bag to add sections and make better use of the Character Sheet}}', notSpellCaster: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Not a Spell Caster}}{{desc=^^cname^^ may aspire to be a wonderful Wizard or powerful Priest, but has yet to fulfil those desires. Until then, refrain from pretending - you will be found out!}}', @@ -836,6 +860,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars SLOT_MI: 'SLOT_MI', SLOT_MARTIAL_MI: 'SLOT_MARTIAL_MI', SLOT_ALLITEMS_MI: 'SLOT_ALLITEMS_MI', + CHECK_MOVE: 'CHECK_MOVE', MISC_SPELL: 'MISC_SPELL', MEM_MUSPELL: 'MEM_MUSPELL', MEM_PRSPELL: 'MEM_PRSPELL', @@ -935,8 +960,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); const reIgnore = /[\s\-\_]*/gi; - const reCastMIspellCmd = /!magic\s+--(?:cast|view)-spell\s+MI(?:-SPELLS)?\s*\|/im; - const reCastMIpowerCmd = /!magic\s+--(?:cast|view)-spell\s+MI-POWERS?\s*\|/im; + const reCastViewMIspellCmd = /!magic\s+--(?:cast|view)-spell\s+MI(?:-SPELLS)?\s*\|/im; + const reCastViewMIpowerCmd = /!magic\s+--(?:cast|view)-spell\s+MI-POWERS?\s*\|/im; + const reCastMIspellCmd = /!magic\s+--cast-spell\s+MI(?:-SPELLS)?\s*\|/im; const reLooksLike = /Looks\s?Like=/im; const reInitMIqty = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?qty:([d\d\+\-\*\/.]+?)[,\s\]]/im; const reSpecs = /}}\s*?specs\s*?=(.*?){{/im; @@ -956,7 +982,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // const reActionButton = /((?"], [/\\lt;?/gm, "<"], [/¦/g, "|"], - ]; + ]); - const msgReplacers = [ + const msgReplacers = Object.freeze([ [/\\api;?/g, "!"], [/\\lbrc;?/g, "{"], [/\\rbrc;?/g, "}"], @@ -998,16 +1024,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [/&&/g, "/"], [/%%/g, "%"], [/\\fs;?/g, "\\"], - ]; - + ]); - const dbEncoders = [ + const dbEncoders = Object.freeze([ [/\r?\n/gm,'\\n'], [/'/gm,"\\'"], [/&/gm,"\\\\amp;"], [/>/gm,"\\\\gt;"], [/<%= text %>'), confirm_box: _.template('
    ' @@ -1080,7 +1105,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; }()); - +*/ /** * Init */ @@ -1100,6 +1125,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars {state.MagicMaster.reveal = false;} if (_.isUndefined(state.MagicMaster.viewActions)) {state.MagicMaster.viewActions = false;} + if (_.isUndefined(state.MagicMaster.encumbrance)) + {state.MagicMaster.encumbrance = true;} if (_.isUndefined(state.MagicMaster.gmRolls)) {state.MagicMaster.gmRolls = true;} if (_.isUndefined(state.MagicMaster.debug)) @@ -1123,6 +1150,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars reSpellSpecs = RPGMap.reSpellSpecs; reClassSpecs = RPGMap.reClassSpecs; reWeapSpecs = RPGMap.reWeapSpecs; + reACSpecs = RPGMap.reACSpecs; saveFormat = RPGMap.saveFormat; spellsPerLevel = RPGMap.spellsPerLevel; casterLevels = RPGMap.casterLevels; @@ -1131,10 +1159,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars wisdomSpells = RPGMap.wisdomSpells; spellLevels = RPGMap.spellLevels; showMoreObj = RPGMap.showMoreObj; + encumberDef = RPGMap.encumberDef; DBindex = undefined; flags.noWaitMsg = true; reSpellSpecs.reveal.def = state.MagicMaster.reveal ? 'use' : ''; - setTimeout( () => flags.noWaitMsg=false, 5000 ); + setTimeout( () => flags.noWaitMsg=false, 10000 ); // RED: v2.040 check what other APIs are loaded setTimeout( () => issueHandshakeQuery('rounds'), 20); @@ -1143,140 +1172,80 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( () => updateHandouts(handouts,true,findTheGM()), 30); setTimeout(cmdMasterRegister, 40); setTimeout( () => updateDBindex(false), 80); -// setTimeout( () => handleCStidy( [], true ), 5000 ); - -// updateCharSheets(''); // Update any out-of-date character sheets to current version + setTimeout(setWeights,1000); // RED: log the version of the API Script - log('-=> MagicMaster v'+version+' <=- ['+(new Date(lastUpdate*1000))+']'); + } catch (e) { log('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); sendDebug('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); sendCatchError('MagicMaster',null,e,'MagicMaster initialisation'); } }; + +/* ------------------------------ Simple String Manipulation ----------------------------------- */ -// ------------------------------------------------ Deal with in-line expressions -------------------------------- + /* + * Function to encode special characters in a string + */ + + const encodeStr = (str,encoders=dbEncoders) => encoders.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - /** - * Return the string with the roll formatted, this is accomplished by simply - * surrounding roll equations with [[ ]] TODO, should be replaced with a - * single regex - * - */ - - var getFormattedRoll = function(str) { - if (!str) {return "";} - var retval = str, - re = /\d+d\d+/, - idx, - expr, - roll, - pre, - post; - - if ((roll=re.exec(str))) { - expr = getExpandedExpr(roll[0],str,roll.index); - idx = str.indexOf(expr); - pre = str.substring(0,idx); - post = str.substring(idx+expr.length); - } else { return retval;} - - return pre+"[["+expr+"]]"+getFormattedRoll(post); - }; + /* + * Function to standardise two strings and compare them. + */ + + const stdEqual = (strA,strB) => ((strA.dbName() || '-') === (strB.dbName() || '-')); + + /* + * Function to return the msVersion of the Character Sheet + * i.e. which versions of MagicMaster it is matched to + */ + + const csVer = (charCS) => parseFloat(((attrLookup( charCS, fields.msVersion ) || '1.5').match(/^\d+\.?\d*/) || ['1.5'])[0]) || 1.5; - /** - * Return the target expression expanded as far as it logically can span - * within the provided line. - * - * ie: target = 1d20 - * locHint = 4 - * line = "2+1d20+5+2d4 bla (bla 1d20+8 bla) bla (4d8...) bla bla" - * - * result = 2+1d20+5+2d4 - */ - - var getExpandedExpr = function(target, line, locHint) { - if (!target || !line) - {return;} - if (!locHint) - {locHint = 0;} - var retval = target, - re = /\d|[\+\-]|d/, - loc = -1, - start = 0, - end = 0; - - if((loc=line.indexOf(target,locHint)) !== -1) { - start = loc; - while (start > 0) { - if (line[start].match(re)) - {start--;} - else - {start++;break;} - } - end = loc; - while (end < line.length) { - if (line[end].match(re)) - {end++;} - else - {break;} - } - retval = line.substring(start,end); - retval = getLegalRollExpr(retval); - } - - return retval; - }; + /* + * Build an array of values to store in a table row + */ +// const valLine = (a,p,t,v) => a[fields[p+t][0]][fields[p+t][1]] = v; + /** - * Gets a legal roll expression. + * Express a cost in coins for display + **/ + + const showCost = (cost) => '**' + Math.floor(cost) + 'GP, ' + Math.floor((cost*10)%10) + 'SP, ' + Math.floor((cost*100)%10) +'CP**'; + + /* + * Determine the class or classes of the character, and + * the level of each + * */ - - var getLegalRollExpr = function(expr) { - if (!expr) {return;} - var retval = expr, - stray = expr.match(/d/g), - valid = expr.match(/\d+d\d+/g), - errMsg = "Illegal expression " + expr; - - try { - if (expr.match(/[^\s\d\+-d]/g) || - !stray || - !valid || - (stray.length =! valid.length)) - {throw errMsg;} - - stray = expr.match(/\+/g); - valid = expr.match(/\d+\+\d+/g); - if ((stray !== null) && (valid !== null) && - (stray.length !== valid.length)) - {throw errMsg;} - stray = expr.match(/-/g); - valid = expr.match(/\d+-\d+/g); - if ((stray !== null) && (valid !== null) && - (stray.length !== valid.length)) - {throw errMsg;} - } catch (e) { - throw e; - } - - //check for leading, trailing, operands - if (retval[0].match(/\+|-/)) - {retval = retval.substring(1);} - if (retval[retval.length-1].match(/\+|-/)) - {retval = retval.substring(0,retval.length-1);} - - return retval; - }; + + const getCharLevels = ( charCS ) => _.filter( fields, (elem,l) => {return l.toLowerCase().includes('_level')}).filter( elem => {return 0 < (attrLookup( charCS, elem ) || 0)}); + + /* + * Get a caster level + */ + + const casterLevel = (charCS, casterType) => caster( charCS, casterType ).clv; + + /** + * Add a message to a character sheet Journal. Generally + * used to record items picked up, put away, bought and sold + * so that they can be distributed as part of treasure + * at the end of the campaign. + **/ + + const diaryEntry = (charCS, msg) => setAttr( charCS, fields.Diary, (attrLookup( charCS, fields.Diary ) + '\n' + String(new Date(Date.now())).substring(0,15) + ': '+msg)); /** * In the inline roll evaluator from ChatSetAttr script v1.9 * by Joe Singhaus and C Levett. **/ - var processInlinerolls = function (msg) { + const processInlinerolls = function (msg) { if (msg.inlinerolls && msg.inlinerolls.length) { return msg.inlinerolls.map(v => { const ti = v.results.rolls.filter(v2 => v2.table) @@ -1298,62 +1267,57 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Function to send an API command to chat * that has '^^parameter^^' replaced by relevant names & ids **/ - var sendAPImacro = function(senderId,charID,targetID,ability,modifier) { + + const sendAPImacro = function(senderId,charID,targetID,ability,modifier) { if (!charID || !targetID || !ability) { sendDebug('sendAPImacro: a parameter is null'); return; } modifier = modifier || ''; - var journal, - curToken = getObj('graphic',charID), - tid = charID, - tname = curToken.get('name'), - cid = curToken.get('represents'), - targetCS = getCharacter(targetID), - words; - - journal = getObj( 'character', cid ); - if (targetCS && journal) { - var cname = journal.get('name'), - bar1 = curToken.get('bar1_value'), - bar2 = curToken.get('bar2_value'), - bar3 = curToken.get('bar3_value'), - ac = getTokenValue(curToken,fields.Token_AC,fields.AC,fields.MonsterAC,fields.Thac0_base).val, - thac0 = getTokenValue(curToken,fields.Token_Thac0,fields.Thac0,fields.MonsterThac0,fields.Thac0_base).val, - hp = getTokenValue(curToken,fields.Token_HP,fields.HP,null,fields.Thac0_base).val, - targetcid = targetCS.id, - targetchar = targetCS.get('name'), - targettoken = getObj('graphic',targetID).get('name'), - abilityMacro = findObjs({ _type : 'ability' , characterid : targetCS.id, name : ability + modifier }, {caseInsensitive: true}); + const curToken = getObj('graphic',charID), + tid = charID, + tname = curToken.get('name'), + cid = curToken.get('represents'), + targetCS = getCharacter(targetID), + journal = getObj( 'character', cid ); + if (targetCS && journal) { + const abilityMacro = findObjs({ _type : 'ability' , characterid : targetCS.id, name : ability + modifier }, {caseInsensitive: true}); if (!abilityMacro || abilityMacro == undefined || abilityMacro.length === 0) { sendDebug('Not found macro ' + targetCS.get('name') + '|' + ability + modifier); return; } - if (!cname) { - cname = curToken.get('name'); - } + const cname = journal.get('name') || curToken.get('name'), + bar1 = curToken.get('bar1_value'), + bar2 = curToken.get('bar2_value'), + bar3 = curToken.get('bar3_value'), + ac = getTokenValue(curToken,fields.Token_AC,fields.AC,fields.MonsterAC,fields.Thac0_base).val, + thac0 = getTokenValue(curToken,fields.Token_Thac0,fields.Thac0,fields.MonsterThac0,fields.Thac0_base).val, + hp = getTokenValue(curToken,fields.Token_HP,fields.HP,null,fields.Thac0_base).val, + targetcid = targetCS.id, + targetchar = targetCS.get('name'), + targettoken = getObj('graphic',targetID).get('name'); + if (abilityMacro.length > 0) { - var macroBody = abilityMacro[0].get('action'); - - macroBody = macroBody.replace( /\@\{selected\|token_id}/gi, tid ) - .replace( /\@\{selected\|/gi, '\@{'+cname+'|' ) - .replace( /\^\^cname\^\^/gi , cname ) - .replace( /\^\^tname\^\^/gi , tname ) - .replace( /\^\^cid\^\^/gi , cid ) - .replace( /\^\^tid\^\^/gi , tid ) - .replace( /\^\^pid\^\^/gi , senderId ) - .replace( /\^\^targetchar\^\^/gi , cname ) - .replace( /\^\^targettoken\^\^/gi , tname ) - .replace( /\^\^targetcid\^\^/gi , targetcid ) - .replace( /\^\^targettid\^\^/gi , targetID ) - .replace( /\^\^bar1_current\^\^/gi , bar1 ) - .replace( /\^\^bar2_current\^\^/gi , bar2 ) - .replace( /\^\^bar3_current\^\^/gi , bar3 ) - .replace( /\^\^token_ac\^\^/gi , ac ) - .replace( /\^\^token_thac0\^\^/gi , thac0 ) - .replace( /\^\^token_hp\^\^/gi , hp ); + const macroBody = abilityMacro[0].get('action') + .replace( /\@\{selected\|token_id}/gi, tid ) + .replace( /\@\{selected\|/gi, '\@{'+cname+'|' ) + .replace( /\^\^cname\^\^/gi , cname ) + .replace( /\^\^tname\^\^/gi , tname ) + .replace( /\^\^cid\^\^/gi , cid ) + .replace( /\^\^tid\^\^/gi , tid ) + .replace( /\^\^pid\^\^/gi , senderId ) + .replace( /\^\^targetchar\^\^/gi , cname ) + .replace( /\^\^targettoken\^\^/gi , tname ) + .replace( /\^\^targetcid\^\^/gi , targetcid ) + .replace( /\^\^targettid\^\^/gi , targetID ) + .replace( /\^\^bar1_current\^\^/gi , bar1 ) + .replace( /\^\^bar2_current\^\^/gi , bar2 ) + .replace( /\^\^bar3_current\^\^/gi , bar3 ) + .replace( /\^\^token_ac\^\^/gi , ac ) + .replace( /\^\^token_thac0\^\^/gi , thac0 ) + .replace( /\^\^token_hp\^\^/gi , hp ); sendChat("character|"+cid,sendMsgToWho(journal,senderId,macroBody),null,{noarchive:!flags.archive, use3d:false}); } @@ -1365,33 +1329,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * RED: v1.207 Send a debugging message if the debugging flag is set */ - var sendDebug = function(msg) { + const sendDebug = function(msg) { if (!!state.MagicMaster.debug) { if (playerIsGM(state.MagicMaster.debug)) { log('MagicMaster Debug: '+msg); } else { - var player = getObj('player',state.MagicMaster.debug), - to; + const player = getObj('player',state.MagicMaster.debug); + let to; if (player) { to = '/w "' + player.get('_displayname') + '" '; - } else - {throw ('sendDebug could not find player');} - if (!msg) - {msg = 'No debug msg';} + } else { + throw ('sendDebug could not find player'); + } + if (!msg) msg = 'No debug msg'; sendChat('MagicMaster Debug',to + ''+msg+'',null,{noarchive:!flags.archive, use3d:false}); }; }; }; - var doSetDebug = function(args,senderId) { - var player = getObj('player',senderId), - playerName; - if (player) { - playerName = player.get('_displayname'); - } - else - {throw ('doSetDebug could not find player: ' + args);} - if (!!args && args.indexOf('off') != 0) { + const doSetDebug = function(args,senderId) { + const player = getObj('player',senderId); + if (!player) throw ('doSetDebug could not find player: ' + args); + const playerName = player.get('_displayname'); + if (!!args && args.indexOf('off') !== 0) { state.MagicMaster.debug = senderId; sendResponseError(senderId,'MagicMaster Debug set on for ' + playerName,'MagicMaster Debug'); sendDebug('Debugging turned on'); @@ -1405,70 +1365,77 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Display a message when a character has picked up a magic item **/ - var pickupMessage = function( args, miName, miType, pickedQty, fromCharges, toCharges, senderId ) { - - var buy = (args[0] || '').toUpperCase().includes('BUY'), - sell = (args[0] || '').toUpperCase().includes('SELL'), - tokenID = args[1], - fromID = args[3], - toID = args[4], - cost = parseFloat(args[7]), - charCS = getCharacter( tokenID ), - picking = (tokenID == toID), - whereStr = picking ? (' from '+getObj('graphic',fromID).get('name')) : (' to '+getObj('graphic',toID).get('name')), - content, pickOrPut, charges, msg; - - content = '&{template:'+fields.messageTemplate+'}{{name='+(picking?'Picking Up':'Putting Away')+' Items}}{{desc='; - - pickOrPut = sell ? 'sold ' : (buy ? 'bought ' : (picking ? 'picked up ' : 'put away ')); - charges = picking ? toCharges : fromCharges; + const pickupMessage = function( args, miName, miType, pickedQty, fromCharges, toCharges, senderId ) { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + tokenID = args[1], + fromID = args[3], + toID = args[4], + cost = parseFloat(args[7]), + charCS = getCharacter( tokenID ), + picking = (tokenID == toID), + whereStr = picking ? (' from '+getObj('graphic',fromID).get('name')) : (' to '+getObj('graphic',toID).get('name')), + pickOrPut = sell ? 'sold ' : (buy ? 'bought ' : (picking ? 'picked up ' : 'put away ')), + charges = picking ? toCharges : fromCharges; + let msg; + let content = '&{template:'+fields.messageTemplate+'}{{name='+(pickOrPut.dispName()+' Items')+' Items}}{{desc='; + + if (_.isArray(miName)) { + let msgArray = []; + msg = 'You have '+pickOrPut+' '; + for (let i=0; i1)?'\'s':'')+whereStr+', and now have '+charges; - break; - } + default: + msg = 'You have '+pickOrPut+pickedQty+' '+miName+((pickedQty>1)?'\'s':'')+whereStr+', and now have '+charges; + break; + } + }; if (cost && !isNaN(cost) && cost > 0) { msg += ', at a cost of '+showCost( cost ); @@ -1488,8 +1455,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * specific API command is present **/ - var issueHandshakeQuery = function( api, cmd ) { - var handshake = '!'+api+' --noWaitMsg --hsq magic'+((cmd && cmd.length) ? ('|'+cmd) : ''); + const issueHandshakeQuery = function( api, cmd ) { + const handshake = '!'+api+' --noWaitMsg --hsq magic'+((cmd && cmd.length) ? ('|'+cmd) : ''); sendAPI(handshake); return; }; @@ -1501,31 +1468,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function updateACS( charCS, tokenID, curVer, senderId ) { try { - var charName = charCS.get('name'), - updated = false, - csv = csVer(charCS); + const charName = charCS.get('name'), + csv = csVer(charCS); - var updateCSspellCol = function( charCS, charName, c, senderId ) { + const updateCSspellCol = function( charCS, charName, c, senderId ) { return new Promise(resolve => { try { - var spellName, SpellCol, - updated = false, + let spellName, SpellCol, msg, r = 0; + var updated = false; SpellCol = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_macro, c, '' ); SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_msg, c, '' ); while (!_.isUndefined(spellName = SpellCol.tableLookup( fields.Spells_name, r, false ))) { if (spellName != '-') { updated = true; - let msg = SpellCol.tableLookup( fields.Spells_macro, r ); - SpellCol = SpellCol.tableSet( fields.Spells_msg, r, msg ); + SpellCol = SpellCol.tableSet( fields.Spells_msg, r, SpellCol.tableLookup( fields.Spells_macro, r ) ); SpellCol = SpellCol.tableSet( fields.Spells_macro, r, (spellName != '-' ? ('%{'+charName+'|'+spellName+'}') : '')); } r++; } } catch (e) { log('MagicMaster updateCharSheets: JavaScript '+e.name+': '+e.message+' while converting sheet '+charCS.get('name')); - sendDebug('MagicMaster updateCharSheets: JavaScript '+e.name+': '+e.message+' while converting sheet '+charCS.get('name')); sendCatchError('MagicMaster',msg_orig[senderId],e); } finally { setTimeout(() => { @@ -1555,16 +1519,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; - var updateCharSheets = function(args,senderId) { + const updateCharSheets = function(args,senderId) { log('updateCharSheets: a character sheet version test has been triggered'); - var curVer = parseFloat(((version || '1.5').match(/^\d+\.\d+/) || ['1.5'])[0]) || 1.5, - CSarray = [], - charObj; + const curVer = parseFloat(((version || '1.5').match(/^\d+\.\d+/) || ['1.5'])[0]) || 1.5; + let CSarray = [], + delay; if (args && args.length) { - charObj = getCharacter(args[0]); + const charObj = getCharacter(args[0]); if (charObj) { if (curVer > csVer(charObj)) { CSarray = [{cs:charObj,tid:args[0]}]; @@ -1584,7 +1548,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }; for (const ct of CSarray) { - let delay = Math.round(1000+(Math.random() * 1000)); + delay = Math.round(1000+(Math.random() * 1000)); setTimeout( updateACS, delay, ct.cs, ct.tid, curVer, senderId ); } }; @@ -1593,13 +1557,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Find the GM, generally when a player can't be found */ - var findTheGM = function() { - var playerGM, - players = findObjs({ _type:'player' }); + const findTheGM = function() { + let playerGM; + const players = findObjs({ _type:'player' }); if (players.length !== 0) { if (!_.isUndefined(playerGM = _.find(players, function(p) { - var player = p; + const player = p; if (player) { if (playerIsGM(player.id)) { state.MagicMaster.gmID = player.id; @@ -1613,23 +1577,41 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return state.MagicMaster.gmID; } +/* ------------------------------- Character Sheet Database Management -------------------------- */ + /** - * Get the configuration for the player who's ID is passed in - * or, if the config is passed back in, set it in the state variable + * Create an internal index of items in the databases + * to make searches much faster. Index entries indexed by + * database root name & short name (name in lower case with + * '-', '_' and ' ' ignored). index[0] = abilityID, + * index[1] = ct-attributeID + * v3.051 Check that other database-handling APIs have finished + * updating their databases and performed a handshake **/ -/* - var getSetPlayerConfig = function( playerID, configObj ) { + + const updateDBindex = function(forceUpdate=false) { - if (!state.MagicMaster.playerConfig[playerID]) { - state.MagicMaster.playerConfig[playerID]={}; - } - if (!_.isUndefined(configObj)) { - state.MagicMaster.playerConfig[playerID] = configObj; - }; - return state.MagicMaster.playerConfig[playerID]; - }; - -/* ------------------------------- Character Sheet Database Management -------------------------- */ + apiDBs.attk = !!apiDBs.attk || ('undefined' === typeof attackMaster); + + DBindex = getDBindex(forceUpdate); + parseClassDB(forceUpdate); + return; + } + + /* + * Check a character sheet database and update/create the + * required attributes from the definitions. This should + * be run after updating or adding item or spell definitions. + */ + + const checkDB = function( args ) { + + checkCSdb( args[0] ); + + apiDBs.magic = true; + updateDBindex(true); + return; + } /* * Check the version of a Character Sheet database and, if @@ -1637,7 +1619,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * it to the latest version. */ - var buildDB = function( dbFullName, dbObj, senderId, silent ) { + const buildDB = function( dbFullName, dbObj, senderId, silent ) { return new Promise(resolve => { @@ -1657,10 +1639,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }; - var copyMarkerCSdb = function( APIdbName, UserDbName, itemClass ) { + const copyMarkerCSdb = function( APIdbName, UserDbName, itemClass ) { let APIdbCS = findObjs({ _type:'character', name:APIdbName }); - let reItemClass = new RegExp( itemClass, 'im' ); + const reItemClass = new RegExp( itemClass, 'im' ); if (!APIdbCS || !APIdbCS.length) { sendError(APIdbName+' not found'); return; @@ -1674,12 +1656,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars UserDbCS = UserDbCS[0]; } - let abilities = findObjs({ _type:'ability', _characterid:APIdbCS.id }) + const abilities = findObjs({ _type:'ability', _characterid:APIdbCS.id }) .filter( o => /\s--target\s|\s--touch\s/im.test(o.get('action')) ) .filter( o => reItemClass.test(o.get('action'))); - + let UserObj; _.each(abilities, a => { - let UserObj = findObjs({_type:'ability', _characterid:UserDbCS.id, name:a.get('name') }); + UserObj = findObjs({_type:'ability', _characterid:UserDbCS.id, name:a.get('name') }); if (!UserObj || !UserObj.length) { createObj( 'ability', {name: a.get('name'), action: a.get('action'), characterid: UserDbCS.id} ); } @@ -1687,142 +1669,56 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars checkDB([UserDbName]); return; }; - - /* - * Check a character sheet database and update/create the - * required attributes from the definitions. This should - * be run after updating or adding item or spell definitions. - */ - - var checkDB = function( args ) { - - checkCSdb( args[0] ); - - apiDBs.magic = true; - updateDBindex(true); - return; - } - /** - * Create an internal index of items in the databases - * to make searches much faster. Index entries indexed by - * database root name & short name (name in lower case with - * '-', '_' and ' ' ignored). index[0] = abilityID, - * index[1] = ct-attributeID - * v3.051 Check that other database-handling APIs have finished - * updating their databases and performed a handshake - **/ - - var updateDBindex = function(forceUpdate=false) { - - apiDBs.attk = !!apiDBs.attk || ('undefined' === typeof attackMaster); +/* ---------------------------- Update Legacy Character Sheets ------------------------- */ + + async function setWeights() { + const gmID = findTheGM(); + let delay = 50; + let doneList = []; + const charList = filterObjs( obj => { + if (obj.get('_type') !== 'graphic' || obj.get('subtype') !== 'token' || !obj.get('represents').length) return false; + const charID = obj.get('represents'); + if (doneList.includes(charID)) return false; + doneList.push(charID); + const charCS = getObj('character',charID); + if (!charCS || !charCS.get('controlledby').length) return false; + return (!String(attrLookup( charCS, fields.Weight_total ) || '').length); + }); + for (const obj of charList) { + const Items = getTableGroup( obj, fieldGroups.MI ); + await itemSlotData( obj.id, Items, gmID ); + }; + }; - DBindex = getDBindex(forceUpdate); - parseClassDB(forceUpdate); - return; - } - /* ------------------------------- Magic Utility functions ----------------------------- */ - /* - * Function to replace special characters in a string - */ -/* - var parseStr=function(str='',replacers=dbReplacers){ - return replacers.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - } - - /* - * Function to encode special characters in a string - */ - - var encodeStr=function(str,encoders=dbEncoders){ - return encoders.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - } - - /* - * Function to standardise two strings and compare them. - */ - - var stdEqual=function(strA,strB){ - return ((strA.dbName() || '-') === (strB.dbName() || '-')); - } - - /* - * Function to return the msVersion of the Character Sheet - * i.e. which versions of MagicMaster it is matched to - */ - - var csVer = (charCS) => parseFloat(((attrLookup( charCS, fields.msVersion ) || '1.5').match(/^\d+\.?\d*/) || ['1.5'])[0]) || 1.5; - - /** - * Express a cost in coins for display - **/ - - var showCost = function( cost ) { - var content = '**' + Math.floor(cost) + 'GP, ' + Math.floor((cost*10)%10) + 'SP, ' + Math.floor((cost*100)%10) +'CP**'; - return content; - }; - - /* - * Determine the class or classes of the character, and - * the level of each - * - */ - - var getCharLevels = function( charCS ) { - return _.filter( fields, (elem,l) => {return l.toLowerCase().includes('_level')}) - .filter( elem => {return 0 < (attrLookup( charCS, elem ) || 0)}); - } - - var casterLevel = function( charCS, casterType ) { - return caster( charCS, casterType ).clv; - } - - /** - * Add a message to a character sheet Journal. Generally - * used to record items picked up, put away, bought and sold - * so that they can be distributed as part of treasure - * at the end of the campaign. - **/ - - var diaryEntry = function( charCS, msg ) { - setAttr( charCS, fields.Diary, (attrLookup( charCS, fields.Diary ) - + '\n' - + String(new Date(Date.now())).substring(0,15) - + ': '+msg) - ); - return; - }; - /** * Determine the type of caster and set the correct levels **/ - var setCaster = function( args, msg, senderId ) { + const setCaster = function( args, msg, senderId ) { - var isPower = args[0].toUpperCase().includes('POWER'), + const tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + itemName = args[5] || ''; + let isPower = args[0].toUpperCase().includes('POWER'), isMU = args[0].toUpperCase().includes('MU'), isMI = args[0].toUpperCase().includes('MI'), isPR = args[0].toUpperCase().includes('PR'), - tokenID = args[1], - curToken = getObj('graphic',tokenID), - charCS = getCharacter( tokenID ), - level = args[2], - pr_level, mu_level, - castingName = args[3], -// chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'), - itemName = args[5] || ''; + level = parseInt(evalAttr(args[2])), + castingName = args[3]; if (!charCS) { - sendDebug('setCaster: invalid token_id'); sendError('No token selected'); return; } - mu_level = parseInt(casterLevel( charCS, 'MU' ),10); - pr_level = parseInt(casterLevel( charCS, 'PR' ),10); - + let mu_level = parseInt(casterLevel( charCS, 'MU' ),10); + let pr_level = parseInt(casterLevel( charCS, 'PR' ),10); + const charType = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + if (isMU && isPR) { isMU = !isNaN(mu_level) && mu_level > 0; isPR = !isNaN(pr_level) && pr_level > 0; @@ -1852,6 +1748,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars mu_level = pr_level = level; } + if (isMI && charType !== 2 && charType !== 3 && charType !== 7) { + level = 1; + } if (!level || level <= 0) { sendParsedMsg( tokenID, ((mu_level || pr_level) ? messages.wrongSpellCaster : messages.notSpellCaster), senderId ); return; @@ -1867,7 +1766,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.Casting_name, castingName ); if (itemName.length) { setAttr( charCS, fields.ItemChosen, itemName ); - let item = abilityLookup( fields.MagicItemDB, itemName ); + const item = abilityLookup( fields.MagicItemDB, itemName ); if (args[0].toLowerCase().includes('mi') && !!item.obj && !!item.obj[1].charge) { if (chargedList.includes(item.obj[1].charge.toLowerCase())) { args[0] = BT.MI_SCROLL; @@ -1883,21 +1782,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the 2E sheet L5 MU Spells start out-of-sequence at column 70 */ - var shapeSpellbook = function( charCS, spellbook ) { + const shapeSpellbook = function( charCS, spellbook ) { - var sheetTypes, charClass, level, maxLevel, miscSpells, noSpells, - specSpells = 0, - levelSpec = 0, - levelSpells = []; - - var countSpells = function( levelSpells ) { + const countSpells = function( levelSpells ) { levelSpells[1].spells = 0; - let r = 0, + let r = 0, c = 0, spellName = '', hasDash = false, spellTables = []; do { - let c = levelSpells[1].base; + c = levelSpells[1].base; for (let w = 1; (w <= fields.SpellsCols); w++) { if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); @@ -1918,10 +1812,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; + let levelSpells = []; if (charCS) { - var casterSpecs = caster( charCS, spellbook ), - level = casterSpecs.lv, - charClass = casterSpecs.ccl; + const casterSpecs = caster( charCS, spellbook ), + charClass = casterSpecs.ccl, + level = casterSpecs.lv; + + let maxLevel, miscSpells, noSpells, specSpells, levelSpec; switch (spellbook.toUpperCase()) { @@ -1967,7 +1864,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; default: - sendDebug('shapeSpellbook: invalid spellbook type '+spellbook+' specified'); sendError('Internal MagicMaster error'); break; } @@ -1980,80 +1876,117 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * selected to use or memorise */ - var checkValidSpell = function( args ) { - - var isMU = args[0].includes('MU'), - isPR = args[0].includes('PR'), - tokenID = args[1], - spell = args[5], - charCS = getCharacter(tokenID), - casterDef = caster(charCS, (isMU ? 'MU' : 'PR')), - reAllowedSpells = { majorsphere: reClassSpecs.majorsphere, - minorsphere: reClassSpecs.minorsphere, - bannedsphere: reClassSpecs.bannedsphere, - }, - allowAll = state.MagicMaster.spellRules.allowAll, + const checkValidSpell = function( args ) { + + const isMU = args[0].includes('MU'), + isPR = args[0].includes('PR'), + tokenID = args[1], + spell = args[5], + charCS = getCharacter(tokenID), + casterDef = caster(charCS, (isMU ? 'MU' : 'PR')), + reAllowedSpells = {majorsphere: reClassSpecs.majorsphere, + minorsphere: reClassSpecs.minorsphere, + bannedsphere: reClassSpecs.bannedsphere, + }, + allowAll = state.MagicMaster.spellRules.allowAll; - spellSpec, spellData, school, sphere, level, banned, specialist, specStd, - casterSpec, casterData, majorSpells, minorSpells, bannedSpells; - if (!args[5] || !args[5].length) return 1; - spellSpec = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spell, charCS ); + const spellSpec = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spell, charCS ); if (!spellSpec.obj) return 0; - spellData = spellSpec.obj[1].body; - school = spellSpec.specs(); - school = (!school || !school[0] || !school[0][4]) ? 'Invalid' : school[0][4]; - school = (school ||'any').dbName().split('|'); + let spellData = spellSpec.obj[1].body; spellData = (spellData.match(reSpellData) || ['',''])[1]; spellData = parseData( spellData, reSpellSpecs ); - sphere = (spellData.sph || 'any').dbName().split('|'); - level = spellData.level || 1; - casterSpec = abilityLookup( fields.ClassDB, casterDef.cl, charCS, true, false ); + let school = spellSpec.specs(); + school = (!school || !school[0] || !school[0][4]) ? 'Invalid' : school[0][4]; + school = (school ||'any').dbName().split('|'); + const sphere = (spellData.sph || 'any').dbName().split('|'); + const level = spellData.level || 1; + let casterSpec = abilityLookup( fields.ClassDB, casterDef.cl, charCS, true, false ); if (!casterSpec.obj) { casterSpec = abilityLookup( fields.ClassDB, casterDef.ccl, charCS ); } - let test = (spellsPerLevel[casterDef.ccl] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level][casterDef.lv]); + const test = (spellsPerLevel[casterDef.ccl] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level][casterDef.lv]); if (!casterSpec.obj || !test) return 0; - casterData = casterSpec.obj[1].body; + let casterData = casterSpec.obj[1].body; casterData = (casterData.match(reClassData) || ['',''])[1]; casterData = parseData( casterData, reAllowedSpells ); - majorSpells = casterData.sps.dbName().split('|'); - minorSpells = casterData.spm.dbName().split('|'); - bannedSpells = casterData.spb.dbName().split('|'); + const majorSpells = (casterData.sps.dbName() || '-').split('|'); + const minorSpells = (casterData.spm.dbName() || '-').split('|'); + const bannedSpells = (casterData.spb.dbName() || '-').split('|'); + let banned, specialist, specStd; return _.reduce( (isMU ? school : sphere), (r,s) => { banned = !(s === 'any' || ((isMU || majorSpells.includes('any') || majorSpells.some(sph => s.startsWith(sph)) || (minorSpells.some(sph => s.startsWith(sph)) && level < 4)) && (isPR || !bannedSpells.some(sph => s.startsWith(sph))))); specialist = isMU && majorSpells.includes(s); specStd = isMU && !majorSpells.includes('any'); +// log('checkValidSpell: r:'+r+', s:'+s+', isMU:'+isMU+', bannedSpells.some:'+bannedSpells.some(sph => s.startsWith(sph))+', specialist:'+specialist+', specStd:'+specStd+', allowAll:'+allowAll+', banned:'+banned); + return ((!allowAll && (!r || banned)) ? 0 : (specialist ? 3 : (specStd ? 2 : r))); },1); } - /* - * Check if the specified power is a class-defined power and, if so - * assess if the power can be used by a character of this level + /** + * Find an item identified as a Power, but which might actually + * be in a different database, as powers can be anything magical + **/ + + const findPower = function( charCS, power ) { + + if (!power || !power.length) return abilityLookup( fields.PowersDB, '', charCS, true, false ); + + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; + const powerType = power.substring(0,3); + let powerLib; + + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) power = power.slice(powerType.length); + + if (!_.some(dbList, dB => { + if (powerType.toUpperCase() === dB[0]) { + powerLib = abilityLookup( dB[1], power, null, true ); + return true; + } else { + return false; + } + })) { + _.some(dbList, dB => { + powerLib = abilityLookup( dB[1], power, null, true ); + return !_.isUndefined(powerLib.obj); + }); + }; + if (!powerLib.obj) { + powerLib = abilityLookup( fields.PowersDB, power, charCS ); + } + powerLib.name = power; + return powerLib; + } + + /* + * Check if the specified power is a class-defined power and, if so + * assess if the power can be used by a character of this level */ - var checkValidPower = function( args, senderId ) { + const checkValidPower = function( args, senderId ) { - var matchPower = (args[5] || '').dbName(), - charCS = getCharacter( args[1] ), - classObj = classObjects( charCS, senderId ), - age = parseInt(attrLookup( charCS, fields.AgeVal ) || 9999), - castAsLvl = -1; + const matchPower = (args[5] || '').dbName(), + charCS = getCharacter( args[1] ), + classObj = classObjects( charCS, senderId ), + age = parseInt(attrLookup( charCS, fields.AgeVal ) || 9999); + let castAsLvl = -1, + classData, powerData, powerName, + isClassPower, isValidPower; if (!matchPower || !matchPower.length || state.MagicMaster.spellRules.allowAnyPower) {log('checkValidPower: no check possible. !matchPower='+!matchPower+', matchPower.length='+matchPower.length+', !matchPower.length='+!matchPower.length+', allowAll='+state.MagicMaster.spellRules.allowAnyPower); return true;} - let success = classObj.some( c => { - let classData = resolveData( c.name, c.dB, reRaceData ).raw; + const success = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; return _.some(classData, p => { - let powerData = parseData( String(p), reSpellSpecs ); - let powerName = powerData.name.toLowerCase(); + powerData = parseData( String(p), reSpellSpecs ); + powerName = powerData.name.toLowerCase(); if (powerName.startsWith('mu-') || powerName.startsWith('pr-') || powerName.startsWith('pw-')) powerName = powerName.slice(3); - let isClassPower = matchPower == powerName.dbName(); - let isValidPower = (parseInt(powerData.age) <= age && parseInt(powerData.level) <= parseInt(c.level)); + isClassPower = matchPower == powerName.dbName(); + isValidPower = (parseInt(powerData.age) <= age && parseInt(powerData.level) <= parseInt(c.level)); castAsLvl = !isClassPower ? castAsLvl : (isValidPower ? (powerData.castlvl || -1) : 0); return (isClassPower && isValidPower); }); @@ -2066,20 +1999,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * from the Powers database */ - var getUsesPerDay = function( charCS, power, senderId ) { + const getUsesPerDay = function( charCS, power, senderId ) { - var matchPower = (power || '').dbName(), - classObj = classObjects( charCS, senderId ), - foundPower, perDay; + const matchPower = (power || '').dbName(), + classObj = classObjects( charCS, senderId ); + let perDay, perLevel, classData, + powerData, foundName, + isClassPower, isRacePower; - foundPower = classObj.some( c => { - let classData = resolveData( c.name, c.dB, reRaceData ).raw; + let foundPower = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; return _.some(classData, p => { - let powerData = parseData( String(p), reSpellSpecs, false ); - let foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; - let isClassPower = matchPower == foundName.dbName(); + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isClassPower = matchPower == foundName.dbName(); if (isClassPower) { - let perLevel = (powerData.perDay || '').match(/(\d+)L(\d+?)/i); + perLevel = (powerData.perDay || '').match(/(\d+)L(\d+?)/i); if (perLevel) { perDay = perLevel[1] * Math.ceil(c.level / perLevel[2]); } else { @@ -2090,23 +2025,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }); if (!foundPower || _.isUndefined(perDay)) { - let race = attrLookup( charCS, fields.Race ); - let raceDef = abilityLookup( fields.RaceDB, race, charCS ); + const raceDef = abilityLookup( fields.RaceDB, attrLookup( charCS, fields.Race ), charCS ); if (raceDef.obj) { - let raceData = raceDef.data(reRaceData); + const raceData = raceDef.data(reRaceData); foundPower = _.some(raceData, p => { - let powerData = parseData( String(p), reSpellSpecs, false ); - let foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; - let isRacePower = matchPower == foundName.dbName(); + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isRacePower = matchPower == foundName.dbName(); if (isRacePower) perDay = powerData.perDay; return (isRacePower); }); }; }; if (!foundPower || _.isUndefined(perDay)) { - let powerDef = findPower( charCS, power ); + const powerDef = findPower( charCS, power ); if (powerDef.obj) { - let powerData = powerDef.data(reSpellData); + powerData = powerDef.data(reSpellData); powerData = powerData ? parseData( String(powerData), reSpellSpecs, false ) : powerData; if (powerData) perDay = powerData.perDay; }; @@ -2119,7 +2053,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Return a string containing the in-game date in short or long form */ - var inGameDate = function( inGameDay ) { + const inGameDate = function( inGameDay ) { return ['Mon','Tue','Wed','Thur','Fri','Sat','Sun'][((inGameDay%7))]+', ' + (1+(inGameDay%28)) + ['st','nd','rd','th'][Math.min((((inGameDay%28)%20)),3)]+' ' @@ -2127,34 +2061,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars + Math.floor(inGameDay/336); }; - /* - * Lookup a spell or power storing attribute in both legacy and current forms - * (moved to library) - */ -/* - var miSpellLookup = function( charCS, miName, index, objID, attr, postfix='', spell='', def=true ) { - - if (_.isNull(postfix)) postfix = ''; - let dashPost = postfix ? '-'+postfix : ''; - if (_.isNull(spell)) spell = ''; - let dashSpell = spell ? '-'+spell : ''; - if (_.isNull(objID) || !objID) objID = index; - let val = attrLookup( charCS, [attr[0]+miName+dashPost+dashSpell+'+'+objID,attr[1]], null, null, null, false, false ); - if (_.isUndefined(val)) val = attrLookup( charCS, [attr[0]+miName+dashPost+'+'+index+dashSpell,attr[1]], null, null, null, false, false ); - if (_.isUndefined(val)) val = attrLookup( charCS, [attr[0]+miName+dashPost+dashSpell,attr[1],attr[2]], null, null, null, false, ((postfix.length || spell.length) ? false : def) ); - if (_.isUndefined(val) && (postfix.length || spell.length)) val = attrLookup( charCS, [attr[0]+postfix+(postfix ? dashSpell : spell),attr[1],attr[2]], null, null, null, false, def ); - return val; - }; -*/ /* * insert a spell into an identified spellbook slot */ - - var setSpell = function( charCS, spellTables, altSpellTable, spellDB, spellName, r, c, lv, cost, msg, levelOrPerDay, castAsLvl='' ) { + + const setSpell = function( charCS, spellTables, altSpellTable, spellDB, spellName, r, c, lv, cost, msg, levelOrPerDay, castAsLvl='' ) { - var isPower = spellDB.toUpperCase().includes('POWER'), - isMU = spellDB.toUpperCase().includes('MU'), - newSpellObj, altValues, altSpellRow; + const isPower = spellDB.toUpperCase().includes('POWER'); +// isMU = spellDB.toUpperCase().includes('MU'), + let newSpellObj, altValues, altSpellRow; if (fields.GameVersion === 'AD&D1e') { altSpellRow = altSpellTable.tableFind( (isPower ? fields.AltPowers_name : fields.AltSpells_name), (spellTables.tableLookup( fields.Spells_name, r ) || '-') ); @@ -2162,12 +2077,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c); } if (!isPower) { - newSpellObj = getAbility( spellDB, spellName, charCS, true ); + newSpellObj = abilityLookup( spellDB, spellName, charCS, true ); } else { newSpellObj = findPower( charCS, spellName ); spellDB = newSpellObj.dB; spellName = newSpellObj.obj ? newSpellObj.obj[1].name : spellName; - if (newSpellObj.obj) getAbility( spellDB, spellName, charCS, true ); }; if (!newSpellObj.obj) { @@ -2178,17 +2092,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return spellTables.addTableRow( r ); } - var speed = newSpellObj.obj[1].ct, - level = parseInt(newSpellObj.obj[1].type.match(/\d+/)) || 1, - specs = newSpellObj.specs(), - data = newSpellObj.data(), - spellData = data ? parseData( data[0][0], reSpellSpecs ) : {}, - values = spellTables.copyValues(), - csv = csVer(charCS), - weapon = newSpellObj.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.+?\]/im), - equip = (!weapon ? '' : (weapon[0].match(/[\[,\s]equip:(.+?)[,\]]/i) || ['',''])[1].toLowerCase()); + const speed = newSpellObj.obj[1].ct, + level = parseInt(newSpellObj.obj[1].type.match(/\d+/)) || 1, + specs = newSpellObj.specs(), + data = newSpellObj.data(), + spellData = data ? parseData( data[0][0], reSpellSpecs ) : {}, + csv = csVer(charCS), + weapon = newSpellObj.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.+?\]/im), + equip = (!weapon ? '' : (weapon[0].match(/[\[,\s]equip:(.+?)[,\]]/i) || ['',''])[1].toLowerCase()); + + let values = spellTables.copyValues(); - if (!specs || !specs[0]) log('setSpell: specs = '+(specs ? (specs[0] ? specs[0] : 'specs[0] undefined, spell is '+spellName) : 'specs undefined, spell is '+spellName)); +// if (!specs || !specs[0]) log('setSpell: specs = '+(specs ? (specs[0] ? specs[0] : 'specs[0] undefined, spell is '+spellName) : 'specs undefined, spell is '+spellName)); values[fields.Spells_name[0]][fields.Spells_name[1]] = spellName; values[fields.Spells_db[0]][fields.Spells_db[1]] = spellDB; @@ -2234,35 +2149,168 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return spellTables.addTableRow( r, values ); } + /* + * Find an item table row to put an item in + */ + + const findPutRow = function( tokenID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotCount ) { // addTableRow + let putRow = -1, + miTable = '', + pickedMI = ''; + if (!isNaN(pickRow) && pickRow >= 0) { + pickedMI = tableGroupLookup( pickItems, 'name', pickRow ) || ''; + const pickedTrueMI = (tableGroupLookup( pickItems, 'trueName', pickRow ) || '').dbName() || '-'; + const pickedType = (tableGroupLookup( pickItems, 'type', pickRow ) || '').dbName() || '-'; + const miTrueObj = abilityLookup( fields.MagicItemDB, pickedTrueMI, pickCS ); + const lowerMI = pickedMI.dbName().replace(/v\d+$/,'') || '-'; + miTable = miTrueObj.obj ? getItemTable( miTrueObj.obj[1].type ) : 'GEAR'; + let putItemsTable = putItems[miTable]; + let mi, miTrueName, miType; + for (let i = 0; i < putItemsTable.sortKeys.length; i++) { + mi = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'name'],i) || '').dbName().replace(/v\d+$/,'') || '-'; + if (_.isUndefined(mi)) break; + if (mi != lowerMI) continue; + miTrueName = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'trueName'],i) || '').dbName() ||'-'; + if (miTrueName != pickedTrueMI) continue; + miType = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'type'],i) || pickedType); + if (miType.dbName() !== '' && (miType.dbName() !== pickedType || !stackable.includes(miType.toLowerCase()))) continue; + putRow = i; + break; + } + if (showTypes && !buy) { + const miObj = abilityLookup( fields.MagicItemDB, pickedMI, pickCS ); + pickedMI = !miObj.obj ? pickedMI : getShownType( miObj, pickRow ); + } + if (putRow < 0) { + const bagSize = (attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); +// if (slotCount <= bagSize) { +// sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); +// putRow = -1; +// miTable = pickedMI = ''; +// } else { + putRow = putItemsTable.tableFind( fields[fieldGroups[miTable].prefix+'name'], '-', false ); + if (_.isUndefined(putRow)) { + putItemsTable = putItemsTable.addTableRow(); + putRow = putItemsTable.sortKeys.length-1; +// } + } + } + }; + return [putRow,miTable,pickedMI]; + }; + + /* + * Remove MI powers specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIpowers = function( charCS, MIname, miRow, miRowID, powerList, powerValues ) { + + let powerName = '', + removeList = [], + PowersTable = [], + r, c, i=0; + + powerValues = powerValues.split(','); + powerList = powerList.split(','); + MIname = MIname.hyphened(); + while (powerList.length > 0) { + powerName = powerList.shift(); + powerName = powerName.hyphened(); + let attrObj = miSpellLookup( charCS, MIname, miRow, miRowID, [fields.MIpowerPrefix[0],null], '', powerName ); + if (attrObj) { + r = attrObj.get('current'); + c = attrObj.get('max'); + if (!_.isUndefined(r) && !_.isUndefined(c)) { + if (_.isUndefined(PowersTable[c])) { + PowersTable[c] = getTable( charCS, fieldGroups.POWERS, c ); + } + powerValues[i] = PowersTable[c].tableLookup( fields.Powers_castMax, r ) + '.' + PowersTable[c].tableLookup( fields.Powers_storedLevel, r ); + PowersTable[c].addTableRow( r ); + } + removeList.push(attrObj); + i++; + } + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return powerValues.join(); + } + + /* + * Remove MI spells specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIspells = function( charCS, MIname, MIrow, MIrowID, spellType, spellList, spellValues ) { + + let SpellsTable = [], + removeList = [], + spellQty, r, c, altSpellRow, i=0, spellRows, spellCols, +// attrName = fields.MIspellPrefix[0]+(MIname.replace(/\s/g,'-'))+'-'+(spellType.toLowerCase())+'+'+MIrowID, + altSpellTable = getLvlTable( charCS, fieldGroups.ALTWIZ, fields.MIspellLevel ); + + const base = shapeSpellbook( charCS, 'MI' )[1].base; + + { // Block created to restrict scope of spellRCobj + + let spellRCobj = miSpellLookup( charCS, MIname, MIrow, MIrowID, [fields.MIspellPrefix[0],null] ); + + if (!spellRCobj) return undefined; + + spellRows = spellRCobj.get(fields.MIspellRows[1]).split(','); + spellCols = spellRCobj.get(fields.MIspellCols[1]).split(','); + removeList.push(spellRCobj); + } + + spellValues = spellValues.split(','); + spellList = spellList.split(','); + while (spellRows.length > 0 && spellCols.length > 0) { + r = spellRows.shift(); + c = spellCols.shift(); + if (!_.isUndefined(r) && !_.isUndefined(c) && parseInt(c) >= 0) { + altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c-base); + if (_.isUndefined(SpellsTable[c])) { + SpellsTable[c] = getTable( charCS, fieldGroups.SPELLS, c ); + } + spellQty = SpellsTable[c].tableLookup( fields.Spells_castValue, r ); + spellValues[i] = (spellQty <= 0 ? 0 : (SpellsTable[c].tableLookup(fields.Spells_storedLevel, r))) + + '.' + (SpellsTable[c].tableLookup( fields.Spells_miSpellSet, r )); + + SpellsTable[c].addTableRow( r ); + altSpellTable.addTableRow( altSpellRow ); + }; + i++; + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return spellValues.join(); + }; + /* * add or remove spells/powers listed in the parameters to * the specified spell level table in the specified character sheet */ - var changeMIspells = function( charCS, MIname, miRow, miRowID, listType, action, spellList, spellValues = '' ) { + const changeMIspells = function( charCS, MIname, miRow, miRowID, listType, action, spellList, spellValues = '' ) { + - var isAdd = action.toUpperCase() == 'ADD', - c, valueItem, spellHyphen, altGroup, - spellDB, levelSpells, - spellName, spellQty, - toDoList = spellList, + const isAdd = action.toUpperCase() == 'ADD'; + let altGroup, spellDB, + toDoList = spellList.toLowerCase().split(','), spellTables = [], level = fields.MIspellLevel, levelSpells = shapeSpellbook( charCS, 'MI' ), - rows = [], - cols = []; + valueList; if (!isAdd) { valueList = removeMIspells( charCS, MIname, miRow, miRowID, listType, spellList, spellValues ); if (!_.isUndefined(valueList)) return valueList; } - + spellList = spellList.split(','); - toDoList = toDoList.toLowerCase().split(','); - MIname = MIname.replace(/\s/g,'-'); - var indexPrefix = fields.MIspellPrefix[0]+MIname+'-'+(listType.toLowerCase())+'+'+miRowID, - valueList = spellValues ? spellValues.split(',') : [], - altSpellTable; + MIname = MIname.hyphened(); + + let indexPrefix = fields.MIspellPrefix[0]+MIname+'-'+(listType.toLowerCase())+'+'+miRowID; + valueList = spellValues ? spellValues.split(',') : []; switch (listType.toUpperCase()) { case 'MU': @@ -2274,19 +2322,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars altGroup = fieldGroups.ALTPRI; break; case 'POWER': + case 'PW': spellDB = fields.PowersDB; level = fields.MIpowerLevel; indexPrefix = fields.MIpowerPrefix[0]+MIname+'+'+miRowID; levelSpells = shapeSpellbook( charCS, 'MIPOWER' ); altGroup = fields.GameVersion === 'AD&D1e' ? fieldGroups.ALTPWR : undefined; break; + default: + sendError('Invalid list type '+listType+' at changeMIspells'); + return; } + let w, c, r, valueItem, spellHyphen, spellName, spellQty, altSpellTable, + rows = [], + cols = []; for (let lv=1; lv < levelSpells.length; lv++) { if (altGroup) altSpellTable = getLvlTable( charCS, altGroup, (level+lv-1) ); - let r = 0; + r = 0; do { - let c = levelSpells[lv].base; - let w = 1; + c = levelSpells[lv].base; + w = 1; do { if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); @@ -2295,7 +2350,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isAdd && (_.isUndefined(spellName) || spellName === '-')) { spellName = spellList.shift() || ''; spellHyphen = '-'+spellName.hyphened(); - valueItem = valueList.shift().split('.'); +// log('changeMIspells: at shift, valueList = '+valueList); + valueItem = (valueList.shift() || '').split('.'); if (listType === 'POWER') { setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'current'], r ); setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'max'], c ); @@ -2332,116 +2388,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; - /* - * Remove MI spells/powers specified in the list, using the - * row/column references saved on the character sheet - */ - - var removeMIpowers = function( charCS, MIname, miRow, miRowID, powerList, powerValues ) { - - var powerName, - removeList = [], - PowersTable = [], - r, c, i=0; - - powerValues = powerValues.split(','); - powerList = powerList.split(','); - MIname = MIname.replace(/\s/g,'-'); - while (powerList.length > 0) { - powerName = powerList.shift(); - powerName = powerName.replace(/\s/g,'-'); - let attrObj = miSpellLookup( charCS, MIname, miRow, miRowID, [fields.MIpowerPrefix[0],null], '', powerName ); - if (attrObj) { - r = attrObj.get('current'); - c = attrObj.get('max'); - if (!_.isUndefined(r) && !_.isUndefined(c)) { - if (_.isUndefined(PowersTable[c])) { - PowersTable[c] = getTable( charCS, fieldGroups.POWERS, c ); - } - powerValues[i] = PowersTable[c].tableLookup( fields.Powers_castMax, r ) + '.' + PowersTable[c].tableLookup( fields.Powers_storedLevel, r ); - PowersTable[c].addTableRow( r ); - } - removeList.push(attrObj); - i++; - } - } - _.each(removeList,r => r.remove()); - return powerValues.join(); - } - - /* - * Remove MI spells/powers specified in the list, using the - * row/column references saved on the character sheet - */ - - var removeMIspells = function( charCS, MIname, MIrow, MIrowID, spellType, spellList, spellValues ) { - - var SpellsTable = [], - removeList = [], - spellQty, r, c, altSpellRow, i=0, spellRows, spellCols, -// attrName = fields.MIspellPrefix[0]+(MIname.replace(/\s/g,'-'))+'-'+(spellType.toLowerCase())+'+'+MIrowID, - base = shapeSpellbook( charCS, 'MI' )[1].base, - altSpellTable = getLvlTable( charCS, fieldGroups.ALTWIZ, fields.MIspellLevel ); - - { // Block created to restrict scope of spellRCobj - -// let spellRCobj = attrLookup( charCS, [attrName,null] ); - let spellRCobj = miSpellLookup( charCS, MIname, MIrow, MIrowID, [fields.MIspellPrefix[0],null] ); - - if (!spellRCobj) return undefined; - - spellRows = spellRCobj.get(fields.MIspellRows[1]).split(','); - spellCols = spellRCobj.get(fields.MIspellCols[1]).split(','); - removeList.push(spellRCobj); - } - - spellValues = spellValues.split(','); - spellList = spellList.split(','); - while (spellRows.length > 0 && spellCols.length > 0) { - r = spellRows.shift(); - c = spellCols.shift(); - if (!_.isUndefined(r) && !_.isUndefined(c)) { - altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c-base); - if (_.isUndefined(SpellsTable[c])) { - SpellsTable[c] = getTable( charCS, fieldGroups.SPELLS, c ); - } - spellQty = SpellsTable[c].tableLookup( fields.Spells_castValue, r ); - spellValues[i] = (spellQty <= 0 ? 0 : (SpellsTable[c].tableLookup(fields.Spells_storedLevel, r))) - + '.' + (SpellsTable[c].tableLookup( fields.Spells_miSpellSet, r )); - - SpellsTable[c].addTableRow( r ); - altSpellTable.addTableRow( altSpellRow ); - }; - i++; - } - _.each(removeList,r => r.remove()); - return spellValues.join(); - }; - /* * handle removing and adding magic item spells and powers * from their defining lists * Usually used when picking up or putting away a magic item */ - var moveMIspells = function( senderId, fromCS, fromIndex, fromRowID, toCS, toIndex, toRowID, itemName='', type='ALL', del=false ) { // resolveData + var moveMIspells = function( senderId, fromCS, fromIndex, fromRowID, toCS, toIndex, toRowID, itemName='', type='ALL', del=true ) { return new Promise(resolve => { try { - var MIobj = getAbility( fields.MagicItemDB, itemName, toCS, true, null, null, fromIndex, fromRowID ), - notFrom = !fromCS && !!toCS, - update = (!!fromCS && !!toCS && (fromCS.id === toCS.id)), - oldCS = fromCS, + const moveSpell = function( type, listField, valuesField, indexField, removeList ) { + let spellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [listField[0], null] ), + spellList = (!!spellObj ? (spellObj.get(listField[1]) || '') : ''), + spellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, valuesField ), + spellIndex = miSpellLookup( oldCS, MIname, oldIndex, oldID, [indexField[0],null], type ); + + if (spellList.length) { + let miSpellValues; + if (!notFrom && toCS) setAttr( toCS, [listField[0]+MIname+'+'+toRowID, listField[1]], spellList ); + setAttr( oldCS, [valuesField[0]+MIname+'+'+oldID, valuesField[1]], (miSpellValues = notFrom ? spellValues : (type !== 'PW' ? changeMIspells( fromCS, itemName, fromIndex, fromRowID, type, 'REMOVE', spellList, spellValues) : removeMIpowers( fromCS, itemName, fromIndex, fromRowID, spellList, spellValues )))); + if (toCS) { + if (spellbook) { + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellRows[1]], Array(spellList.split(',').length).fill(0).map((x,i)=>i).join() ); + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellCols[1]], Array(spellList.split(',').length).fill(-1).join() ); + } else { +// log('moveSpell: calling changeMIspells to add to MI, with list '+spellList+' and values '+miSpellValues); + setAttr( toCS, [valuesField[0]+MIname+'+'+toRowID, valuesField[1]], changeMIspells( toCS, itemName, toIndex, toRowID, type, 'ADD', spellList, miSpellValues )); + } + } + } + if (!update && del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { + if (!!spellObj) removeList.push(spellObj); + if (!!spellIndex) removeList.push(spellIndex); + } + return removeList; + }; + + const MIobj = getAbility( fields.MagicItemDB, itemName, toCS, true, null, null, fromIndex, fromRowID ), + notFrom = !fromCS && !!toCS, + update = (!!fromCS && !!toCS && (fromCS.id === toCS.id)), + MIname = itemName.hyphened(), + doMU = type === 'MU' || type === 'ALL', + doPR = type === 'PR' || type === 'ALL', + doPW = type === 'PW' || type === 'ALL', + spellbook = MIobj.obj && MIobj.obj[1] && reCastViewMIspellCmd.test(MIobj.obj[1].body) && !reCastMIspellCmd.test(MIobj.obj[1].body); + +// log('moveMIspells: spellbook = '+spellbook+', cast button = '+reCastMIspellCmd.test(MIobj.obj[1].body)); + + let oldCS = fromCS, oldIndex = fromIndex, oldID = fromRowID, - MIname = itemName.hyphened(), - doMU = type === 'MU' || type === 'ALL', - doPR = type === 'PR' || type === 'ALL', - doPW = type === 'PW' || type === 'ALL', - removeList = [], - error = false; + removeList = []; + + var error = false; if (notFrom || update) { if (!MIobj.obj) { @@ -2454,75 +2456,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars oldID = toRowID; } - if (doMU) { - let MUspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemMUspellsList[0], null] ), - MUspellList = (!!MUspellObj ? (MUspellObj.get(fields.ItemMUspellsList[1]) || '') : ''), - MUspellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemMUspellValues ); - - if (MUspellList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemMUspellsList[0]+MIname+'+'+toRowID, fields.ItemMUspellsList[1]], MUspellList ); - setAttr( oldCS, [fields.ItemMUspellValues[0]+MIname+'+'+oldID, fields.ItemMUspellValues[1]], (miSpellValues = notFrom ? MUspellValues : changeMIspells( fromCS, itemName, fromIndex, fromRowID, 'MU', 'REMOVE', MUspellList, MUspellValues))); - if (toCS) { - setAttr( toCS, [fields.ItemMUspellValues[0]+MIname+'+'+toRowID, fields.ItemMUspellValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'MU', 'ADD', MUspellList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(MUspellObj); - MUspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIspellPrefix[0], null] ); - if (!!MUspellObj) removeList.push(MUspellObj); - } - } - if (doPR) { - let PRspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemPRspellsList[0], null] ), - PRspellList = (!!PRspellObj ? (PRspellObj.get(fields.ItemPRspellsList[1]) || '') : ''), - PRspellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemPRspellValues ); - - if (PRspellList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemPRspellsList[0]+MIname+'+'+toRowID, fields.ItemPRspellsList[1]], PRspellList ); - setAttr( oldCS, [fields.ItemPRspellValues[0]+MIname+'+'+oldID, fields.ItemPRspellValues[1]], (miSpellValues = notFrom ? PRspellValues : changeMIspells( fromCS, itemName, fromIndex, fromRowID, 'PR', 'REMOVE', PRspellList, PRspellValues ))); - if (toCS) { - setAttr( toCS, [fields.ItemPRspellValues[0]+MIname+'+'+toRowID, fields.ItemPRspellValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'PR', 'ADD', PRspellList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(PRspellObj); - PRspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIspellPrefix[0], null] ); - if (!!PRspellObj) removeList.push(PRspellObj); - } - } - if (doPW) { - let powerObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemPowersList[0], null] ), - powerList = (!!powerObj ? (powerObj.get(fields.ItemPowersList[1]) || '') : ''), - powerValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemPowerValues ); - - if (powerList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemPowersList[0]+MIname+'+'+toRowID, fields.ItemPowersList[1]], powerList ); - setAttr( oldCS, [fields.ItemPowerValues[0]+MIname+'+'+oldID, fields.ItemPowerValues[1]], (miSpellValues = notFrom ? powerValues : removeMIpowers( fromCS, itemName, fromIndex, fromRowID, powerList, powerValues ))); - if (toCS) { - setAttr( toCS, [fields.ItemPowerValues[0]+MIname+'+'+toRowID, fields.ItemPowerValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'POWER', 'ADD', powerList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(powerObj); - powerObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIpowerPrefix[0], null] ); - if (!!powerObj) removeList.push(powerObj); - } - } - var queries = (resolveData(itemName,fields.MagicItemDB,reItemData,(fromCS || toCS),{query:reClassSpecs.query}).parsed.query || '').split('$$'); - if (queries && queries.length && itemName && !notFrom && !update) { - if (!isNaN(fromIndex)) { - _.each( queries, q => { - let varObj; - let toField = [fields.ItemVar[0]+MIname+'+'+toRowID+'-'+q.split('=')[0],fields.ItemVar[1]]; - if (toCS && !isNaN(toIndex)) setAttr( toCS, toField, (miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], fields.ItemVar ) || '') ); - if (!_.isUndefined(varObj = miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], [fields.ItemVar[0],null] ))) removeList.push(varObj); - }); - }; + if (doMU) removeList = moveSpell( 'mu', fields.ItemMUspellsList, fields.ItemMUspellValues, fields.MIspellPrefix, removeList ); + if (doPR) removeList = moveSpell( 'pr', fields.ItemPRspellsList, fields.ItemPRspellValues, fields.MIspellPrefix, removeList ); + if (doPW) removeList = moveSpell( 'pw', fields.ItemPowersList, fields.ItemPowerValues, fields.MIpowerPrefix, removeList ); + + const queries = (resolveData(itemName,fields.MagicItemDB,reItemData,(fromCS || toCS),{query:reClassSpecs.query}).parsed.query || '').split('$$'); + if (queries && queries.length && itemName && !notFrom && !update && !isNaN(fromIndex)) { + let varObj, toField; + _.each( queries, q => { + toField = [fields.ItemVar[0]+MIname+'+'+toRowID+'-'+q.split('=')[0],fields.ItemVar[1]]; + if (toCS && !isNaN(toIndex)) setAttr( toCS, toField, (miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], fields.ItemVar ) || '') ); + if (!_.isUndefined(varObj = miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], [fields.ItemVar[0],null], '', '', false ))) removeList.push(varObj); + }); }; - _.each(removeList.filter(r => !!r),r => r.remove()); + _.each(removeList.filter(r => !!r),r => setTimeout( () => r.remove(), 1000)); } catch (e) { log('MagicMaster moveMIspells: '+e.name+': '+e.message+' while processing item '+itemName); @@ -2537,42 +2484,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }); }; - - /** - * Find an item identified as a Power, but which might actually - * be in a different database, as powers can be anything magical - **/ - - var findPower = function( charCS, power ) { - - if (!power || !power.length) return abilityLookup( fields.PowersDB, '', charCS, true, false ); - - const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; - - var powerType = power.substring(0,3), - powerLib; - - if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) power = power.slice(powerType.length); - - if (!_.some(dbList, dB => { - if (powerType.toUpperCase() === dB[0]) { - powerLib = abilityLookup( dB[1], power, null, true ); - return true; - } else { - return false; - } - })) { - _.some(dbList, dB => { - powerLib = abilityLookup( dB[1], power, null, true ); - return !_.isUndefined(powerLib.obj); - }); - }; - if (!powerLib.obj) { - powerLib = abilityLookup( fields.PowersDB, power, charCS ); - } - powerLib.name = power; - return powerLib; - } /* * Check an item to see if it is a "bag" that can contain @@ -2581,33 +2492,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * items. */ - var checkForBag = function( charCS, miName, row ) { + const checkForBag = function( charCS, miName, row ) { - var itemRow, rowID, table; + let itemRow, rowID, table; [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); - var bag = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {bag:reSpellSpecs.bag,store:reSpellSpecs.store}, itemRow, rowID ); + const bag = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {bag:reSpellSpecs.bag,store:reSpellSpecs.store}, {row:itemRow, rowID:rowID} ); if (!bag.parsed.bag) return; -/* var miObj = abilityLookup( fields.MagicItemDB, miName, charCS ); - if (!miObj.obj) return; - - var bagData = miObj.obj[1].body.match(/}}.*?data\s*?=[^{]+?bag:(\d+).*?{{/im); - if (!bagData) return; -*/ - var bagData = parseInt(bag.parsed.bag); - var bagCS = findObjs({ type:"character", name:miName }); - var itemSpecs = {name:reSpellSpecs.name, - trueName:reSpellSpecs.trueName, - speed:reSpellSpecs.speed, - qty:reSpellSpecs.qty, - spell:reSpellSpecs.type, - type:reSpellSpecs.recharge, - trueType:reSpellSpecs.truerc, - reveal:reSpellSpecs.reveal, - cost:reSpellSpecs.cost, - }; + let bagCS = findObjs({ type:"character", name:miName }); + const bagData = parseInt(bag.parsed.bag); + const itemSpecs = {name:reSpellSpecs.name, + trueName:reSpellSpecs.trueName, + speed:reSpellSpecs.speed, + qty:reSpellSpecs.qty, + spell:reSpellSpecs.type, + type:reSpellSpecs.recharge, + trueType:reSpellSpecs.trueType || reSpellSpecs.type || 'uncharged', + reveal:reSpellSpecs.reveal, + cost:reSpellSpecs.cost, + }; if (!bagCS || !bagCS.length) { @@ -2619,34 +2524,36 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( bagCS, fields.Race, 'Magic Item' ); if (bagData > 0) { - let Items = getTableGroup( bagCS, fieldGroups.MI ); + let Items = getTableGroup( bagCS, fieldGroups.MI ), + itemClass, itemData, itemObj, p; + let values; setAttr( bagCS, fields.ItemContainerType, (bag.parsed.store !== 'nostore' ? '1' : '-1') ); setAttr(charCS, fields.ItemOldContainerType, attrLookup(charCS, fields.ItemContainerType)); setAttr( bagCS, fields.ItemContainerSize, Math.max( fields.MIRowsStandard, bagData )); -// bagData = miObj.data(/}}[^{]*?data\s*?=\s*?(\[[^{]+?bag\:[^{]+?\]){{/im); _.each( bag.raw, item => { - let itemClass = 'GEAR'; - let itemData = parseData( item[0], itemSpecs, false, charCS, miName, itemRow, rowID ); + itemClass = 'GEAR'; + itemData = parseData( item[0], itemSpecs, false, charCS, miName, itemRow, rowID ); if ((itemData.spell || '').toUpperCase() != 'MI') return; - let itemObj = abilityLookup( fields.MagicItemDB, (itemData.trueName || itemData.name), charCS ); + itemObj = abilityLookup( fields.MagicItemDB, (itemData.trueName || itemData.name), charCS ); if (itemObj.obj) { itemData.speed = itemData.speed || itemObj.obj[1].ct; itemData.type = itemData.type || itemObj.obj[1].charge; itemClass = getItemTable( itemObj.obj[1].type ) || 'GEAR'; } - let values = Items[itemClass].copyValues(); - let prefix = fieldGroups[itemClass].prefix; - values[fields[prefix+'name'][0]][fields[prefix+'name'][1]] = itemData.name; - values[fields[prefix+'trueName'][0]][fields[prefix+'trueName'][1]] = (itemData.trueName || itemData.name); - values[fields[prefix+'speed'][0]][fields[prefix+'speed'][1]] = evalAttr(itemData.speed,charCS) || 5; - values[fields[prefix+'trueSpeed'][0]][fields[prefix+'trueSpeed'][1]] = evalAttr(itemData.speed,charCS) || 5; - values[fields[prefix+'qty'][0]][fields[prefix+'qty'][1]] = evalAttr(itemData.qty,charCS) || 1; - values[fields[prefix+'trueQty'][0]][fields[prefix+'trueQty'][1]] = evalAttr(itemData.qty,charCS) || 1; - values[fields[prefix+'cost'][0]][fields[prefix+'cost'][1]] = evalAttr(itemData.cost,charCS) || 0; - values[fields[prefix+'type'][0]][fields[prefix+'type'][1]] = itemData.type || 'uncharged'; - values[fields[prefix+'trueType'][0]][fields[prefix+'trueType'][1]] = itemData.trueType || itemData.type || 'uncharged'; - values[fields[prefix+'reveal'][0]][fields[prefix+'reveal'][1]] = itemData.reveal || ''; - + p = Items[itemClass].fieldGroup; + values = initValues( p ); + + values.valLine(p,'name',itemData.name) + .valLine(p,'trueName',(itemData.trueName || itemData.name)) + .valLine(p,'speed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'trueSpeed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'qty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'trueQty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'cost',evalAttr(itemData.cost,charCS) || 0) + .valLine(p,'type',itemData.type || 'uncharged') + .valLine(p,'trueType',itemData.trueType || itemData.type || 'uncharged') + .valLine(p,'reveal',itemData.reveal || ''); + Items[itemClass].addTableRow( NaN, values ); }); } else { @@ -2666,7 +2573,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * it no longer exists in the equipment list **/ - var removeMIability = function( charCS, itemName, Items, table ) { + const removeMIability = function( charCS, itemName, Items, table ) { if (!Items.tableFind( fields[fieldGroups[table].prefix+'name'], itemName ) && !Items.tableFind( fields[fieldGroups[table].prefix+'trueName'], itemName )) { let MIobjs = filterObjs( obj => { @@ -2682,7 +2589,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Parse a data item query statement and return the parsed version. **/ - var parseQuery = function( query ) { + const parseQuery = function( query ) { query = (query || '').split('$$').map(q => { switch (q) { case 'weaponMagic': q = 'weaponMagic=How magical is this weapon?|+0%%0//0|-4%%-4/Cursed/1700|-3%%-3/Cursed/1350|-2%%-2/Cursed/900|-1%%-1/Cursed/450|0%%0//0|+1%%1//500|+2%%2//1000|+3%%3//1500|+4%%4//2000|+5%%5//3000'; break; @@ -2703,7 +2610,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * then send it to chat on a timeout */ - var pickPutCmd = function( cmd, tokenID, charCS, who ) { + const pickPutCmd = function( cmd, tokenID, charCS, who ) { setTimeout(() => sendAPI( cmd.replace(/,/g,',') .replace(/[/g,'[') @@ -2714,33 +2621,197 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; /* - * Return how full a character's Item Slots are + * Calculate the weight of the items in a container */ - - var itemSlotData = function( Items ) { - var slotCount = 0, + + const calcWeight = function( charCS, Items ) { + + let slotCount = 0, totalWeight = 0.0, - totalQty = 0; + totalEnc = 0.0, + totalQty = 0, + prefix, name, qty, tableWt, tableEnc, trueType, type, data, bagObj, bagData; + + if (!Items) Items = getTableGroup( charCS, fieldGroups.MI ); + for (const table in Items) { for (let i=0; i { + let errFlag = false, + count,qty,tableWt,tableEnc,encumbrance; + try { + let curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + baseMove = attrLookup( charCS, fields.BaseMove, {def:false} ), + name, trueType, type, data, move, moveMod, extra, weights, weightData; + + const oldEncumbrance = parseInt(attrLookup( charCS, fields.Encumbrance )) || 0; + + if (_.isUndefined(baseMove) || isNaN(baseMove) || !String(baseMove || '').length) { + const classObjs = classObjects( charCS, senderId, {move:reClassSpecs.move} ); + const classMove = classObjs.reduce( (a,o) => Math.max(a,(parseInt(o.classData.move) || 0)), 0 ); + const raceMove = (resolveData( (attrLookup( charCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, charCS, {move:reClassSpecs.move} ).parsed.move || 12); + setAttr( charCS, fields.BaseMove, Math.max(classMove,raceMove) ); +// log('itemSlotData: raceMove = '+raceMove+', classMove = '+classMove); + } + + if (calc || !String(attrLookup( charCS, fields.Weight_total ) || '').length) { + weightData = calcWeight( charCS, Items ); + tableWt = weightData.weight; + tableEnc = weightData.encumberWt; + count = weightData.count; + qty = weightData.qty; + + setAttr( charCS, fields.Equip_total, 'Total Weight' ); + setAttr( charCS, fields.Equip_totalWeight, tableWt); + setAttr( charCS, fields.Equip_encumberWeight, tableEnc ); + setAttr( charCS, fields.Equip_totalFlag, 1 ); + setAttr( charCS, fields.Weight_total, tableWt ); + setAttr( charCS, fields.Weight_encumbrance, tableEnc); + setAttr( charCS, fields.Weight_count, count); + setAttr( charCS, fields.Weight_qty, qty); + } else { + tableWt = attrLookup( charCS, fields.Weight_total ); + tableEnc = attrLookup( charCS, fields.Weight_encumbrance ); + count = attrLookup( charCS, fields.Weight_count ); + qty = attrLookup( charCS, fields.Weight_qty ); + }; + + let strength = attrLookup( charCS, fields.Strength, {def:false} ); + // log('itemSlotData: strength = '+strength+', flag = '+state.MagicMaster.encumbrance+', Encumbrance stored field = '+attrLookup( charCS, fields.Encumbrance )); + if (state.MagicMaster.encumbrance && !_.isUndefined(strength)) { + const parsedStr = strength.match(/(\d+)(?:[\(\[](\d+)[\)\]])?/) || [null,null]; + strength = parseInt(parsedStr[1]); + extra = parseInt(parsedStr[2]); + if (!isNaN(extra)) { + extra = Math.min(99,Math.max(0,extra)); + weights = encumberDef.stepsExt[encumberDef.exceptional.findIndex(e => e >= extra)]; + } else if (!isNaN(strength)) { + strength = Math.min(25,strength); + weights = encumberDef.stepsStr[encumberDef.strengths.findIndex(s => s >= strength)]; + } + // log('itemSlotData: strength = '+strength+', extra = '+extra+', weights = '+weights); + if (!_.isUndefined(weights)) { + for (encumbrance = 0; encumbrance < 5 && tableEnc > weights[encumbrance]; encumbrance++ ); + // log('itemSlotData: encumbrance = '+encumbrance+', current weight = '+tableEnc+', max weight = '+weights[encumbrance]); + setAttr( charCS, fields.Weight_forStr, weights.join() ); + setAttr( charCS, fields.Weight_label, encumberDef.labels[encumbrance].dispName() ); + setAttr( charCS, fields.Weight_ACmod, encumberDef.ac[encumbrance] ); + baseMove = attrLookup( charCS, fields.BaseMove ); +// let moves = encumberDef.moves[encumberDef.moves.findIndex(m => m[0] >= baseMove)]; +// move = parseInt(encumbrance < 5 ? (moves[encumbrance] || 12) : 0); + move = Math.round(baseMove*([1,2/3,1/2,1/3,1/baseMove,0][encumbrance])); + moveMod = attrLookup( charCS, fields.MoveMod ) || ''; + move = parseFloat(evalAttr(moveMod[0] === '=' ? moveMod.slice(1) : (isNaN(moveMod[0]) ? (move + moveMod) : (move+'+'+moveMod) ), charCS)); +// log('itemSlotData: moveMod = '+moveMod+', move = '+move); + if ((Math.ceil(move) !== Math.ceil(parseFloat(attrLookup( charCS, fields.Move )))) || (encumbrance !== (parseInt(attrLookup( charCS, fields.Encumbrance )) || 99))) { + if (encumbrance === 0) { + if (oldEncumbrance !== 0) sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + } else { + sendAPI( fields.roundMaster+' --addTargetStatus '+tokenID+'|Encumbrance|$'+(encumbrance+90)+'|0|'+curToken.get('name')+' is '+encumberDef.labels[encumbrance]+' and has a move of '+move+'|'+encumberDef.marker[encumbrance], senderId ); + }; + setAttr( charCS, fields.Encumbrance, encumbrance ); + setAttr( charCS, fields.Move, move ); + }; + }; + } else if (!state.MagicMaster.encumbrance && (attrLookup( charCS, fields.Encumbrance ) != 0)) { + // log('itemSlotData: flag is false but encumbered so removing status'); + setAttr( charCS, fields.Encumbrance, 0 ); + sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + }; + // log('itemSlotData: returning with count '+count+', weight '+Math.ceil(tableWt)+', encumberWt '+Math.ceil(tableEnc)); + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve({errorFlag:errFlag,count:count,qty:qty,weight:Math.ceil(tableWt),encumberWt:Math.ceil(tableEnc),encumberNum:encumbrance}); + }, 10); + } + }); + }; + + /** + * Reset the chosen flags of the Items table + **/ + + const clearItemSelection = function( charCS, Items=undefined ) { + if (_.isUndefined(Items)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + }; + let [indexes,tables] = tableGroupFind( Items, 'chosen', '1', true, true ); + if (_.isUndefined(indexes)) return Items; + for (let i=0; i a.concat(b[2].dbName().split('|')), []) : [], - superTypes = !!specs ? specs.reduce((a,b) => a.concat(b[4].dbName().split('|')), []) : [], - types = miClasses.filter(itemClass => _.isUndefined(miTypeLists[itemClass.dbName()]) || !(['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type))); + const specs = miObj.specs(), + miClasses = !!specs ? specs.reduce((a,b) => a.concat(b[2].dbName().split('|')), []) : [], + superTypes = !!specs ? specs.reduce((a,b) => a.concat(b[4].dbName().split('|')), []) : []; + let types = miClasses.filter(itemClass => _.isUndefined(miTypeLists[itemClass.dbName()]) || !(['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type))); if (!types || !types.length) { types = miClasses.filter(itemClass => ['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type)) || ['miscellaneous']; } types = types.concat(miClasses,superTypes); -// log('canBuyOrSell: banned = '+bannedList.length+' |'+bannedList+'|, allowed = '+allowedList.length+' |'+allowedList+'|, miClasses = '+miClasses+', types = '+types+', returning '+(!bannedList.length && !allowedList.length) || (!bannedList.some(b => types.includes(b.dbName())) && (!allowedList || allowedList.some(a => types.includes(a.dbName()))))); - return (!bannedList.length && !allowedList.length) || (!bannedList.some(b => types.includes(b.dbName())) && (!allowedList.length || allowedList.some(a => types.includes(a.dbName())))); } @@ -2799,21 +2868,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * whether empty slots '-' are included */ - var makeMIlist = function( charCS, senderId, includeEmpty=true, disable0=true, showTypes=false, showMagic=true, putCS, buy=false, refuse='' ) { // type + const makeMIlist = function( charCS, senderId, includeEmpty=true, disable0=true, showTypes=false, showMagic=true, putCS, buy=false, refuse='' ) { // type return new Promise(resolve => { try { - var mi, miText, qty, rows, maxSize, specs, carried, - miList = '', + const bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'); + let mi, qty, rows, maxSize, specs, carried, + cost, miObj, type, zeroOK, slotsUsed = 0, lastSlot = -1, Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), - allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), types = []; + var miList = '', + miText; + if (_.isUndefined(putCS)) putCS = charCS; Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'qty' ); @@ -2832,13 +2904,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars qty = Items[table].tableLookup( fields[fieldGroups[table].prefix+'qty'], i ); if (buy && qty == 0) continue; carried = Items[table].tableLookup( fields[fieldGroups[table].prefix+'carried'], i ); - let cost = parseFloat(evalAttr(Items[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], i ),putCS)) || 0; + cost = parseFloat(evalAttr(Items[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], i ),putCS)) || 0; if (buy && disable0 && cost === 0) continue; if (!carried.length || carried == 'carried') { - let miObj = abilityLookup( fields.MagicItemDB, mi, charCS, true ); - let type = miObj.obj ? miObj.obj[1].type.toLowerCase() : ''; + miObj = abilityLookup( fields.MagicItemDB, mi, charCS, true ); + type = miObj.obj ? miObj.obj[1].type.toLowerCase() : ''; if (mi.length > 0 && (includeEmpty || mi != '-') && (!buy || cost !== 0) && (showMagic || !type.includes('magic'))) { - let zeroOK = (type.includes('selfchargeable') || type.includes('absorbing') || type.includes('recharging')); + zeroOK = (type.includes('selfchargeable') || type.includes('absorbing') || type.includes('recharging')); if (!disable0 || zeroOK || qty > 0) { if (!buy && showTypes && miObj.obj) miText = getShownType( miObj, i ); if (mi != '-') slotsUsed++; @@ -2875,76 +2947,91 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * whether empty slots '-' are included. */ - /* Note: if buy is true or has a string value, disable0 refers to cost rather than quantity (zero quantity is always not shown if buy is true). This ensures all owned goods can be sold. */ - - var makeMIbuttons = function( tokenID, senderId, miField, qtyField, cmd, extension='', MIrowref=-1, disable0=true, includeEmpty=false, showTypes=false, showMagic=true, pickID, putID, buy='', refuse='' ) { + const makeMIbuttons = function( tokenID, senderId, miField, qtyField, cmd, extension='', MIrowref=-1, disable0=true, includeEmpty=false, showTypes=false, showMagic=true, pickID, putID, buy='', refuse='', sectNo=2 ) { + +// Note: if buy is true or has a string value, disable0 refers to cost rather than quantity (zero quantity is always not shown if buy is true). This ensures all owned goods can be sold. return new Promise(resolve => { try { - var charCS = getCharacter(tokenID), - pickCS = !_.isUndefined(pickID) ? getCharacter(pickID) : charCS, - putCS = !_.isUndefined(putID) ? getCharacter(putID) : charCS, - isView = extension == 'viewMI', - buttonNo = 0, + const charCS = getCharacter(tokenID), + pickCS = !_.isUndefined(pickID) ? getCharacter(pickID) : charCS, + putCS = !_.isUndefined(putID) ? getCharacter(putID) : charCS, + isView = extension == 'viewMI', + isGM = playerIsGM(senderId), + Items = getTableGroup( pickCS, fieldGroups.MI ), + rows = _.reduce(Items,(r,i) => r+((i && i.sortKeys) ? i.sortKeys.length : 0),0), + maxSize = attrLookup( pickCS, fields.ItemContainerSize ) || fields.MIRowsStandard, + bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), + playerConfig = getSetPlayerConfig( senderId ), + sheetVer = csVer(pickCS), + sections = {POTIONS:{n:0,name:'**Potions**'}, + DUSTS:{n:1,name:'**Dusts**'}, + WANDS:{n:2,name:'**Rings, Rods, Staves & Wands**'}, + SCROLLS:{n:3,name:'**Scrolls & Books**'}, + GEAR:{n:4,name:'**Weapons, Armour & Gear**'}, + MISC:{n:5,name:'**Miscellaneous**'}, + TREASURE:{n:6,name:'**Treasure**'}, + COINS:{n:7,name:'**Coins**'}}; + let buttonNo = 0, rowNo = -1, - isGM = playerIsGM(senderId), slotsUsed = 0, - bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), - allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), renamed, miObj, - playerConfig = getSetPlayerConfig( senderId ), - qty, maxQty, mi, miText, type, makeGrey, Items, rows, maxSize, i, - content = '', - sections = {POTIONS:{n:2,name:'**Potions**'}, - DUSTS:{n:3,name:'**Dusts**'}, - WANDS:{n:4,name:'**Rings, Rods, Staves & Wands**'}, - SCROLLS:{n:5,name:'**Scrolls & Books**'}, - GEAR:{n:6,name:'**Weapons, Armour & Gear**'}, - MISC:{n:7,name:'**Miscellaneous**'}, - TREASURE:{n:8,name:'**Treasure**'}, - COINS:{n:9,name:'**Coins**'}}; + qty, maxQty, mi, miText, type, makeGrey, i, + sectHead, buttonCount, blankAvailable, + ItemsTable, trueMI, carried, cost, zeroOK, + changedMI, miClass, types, highlight, selected, + hide, reveal, action, extIsAbility, prefix; + + var content = ''; if (isView) extension = ''; buy = !!buy; - var sheetVer = csVer(pickCS); - - Items = getTableGroup( pickCS, fieldGroups.MI ); - rows = _.reduce(Items,(r,i) => r+((i && i.sortKeys) ? i.sortKeys.length : 0),0); - maxSize = attrLookup( pickCS, fields.ItemContainerSize ) || fields.MIRowsStandard; + for (const table in Items) { - let sectHead = (sheetVer > 3.9 && playerConfig.sections !== false) ? ('}}{{Section'+sections[table].n+'='+sections[table].name+'\n') : ''; - let buttonCount = buttonNo; - let blankAvailable = false; + + if (sheetVer > 3.9 && playerConfig.sections !== false) { + sectHead = '}}{{Section'+(sectNo+sections[table].n)+'=' + + (pickID && pickID.length ? (' _All_(!magic --button '+ cmd +'|'+ tokenID +'|'+ table + extension + ') ') : '') + + sections[table].name+'\n'; + } else if (rowNo >= 0) { + sectHead = '\n'; + } else { + sectHead = '}}{{Section'+sectNo+'='; + }; + buttonCount = buttonNo; + blankAvailable = false; for (let i=0; i 0 && (includeEmpty || mi != '-')) { miObj = abilityLookup( fields.MagicItemDB, mi, pickCS, true ); renamed = !miObj.dB.toLowerCase().includes('-db'); - let changedMI = renamed ? 'Display-'+mi : mi, - miClass = !miObj.obj ? 'miscellaneous' : getShownType( miObj, i, resolveData( trueMI, fields.MagicItemDB, reItemData, pickCS, {itemType:reSpellSpecs.itemType}, i, Items[table].rowID(i) ).parsed.itemType ), - types = ['-']; + changedMI = renamed ? 'Display-'+mi : mi; + miClass = !miObj.obj ? 'miscellaneous' : getShownType( miObj, i, resolveData( trueMI, fields.MagicItemDB, reItemData, pickCS, {itemType:reSpellSpecs.itemType}, {row:i, rowID:Items[table].rowID(i)} ).parsed.itemType ); +// types = ['-']; makeGrey = makeGrey || (!showMagic && (!miObj.obj || miObj.obj[1].type.toLowerCase().includes('magic'))) || (buy && !canBuyOrSell( miObj, bannedMI, allowedMI )); if (!buy && showTypes && miObj.obj) { @@ -2953,29 +3040,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars qty = Math.min(qty,1); } } - let highlight = rowNo == MIrowref; + selected = rowNo == MIrowref; + highlight = ItemsTable.tableLookup( fields[prefix+'chosen'], i ) == 1; content += sectHead; - content += (highlight || makeGrey) ? ('') : '['; - content += (mi !== '-' ? (qty + ((qty != maxQty && isGM) ? '/'+maxQty : '') + ' ' + miText.replace(/\-/g,' ')) : '-'); + content += selected ? ('') : (makeGrey ? ('') : '['); + content += highlight ? ('') : ''; + content += (mi != '-' ? (qty + ((qty != maxQty && isGM) ? '/'+maxQty : '') + ' ' + miText.replace(/\-/g,' ')) : '-'); if (mi != '-') slotsUsed++; - let extIsAbility = isView && mi.replace(reIgnore,'').length; + extIsAbility = isView && mi.replace(reIgnore,'').length; if (extIsAbility) { - if (ItemsTable.tableLookup( fields[fieldGroups[table].prefix+'reveal'], i ) == 'view') mi = trueMI; - let hide = !miObj.obj ? '' : resolveData( mi, fields.MagicItemDB, reItemData, pickCS, {hide:reSpellSpecs.hide}, i, Items[table].rowID(i) ).parsed.hide, - reveal = (mi !== trueMI) && !!miObj.obj && hide && hide.length && hide !== 'hide'; + if (ItemsTable.tableLookup( fields[prefix+'reveal'], i ) == 'view') mi = trueMI; + hide = !miObj.obj ? '' : resolveData( mi, fields.MagicItemDB, reItemData, pickCS, {hide:reSpellSpecs.hide}, {row:i, rowID:Items[table].rowID(i)} ).parsed.hide; + reveal = (mi !== trueMI) && !!miObj.obj && hide && hide.length && hide !== 'hide'; miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, (reveal ? mi : trueMI), i, Items[table].rowID(i) ); - if (miObj.obj) miObj.obj = greyOutButtons( tokenID, pickCS, miObj.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(sheetVer < 4 ? '' : '@{selected|'+fields.ItemRowRef[0]+'}')+')') ); - extension = ' '+sendToWho(charCS,senderId,false,true)+(miObj.api ? ' ' : '')+'%{'+miObj.dB+'|'+changedMI.hyphened()+'}'; + if (miObj.obj) miObj = greyOutButtons( tokenID, pickCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(sheetVer < 4 ? '' : '@{selected|'+fields.ItemRowRef[0]+'}')+')') ); + extension = ' '+(miObj.api ? '' : sendToWho(charCS,senderId,false,true))+' %{'+miObj.dB+'|'+changedMI.hyphened()+'} !'; } else { miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, trueMI, i, Items[table].rowID(i) ); - let action = ((!miObj.obj || !miObj.obj[0]) ? '' : (miObj.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); + action = ((!miObj.obj || !miObj.obj[0]) ? '' : (miObj.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); if (renamed) { setAbility( pickCS, changedMI, action ); } else if (!!action && action.length) { miObj.obj[0].set('action',action); } } - content += (highlight || makeGrey) ? '' : '](!'+(!extIsAbility ? '' : (' '+extension+' !'))+'magic --button '+ cmd +'|'+ tokenID +'|'+ rowNo + (!extIsAbility ? extension : '')+')'; + content += (selected || makeGrey) ? '' : ((highlight ? '' : '')+('](!'+(!extIsAbility ? '' : extension)+'magic --button '+ cmd +'|'+ tokenID +'|'+ rowNo + (!extIsAbility ? extension : '')+')')); buttonNo++; sectHead = ''; }; @@ -3003,31 +3092,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * can have memorised at a particular spell level. */ - var makeNumberOfSpells = function( curToken, spellType, level, totalSpells ) { + const makeNumberOfSpells = function( curToken, spellType, level, totalSpells ) { - var charCS = getCharacter(curToken.id), - tokenName = curToken.get('name'), - spellsAtLevel, spellsSpecialist, spellsWisdom, spellsMisc, - wisdom, - content = tokenName + ' can memorise '; + const charCS = getCharacter(curToken.id); + let content = curToken.get('name') + ' can memorise '; if (spellType == 'MI') { content += 'these spells in magic items'; } else { - content += '[[[['+totalSpells+']]'; + content += '[[ [['+totalSpells+']]'; if (spellType == 'MU') { - spellsAtLevel = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); - spellsSpecialist = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); - spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0) : 0; + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0) : 0; content += '['+spellsAtLevel+' at level '+level+',+'+spellsSpecialist+' specialist, +'+spellsMisc+' misc]'; } else { - spellsAtLevel = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); - spellsWisdom = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); - wisdom = parseInt(attrLookup(charCS,fields.Wisdom)||0); - spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0) : 0; + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = parseInt(attrLookup(charCS,fields.Wisdom)||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0) : 0; content += '['+spellsAtLevel+' at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom+', + '+spellsMisc+' misc]'; } - content += ']] spells at level '+level; + content += ' ]] spells at level '+level; } return content; } @@ -3038,13 +3124,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * number can be edited.. */ - var makeEditNumberOfSpells = function( args, spellType, totalSpells ) { + const makeEditNumberOfSpells = function( args, spellType, totalSpells ) { - var mngSpellsCmd = args[0], - tokenID = args[1], - level = args[2], - curToken = getObj('graphic',tokenID), - content = curToken.get('name') + ' can memorise '; + const mngSpellsCmd = args[0], + tokenID = args[1], + level = args[2], + curToken = getObj('graphic',tokenID); + let content = curToken.get('name') + ' can memorise '; if (spellType == 'MI') { content += 'these spells in this magic item'; @@ -3061,28 +3147,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a particular spell class and level */ - var makeMiscSpellsEdit = function( args, senderId ) { - - var tokenID = args[1], - spellClass = args[2], - level = args[3], - mngSpellsCmd = args[4], - charCS = getCharacter(tokenID), - spellsAtLevel, spellsSpecialist, spellsMisc, spellsTotal, spellsWisdom, wisdom, + const makeMiscSpellsEdit = function( args, senderId ) { + + const tokenID = args[1], + spellClass = args[2], + level = args[3], + mngSpellsCmd = args[4], + charCS = getCharacter(tokenID); + let spellsMisc, spellsTotal, content = '&{template:'+fields.messageTemplate+'}{{name=Edit Level '+level+' Misc Spells}}' + '{{desc=Here\'s how '+getObj('graphic',tokenID).get('name')+' total '+spellClass+' spells are determined. ' + 'You can adjust the Miscellaneous number by clicking on it and specifying a different value}}{{desc1='; if (spellClass == 'MU') { - spellsAtLevel = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); - spellsSpecialist = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + const spellsAtLevel = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); spellsMisc = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0); spellsTotal = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_total[0],fields.MUSpellNo_total[1]])||0); content += spellsAtLevel+' MU spells at level '+level+', + '+spellsSpecialist+' specialist'; } else { - spellsAtLevel = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); - spellsWisdom = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); - wisdom = (attrLookup(charCS,fields.Wisdom)||0); + const spellsAtLevel = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = (attrLookup(charCS,fields.Wisdom)||0); spellsMisc = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0); spellsTotal = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_total[0],fields.PRSpellNo_total[1]])||0); content += spellsAtLevel+' PR spells at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom; @@ -3099,59 +3185,61 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * spell row and column arrays, and the number of live spells */ - var getStoredSpells = function( charCS, miName, miRow, miRowID ) { + const getStoredSpells = function( charCS, miName, miRow, miRowID ) { + const spellbook = miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemMUspellsList ).split(',').filter(s=>!!s); let spellTables = {}; let spellCount = 0; let rows = []; let cols = []; rows.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'pr' ) || '')); - rows = rows.join().split(',').filter(r=>!!r); cols.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'pr' ) || '')); + rows = rows.join().split(',').filter(r=>!!r); cols = cols.join().split(',').filter(c=>!!c); - if (rows.length && cols.length) { + if (cols[0] && parseInt(cols[0]) < 0) { + spellCount = spellbook.length; + } else if (rows.length && cols.length) { cols.forEach( (c,i) => { if (_.isUndefined(spellTables[c])) spellTables[c] = getTableField( charCS, {}, fields.Spells_table, fields.Spells_castValue, c ); spellCount += parseInt((spellTables[c].tableLookup( fields.Spells_castValue, rows[i] )),10); }); }; - return {count:spellCount,rows:rows,cols:cols}; + return {count:spellCount,rows:rows,cols:cols,spellbook:spellbook}; }; /* * Make a list of spells in the specified memorised/stored list */ - var makeSpellList = function( senderId, tokenID, command, selectedButton, noDash = false, submitted = false, extension = '', maxLevel = 13 ) { - - var isMU = command.toUpperCase().includes('MU'), - isPR = command.toUpperCase().includes('PR'), - isMI = command.toUpperCase().includes('MI'), - isPower = command.toUpperCase().includes('POWER'), - isView = command.toUpperCase().includes('VIEW'), - isScroll = command.toUpperCase().includes('SCROLL'), - isGM = playerIsGM(senderId), - content = '', + const makeSpellList = function( senderId, tokenID, command, selectedButton, noDash = false, submitted = false, extension = '', maxLevel = 13 ) { + + const isMU = command.toUpperCase().includes('MU'), // toWho + isPR = command.toUpperCase().includes('PR'), + isMI = command.toUpperCase().includes('MI'), + isPower = command.toUpperCase().includes('POWER'), + isView = command.toUpperCase().includes('VIEW'), + isScroll = command.toUpperCase().includes('SCROLL'), + miStore = command.includes('MI_SLOT'), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID), + miName = (attrLookup( charCS, fields.ItemChosen ) || '-').hyphened(), + MIbag = getTableGroup( charCS, fieldGroups.MI ), + oldVer = 2.1 > csVer(charCS); + + let content = '', viewCmd = '', buttonID = 0, buttonList = [], spell, spellType, spellName, - magicDB, levelSpells, table, - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - miStore = command.includes('MI_SLOT'), - miName = attrLookup( charCS, fields.ItemChosen ) || '-', + magicDB, table, miRow = attrLookup( charCS, fields.ItemRowRef ) || '', - MIbag = getTableGroup( charCS, fieldGroups.MI ), - oldVer = 2.1 > csVer(charCS), toWho = sendToWho(charCS,senderId,false,true), spellTables = [], spellLevels = 0, learnData = '', learn = false, rows = [], cols = [], - miRowID; + miRowID, isExtAbility; - miName = miName.replace(/\s/g,'-'); [miRow,table,miRowID] = tableGroupIndex( MIbag, miRow ); if (isPower && isMI) { @@ -3169,7 +3257,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars buttonList += ',' + miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemPRspellsList ) || ''; buttonList = buttonList.dbName().split(','); if (caster(charCS,'MU').clv > 0) { - if (abilityLookup( fields.MagicItemDB, miName, charCS ).obj) learnData = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, miRow, miRowID ).parsed.learn; + if (abilityLookup( fields.MagicItemDB, miName, charCS ).obj) learnData = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:miRow, rowID:miRowID} ).parsed.learn; learn = (learnData && learnData != '0' && (!isScroll || !isView)); }; @@ -3178,36 +3266,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let storedSpells = getStoredSpells( charCS, miName, miRow, miRowID ); rows = storedSpells.rows; cols = storedSpells.cols; + const isSB = parseInt(cols[0]) < 0; + let learnText, spellDB, spellValue, disabled; if (rows.length && cols.length) { _.each( cols, (c,k) => { let r = rows[k]; - if (_.isUndefined(spellTables[c])) spellTables[c] = getTable( charCS, fieldGroups.SPELLS, c ); - let spellMsg = spellTables[c].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ); - if (miStore) spellName = spellMsg; else spellName = spellTables[c].tableLookup( fields.Spells_name, r ); - let spellDB = spellTables[c].tableLookup( fields.Spells_db, r ) || fields.MU_SpellsDB, - spellValue = parseInt((spellTables[c].tableLookup( fields.Spells_castValue, r )),10), - disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); - if (!disabled) spellLevels = spellLevels + (parseInt(spellTables[c].tableLookup( fields.Spells_spellLevel, r )) || 1); - if (!noDash || spellName != '-') { + if (!isSB && _.isUndefined(spellTables[c])) spellTables[c] = getTable( charCS, fieldGroups.SPELLS, c ); + let spellMsg = !isSB ? spellTables[c].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ) : ''; + if (miStore) spellName = spellMsg; else spellName = !isSB ? spellTables[c].tableLookup( fields.Spells_name, r ) : storedSpells.spellbook[r]; + spellDB = !isSB ? (spellTables[c].tableLookup( fields.Spells_db, r ) || fields.MU_SpellsDB) : fields.MU_SpellsDB; + spellValue = !isSB ? parseInt((spellTables[c].tableLookup( fields.Spells_castValue, r )),10) : 1; + disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); + if (!disabled) spellLevels = spellLevels + (isSB ? 1 : (parseInt(spellTables[c].tableLookup( fields.Spells_spellLevel, r )) || 1)); + if (!noDash || spellName !== '-') { let renamed = !abilityLookup( spellDB, spellName ), changedSpell = renamed ? 'Display-'+spellName : spellName; spell = getAbility( spellDB, spellName, charCS ); if (!!spell.obj) { if (isView) { - spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c + extension +')') ); + spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c + extension +')') ); } else { - let action = ((!spell.obj || !spell.obj[0]) ? '' : (spell.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); - if (renamed) { - spell.obj = setAbility( charCS, changedSpell, spell.obj[0].body ); - } + let action = ((!spell.obj || !spell.obj[1]) ? '' : (spell.obj[1].body || '')).replace(reKeepButton,'[$2]($3$4'); + if (learn) action = action.replace(/\}\}\s*$/m,('}}{{Learn=Try to [Learn this spell]\lpar;\api;magic ~~learn-spell '+tokenID+'¦'+(learnData != 1 ? learnData : spellName)+'\rpar;}}')); + spell.obj[0] = setAbility( charCS, changedSpell, action ); + spell.dB = charCS.get('name'); }; - let learnText = !learn ? '' : '{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+(learnData != 1 ? learnData : spellName)+')}}'; - if (!!learn) spell.obj[0].set('action',spell.obj[0].get('action').replace(/\}\}\s*$/m,'}}'+learnText) ); }; content += (buttonID == selectedButton ? '' : ((submitted || disabled) ? '' : '[')); content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + (spellName || '-'); -// content += (((buttonID == selectedButton) || submitted || disabled) ? '' : '](!magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + (!isView ? '' : (' --display-ability '+tokenID+'|'+spellDB+'|'+spellName + extension)) + ')'); - content += ((buttonID == selectedButton) || submitted || disabled) ? '' : ('](!'+(!isView ? '' : ' '+sendToWho(charCS,senderId,false,true)+'%{' + spell.dB + '|' + changedSpell.hyphened() + '} !') + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + extension + +')'); + content += ((buttonID == selectedButton) || submitted || disabled) ? '' : ('](!'+(!isView ? '' : ' '+toWho+'%{' + spell.dB + '|' + changedSpell.hyphened() + '} !') + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + extension +')'); } buttonID++; }); @@ -3224,7 +3311,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } // build the Spell list - levelSpells = shapeSpellbook( charCS, spellType ); + let levelSpells = shapeSpellbook( charCS, spellType ); for (let lv = 1; lv < levelSpells.length; lv++) { let r = 0; @@ -3254,7 +3341,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let spellValue = parseInt((spellTables[w].tableLookup( fields.Spells_castValue, r )),10), disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); if (!noDash || spellName != '-') { - let isExtAbility = isView && spellName.replace(reIgnore,'').length; + isExtAbility = isView && spellName.replace(reIgnore,'').length; if (isExtAbility) { magicDB = spellTables[w].tableLookup( fields.Spells_db,r ); if (!magicDB || magicDB == spellName) { @@ -3263,10 +3350,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } let renamed = !abilityLookup( magicDB, spellName ), changedSpell = renamed ? 'Display-'+spellName : spellName; - spell = getAbility( magicDB, spellName, charCS ); - if (!!spell.obj) spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c +')') ); -// extension = `${!learn ? '' : ` --message ${tokenID}|Learn Spell|Try to [Learn this spell](!magic ~~learn-spell ${tokenID}¦${spellName})`} ${(spell.api ? '' : toWho)}%{${spell.dB}|${spellName}}`; - extension = `$ ${toWho}%{${spell.dB}|${changedSpell}} !`; + spell = abilityLookup( magicDB, spellName, charCS ); + if (!!spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c +')') ); + extension = ` ${toWho}%{${spell.dB}|${changedSpell}} !`; } content += (buttonID == selectedButton ? '' : ((submitted || disabled || (lv > maxLevel)) ? '' : '[')); content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + spellName.dispName(); @@ -3288,53 +3374,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu for a player to manage their spell list. */ - var makeManageSpellsMenu = function( args, senderId, msg ) { - - var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isSpell = cmd.includes('SPELL'), - isScroll = cmd.includes('SCROLL'), - isView = cmd.includes('REVIEW'), - isGM = args[0].includes('GM'), - tokenID = args[1], - level = parseInt((args[2]),10), - spellRow = args[3], - spellCol = args[4], - spellToMemorise = args[5] || '', - singleLevel = (args[7] || '').dbName() === 'single', + const makeManageSpellsMenu = function( args, senderId, msg ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isSpell = cmd.includes('SPELL'), + isScroll = cmd.includes('SCROLL'), + isView = cmd.includes('REVIEW'), + isGM = args[0].includes('GM'), + tokenID = args[1], + spellRow = args[3], + spellCol = args[4], + spellToMemorise = args[5] || '', + singleLevel = (args[7] || '').dbName() === 'single', + selectedSpell = (spellToMemorise.length > 0), + selectedSlot = (spellRow >= 0 && spellCol >= 0), + selectedBoth = selectedSpell && selectedSlot, + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let level = parseInt((args[2]),10), spellToDisplay = spellToMemorise, - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), levelSpells; if (!curToken || !charCS) { - sendDebug('makeManageSpellsMenu: invalid tokenID passed'); sendError('Internal MagicMaster parameter error'); return; } - var spellbook, - spell, - spellName, - spellValue, - tokenName = curToken.get('name'), - content, - selectedSpell = (spellToMemorise.length > 0), - selectedSlot = (spellRow >= 0 && spellCol >= 0), - selectedBoth = selectedSpell && selectedSlot, - selected, - slotSpell = '', + let spell, noToMemorise = '1', magicWord = 'spell', spellTables = [], magicDB, magicType, tableType, editCmd, reviewCmd, memCmd, - levelLimit, nextLevel, - col, rep, - l, r, c, w; + levelLimit; if (isPower) { level = 1; @@ -3389,8 +3466,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars levelSpells = shapeSpellbook( charCS, magicType ); - spellbook = attrLookup( charCS, [fields.Spellbook[0]+((fields.SpellsFirstColNum || levelSpells[level].book != 1) ? levelSpells[level].book : ''), fields.Spellbook[1]] ) || ''; - content = '&{template:'+fields.menuTemplate+'}{{name=Select Slot to Use in '+tokenName+'\'s '+tableType+'s}}' + const spellbook = attrLookup( charCS, [fields.Spellbook[0]+((fields.SpellsFirstColNum || levelSpells[level].book != 1) ? levelSpells[level].book : ''), fields.Spellbook[1]] ) || ''; + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Slot to Use in '+curToken.get('name')+'\'s '+tableType+'s}}' + ((isPower) ? ('{{subtitle=All Powers -1 means "At Will"}}') : ('{{subtitle=Level '+level+' spells}}')); if (msg && msg.length > 0) { @@ -3403,7 +3480,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let renamed = !abilityLookup( magicDB, spellToDisplay ), changedSpell = renamed ? 'Display-'+spellToDisplay : spellToDisplay; spell = getAbility( magicDB, spellToDisplay, charCS ); - if (spell.obj) spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+level +'|'+ spellRow +'|'+ spellCol +'|'+spellToMemorise+')') ); + if (spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+level +'|'+ spellRow +'|'+ spellCol +'|'+spellToMemorise+')') ); content += '...Optionally [Review '+spellToDisplay+'](! '+sendToWho(charCS,senderId,false,true)+'%{'+spell.dB+'|'+changedSpell.hyphened()+'})}}'; } else { content += '...Optionally Review the '+magicWord+'}}'; @@ -3413,7 +3490,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // build the Spell list - r = 0; + let w, c, r = 0; + let spellName, spellValue, selected; while (levelSpells[level].spells > 0) { c = levelSpells[level].base; for (w = 1; (w <= fields.SpellsCols) && (levelSpells[level].spells > 0); w++) { @@ -3439,15 +3517,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables = []; } - if (level < levelLimit) { - nextLevel = (levelSpells[(level+1)].spells>0) ? (level+1) : 1; - } else { - nextLevel = 1; - } + const nextLevel = (level >= levelLimit) ? 1 : ((levelSpells[(level+1)].spells>0) ? (level+1) : 1); + const slotSpell = !selectedSlot ? '' : attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || ''; - if (selectedSlot) { - slotSpell = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || ''; - } content += '}}{{desc2=...Then\n' + '3. '+(selectedBoth ? '[' : '') + 'Memorise '+(selectedSpell ? spellToDisplay : ' the '+magicWord ) @@ -3468,43 +3540,43 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * own memorised spells. */ - var makeStoreMIspell = function(args,senderId,msg = '') { + const makeStoreMIspell = function(args,senderId,msg = '') { // isAny - var command = (args[0] || '').toUpperCase(), - tokenID = args[1], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + let command = (args[0] || '').toUpperCase(), + tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeStoreMIspell: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var isMU = command.includes('MU'), - isMI = command.includes('MI'), + const isMU = command.includes('MU'), + isMI = command.includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)], + item = attrLookup( charCS, fields.ItemChosen ) || '-', + row = attrLookup( charCS, fields.ItemRowRef ) || '', + itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + wisLevel = casterLevel( charCS, (isMU ? 'MU' : 'PR') ), + oldVer = 2.1 > csVer(charCS), + tokenName = curToken.get('name'); + + let MIbutton = args[(isMI ? 2 : 5)], isAdd = command.includes('ADD'), - isChange = command.includes('CHANGE'), - spellButton = args[(isMI ? 5 : 2)], - spellRow = args[(isMI ? 6 : 3)], - spellCol = args[(isMI ? 7 : 4)], - MIbutton = args[(isMI ? 2 : 5)], - MIrow = args[(isMI ? 3 : 6)], - MIcol = args[(isMI ? 4 : 7)], isAny = command.includes('ANY') || (isAdd && MIbutton < 0), - item = attrLookup( charCS, fields.ItemChosen ) || '-', - row = attrLookup( charCS, fields.ItemRowRef ) || '', - itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), - wisLevel = casterLevel( charCS, (isMU ? 'MU' : 'PR') ), - extra = isAdd ? '_ADD' : (isAny ? '_ANY' : ''), + isChange = command.includes('CHANGE'), spellName = 'spell', MIspellName = '', - oldVer = 2.1 > csVer(charCS), levelLimit = false, - col, - tokenName = curToken.get('name'), table, itemRow, rowID; + let extra = isAdd ? '_ADD' : (isAny ? '_ANY' : ''); + [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); if (!itemObj.obj) { @@ -3512,14 +3584,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } else { let itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,rowID); - let storeSpells = (itemData.store || 'store').toLowerCase(); + const storeSpells = (itemData.store || 'store').toLowerCase(); isAdd = isAdd || storeSpells === 'add'; isChange = isChange || storeSpells === 'change'; isAny = isAny || (storeSpells === 'any' || (isAdd && MIbutton < 0)); levelLimit = itemData.lvlimit == 1; }; - var memSpells, storedSpells, storedLevels, itemQty = 99; + let memSpells, storedSpells, storedLevels, itemQty = 99; [storedSpells,storedLevels] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_MI_SLOT : BT.PR_MI_SLOT)+extra, MIbutton, !isAny, false, ('|'+spellButton+'|'+spellRow+'|'+spellCol) ); if (levelLimit) { @@ -3527,26 +3599,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } [memSpells] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_TO_STORE : BT.PR_TO_STORE)+extra, spellButton, true, false, ('|'+MIbutton+'|'+MIrow+'|'+MIcol), (itemQty - storedLevels) ); - var content = '&{template:'+fields.menuTemplate+'}{{name=Store Spell in '+tokenName+'\'s Magic Items}}' + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spell in '+tokenName+'\'s Magic Items}}' + '{{subtitle=Storing ' + (isMU ? 'MU' : 'PR') + ' spells}}' + '{{desc=**1.Choose a spell to store**\n'+memSpells+'}}' + '{{desc1=**2.'+(isAny ? 'Optionally c' : 'C')+'hoose where to store it**\n'+(storedSpells || 'No spells currently stored')+'}}'; if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; } if (MIbutton >= 0) { - MIspellName = attrLookup( charCS, (oldVer ? fields.Spells_macro : fields.Spells_msg), fields.Spells_table, MIrow, MIcol ) || '-'; + MIspellName = attrLookup( charCS, (oldVer ? fields.Spells_macro : fields.Spells_msg), {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; if ((isAdd || isAny) && MIspellName === '-') MIbutton = -1; } - var canStore = isAny || isChange || (isAdd && MIspellName === '-') || (spellName.dbName() == MIspellName.dbName()), - itemRef = (isNaN(parseInt(itemRow)) ? item : itemRow+'/'+item); + let canStore = isAny || isChange || (isAdd && MIspellName === '-') || (spellName.dbName() == MIspellName.dbName()), + itemRef = (isNaN(parseInt(itemRow)) ? item : itemRow+'/'+item); content += '{{desc2=3.Once both spell and '+(isAny ? 'optionally ' : '')+'slot selected\n' + ((canStore && (spellButton >= 0) && (isAdd || isAny || MIbutton >= 0)) ? '[' : '') + ((isAdd || isAny) && MIbutton < 0 ? 'Add ' : 'Store ')+spellName - + ((canStore && (spellButton >= 0)) ? (((isAdd || isAny) && MIbutton<0) ? ('](!magic --button ADD_TO_SPELLS|'+tokenID+'|'+itemRef+'|'+command+'|1|STORE-MI-SPELL|'+spellName+'|'+wisLevel+'||'+MIspellName+'|'+spellRow+'|'+spellCol+')') : ('](!magic --button '+(isMU ? BT.MISTORE_MUSPELL : BT.MISTORE_PRSPELL)+extra+'|'+tokenID+'|'+MIbutton+'|'+MIrow+'|'+MIcol+'|'+spellButton+'|'+spellRow+'|'+spellCol+')')) - : '') + + ((canStore && (spellButton >= 0)) ? (((isAdd || isAny) && MIbutton<0) ? ('](!magic --button ADD_TO_SPELLS|'+tokenID+'|'+itemRef+'|'+command+'|1|STORE-MI-SPELL|'+spellName+'|'+wisLevel+'||'+MIspellName+'|'+spellRow+'|'+spellCol+')') + : ('](!magic --button '+(isMU ? BT.MISTORE_MUSPELL : BT.MISTORE_PRSPELL)+extra+'|'+tokenID+'|'+MIbutton+'|'+MIrow+'|'+MIcol+'|'+spellButton+'|'+spellRow+'|'+spellCol+')')) + : '') + ((spellButton >= 0 && MIbutton >= 0 && !canStore) ? ' Spells don\'t match. Must be the same\n' : '') + ' or switch to ['+(isMU ? 'Priest' : 'Wizard')+'](!magic --mem-spell MI-'+(isMU ? 'PR' : 'MU')+extra+'|'+tokenID+') spells' + '}}'; @@ -3560,67 +3633,64 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create a menu for a player to cast a spell */ - - var makeCastSpellMenu = function( args, senderId, submitted = false ) { - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - tokenID = args[1], - spellButton = args[2], - spellRow = args[3], - spellCol = args[4], - charged = (args[5] || '').toString().toLowerCase() == 'true', - - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - magicDB, + const makeCastSpellMenu = function( args, senderId, submitted = false ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + tokenID = args[1], + spellButton = args[2], + spellRow = args[3], + spellCol = args[4], + charged = (args[5] || '').toString().toLowerCase() == 'true', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!curToken || !charCS) { + sendError('Internal MagicMaster parameter error'); + return; + } + + const miName = attrLookup( charCS, fields.ItemChosen ) || '', + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let magicDB, magicWord = 'spell', spell, spellName = '', - content = '', maxLevel = 13, learn = false, learnText = '', - tokenName, selectCmd, - storeCmd; - - if (!curToken || !charCS) { - sendDebug('makeCastSpellMenu: invalid tokenID passed'); - sendError('Internal MagicMaster parameter error'); - return content; - } - - var miName = attrLookup( charCS, fields.ItemChosen ) || '', + storeCmd, itemRow = parseInt(attrLookup( charCS, fields.ItemRowRef )), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - itemTable, itemRowID; -// itemTable = attrLookup( charCS, fields.ItemTableRef ); + itemTable, + itemRowID; [itemRow,itemTable,itemRowID] = tableGroupIndex( Items, itemRow ); if (isNaN(itemRow)) { [itemRow,itemTable,itemRowID] = tableGroupFind( Items, 'name', miName ); }; - tokenName = curToken.get('name'); - content = '&{template:'+fields.menuTemplate+'}{{name='; + let tokenName = curToken.get('name'); + let content = '&{template:'+fields.menuTemplate+'}{{name='; if (!isPower) {content += 'What Spell is ' + tokenName + ' casting?}}{{subtitle=Casting '}; if (isPower) { content += 'What Power is ' + tokenName + ' using?}}{{subtitle=Using Powers'; - if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, fields.Spells_table, spellRow, spellCol ) || fields.PowersDB;} + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.PowersDB;} magicWord = 'power'; selectCmd = isMI ? BT.MI_POWER : BT.POWER; storeCmd = isMI ? BT.CAST_MIPOWER : BT.USE_POWER; } else if (isMI) { content += 'MI stored spells'; - if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, fields.Spells_table, spellRow, spellCol ) || fields.MU_SpellsDB;} + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.MU_SpellsDB;} selectCmd = charged ? BT.MI_SCROLL : BT.MI_SPELL; storeCmd = charged ? BT.CAST_SCROLL : BT.CAST_MISPELL; if (caster(charCS,'MU').clv > 0) { let miObj = abilityLookup( fields.MagicItemDB, miName, charCS ); - if (miObj.obj) learn = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, itemRow, itemRowID ).parsed.learn == 1; + if (miObj.obj) learn = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:itemRow, rowID:itemRowID} ).parsed.learn == 1; }; } else if (isMU) { content += 'MU spells'; @@ -3642,20 +3712,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - content += '}}{{desc=' + (makeSpellList( senderId, tokenID, selectCmd, spellButton, true, submitted, '|'+charged, maxLevel )[0]); + content += '}}{{section=' + (makeSpellList( senderId, tokenID, selectCmd, spellButton, true, submitted, '|'+charged, maxLevel )[0]); if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; if (spellName.replace(reIgnore,'').length) { spell = getAbility( magicDB, spellName, charCS ); learnText = (learn ? '{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+spellName+')}}' : ''); } else { spellButton = -1; } - } else { - spellName = ''; } - content += '}}{{desc1=Select '+magicWord+' above, then ' + content += '}}{{'+(((spellButton < 0) || submitted)?'section1':'highlight1')+'=Select '+magicWord+' above, then ' + (((spellButton < 0) || submitted) ? '' : '[') + 'Cast '+(spellName.length > 0 ? spellName : magicWord) + (((spellButton < 0) || submitted) ? '' : '](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + spellName.hyphened() + '}' + learnText + ' ' @@ -3670,39 +3738,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu for a player to view a character's spells */ - var makeViewMemSpells = function( args, senderId ) { - - var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isScroll = cmd.includes('SCROLL'), - tokenID = args[1], - spellButton = args[2], - learn = (String(args[3]) || '').toUpperCase() === 'LEARN', - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - spell, - spellName = '', - spellValue, - content = '', - magicWord = 'spell', + const makeViewMemSpells = function( args, senderId ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isScroll = cmd.includes('SCROLL'), + tokenID = args[1], + spellButton = args[2], + learn = (String(args[3]) || '').toUpperCase() === 'LEARN', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let magicWord = 'spell', magicDB, magicType, tableType, - col, rep, viewCmd, - levelSpells = [], - levelLimit, - l, w, r, c, - buttonID = 0; + levelLimit; if (!charCS) { - sendDebug('makeViewMemSpells: invalid tokenID passed'); sendError('Internal MagicMaster parameter error'); - return content; + return; } - var title = isMI ? attrLookup( charCS, fields.ItemChosen ) : curToken.get('name'); + const title = isMI ? attrLookup( charCS, fields.ItemChosen ) : curToken.get('name'); if (isPower) { levelLimit = 1; magicType = 'POWER'; @@ -3728,11 +3788,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars magicDB = fields.PR_SpellsDB; } - content = '&{template:'+fields.menuTemplate+'}{{name=View '+title+'\'s currently memorised '+magicWord+'s}}' - + '{{subtitle=' + tableType + '}}' - + '{{desc=' + ((makeSpellList( senderId, tokenID, viewCmd, spellButton, true ))[0] || 'No '+magicWord+'s currently memorised'); - - content += '}}{{desc1=Select the '+magicWord+' above that you want to view the details of. It will not be cast and will remain in your memorised '+magicWord+' list.}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name=View '+title+'\'s currently memorised '+magicWord+'s}}' + + '{{subtitle=' + tableType + '}}' + + '{{desc=' + ((makeSpellList( senderId, tokenID, viewCmd, spellButton, true ))[0] || 'No '+magicWord+'s currently memorised') + + '}}{{desc1=Select the '+magicWord+' above that you want to view the details of. It will not be cast and will remain in your memorised '+magicWord+' list.}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -3741,21 +3800,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if they want to cast the same spell/power/MI again */ - var makeCastAgainMenu = function( args, senderId ) { + const makeCastAgainMenu = function( args, senderId ) { - var isMU = args[0].toUpperCase().includes('MU'), - isPR = args[0].toUpperCase().includes('PR'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - spellName = args[5] || '-', - charCS = getCharacter( args[1] ), - macroDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : (isPR ? fields.PR_SpellsDB : fields.MagicItemDB)), - spell = getAbility( macroDB, spellName, charCS ), - content = '&{template:'+fields.menuTemplate+'}{{name='+args[5]+'}}' - + '{{desc=[Use another charge?](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + (args[5].hyphened()) + '} ' - + '!magic --button '+ args[0] +'|'+ args[1] +'|'+ args[2] +'|'+ args[3] +'|'+ args[4]+ ')}}'; + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + spellName = args[5] || '-', + charCS = getCharacter( args[1] ); if (charCS) { + const macroDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : (isPR ? fields.PR_SpellsDB : fields.MagicItemDB)), + spell = getAbility( macroDB, spellName, charCS ), + content = '&{template:'+fields.menuTemplate+'}{{name='+args[5]+'}}' + + '{{desc=[Use another charge?](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + (args[5].hyphened()) + '} ' + + '!magic --button '+ args[0] +'|'+ args[1] +'|'+ args[2] +'|'+ args[3] +'|'+ args[4]+ ')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, args[1] ); } return; @@ -3766,14 +3825,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a short or a long rest. The long rest option can be shown * as disabled. */ - - var makeRestSelectMenu = function( args, longRestEnabled, senderId ) { + + const makeRestSelectMenu = function( args, longRestEnabled, senderId ) { - var tokenID = args[0], - casterType = args[2] || 'MU+PR', - charCS = getCharacter(tokenID), - curToken = getObj('graphic',tokenID), - content = '&{template:'+fields.menuTemplate+'}{{name=Select Type of Rest for '+curToken.get('name')+'}}' + const tokenID = args[0], + casterType = args[2] || 'MU+PR', + charCS = getCharacter(tokenID), + curToken = getObj('graphic',tokenID); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Type of Rest for '+curToken.get('name')+'}}' + '{{desc=[Short Rest](!magic --rest '+tokenID+'|short|'+casterType+') or ' + (longRestEnabled ? '[' : '') + 'Long Rest' @@ -3792,26 +3852,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Allow the player to switch from one to the other when looting **/ - var makeLootMenu = function(senderId,args,menuType) { + const makeLootMenu = function(senderId,args,menuType) { - var buy = (args[0] || '') === BT.BUY_TREASURE, - tokenID = args[1], - pickID = args[3], - putID = args[4]; - - var pickCS = getCharacter( pickID ), - putCS = getCharacter( putID ); + const buy = (args[0] || '') === BT.BUY_TREASURE, + tokenID = args[1], + pickID = args[3], + putID = args[4], + pickCS = getCharacter( pickID ), + putCS = getCharacter( putID ); if (!pickCS || !putCS) { - sendDebug( 'makeLootMenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } - var pickName = pickCS.get('name'), - putName = putCS.get('name'), - treasure = (attrLookup( pickCS, fields.Money_treasure ) || ''), - content = '&{template:'+fields.menuTemplate+'}{{name=View Treasure from ' + pickName + '}}'; + const pickName = pickCS.get('name'), + treasure = (attrLookup( pickCS, fields.Money_treasure ) || ''); + + let content = '&{template:'+fields.menuTemplate+'}{{name=View Treasure from ' + pickName + '}}'; if (treasure && treasure.length > 0) { content += treasure; @@ -3828,22 +3886,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create a menu to view or use a magic item */ - + async function makeViewUseMI( args, senderId, menuType ) { try { - var action = args[0].toUpperCase(), - tokenID = args[1], - MIrowref = args[2] || -1, - isGM = playerIsGM(senderId), - isView = action.includes('VIEW'), - charCS = getCharacter(tokenID), - learn = '', - playerConfig = getSetPlayerConfig( senderId ), - sectType; + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = args[2] || -1, + isGM = playerIsGM(senderId), + isView = action.includes('VIEW'), + charCS = getCharacter(tokenID), + playerConfig = getSetPlayerConfig( senderId ); + + let sectType; if (!charCS) { - sendDebug( 'makeViewUseMI: tokenID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } @@ -3857,16 +3914,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars menuType = 'long'; } } - var shortMenu = menuType == 'short', - actionText = (isView ? 'View' : 'Use'), - selectAction = (isView ? (shortMenu ? BT.CHOOSE_VIEW_MI : BT.VIEW_MI) : BT.CHOOSE_USE_MI), - submitAction = (isView ? BT.VIEW_MI : BT.USE_MI), - Items = getTableGroup( charCS, fieldGroups.MI ), - content = '&{template:'+fields.menuTemplate+'}{{name='+actionText+' '+charCS.get('name')+'\'s Magic Items}}' + const shortMenu = menuType == 'short', + actionText = (isView ? 'View' : 'Use'), + selectAction = (isView ? (shortMenu ? BT.CHOOSE_VIEW_MI : BT.VIEW_MI) : BT.CHOOSE_USE_MI), + submitAction = (isView ? BT.VIEW_MI : BT.USE_MI), + Items = getTableGroup( charCS, fieldGroups.MI ); + + let content = '&{template:'+fields.menuTemplate+'}{{name='+actionText+' '+charCS.get('name')+'\'s Magic Items}}' + '{{Section=Select a Magic Item below to '+actionText + (isView ? '. It will not be used and will remain in your Magic Item Bag' : ', and then press the **Use Item** button') - + '. Note that some items, such as Rods, Staves or Wands, may need to be taken in-hand using *Change Weapon* and used via the *Attack* action. *'+sectType+' sections*}}' - + '{{Section0='; + + '. Note that some items, such as Rods, Staves or Wands, may need to be taken in-hand using *Change Weapon* and used via the *Attack* action.'; + if (!shortMenu) content += ' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+BT.CHOOSE_VIEW_MI +'|'+tokenID+'|'+MIrowref+')'; + content += '}}{{section0='; if (shortMenu) { content += '[Select a Magic Item](!magic --button '+selectAction+'|'+tokenID+'|?{Which Magic Item?'; @@ -3878,15 +3937,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '}}'; } if (shortMenu || !isView) { - content += '{{section10='; if (MIrowref >= 0) { + content += '{{highlight=Select above then '; let selectedMI = tableGroupLookup( Items, 'name', MIrowref ), - displayMI = selectedMI.dispName(), - trueMI = tableGroupLookup( Items, 'trueName', MIrowref ), - trueType = tableGroupLookup( Items, 'trueType', MIrowref ).toLowerCase(), reveal = tableGroupLookup( Items, 'reveal', MIrowref ).toLowerCase(), - qty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, tableRow,tableRowID,table; + + const displayMI = selectedMI.dispName(), + trueMI = tableGroupLookup( Items, 'trueName', MIrowref ), + trueType = tableGroupLookup( Items, 'trueType', MIrowref ).toLowerCase(), + qty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0; [tableRow,table,tableRowID] = tableGroupIndex( Items, MIrowref ); @@ -3895,40 +3955,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if ((shortMenu && isView && reveal == 'view') || (!isView && (reveal == 'use' || reveal == 'view'))) { selectedMI = trueMI.hyphened(); } - let hide = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {hide:reSpellSpecs.hide}, tableRow, tableRowID ).parsed.hide, - showDesc = (selectedMI !== trueMI) && hide && hide.length && hide !== 'hide', - renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj, - magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, false, isGM, (showDesc ? selectedMI : trueMI), tableRow, tableRowID ), - changedMI = renamed ? 'Display-'+selectedMI : selectedMI; + const hide = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {hide:reSpellSpecs.hide}, {row:tableRow, rowID:tableRowID} ).parsed.hide, + showDesc = (selectedMI !== trueMI) && hide && hide.length && hide !== 'hide', + renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj, + changedMI = renamed ? 'Display-'+selectedMI : selectedMI; + + let magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, false, isGM, (showDesc ? selectedMI : trueMI), tableRow, tableRowID ); if (isView && !!magicItem.obj) { - magicItem.obj = greyOutButtons( tokenID, charCS, magicItem.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+')') ); - } else { - let action =(!magicItem.obj || !magicItem.obj[0]) ? '' : (magicItem.obj[0].get('action') || '').replace(reKeepButton,'[$2]($3$4'); - if (renamed || !magicItem.obj || !magicItem.obj[0]) { - setAbility( charCS, changedMI, action ); - } else if (!!action && action.length) { - magicItem.obj[0].set('action',action); - } - }; - if (magicItem.obj && caster(charCS,'MU').clv > 0) { - learn = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, tableRow, tableRowID ).parsed.learn; - if ((!isView && learn && learn != '0' && learn != '1' && !!abilityLookup( fields.MU_SpellsDB, learn ).obj)) { - setAbility( charCS, changedMI, magicItem.obj[0].get('action').replace(/\}\}$/m,'}}'+'{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+learn+')}}')); + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+')') ); + } else if (magicItem.obj && magicItem.obj[1]) { + if (reKeepButton.test(magicItem.obj[1].body || '')) { + magicItem.obj[0] = setAbility( charCS, changedMI, (magicItem.obj[1].body || '').replace(reKeepButton,'[$2]($3$4') ); + magicItem.dB = charCS.get('name'); + if (caster(charCS,'MU').clv > 0) { + const learn = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:tableRow, rowID:tableRowID} ).parsed.learn; + if (learn && learn != '0' && learn != '1' && !!abilityLookup( fields.MU_SpellsDB, learn ).obj) { + magicItem.obj[0] = setAbility( charCS, changedMI, magicItem.obj[0].get('action').replace(/\}\}$/m,'}}'+'{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+learn+')}}')); + }; + }; }; }; - content += '['+actionText+' '+displayMI+'](! '+((magicItem.api && !isView) ? '' : sendToWho(charCS,senderId,false,true))+'%{'+magicItem.dB+'|'+(changedMI.hyphened())+'} !magic --button '+ submitAction +'|'+ tokenID +'|'+ MIrowref +')'; + content += '['+actionText+' '+displayMI+'](! '+((magicItem.api && !isView) ? '' : sendToWho(charCS,senderId,false,true))+'%{'+magicItem.dB+'|'+(changedMI.hyphened())+'}' + +' !magic --button '+ submitAction +'|'+ tokenID +'|'+ MIrowref +')'; } else { - content += ''+actionText+' Magic Item'; + content += '{{section10=Select above then
    '+actionText+' Magic Item
    '; } content += '}}'; } if (isView) { - let slotData = itemSlotData( Items ); - content += '{{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'; + const slotData = await itemSlotData( tokenID, Items, senderId, false ); +// log('makeViewUseMI: slotData = {{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'); + content += '{{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'; } menuType = (shortMenu ? 'long' : 'short'); - content += '{{section12=[Swap to a '+menuType+' menu](!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}'; + content += '{{section12= _Swap to '+menuType+' menu_(!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}' +// content += '{{section12=*Swap to '+menuType+' menu*}}' + +// [Swap to a '+menuType+' menu](!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; @@ -3937,73 +4001,45 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - /** - * Make a menu to display when a Player selects to use - * a power of a Magic Item - */ -/* don't enable! - var makeUseMIpowerMenu = function( args, senderId ) { - - var tokenID = args[1], - powerName = args[2], - castLevel = args[3], - itemName = args[4], - MIlibrary = args[5], - power = args[6], - powerLib = args[7], - charCS = getCharacter(tokenID), - tokenName = getObj('graphic',tokenID).get('name'), - spell = getAbility( powerLib, power, charCS ), - item = getAbility( MIlibrary, itemName, charCS ), - toWho = sendToWho(charCS,senderId,false,true), - content = '&{template:'+fields.menuTemplate+'}{{name='+itemName+'\'s '+powerName+' power}}' - + '{{desc='+tokenName+' is about to use '+itemName+'\'s '+powerName+' power. Is this correct?}}' - + '{{desc1=[Use '+powerName+'](!magic --button '+ BT.MI_POWER_USED +'|'+ tokenID +'|'+ powerName +'|'+ itemName +'|'+ castLevel - + ' '+(spell.api ? '' : toWho)+'%{'+spell.dB +'|'+ (power.hyphened()) +'})' - + ' or [Return to '+itemName+'](! '+(item.api ? '' : toWho)+'%{'+MIlibrary+'|'+(itemName.hyphened())+'})\nOr just do something else}}'; - sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); - return; - } -*/ - /** * Create the Edit Magic Item Bag menu. Allow for a short version if * the Short Menus status flag is set, and highlight selected buttons **/ - async function makeEditBagMenu(args,senderId,msg='') { + async function makeEditBagMenu(args,senderId,msg='') { // magicItem try { - var cmd = (args[0] || '').toUpperCase(), - tokenID = args[1], - MIrowref = args[2], - itemName = args[3] || '', - charges = args[4], - selectedMI = itemName.hyphened(), - displayMI = selectedMI, + const cmd = (args[0] || '').toUpperCase(), + tokenID = args[1], + MIrowref = args[2], + itemName = args[3] || '', + charges = args[4], + selectedMI = itemName.hyphened(), + charCS = getCharacter( tokenID ), + cmdStr = args.join('|'); + + let displayMI = selectedMI, alphaLists = state.MagicMaster.alphaLists, - charCS = getCharacter( tokenID ), - cmdStr = args.join('|'), tableIndex, tableRowID, table, MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); [tableIndex,table,tableRowID] = tableGroupIndex( MItables, MIrowref ); if (!charCS) { - sendDebug( 'makeEditMImenu: Invalid character ID passed' ); sendError( 'Invalid MagicMaster argument' ); return; } - var qty, mi, playerConfig, magicItem, removeMI, sectType, menuType, - selected = !!selectedMI && selectedMI.length > 0, - remove = (selectedMI.toLowerCase() == 'remove'), - bagSlot = !!MIrowref && parseInt(MIrowref) >= 0, - queries = '', + const selected = !!selectedMI && selectedMI.length > 0, + remove = (selectedMI.toLowerCase() == 'remove'), + bagSlot = !!MIrowref && parseInt(MIrowref) >= 0, + playerConfig = getSetPlayerConfig( senderId ); + + let qty, mi, removeMI, sectType, menuType, content = '&{template:'+fields.menuTemplate+'}{{name=Edit Magic Item Bag}}'; - - playerConfig = getSetPlayerConfig( senderId ); + if (playerConfig) { menuType = playerConfig.editBagType; alphaLists = playerConfig.alphaLists; @@ -4012,16 +4048,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars menuType = 'long'; sectType = 'hide'; } - var shortMenu = menuType == 'short', - editMartial = cmd.includes('MARTIAL'), - editAll = cmd.includes('ALLITEMS'), - optionCmd = (editMartial ? BT.EDITMARTIAL_OPTION : (editAll ? BT.EDITALLITEMS_OPTION : BT.EDITMI_OPTION)), - chooseCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), - redoCmd = (editMartial ? BT.REDO_MARTIAL_MI : (editAll ? BT.REDO_ALLITEMS_MI : BT.REDO_CHOOSE_MI)), - slotCmd = (editMartial ? BT.SLOT_MARTIAL_MI : (editAll ? BT.SLOT_ALLITEMS_MI : BT.SLOT_MI)), - storeCmd = (editMartial ? BT.STORE_MARTIAL_MI : (editAll ? BT.STORE_ALLITEMS_MI : BT.STORE_MI)), - reviewCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), - removeCmd = (editMartial ? BT.REMOVE_MARTIAL_MI : (editAll ? BT.REMOVE_ALLITEMS_MI : BT.REMOVE_MI)); + const shortMenu = menuType == 'short', + editMartial = cmd.includes('MARTIAL'), + editAll = cmd.includes('ALLITEMS'), + optionCmd = (editMartial ? BT.EDITMARTIAL_OPTION : (editAll ? BT.EDITALLITEMS_OPTION : BT.EDITMI_OPTION)), + chooseCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + redoCmd = (editMartial ? BT.REDO_MARTIAL_MI : (editAll ? BT.REDO_ALLITEMS_MI : BT.REDO_CHOOSE_MI)), + slotCmd = (editMartial ? BT.SLOT_MARTIAL_MI : (editAll ? BT.SLOT_ALLITEMS_MI : BT.SLOT_MI)), + storeCmd = (editMartial ? BT.STORE_MARTIAL_MI : (editAll ? BT.STORE_ALLITEMS_MI : BT.STORE_MI)), + reviewCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + removeCmd = (editMartial ? BT.REMOVE_MARTIAL_MI : (editAll ? BT.REMOVE_ALLITEMS_MI : BT.REMOVE_MI)); + let magicItem; if (selected && !remove) { magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, null, null, null, tableIndex, tableRowID ); @@ -4031,7 +4068,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { let renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj; if (renamed) displayMI = 'Display-'+selectedMI; - magicItem.obj = greyOutButtons( tokenID, charCS, magicItem.obj, (renamed ? displayMI : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+'|'+selectedMI+')') ); + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? displayMI : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+'|'+selectedMI+')') ); }; }; @@ -4040,17 +4077,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (!shortMenu || !selected) { - let potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',alphaLists), - scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',alphaLists), - rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',alphaLists), - weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',alphaLists), - ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',alphaLists), - armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',alphaLists), - rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',alphaLists), - equip = getMagicList(fields.MagicItemDB,miTypeLists,'equipment',senderId,'',false,'',alphaLists), - misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',alphaLists); + const potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,'equipment',senderId,'',false,'',alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',alphaLists); - content += '{{Section=**1.Choose what item to store** *show '+(alphaLists ? 'full' : 'alphabetic')+' lists*\n' + content += '{{Section=**1.Choose what item to store** _show '+(alphaLists ? 'full' : 'alphabetic')+' lists_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|'+cmd+')\n' + (editMartial ? '' : '[Potion](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Potion to store|'+potions+'}|'+charges+')') + (editMartial ? '' : '[Scroll](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Scroll to store|'+scrolls+'}|'+charges+')') + (editMartial ? '' : '[Rods, Staves, Wands](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Rod Staff Wand to store|'+rods+'}|'+charges+')') @@ -4079,7 +4116,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '2.Select the item to **remove** '; } else { if (!selected) content += 'Select an Item above then\n'; - content += '**2.Select a slot to add it to** '+(!shortMenu ? ('*'+sectType+' sections*') : '')+'\n'; + content += '**2.Select a slot to add it to** '+(!shortMenu ? ('_'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')') : '')+'\n'; } if (shortMenu) { @@ -4099,23 +4136,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '}|'+selectedMI+'|)' + ' as slot to '+(remove ? 'remove' : 'store it in')+', click to change}}'; } -/* if (!shortMenu || selected) { - if (!remove) { - if (shortMenu) { - content += '{{Section1=**1.Item chosen** ['+itemName+'](!magic --button '+redoCmd+'|'+tokenID+'|'+MIrowref+'), click to reselect}}'; - } - } else { - } - } -*/ if (!shortMenu || (selected && bagSlot)) { menuType = (shortMenu ? 'long' : 'short'); content += '{{desc2=**3.'; if (!remove) { + let queries = ''; qty = String(qty)+'+1'; if (selected) { - let chosenData = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, tableIndex, tableRowID ).parsed; + let chosenData = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:tableIndex, rowID:tableRowID} ).parsed; qty = chosenData.qty || (selectedMI.trueCompare(removeMI) ? qty : 1); queries = parseQuery( chosenData.query ); } @@ -4145,18 +4174,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * on Character Sheets. Hidden information can be what the MI really is, * which the DM can set using this menu. */ - + async function makeGMonlyMImenu(args, senderId, msg) { try { - var cmd = args[0], - tokenID = args[1], - MIrowref = args[2], - MItoStore = args[3], - charCS = getCharacter(tokenID), - cmdStr = args.join('|'), + const cmd = args[0], + tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID), + cmdStr = args.join('|'); + + let MItoStore = args[3]; - ensureUnique = function( Items, name ) { + const ensureUnique = function( Items, name ) { var count = 1, newName = name, table,index; @@ -4165,82 +4195,82 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (!_.isUndefined(index)) newName = name + String(count++); } while (!_.isUndefined(index)); return newName; - }; + }; if (!charCS) { - sendDebug('makeGMonlyMImenu: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var config = getSetPlayerConfig( senderId ), - sectType = (config.sections !== false ? 'hide' : 'show'), - alphaLists = _.isUndefined(config.alphaLists) ? true : config.alphaLists, - qty, mi, - potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',!!alphaLists), - scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',!!alphaLists), - rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',!!alphaLists), - weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',!!alphaLists), - ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',!!alphaLists), - armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',!!alphaLists), - rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',!!alphaLists), - misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',!!alphaLists), - equip = getMagicList(fields.MagicItemDB,miTypeLists,['equipment','light'],senderId,'',false,'',!!alphaLists), - treasure = getMagicList(fields.MagicItemDB,miTypeLists,'treasure',senderId,'',false,'',!!alphaLists), - coins = getMagicList(fields.MagicItemDB,miTypeLists,'coin',senderId,'',false,'',false), - gems = getMagicList(fields.MagicItemDB,miTypeLists,'gem',senderId,'',false,'',!!alphaLists), - services = getMagicList(fields.MagicItemDB,miTypeLists,'services',senderId,'',false,'',!!alphaLists), - dmitems = getMagicList(fields.MagicItemDB,miTypeLists,'dmitem',senderId,'',false,'',false), - content = '&{template:'+fields.menuTemplate+'}{{name=Edit '+charCS.get('name')+'\'s Magic Item Bag}}' + const config = getSetPlayerConfig( senderId ), + sectType = (config.sections !== false ? 'hide' : 'show'), + alphaLists = _.isUndefined(config.alphaLists) ? true : config.alphaLists, + potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',!!alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',!!alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',!!alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',!!alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',!!alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',!!alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',!!alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',!!alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,['equipment','light'],senderId,'',false,'',!!alphaLists), + treasure = getMagicList(fields.MagicItemDB,miTypeLists,'treasure',senderId,'',false,'',!!alphaLists), + coins = getMagicList(fields.MagicItemDB,miTypeLists,'coin',senderId,'',false,'',false), + gems = getMagicList(fields.MagicItemDB,miTypeLists,'gem',senderId,'',false,'',!!alphaLists), + services = getMagicList(fields.MagicItemDB,miTypeLists,'services',senderId,'',false,'',!!alphaLists), + dmitems = getMagicList(fields.MagicItemDB,miTypeLists,'dmitem',senderId,'',false,'',false); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Edit '+charCS.get('name')+'\'s Magic Item Bag}}' + (msg && msg.length ? '{{ ='+msg+'}}' : '') - + '{{Section=**1. Choose something to store** *show '+(alphaLists ? 'complete' : 'alphabetic')+' list*\n'; - - content += '[Potion](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Potion?|'+potions+'})' - + '[Scroll](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Scroll?|'+scrolls+'})' - + '[Rods, Staves, Wands](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Rod, Staff or Wand?|'+rods+'})' - + '[Weapon](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Weapon?|'+weapons+'})' - + '[Ammo](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ammo?|'+ammo+'})' - + '[Armour](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which piece of Armour?|'+armour+'})' - + '[Ring](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ring?|'+rings+'})' - + '[Miscellaneous MI](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Misc MI?|'+misc+'})' - + '[Equipment](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Equipment?|'+equip+'})' - + '[Treasure](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Treasure?|'+treasure+'})' - + '[Services](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Service?|'+services+'})' - + '[Coins](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Coin?|'+coins+'})' - + '[Gems](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Gem?|'+gems+'})' - + '[DM only list](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which DM only item?|'+dmitems+'})}}'; - content += '{{Section1=**2. Choose slot to edit or store in** *'+sectType+' sections*\n'; - - var Items = getTableGroup( charCS, fieldGroups.MI ), - slotName = (MIrowref >= 0) ? tableGroupLookup( Items, 'name', MIrowref ) : '', - slotActualName = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueName', MIrowref ) : '', - slotType = (MIrowref >= 0) ? tableGroupLookup( Items, 'type', MIrowref ) : '', - slotTrueType = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueType', MIrowref ) : '', - slotQty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, - slotActualQty = parseInt(tableGroupLookup( Items, 'trueQty', MIrowref )) || 0, - slotCost = parseFloat(tableGroupLookup( Items, 'cost', MIrowref )) || 0, - slotReveal = (MIrowref >= 0) ? tableGroupLookup( Items, 'reveal', MIrowref ) : '', - slotCursed = slotType.toLowerCase().includes('cursed'), - - chosenMI = (MItoStore.length > 0), - chosenSlot = (MIrowref >= 0), - chosenBoth = (chosenMI && chosenSlot), - hideAvail = chosenBoth, - chosenEither = (chosenMI || chosenSlot), - hiddenMI = slotName !== slotActualName, - greyButton = '', - selectableSlot = chosenSlot ? '[' : greyButton, - selectableBoth = chosenBoth ? '[' : greyButton, + + '{{Section=[Add from DMG Treasure Tables](!cmd --addTreasure '+tokenID+'||1|gm-only-mi|)\nor}}' + + '{{Section1=**1. Choose something to store** _show '+(alphaLists ? 'complete' : 'alphabetic')+' list_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|GMONLY)\n' + + '[Potion](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Potion?|'+potions+'})' + + '[Scroll](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Scroll?|'+scrolls+'})' + + '[Rods, Staves, Wands](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Rod, Staff or Wand?|'+rods+'})' + + '[Weapon](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Weapon?|'+weapons+'})' + + '[Ammo](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ammo?|'+ammo+'})' + + '[Armour](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which piece of Armour?|'+armour+'})' + + '[Ring](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ring?|'+rings+'})' + + '[Miscellaneous MI](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Misc MI?|'+misc+'})' + + '[Equipment](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Equipment?|'+equip+'})' + + '[Treasure](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Treasure?|'+treasure+'})' + + '[Services](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Service?|'+services+'})' + + '[Coins](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Coin?|'+coins+'})' + + '[Gems](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Gem?|'+gems+'})' + + '[DM only list](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which DM only item?|'+dmitems+'})}}' + + '{{Section2=**2. Choose slot to edit or store in** _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')}}'; + + const Items = getTableGroup( charCS, fieldGroups.MI ), + slotName = (MIrowref >= 0) ? tableGroupLookup( Items, 'name', MIrowref ) : '', + slotActualName = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueName', MIrowref ) : '', + slotType = (MIrowref >= 0) ? tableGroupLookup( Items, 'type', MIrowref ) : '', +// slotTrueType = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueType', MIrowref ) : '', + slotQty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, + slotActualQty = parseInt(tableGroupLookup( Items, 'trueQty', MIrowref )) || 0, + slotCost = parseFloat(tableGroupLookup( Items, 'cost', MIrowref )) || 0, + slotReveal = (MIrowref >= 0) ? tableGroupLookup( Items, 'reveal', MIrowref ) : '', + slotCursed = slotType.toLowerCase().includes('cursed'), + + chosenMI = (MItoStore.length > 0), + chosenSlot = (MIrowref >= 0), + chosenBoth = (chosenMI && chosenSlot), + chosenEither = (chosenMI || chosenSlot), + hiddenMI = slotName !== slotActualName, + greyButton = '', + selectableSlot = chosenSlot ? '[' : greyButton, + selectableBoth = chosenBoth ? '[' : greyButton, + selectableEither = chosenEither ? '[' : greyButton, + hiddenSlot = hiddenMI ? '[' : greyButton, + revealType = (!slotReveal || slotReveal.toLowerCase() === 'manual' ? 'Manually' : ('on '+slotReveal)), + intelligence = Math.max( (parseInt(attrLookup( charCS, fields.Intelligence )) || 0), (parseInt(attrLookup( charCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( charCS, fields.HP )) || 0, + sentient = (intelligence > 0 && hp > 0), + showTypes = parseInt(attrLookup( charCS, fields.ItemContainerHide )); + + let hideAvail = chosenBoth, hideableBoth = selectableBoth, - selectableEither = chosenEither ? '[' : greyButton, - hiddenSlot = hiddenMI ? '[' : greyButton, - revealType = (!slotReveal || slotReveal.toLowerCase() === 'manual' ? 'Manually' : ('on '+slotReveal)), - intelligence = Math.max( (parseInt(attrLookup( charCS, fields.Intelligence )) || 0), (parseInt(attrLookup( charCS, fields.Monster_int )) || 0)), - hp = parseInt(attrLookup( charCS, fields.HP )) || 0, - sentient = (intelligence > 0 && hp > 0), containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0, containerSize = attrLookup( charCS, fields.ItemContainerSize ), - showTypes = parseInt(attrLookup( charCS, fields.ItemContainerHide )), spellStoring = false, looksLike = false, queries = '', @@ -4249,7 +4279,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [index,table,rowID] = tableGroupIndex( Items, MIrowref ); // build the character's visible MI Bag - content += await makeMIbuttons( tokenID, senderId, 'max', 'current', 'GM-MIslot', '|'+MItoStore, MIrowref, false, true ); + + content += await makeMIbuttons( tokenID, senderId, 'max', 'current', 'GM-MIslot', '|'+MItoStore, MIrowref, false, true, false, true, undefined, undefined, '', '', 3 ); content += '}}'; if (hiddenMI) { @@ -4262,16 +4293,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (chosenSlot) { slotObj = getAbility( fields.MagicItemDB, slotActualName, charCS, false, true, slotActualName, index, rowID ); if (!!slotObj.obj) { - spellStoring = reCastMIspellCmd.test(slotObj.obj[1].body) || reCastMIpowerCmd.test(slotObj.obj[1].body); + spellStoring = reCastViewMIspellCmd.test(slotObj.obj[1].body) || reCastViewMIpowerCmd.test(slotObj.obj[1].body); looksLike = reLooksLike.test(slotObj.obj[1].body); if (looksLike && !hiddenMI && !chosenMI) { - MItoStore = ensureUnique( Items, getShownType( slotObj, MIrowref, resolveData( slotActualName, fields.MagicItemDB, reItemData, charCS, {itemType:reSpellSpecs.itemType}, index, rowID ).parsed.itemType )); + MItoStore = ensureUnique( Items, getShownType( slotObj, MIrowref, resolveData( slotActualName, fields.MagicItemDB, reItemData, charCS, {itemType:reSpellSpecs.itemType}, {row:index, rowID:rowID} ).parsed.itemType )); hideAvail = MItoStore !== slotName; hideableBoth = hideAvail ? '[' : greyButton; } } } - var storableSlot = (spellStoring && chosenSlot) ? '[' : ''; + const storableSlot = (spellStoring && chosenSlot) ? '[' : ''; if (_.isUndefined(containerSize)) { containerSize = fields.MIRowsStandard; @@ -4304,22 +4335,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.ItemContainerType, containerNo ); setAttr(charCS, fields.ItemOldContainerType, containerNo); - var itemName = MItoStore; + const itemName = MItoStore; MItoStore = (MItoStore || '').hyphened(); initQty = String(slotQty)+'+1'; if (chosenMI) { itemObj = getAbility( fields.MagicItemDB, MItoStore, charCS, false, true, MItoStore, index, rowID ); if (itemObj.obj) { - chosenData = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, index, rowID ); + chosenData = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:index, rowID:rowID} ); initQty = chosenData.parsed.qty || (itemName.trueCompare(slotName) ? initQty : 1); queries = parseQuery( chosenData.parsed.query ); } }; - var reviewItem = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotActualName : itemName), - reviewObj = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotObj : itemObj), - renamed = !abilityLookup( fields.MagicItemDB, reviewItem ).obj, - changedItem = renamed ? 'Display-'+reviewItem : reviewItem; - if (!state.MagicMaster.viewActions && reviewObj && reviewObj.obj) reviewObj.obj = greyOutButtons( tokenID, charCS, reviewObj.obj, (renamed ? changedItem : ''), ('[Return to menu](!magic --button GM-MImenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') ); + const reviewItem = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotActualName : itemName), + renamed = !abilityLookup( fields.MagicItemDB, reviewItem ).obj, + changedItem = renamed ? 'Display-'+reviewItem : reviewItem; + + let reviewObj = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotObj : itemObj); + + if (!state.MagicMaster.viewActions && reviewObj && reviewObj.obj) reviewObj = greyOutButtons( tokenID, charCS, reviewObj, (renamed ? changedItem : ''), ('[Return to menu](!magic --button GM-MImenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') ); content += '{{desc3=**3. '+selectableBoth+(chosenBoth ? ('Store '+itemName+'](!magic --button GM-StoreMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|[[?{Quantity?|'+initQty+'}]]||'+queries+')') : ('Store'+(chosenSlot ? ('d '+slotActualName) : itemName)+''))+' **' + ' or '+hideableBoth+(hideAvail ? ('Hide '+slotName+' as '+itemName+'](!magic --button GM-HideMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') : ((hiddenMI ? ('Hidden as '+slotName) : ('Hide Item'+(chosenMI?(' as '+itemName):'')))+''))+'
    ' @@ -4335,8 +4368,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars + selectableSlot+(hiddenMI ? 'Reveal Now' : 'Reset Qty to Max')+(chosenSlot ? ('](!magic --button GM-ResetSingleMI|'+tokenID+'|'+MIrowref+') ') : '     ')+'
    ' + selectableSlot+'Change Cost'+(chosenSlot ? ('](!magic --button GM-SetMIcost|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How much should '+slotName+' now cost (currently '+slotCost+'GP)?|'+slotCost+'})') : '    ')+'
    ' + selectableSlot+'REMOVE MI'+(chosenSlot ? '](!magic --button GM-DelMI|'+tokenID+'|'+MIrowref+'|'+slotActualName+') ' : '     ')+'}}' - + '{{desc5=or [Edit Treasure Description](!magic --button GM-TreasureMenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')\n' - + '['+containerSize+' slot](!magic --button GM-SetTokenSize|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many slots does this container have?|'+containerSize+'})' + + '{{desc5=['+containerSize+' slot](!magic --button GM-SetTokenSize|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many slots does this container have?|'+containerSize+'})' + '['+containerType+'](!magic --button GM-SetTokenType|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{What type of token is this?|Untrapped Container,1|Trapped container,4|Force Inanimate Container,6|Force Sentient Creature,7})\n' + '['+(showTypes ? 'Show as Item types' : 'Show as Item names')+'](!magic --button GM-HideAsTypes|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|'+showTypes+') in container. ' + '[BLANK BAG](!magic --button GM-BlankBag|'+tokenID+')' @@ -4352,21 +4384,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create the DM's Edit Treasure menu */ - - var makeEditTreasureMenu = function(args,senderId,msg) { + + const makeEditTreasureMenu = function(args,senderId,msg) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeEditTreasureMenu: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var charName = charCS.get('name'), - treasure = attrLookup( charCS, fields.Money_treasure ) || '{{Treasure=None found}}', - content = '&{template:'+fields.menuTemplate+'}{{name=Current treasure for '+charName+'}}' + const charName = charCS.get('name'), + treasure = attrLookup( charCS, fields.Money_treasure ) || '{{Treasure=None found}}'; + + let content = '&{template:'+fields.menuTemplate+'}{{name=Current treasure for '+charName+'}}' + treasure +'{{=----- End of current Treasure ----}}' + '{{desc1=[Add](!magic --button GM-AddTreasure|'+tokenID+'|?{Title for Treasure?}|?{Treasure text}) or ' + '[Edit](!magic --button GM-EditTreasure|'+tokenID+') or ' @@ -4390,171 +4422,147 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function makeShortPOPmenu( args, senderId, buy=false, menuType ) { try { - var tokenID = args[1], - pickID = args[3], - putID = args[4], - pickRow = args[2] || -1, - putRow = args[5] || -1; + const tokenID = args[1], + pickID = args[3], + putID = args[4]; + let pickRow = args[2] || -1, + putRow = args[5] || -1; if (!pickID || !putID) { - sendDebug( 'makeShortPOPmenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; }; - - var cmdStr = args.join('|'), - putCS = getCharacter( putID ), - pickCS = getCharacter( pickID ), - pickingUp = (tokenID == putID), - shortMenu = pickingUp, - sectType = 'hide', - pickOrPut = (pickingUp ? (!buy ? 'Pick up' : 'Buy') : (!buy ? 'Put away' : 'Sell')), - charCS = getCharacter(tokenID), - traderCS = pickingUp ? pickCS : putCS, - isGM = playerIsGM(senderId), - sell = buy && tokenID === pickID, - buy = buy && !sell, - reTrade = {nobuy:reClassSpecs.nobuy, nosell:reClassSpecs.nosell, tobuy:reClassSpecs.tobuy, tosell:reClassSpecs.tosell}; - + const putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ), + pickingUp = (tokenID == putID), + pickOrPut = (pickingUp ? (!buy ? 'Pick up' : 'Buy') : (!buy ? 'Put away' : 'Sell')), + charCS = getCharacter(tokenID), + traderCS = pickingUp ? pickCS : putCS, + isGM = playerIsGM(senderId), + sell = buy && tokenID === pickID, + reTrade = {nobuy:reClassSpecs.nobuy, nosell:reClassSpecs.nosell, tobuy:reClassSpecs.tobuy, tosell:reClassSpecs.tosell}; + if (!putCS || !pickCS) { - sendDebug( 'makeShortPOPmenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } - var pickCmd = sell ? BT.SELL_PICK : (buy ? BT.BUY_PICK : BT.POP_PICK), - storeCmd = sell ? BT.SELL_STORE : (buy ? BT.BUY_STORE : BT.POP_STORE), - match = '['+((attrLookup( traderCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/i) || ['',''])[1]+']', - tradeParse = parseData(match, reTrade, false), - tradeClass = classObjects( traderCS, senderId, reTrade )[0].classData, - tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade, '', '', [], false ).parsed, - noTrade = buy ? (tradeParse.nosell || tradingRace.nosell || tradeClass.nosell) : (sell ? (tradeParse.nobuy || tradingRace.nobuy || tradeClass.nobuy) : ''), - toTrade = buy ? (tradeParse.tosell || tradingRace.tosell || tradeClass.tosell) : (sell ? (tradeParse.tobuy || tradingRace.tobuy || tradeClass.tobuy) : ''); + + buy = buy && !sell; + + const pickCmd = sell ? BT.SELL_PICK : (buy ? BT.BUY_PICK : BT.POP_PICK), + storeCmd = sell ? BT.SELL_STORE : (buy ? BT.BUY_STORE : BT.POP_STORE), + match = '['+((attrLookup( traderCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/i) || ['',''])[1]+']', + tradeParse = parseData(match, reTrade, false), + tradeClass = classObjects( traderCS, senderId, reTrade )[0].classData, + tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade, {defBase:false} ).parsed, + noTrade = buy ? (tradeParse.nosell || tradingRace.nosell || tradeClass.nosell) : (sell ? (tradeParse.nobuy || tradingRace.nobuy || tradeClass.nobuy) : ''), + toTrade = buy ? (tradeParse.tosell || tradingRace.tosell || tradeClass.tosell) : (sell ? (tradeParse.tobuy || tradingRace.tobuy || tradeClass.tobuy) : ''); + + let shortMenu = pickingUp, + sectType = 'hide'; + args[0] = pickCmd; -// log('makeShortPOPmenu: match = '+match+', noTrade = '+noTrade+', toTrade = '+toTrade); - if (!menuType) { - var playerConfig = getSetPlayerConfig( senderId ); + const playerConfig = getSetPlayerConfig( senderId ); if (playerConfig) { shortMenu = !!!((pickingUp ? playerConfig.pickUpMIType : playerConfig.putAwayMIType) == 'long'); - sectType = ((playerConfig.sections !== false || csVer(pickCS) < 4) ? 'hide' : 'show'); + sectType = ((playerConfig.sections !== false || csVer(pickCS) < 4) ? 'Hide' : 'Show'); } } else { shortMenu = !!!(menuType.toLowerCase() == 'long'); } menuType = shortMenu ? 'long' : 'short'; - var putName = putCS.get('name'), - pickName = pickCS.get('name'), - qty, mi, miTrueName, i, - pickItems = getTableGroupField( pickCS, {}, fieldGroups.MI, 'name' ), - bagSize = (attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows), - showTypes = parseInt(attrLookup( pickCS, fields.ItemContainerHide )), - treasure = (attrLookup( pickCS, fields.Money_treasure ) || '{{desc1=and there is no treasure here, either}}'), + const putName = putCS.get('name'), + pickName = pickCS.get('name'), + showTypes = parseInt(attrLookup( pickCS, fields.ItemContainerHide )); + + let treasure = (attrLookup( pickCS, fields.Money_treasure ) || '{{desc1=There is no other treasure here}}'), content = '&{template:'+fields.menuTemplate+'}{{name='+((sell || buy) ? (pickName + ' sells items to '+putName) : ('Take from ' + pickName + ' to add to ' + putName + '\'s Items of Equipment'))+'}}', - putItems, miObj, pickedMI, pickedTrueMI, pickableQty, pickedType, miType, - magicItems = '', miList = '', slotsUsed, miTable; - + miTrueName, mi, pickedMI, miType, miTable, + fullMsg = '', magicItems = '', miList = ''; + + let pickItems = getTableGroupField( pickCS, {}, fieldGroups.MI, 'name' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'trueName' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'qty' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'type' ); - putRow = -1; - if (pickRow >= 0) { - pickedMI = tableGroupLookup( pickItems, 'name', pickRow ) || ''; - pickedTrueMI = (tableGroupLookup( pickItems, 'trueName', pickRow ) || '').dbName() || '-'; - pickableQty = tableGroupLookup( pickItems, 'qty', pickRow ) || ''; - pickedType = (tableGroupLookup( pickItems, 'type', pickRow ) || '').dbName() || '-'; - let miTrueObj = abilityLookup( fields.MagicItemDB, pickedTrueMI, pickCS ); - miTable = miTrueObj.obj ? getItemTable( miTrueObj.obj[1].type ) : 'GEAR'; - putItems = getTableField( putCS, {}, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'name'] ); - putItems = getTableField( putCS, putItems, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'trueName'] ); - putItems = getTableField( putCS, putItems, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'type'] ); - let lowerMI = pickedMI.dbName().replace(/v\d+$/,'') || '-'; - for (i = 0; i < putItems.sortKeys.length; i++) { - mi = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'name'],i) || '').dbName().replace(/v\d+$/,'') || '-'; - if (_.isUndefined(mi)) break; - if (mi != lowerMI) continue; - miTrueName = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'trueName'],i) || '').dbName() ||'-'; - if (miTrueName != pickedTrueMI) continue; - miType = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'type'],i) || pickedType); - if (miType.dbName() !== '' && (miType.dbName() !== pickedType || !stackable.includes(miType.toLowerCase()))) continue; - putRow = i; - break; - } - if (showTypes && !buy) { - miObj = abilityLookup( fields.MagicItemDB, pickedMI, pickCS ); - pickedMI = !miObj.obj ? pickedMI : getShownType( miObj, pickRow ); - } - if (putRow < 0) { - if (slotsUsed >= bagSize) { - sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); - return; - } else { - putItems = getTable( putCS, fieldGroups[miTable] ); - putRow = putItems.tableFind( fields[fieldGroups[miTable].prefix+'name'], '-', false ); - if (_.isUndefined(putRow)) { - putItems = putItems.addTableRow(); - putRow = putItems.sortKeys.length-1; - } - } - } + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'chosen' ); + + let putItems = getTableGroup( putCS, fieldGroups.MI ); + const slotData = await itemSlotData(tokenID,putItems,senderId,false); + + let [foundButtons,foundTables] = tableGroupFind( pickItems, 'chosen', 1, true, true ), + chosen = !_.isUndefined(foundButtons) ? foundButtons.length : 0; + pickRow = !_.isUndefined(foundButtons) ? indexTableGroup( pickItems, foundTables[0], foundButtons[0] ) : -1; + + const bagSize = parseInt(attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); + if (parseInt(slotData.count)+parseInt(chosen) > bagSize) { + sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); + foundButtons = undefined; + pickRow = -1; + fullMsg = '{{rowhighlight=mistyrose}}{{highlight=There are not enough slots left to store all the selected items}}' }; - - var putNameTable = getTableGroupField( putCS, {}, fieldGroups.MI, 'name' ), - putNameTable = getTableGroupField( putCS, putNameTable, fieldGroups.MI, 'weight' ), - putNameTable = getTableGroupField( putCS, putNameTable, fieldGroups.MI, 'qty' ), - slotData = itemSlotData(putNameTable); - if (putRow >= 0) putRow = indexTableGroup( putNameTable, miTable, putRow ); - if (pickingUp) content += treasure; + [putRow,miTable,pickedMI] = findPutRow( pickID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotData.count+chosen ); - content += '{{Section='+putName+' has [['+(attrLookup( putCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs'; + if (putRow >= 0) putRow = indexTableGroup( putItems, miTable, putRow ); - let tradeText = (toTrade ? ('\n'+(buy ? pickName : putName)+' can '+(buy ? 'sell' : 'buy')+' these: '+toTrade.replace(/\|/g,', ')+'.') : '') - + (noTrade ? ('\n'+(toTrade ? 'but' : (buy ? pickName : putName))+' cannot '+(buy ? 'sell' : 'buy')+' these: '+noTrade.replace(/\|/g,', ')+'.') : '') - + (((buy || sell) && !shortMenu) ? ('\nItems that can\'t be traded with this trader are grey (try someone else).') : '') - + ((buy || sell) ? ('\nItems of zero value don\'t appear') : ''); + const tradeText = (toTrade ? ('\n'+(buy ? pickName : putName)+' can '+(buy ? 'sell' : 'buy')+' these: '+toTrade.replace(/\|/g,', ')+'.') : '') + + (noTrade ? ('\n'+(toTrade ? 'but' : (buy ? pickName : putName))+' cannot '+(buy ? 'sell' : 'buy')+' these: '+noTrade.replace(/\|/g,', ')+'.') : '') + + (((buy || sell) && !shortMenu) ? ('\nItems that can\'t be traded with this trader are grey (try someone else).') : '') + + ((buy || sell) ? ('\nItems of zero value don\'t appear') : ''); if (shortMenu) { miList = await makeMIlist( pickCS, senderId, false, !sell, showTypes, true, putCS, toTrade || (buy || sell), noTrade || '' ); shortMenu = shortMenu && (miList.split('|').length > 2); } if (shortMenu) { - content += 'Press the **[Select]** button to select the item you want to '+pickOrPut+' from a list of items, ' + content += '{{Section10=Press the **[Select]** button to select the item you want to '+pickOrPut+' from a list of items, ' + 'then press the **[Store]** button to automatically put it away in an empty slot' + (buy ? 'or **[Review]** button to review before buying' : '')+'}}' + '{{Select=[Select Item to '+pickOrPut+'](!magic --button '+pickCmd+'|'+tokenID+'|?{'+pickOrPut+' which Item?'+miList+'}|'+pickID+'|'+putID+'|'+putRow+')}}' - + (tradeText.length ? ('{{Trade Terms='+tradeText+'}}') : '') - + '{{Store='; + + (tradeText.length ? ('{{Trade Terms='+tradeText+'}}') : (pickingUp ? treasure : '')) } else { - magicItems = await makeMIbuttons( tokenID, senderId, 'current', 'current', pickCmd, '|'+pickID+'|'+putID+'|'+putRow, pickRow, !sell, false, showTypes, true, pickID, putID, toTrade || (buy || sell), noTrade || '' ); + magicItems = await makeMIbuttons( tokenID, senderId, 'current', 'current', pickCmd, '|'+pickID+'|'+putID+'|'+putRow, -1, !sell, false, showTypes, true, pickID, putID, toTrade || (buy || sell), noTrade || '', 2 ); if (magicItems && magicItems.length) { - content += 'Select an item you want to '+pickOrPut+(csVer(pickCS) >= 4 ? (' *'+sectType+' sections*') : '')+'\n' + content += '{{Section10=Select an item you want to '+pickOrPut+'\n' + magicItems+'}}' - + (tradeText.length ? ('{{desc1=*Trade Terms: *'+tradeText+'}}') : '') - + '{{desc2=' + + (tradeText.length ? ('{{Section11=*Trade Terms: *'+tradeText+'}}') : (pickingUp ? treasure : '')); } } + content += '{{Section12='+putName+' has [['+(attrLookup( putCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots and carries a total weight of [['+slotData.weight+']]lbs}}' + + fullMsg + + '{{'; + if (!shortMenu && (!magicItems || !magicItems.length)) { content = messages.header + '{{desc=' + pickCS.get('name') + ' ' + messages.fruitlessSearch + treasure; sendParsedMsg( tokenID, content, senderId ); } else { - content +=((pickRow >= 0 && putRow >= 0) ? '[' : '') - + pickOrPut+' '+((pickRow >= 0) ? pickedMI : 'item') - + ((pickRow >= 0 && putRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) +// content +=((pickRow >= 0 && putRow >= 0) ? ('Highlight='+(shortMenu?'Store ':'')+'[') : ((shortMenu?'Store=':'Section14=')+'')) +// + pickOrPut+' '+((pickRow >= 0) ? pickedMI.dispName() : 'item') +// + ((pickRow >= 0 && putRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) +// + (buy || sell ? ' and store' : '')+' in a free slot'; + content +=(!_.isUndefined(foundButtons) ? ('Highlight=') : (shortMenu?'Store=':'Section14=')) + + (!_.isUndefined(foundButtons) ? ((shortMenu?'Store ':'')+'[') : ('')) + + pickOrPut+' '+( chosen > 1 ? 'selected items' : ((pickRow >= 0) ? pickedMI.dispName() : 'item')) + + ((pickRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) + (buy || sell ? ' and store' : '')+' in a free slot'; if (buy) { - miObj = getAbility( fields.MagicItemDB, pickedMI, charCS ); - let renamed = !miObj || !miObj.obj, - changedMI = renamed ? 'Display-'+pickedMI : pickedMI; + let miObj = getAbility( fields.MagicItemDB, pickedMI, charCS ); + const renamed = !miObj || !miObj.obj; + const changedMI = renamed ? 'Display-'+pickedMI : pickedMI; args[0] = pickCmd; - if (miObj.obj) miObj.obj = greyOutButtons( tokenID, charCS, miObj.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+(args.join('|'))+')') ); + if (miObj.obj) miObj = greyOutButtons( tokenID, charCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+(args.join('|'))+')') ); content +='\nor '+(((pickRow >= 0 && putRow >= 0) ? '[' : '')+ 'Review '+((pickRow >= 0) ? pickedMI : 'item') + ((pickRow >= 0 && putRow >= 0) ? ('](! '+sendToWho(charCS,senderId,false,true)+'%{'+miObj.dB+'|'+(changedMI.hyphened())+'})') : '' )); }; - content += '}}{{desc3=[Use '+menuType+' menu](!magic --button '+(pickingUp ? BT.PICKMI_OPTION : BT.PUTMI_OPTION)+'|'+tokenID+'|'+menuType+'|'+pickID+'|'+putID+'|'+(buy || sell)+')}}'; + content += '}}{{desc9=
    ' + + '' + + '
    _Use '+menuType+' menu_(!magic --button '+(pickingUp ? BT.PICKMI_OPTION : BT.PUTMI_OPTION)+'|'+tokenID+'|'+menuType+'|'+pickID+'|'+putID+'|'+(buy || sell)+') _Select Everything_(!magic --button '+pickCmd+'|'+tokenID+'|All|'+pickID+'|'+putID+'|'+putRow+')'+(csVer(pickCS) >= 4 ? (' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+args.join('|')+')') : '')+'
    ' + + '
    }}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); } return; @@ -4567,64 +4575,61 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create the Spells menus */ - var makeMUSpellsMenu = function( args, senderId ) { + const makeMUSpellsMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeMUSpellsMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Magic User Spells menu}}' - + '{{Section1=[Cast MU spell](!magic --cast-spell MU|'+tokenID+')' - + '[View MU Spellbook](!magic --view-spell MU|'+tokenID+')}}' - + '{{Section2=[Short Rest for L1 MU Spells](!magic --rest '+tokenID+'|short|MU)' - + '[Long Rest and recover MU spells](!magic --rest '+tokenID+'|long|MU|1)' - + '[Memorise MU spells](!magic --mem-spell MU|'+tokenID+')}}' - + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Magic User Spells menu}}' + + '{{Section1=[Cast MU spell](!magic --cast-spell MU|'+tokenID+')' + + '[View MU Spellbook](!magic --view-spell MU|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 MU Spells](!magic --rest '+tokenID+'|short|MU)' + + '[Long Rest and recover MU spells](!magic --rest '+tokenID+'|long|MU|1)' + + '[Memorise MU spells](!magic --mem-spell MU|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; - var makePRSpellsMenu = function( args, senderId ) { + const makePRSpellsMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makePRSpellsMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Clerical Spells menu}}' - + '{{Section1=[Cast Priest spell](!magic --cast-spell PR|'+tokenID+')' - + '[View Priest Spellbook](!magic --view-spell PR|'+tokenID+')}}' - + '{{Section2=[Short Rest for L1 Priest Spells](!magic --rest '+tokenID+'|short|PR)' - + '[Long Rest and recover Priest spells](!magic --rest '+tokenID+'|long|PR|1)' - + '[Memorise Priest spells](!magic --mem-spell PR|'+tokenID+')}}' - + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Clerical Spells menu}}' + + '{{Section1=[Cast Priest spell](!magic --cast-spell PR|'+tokenID+')' + + '[View Priest Spellbook](!magic --view-spell PR|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 Priest Spells](!magic --rest '+tokenID+'|short|PR)' + + '[Long Rest and recover Priest spells](!magic --rest '+tokenID+'|long|PR|1)' + + '[Memorise Priest spells](!magic --mem-spell PR|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; - var makePowersMenu = function( args, senderId ) { + const makePowersMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makePowersMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Powers menu}}' + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Powers menu}}' + '{{Section1=[Use Power](!magic --cast-spell POWER|'+tokenID+') ' + '[View Powers](!magic --view-spell POWER|'+tokenID+')}}' + '{{Section2=[Long Rest](!magic --rest '+tokenID+'|LONG) ' @@ -4639,14 +4644,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * requested level drain (or boost) to be applied to. **/ - var makeLevelDrainMenu = function( args, classes, senderId, msg, totalHP ) { + const makeLevelDrainMenu = function( args, classes, senderId, msg, totalHP ) { - var tokenID = args[0], - charCS = getCharacter(tokenID), - drainLevels = parseInt(args[1]) || -1, - absLevels = Math.abs(drainLevels), - multiLevels = absLevels > 1, - content = '&{template:'+fields.menuTemplate+'}{{title=Level '+(drainLevels > 0 ? 'Boost' : 'Drain')+'}}'+(msg ? '{{Section='+msg+'}}' : '') + const tokenID = args[0], + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, + absLevels = Math.abs(drainLevels), + multiLevels = absLevels > 1; + + let content = '&{template:'+fields.menuTemplate+'}{{title=Level '+(drainLevels > 0 ? 'Boost' : 'Drain')+'}}'+(msg ? '{{Section='+msg+'}}' : '') + '{{desc='+getObj('graphic',tokenID).get('name')+' is being '+(drainLevels > 0 ? 'boosted by' : 'drained of')+' '+absLevels+' level'+(multiLevels ? 's' : '') + '. You will be asked for your Constitution HP adjustment of '+attrLookup( charCS, fields.HPconAdj )+' and the HP dice roll to '+(drainLevels > 0 ? 'add.' : 'deduct - enter the value previously rolled when leveling up') + '. Which class do you want/have to '+(drainLevels > 0 ? 'gain' : 'lose')+' the ' @@ -4685,27 +4691,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function makeSpellsMenu( args, senderId, msg='' ) { try { - var lists = args[0].toUpperCase(), - tokenID = args[1], + let lists = args[0].toUpperCase(); + + const tokenID = args[1], + cmd = args[3].toUpperCase(), + level = parseInt(args[4]) || 1, + retMenu = (args[5] || 'VIEW-ITEM').toUpperCase(), + spellName = args[6].dispName(), + spell = args[6].hyphened(), + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + storeBoth = lists.includes('BOTH'), + storeSpells = lists.includes('SPELLS'), + storePowers = lists.includes('POWERS'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let curSpells = '', item = args[2].hyphened(), - cmd = args[3].toUpperCase(), - level = parseInt(args[4]) || 1, - retMenu = (args[5] || 'VIEW-ITEM').toUpperCase(), - spellName = args[6].dispName(), - spell = args[6].hyphened(), - charCS = getCharacter(tokenID), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isPower = cmd.includes('POWER'), - storeBoth = lists.includes('BOTH'), - storeSpells = lists.includes('SPELLS'), - storePowers = lists.includes('POWERS'), - curSpells = '', storedSelected = false, - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - nextLevel, minLevel, rootDB, listAttr, listType, table, - storedSpellsAttr, storedLevelAttr, choice, itemRow, itemRowID, row, - spellObj, cmdStr, shortCmdStr, desc, question, content; + minLevel, rootDB, listType, table, + storedSpellsAttr, choice, itemRow, itemRowID, row, + spellObj, cmdStr, desc, question; if (/^\d/.test(item)) { row = parseInt(item); @@ -4719,7 +4727,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars row = indexTableGroup( Items, table, itemRow ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('makeSpellsMenu: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -4758,29 +4765,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } args.shift(); - shortCmdStr = [tokenID,row+'/'+item,cmd,level,retMenu].join('|'); + const shortCmdStr = [tokenID,row+'/'+item,cmd,level,retMenu].join('|'); cmdStr = shortCmdStr+'|'+spell; if (charCS) { setAttr( charCS, fields.Casting_name, charCS.get('name')); setAttr( charCS, fields.CastingLevel, minLevel ); curSpells = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr ) || ''; -/* if (_.isUndefined(attrLookup( charCS, pwList ))) setAttr( charCS, pwList, '' ); - if (_.isUndefined(attrLookup( charCS, pwVals ))) setAttr( charCS, pwVals, '' ); - if (_.isUndefined(attrLookup( charCS, muList ))) setAttr( charCS, muList, '' ); - if (_.isUndefined(attrLookup( charCS, muVals ))) setAttr( charCS, muVals, '' ); - if (_.isUndefined(attrLookup( charCS, prList ))) setAttr( charCS, prList, '' ); - if (_.isUndefined(attrLookup( charCS, prVals ))) setAttr( charCS, prVals, '' ); -*/ } - - content = '&{template:'+fields.menuTemplate+'}{{name=Store Spells & Powers}}{{Section='+(msg||'')+'}}' - + '{{Section1=**How to use this menu**\nThe [Choose] button selects a spell of the type indicated. It can then be reviewed or stored. *Powerful* items can store Wizard & Priest spells as Powers.' - + ' *Spell Storing* items only store spells. To *Remove* a stored spell, select its name and the [Remove] button will appear}}' - + '{{'+desc+'='; +// if (_.isUndefined(attrLookup( charCS, pwList ))) setAttr( charCS, pwList, '' ); +// if (_.isUndefined(attrLookup( charCS, pwVals ))) setAttr( charCS, pwVals, '' ); +// if (_.isUndefined(attrLookup( charCS, muList ))) setAttr( charCS, muList, '' ); +// if (_.isUndefined(attrLookup( charCS, muVals ))) setAttr( charCS, muVals, '' ); +// if (_.isUndefined(attrLookup( charCS, prList ))) setAttr( charCS, prList, '' ); +// if (_.isUndefined(attrLookup( charCS, prVals ))) setAttr( charCS, prVals, '' ); + } + + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spells & Powers}}{{Section='+(msg||'')+'}}' + + '{{Section1=**How to use this menu**\nThe [Choose] button selects a spell of the type indicated. It can then be reviewed or stored. *Powerful* items can store Wizard & Priest spells as Powers.' + + ' *Spell Storing* items only store spells. To *Remove* a stored spell, select its name and the [Remove] button will appear}}' + + '{{'+desc+'=', + selected = false; curSpells = curSpells.split(',').filter(e=>!!e); for (let storedSpell of curSpells) { - let selected = storedSpell.dbName() === spell.dbName(); + selected = storedSpell.dbName() === spell.dbName(); storedSelected = storedSelected || selected; content += (selected ? (''+storedSpell.dispName()+'') : ('['+storedSpell.dispName()+'](!magic --button CHOOSE_'+lists+'|'+shortCmdStr+'|'+storedSpell+')')); } @@ -4843,13 +4851,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * usually used to set short or long menus. */ - var handleOptionButton = function( args, senderId ) { + const handleOptionButton = function( args, senderId ) { - var cmd = args[0].toUpperCase(), - isView = cmd.includes('VIEW'), - tokenID = args[1], - optionValue = args[2].toLowerCase(), - config = getSetPlayerConfig( senderId ) || {}; + const cmd = args[0].toUpperCase(), + isView = cmd.includes('VIEW'), + tokenID = args[1], + optionValue = args[2].toLowerCase(); + + let config = getSetPlayerConfig( senderId ) || {}; if (cmd !== BT.SECTIONS_OPTION && !['short','long','list','alpha','full'].includes(optionValue)) { sendError( 'Invalid MagicMaster menuType option.' ); @@ -4918,13 +4927,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle specification of a different number of Misc spells */ - var handleSetMiscSpell = function( args, senderId ) { + const handleSetMiscSpell = function( args, senderId ) { - var tokenID = args[1], - spellClass = args[2], - level = args[3], - noSpells = args[4] || 0, - charCS = getCharacter(tokenID); + const tokenID = args[1], + spellClass = args[2], + level = args[3], + noSpells = args[4] || 0, + charCS = getCharacter(tokenID); if (spellClass == 'MU') { setAttr( charCS, [fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]], noSpells ); @@ -4941,23 +4950,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or a power-selection button **/ - var handleChooseSpell = function( args, senderId ) { + const handleChooseSpell = function( args, senderId ) { if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleChooseSpell: invalid row or column'); sendError('Internal MagicMaster error'); - } - - if (args[0] == BT.MI_SPELL || args[0] == BT.MI_SCROLL || args[0].toUpperCase().includes('POWER')) { - var charCS = getCharacter(args[1]), - storedLevel = attrLookup( charCS, fields.Spells_storedLevel, fields.Spells_table, args[3], args[4] ); + } else if (args[0] == BT.MI_SPELL || args[0] == BT.MI_SCROLL || args[0].toUpperCase().includes('POWER')) { + const charCS = getCharacter(args[1]), + storedLevel = attrLookup( charCS, fields.Spells_storedLevel, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); if (storedLevel && storedLevel > 0) { setAttr( charCS, fields.CastingLevel, storedLevel ); setAttr( charCS, fields.MU_CastingLevel, storedLevel ); setAttr( charCS, fields.PR_CastingLevel, storedLevel ); } } - makeCastSpellMenu( args, senderId ); return; @@ -4967,60 +4972,60 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a selected spell being cast */ - var handleCastSpell = function( args, senderId ) { + const handleCastSpell = function( args, senderId ) { - const setValue = (...a) => libRPGMaster.setAttr(...a); + let db, action; - var tokenID = args[1], - rowIndex = args[3], - colIndex = args[4], - charCS = getCharacter(tokenID), - db, action, - delScrollSpell = function ( charCS, spellName, scrollName, scrollRow, scrollRowID, type, nameField, valueField ) { - spellName = spellName.dbName(); - scrollName = scrollName.replace(/\s/g,'-'); - var muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, nameField ) || '').split(','), - nameIndex = _.findIndex( muSpellList, e => e.dbName() == spellName ); - if (nameIndex >= 0) { - var listField = [nameField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),nameField[1]], - valField = [valueField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),valueField[1]], - rowField = [fields.MIspellRows[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellRows[1]], - colField = [fields.MIspellCols[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellCols[1]]; - - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, listField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, valueField ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, valField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellRows, type ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, rowField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellCols, type ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, colField, muSpellList.join(',') ); - - } - return !muSpellList.filter(t => t.length).length; - }; + const tokenID = args[1], + rowIndex = args[3], + colIndex = args[4], + charCS = getCharacter(tokenID); + + const setValue = (...a) => libRPGMaster.setAttr(...a); + + const delScrollSpell = function ( charCS, spellName, scrollName, scrollRow, scrollRowID, type, nameField, valueField ) { + spellName = spellName.dbName(); + scrollName = scrollName.replace(/\s/g,'-'); + let muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, nameField ) || '').split(','); + const nameIndex = _.findIndex( muSpellList, e => e.dbName() == spellName ); + if (nameIndex >= 0) { + const listField = [nameField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),nameField[1]], + valField = [valueField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),valueField[1]], + rowField = [fields.MIspellRows[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellRows[1]], + colField = [fields.MIspellCols[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellCols[1]]; + + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, listField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, valueField ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, valField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellRows, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, rowField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellCols, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, colField, muSpellList.join(',') ); + + } + return !muSpellList.filter(t => t.length).length; + }; if (!charCS) { - sendDebug('handleCastSpell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleCastSpell: invalid row or column'); sendError('Internal MagicMaster error'); } - var oldVer = 2.1 > csVer(charCS), - spellTables = getTable( charCS, fieldGroups.SPELLS, colIndex ), - spellName = spellTables.tableLookup( fields.Spells_name, rowIndex ).hyphened(), - spellMsg = spellTables.tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), rowIndex ), - charName = charCS.get('name'), + let spellTables = getTable( charCS, fieldGroups.SPELLS, colIndex ), absorb = false, miName = '', Items; + const oldVer = 2.1 > csVer(charCS), + spellName = spellTables.tableLookup( fields.Spells_name, rowIndex ).hyphened(), + charName = charCS.get('name'); + let spellMsg = spellTables.tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), rowIndex ); switch (args[0].toUpperCase()) { case BT.CAST_MIPOWER: @@ -5054,10 +5059,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; } - var spell = getAbility( db, spellName, charCS ), - spellCost = ((!!spell.obj && !!spell.ct && ((args[0] === BT.CAST_MUSPELL) || (args[0] === BT.CAST_PRSPELL))) ? spell.obj[1].cost : 0), - totalLeft, table, itemRow, itemRowID, - content, + const spell = getAbility( db, spellName, charCS ), + spellCost = ((!!spell.obj && !!spell.ct && ((args[0] === BT.CAST_MUSPELL) || (args[0] === BT.CAST_PRSPELL))) ? spell.obj[1].cost : 0); + let table, itemRow, itemRowID, spellValue = parseInt((spellTables.tableLookup( fields.Spells_castValue, rowIndex )),10); setValue( charCS, fields.SpellToMem, spellName ); @@ -5073,7 +5077,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (absorb) { - let level = (!spell.obj || !spell.obj[1]) ? 1 : (parseInt(spell.obj[1].type.match(/\d+/)) || 0); + const level = (!spell.obj || !spell.obj[1]) ? 1 : (parseInt(spell.obj[1].type.match(/\d+/)) || 0); if (!isNaN(itemRow)) { Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'qty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'qty'], itemRow ) || 0)-level,0) ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueQty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'trueQty'], itemRow ) || 0)-level,0) ); @@ -5102,10 +5106,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendResponse( charCS, spellMsg, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); } - totalLeft = spendMoney( charCS, spellCost ); - content = charName + ' is '+action+' [' + spellName.dispName() + '](! /w gm %{'+spell.dB+'|'+(spellName.hyphened())+'})' - + (parseInt(spellCost || 0) ? (' at a cost of [[' + spellCost + ']]GP (leaving [[' + totalLeft + ']]GP).') : '') - + ' Select ' + charName + '\'s token before pressing to see effects.'; + const totalLeft = spendMoney( charCS, spellCost ); + const content = charName + ' is '+action+' [' + spellName.dispName() + '](! /w gm %{'+spell.dB+'|'+(spellName.hyphened())+'})' + + (parseInt(spellCost || 0) ? (' at a cost of [[' + spellCost + ']]GP (leaving [[' + totalLeft + ']]GP).') : '') + + ' Select ' + charName + '\'s token before pressing to see effects.'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); return; @@ -5115,19 +5119,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle targeting the effects of a spell * Moved to RoundMaster to allow passing of the PlayerID */ - - var handleSpellTargeting = function( args, isGM ) { - - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - tokenName, - thac0, - strHitBonus, - content, - charCS = getCharacter(tokenID); + + const handleSpellTargeting = function( args, isGM ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSpellTargeting: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } @@ -5138,12 +5137,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } args.shift(); - tokenName = curToken.get('name'); - thac0 = getTokenValue( curToken, fields.Token_thac0, fields.Thac0_base, fields.MonsterThac0, fields.Thac0_base ).val || 20; - strHitBonus = attrLookup( charCS, fields.Strength_hit ) || 0; - content = (isGM ? '/w gm ' : '')+'&{template:'+fields.menuTemplate+'}{{name=Try to Touch Target}}' - + '{{desc=**'+tokenName+' hits AC [[( ([['+thac0+']][Thac0]) - ([['+strHitBonus+']][Strength bonus]) - [[1d20]][Dice Roll] )]] with their spell.**}}' - + '{{desc1=If hit, [Cast on them](!rounds --target SINGLE|'+tokenID+'|@{target|Who to Attack with this spell?|token_id}|'+args.join('|')+')}}'; + const tokenName = curToken.get('name'), + thac0 = getTokenValue( curToken, fields.Token_thac0, fields.Thac0_base, fields.MonsterThac0, fields.Thac0_base ).val || 20, + strHitBonus = attrLookup( charCS, fields.Strength_hit ) || 0, + content = (isGM ? '/w gm ' : '')+'&{template:'+fields.menuTemplate+'}{{name=Try to Touch Target}}' + + '{{desc=**'+tokenName+' hits AC [[( ([['+thac0+']][Thac0]) - ([['+strHitBonus+']][Strength bonus]) - [[1d20]][Dice Roll] )]] with their spell.**}}' + + '{{desc1=If hit, [Cast on them](!rounds --target SINGLE|'+tokenID+'|@{target|Who to Attack with this spell?|token_id}|'+args.join('|')+')}}'; setAbility( charCS, 'To-Hit-Spell', content ); return; @@ -5154,15 +5153,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Used when selecting a spell or slot to memorise, * or when changing level of spell to memorise. */ - - var handleRedisplayManageSpells = function( args, senderId ) { + + const handleRedisplayManageSpells = function( args, senderId ) { - var isPower = args[0].toUpperCase().includes('POWER'), - msg = '', - name = getObj('graphic',args[1]).get('name'); + const isPower = args[0].toUpperCase().includes('POWER'), + name = getObj('graphic',args[1]).get('name'); + + let msg = ''; if (args[3] > 0 && args[4] > 0 && (!args[5] || !args[5].length)) { - args[5] = attrLookup( getCharacter(args[1]), fields.Spells_name, fields.Spells_table, args[3], args[4] ); + args[5] = attrLookup( getCharacter(args[1]), fields.Spells_name, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); } // Check this is a spell that is of a school that can be memorised @@ -5188,100 +5188,43 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - /* - * Review a chosen spell description - * Stubbed out as greyOutButtons now deals with this - */ - - var handleReviewSpell = function( args, senderId ) { - -/* var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isSpell = cmd.includes('SPELL'), - isScroll = cmd.includes('SCROLL'), - isView = !cmd.includes('REVIEW'), - isGM = args[0].includes('GM'), - tokenID = args[1], - followOn, - msg, - charCS = getCharacter(tokenID); - - if (!charCS) { - sendDebug('handleReviewSpell: invalid tokenID parameter'); - sendError('Internal MagicMaster error'); - return; - } - - if (isMI) { - if (isGM) { - followOn = 'GM-MImenu'; - } else if (isPower) { - followOn = (isView ? BT.VIEWMEM_MI_POWERS : BT.EDIT_MIPOWERS); - } else if (isMU) { - followOn = (isView ? BT.VIEWMEM_MI_MUSPELLS : BT.EDIT_MIMUSPELLS); - } else if (isPR) { - followOn = (isView ? BT.VIEWMEM_MI_PRSPELLS : BT.EDIT_MIPRSPELLS); - } else if (isSpell) { - followOn = (isView ? BT.VIEWMEM_MI_SPELLS : BT.EDIT_MISPELLS); - } else if (isScroll) { - followOn = (isView ? BT.VIEWMEM_MI_SCROLL : BT.EDIT_MISPELLS); - } else { - followOn = (isView ? BT.VIEW_MI : (args[0].includes('MARTIAL') ? BT.CHOOSE_MARTIAL_MI : (args[0].includes('ALLITEMS') ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI))); - } - } else if (isPower) { - followOn = (isView ? BT.VIEWMEM_POWERS : BT.EDIT_POWERS); - } else if (isMU) { - followOn = (isView ? BT.VIEWMEM_MUSPELLS : BT.EDIT_MUSPELLS); - } else { - followOn = (isView ? BT.VIEWMEM_PRSPELLS : BT.EDIT_PRSPELLS); - } - - args[0] = followOn; -// msg = '[Return to menu](!magic --button '+args.join('|')+')'; -// setTimeout(() => sendResponse( charCS, msg, senderId, flags.feedbackName, flags.feedbackImg, tokenID ),500); -*/ - return; - } - /* * Handle learning a spell from a spellbook or scroll */ - - var handleLearnSpell = function( args, senderId ) { + + const handleLearnSpell = function( args, senderId ) { - var cmd = (args[0] || ''), - tokenID = args[1], - spell = (args[2] || ''), - learnt = cmd.toUpperCase().includes('LEARNT'), - charCS = getCharacter(tokenID), - spellObj,spellData,level; + const cmd = (args[0] || ''), + tokenID = args[1], + spell = (args[2] || ''), + learnt = cmd.toUpperCase().includes('LEARNT'), + charCS = getCharacter(tokenID), + spellObj = abilityLookup( fields.MU_SpellsDB, spell, charCS ); - spellObj = abilityLookup( fields.MU_SpellsDB, spell, charCS ); if (!spellObj.obj) { sendError('The spell '+spell+' has not been found in any database.',msg_orig[senderId]); return; } - spellData = parseData((spellObj.data()[0][0] || {}),reSpellSpecs); - level = spellData.level; + const spellData = parseData((spellObj.data()[0][0] || {}),reSpellSpecs), + level = spellData.level; + if (!level || level < 1 || level > 9) { sendError('The spell '+spell+' is of an unrecognised level '+level,msg_orig[senderId]); return; } - var content = '&{template:RPGMdefault}{{name=Add spell to '+charCS.get('name')+'\'s spellbook}}{{desc=', - name = getObj('graphic',tokenID).get('name'), - spellbook = [fields.Spellbook[0]+spellLevels.mu[level].book,fields.Spellbook[1]], - curList = (attrLookup(charCS,spellbook) || ''), - saveObj = saveFormat.Checks.Learn_Spell, - save = parseInt(attrLookup( charCS, saveObj.save ) || 0), - saveMod = parseInt(attrLookup( charCS, saveObj.mod ) || 0), - saveAdj = parseInt(attrLookup( charCS, fields.Magic_saveAdj ) || 0), - saveSpec = checkValidSpell( ['MU',tokenID,'','','',spell] ), - specMod = saveSpec > 2 ? 15 : (saveSpec > 1 ? -15 : 0), - learnChance = Math.max(5,Math.min((save-saveMod-saveAdj+specMod),99)); + let content = '&{template:RPGMdefault}{{name=Add spell to '+charCS.get('name')+'\'s spellbook}}{{desc='; + + const name = getObj('graphic',tokenID).get('name'), + spellbook = [fields.Spellbook[0]+spellLevels.mu[level].book,fields.Spellbook[1]], + curList = (attrLookup(charCS,spellbook) || ''), + saveObj = saveFormat.Checks.Learn_Spell, + save = parseInt(attrLookup( charCS, saveObj.save ) || 0), + saveMod = parseInt(attrLookup( charCS, saveObj.mod ) || 0), + saveAdj = parseInt(attrLookup( charCS, fields.MagicSaveAdj ) || 0), + saveSpec = checkValidSpell( ['MU',tokenID,'','','',spell] ), + specMod = saveSpec > 2 ? 15 : (saveSpec > 1 ? -15 : 0), + learnChance = Math.max(5,Math.min((save-saveMod-saveAdj+specMod),99)); if (!saveSpec) { content += 'The spell '+spell+' is of a school and/or level that '+name+' cannot learn!'; @@ -5289,7 +5232,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += 'The spell '+spell+' is already in '+charCS.get('name')+'\'s spellbook'; } else if (!learnt) { args.shift(); - let checkMacro = '&{template:RPGMdefault}{{name='+name+' Check vs Learn Spell}}{{Check Throw=Rolling [[?{Learn Spell roll|'+saveObj.roll+'}cf<'+(learnChance-1)+'cs>'+learnChance+']] vs. [[0+'+learnChance+']] target}}{{Result=Check Throw<='+learnChance+'}}{{desc=**'+name+'\'s target**[[0+'+save+']] base save vs. Learn_Spell with [[0+'+specMod+']] change from specialism, [[0+'+saveMod+']] improvement from race, class & Magic Items, and [[0+'+saveAdj+']] improvement from current magic effects}}{{successcmd=!magic --button '+BT.LEARNT_MUSPELL+'|'+args.join('|')+'}}'; + const checkMacro = '&{template:RPGMdefault}{{name='+name+' Check vs Learn Spell}}{{Check Throw=Rolling [[?{Learn Spell roll|'+saveObj.roll+'}cf<'+(learnChance-1)+'cs>'+learnChance+']] vs. [[0+'+learnChance+']] target}}{{Result=Check Throw<='+learnChance+'}}{{desc=**'+name+'\'s target**[[0+'+save+']] to Learn Spell with [[0+'+specMod+']] change from specialism, [[0+'+saveMod+']] improvement from race, class & Magic Items, and [[0+'+saveAdj+']] improvement from current magic effects}}{{successcmd=!magic --button '+BT.LEARNT_MUSPELL+'|'+args.join('|')+'}}'; setAbility(charCS,'Do-not-use-Learn_Spell-save',checkMacro); content += 'Can you learn the spell "'+spell+'"? [Assess your chance](~'+charCS.get('name')+'|Do-not-use-Learn_Spell-save)'; } else { @@ -5301,14 +5244,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - - /* * Return to the spell storing menu after a review */ - - var handleRevStore = function( args, senderId ) { - let cmd = args.shift().toUpperCase(); + + const handleRevStore = function( args, senderId ) { + const cmd = args.shift().toUpperCase(); setTimeout( () => sendFeedback( ('[Return to menu](!magic --button '+cmd.replace('REVIEW','CHOOSE')+'|'+args.join('|')+')'), flags.feedbackName ), 500); } @@ -5316,31 +5257,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle memorising a selected spell in a selected slot */ - var handleMemoriseSpell = function( args, senderId ) { - - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - isAll = args[0].toUpperCase().includes('ALL'), - tokenID = args[1], - level = args[2], - row = args[3], - col = args[4], - spellName = args[5], - noToMemorise = parseInt((args[6]),10), - castAsLvl = parseInt((args[7]),10), - dbCS, - charCS = getCharacter(tokenID); + const handleMemoriseSpell = function( args, senderId ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + isAll = args[0].toUpperCase().includes('ALL'), + tokenID = args[1], + level = args[2], + row = args[3], + col = args[4], + spellName = args[5], + noToMemorise = parseInt((args[6]),10), + castAsLvl = parseInt((args[7]),10), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleMemoriseSpell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleMemoriseSpell: invalid row or column'); - sendError('Internal MagicMaster error'); + row = undefined; + if (isPower && !!spellName && !!spellName.length) { + [row,col] = powerRowCol( charCS, spellName ); + } + if (!isPower || _.isUndefined(row)) { + sendError('Internal MagicMaster error'); + return; + } } if (isNaN(noToMemorise)) { @@ -5348,9 +5293,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var rootDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), - spellTables = getTable( charCS, (isPower ? fieldGroups.POWERS : fieldGroups.SPELLS), col ), - base = spellLevels[(isPower ? (isMI ? 'pm' : 'pw') : (isMI ? 'mi' : (isMU ? 'mu' : 'pr')))][level].base, + const rootDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), + base = spellLevels[(isPower ? (isMI ? 'pm' : 'pw') : (isMI ? 'mi' : (isMU ? 'mu' : 'pr')))][level].base; + + let spellTables = getTable( charCS, (isPower ? fieldGroups.POWERS : fieldGroups.SPELLS), col ), altSpellTable; if (!isPower) { @@ -5366,7 +5312,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, ['power-'+spellName, 'max'], col ); } - var hand = spellTables.tableLookup( fields.Spells_equip, row ); + const hand = spellTables.tableLookup( fields.Spells_equip, row ); if (spellTables.tableLookup( fields.Spells_weapon, row ) === '1' && (hand)) { sendAPI(fields.attackMaster+' --button '+(hand==='2'?BT.BOTH:(hand==='1'?BT.LEFT:(hand==='0'?BT.RIGHT:BT.HAND)))+'|'+tokenID+'|'+row+':'+col+'|'+hand); @@ -5385,24 +5331,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle memorising all currently valid powers at once */ - + async function handleMemAllPowers( args, senderId, silent=false ) { - var cmd = args[0], - isMU = cmd.toUpperCase().includes('MU'), - isPower = cmd.toUpperCase().includes('POWER'), - tokenID = args[1], - charCS = getCharacter( tokenID ), - spellTables = [], - db, type, txt, name, levelSpells; + const cmd = args[0], + isMU = cmd.toUpperCase().includes('MU'), + isPower = cmd.toUpperCase().includes('POWER'), + tokenID = args[1], + charCS = getCharacter( tokenID ); + + let spellTables = [], + db, type, txt, name; - var memSpell = function(args,charCS,db,isPower,list,i,r,c,senderId) { + const memSpell = function(args,charCS,db,isPower,list,i,r,c,senderId) { return new Promise(resolve => { - var spellDef, clv = false; + let spellDef, clv = false; try { + let k; for (let j=list.length; j > 0 && !clv; j--) { - let k = (randomInteger(list.length)-1); + k = (randomInteger(list.length)-1); spellDef = isPower ? findPower( charCS, list.shift() ) : abilityLookup( db, list[k] ); if (spellDef.obj) { args[5] = spellDef.obj[1].name; @@ -5411,12 +5359,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; }; if (clv) { - let newArgs = [args[0],args[1],i,r,c,spellDef.obj[1].name,(isPower ? getUsesPerDay(charCS,spellDef.obj[1].name,senderId) : 1),clv]; + const newArgs = [args[0],args[1],i,r,c,spellDef.obj[1].name,(isPower ? getUsesPerDay(charCS,spellDef.obj[1].name,senderId) : 1),clv]; handleMemoriseSpell( newArgs, senderId ); }; } catch (e) { log('MagicMaster memSpell: JavaScript '+e.name+': '+e.message+' while processing sheet '+charCS.get('name')); - sendDebug('MagicMaster memSpell: JavaScript '+e.name+': '+e.message+' while processing sheet '+charCS.get('name')); sendCatchError('MagicMaster',msg_orig[senderId],e); } finally { setTimeout(() => { @@ -5441,23 +5388,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars db = fields.PR_SpellsDB; txt = 'priest spells'; } - levelSpells = shapeSpellbook( charCS, type ); + const levelSpells = shapeSpellbook( charCS, type ); + let r = 0, storeList = false, newList = [], list = [], s = 0, c, cellExists = false, castAsLevel = false; for (let i = 1; i < levelSpells.length; i++) { - let r = 0; - let storeList = false; - let newList = []; - let list = (attrLookup(charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ]) || '').split('|').filter(t=>!!t); - let s = (isPower) ? list.length : levelSpells[i].spells; + r = 0; + storeList = false; + newList = []; + list = (attrLookup(charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ]) || '').split('|').filter(t=>!!t); + s = (isPower) ? list.length : levelSpells[i].spells; if (s > 0 && (!list || !list.join('').length || list.join('') == '-')) { list = _.uniq(getMagicList( db, spTypeLists, (isPower ? 'power' : (isMU ? 'muspelll'+i : 'prspelll'+i)), senderId ).toLowerCase().split(/\,|\|/)); storeList = true; }; - let c = levelSpells[i].base; - let cellExists = true; + c = levelSpells[i].base; + cellExists = true; while (s > 0 || cellExists) { c = levelSpells[i].base; for (let w = 1; (w <= fields.SpellsCols); w++) { - let castAsLevel = false; + castAsLevel = false; if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); } @@ -5477,7 +5425,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables = []; }; if (silent) { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleMemAllPowers'); return; } @@ -5494,21 +5442,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a level change request */ - var handleLevelDrain = function( args, senderId, msg = '' ) { + const handleLevelDrain = function( args, senderId, msg = '' ) { - var tokenID = args[0], // tokenID - charCS = getCharacter(tokenID), - drainLevels = parseInt(args[1]) || -1, // +1 - fixedClass = args[6] || '', // ranger - classChosen = args[2] || fixedClass, // ranger - totalLevels = parseInt(args[3]) || drainLevels, // +1 + const tokenID = args[0], // tokenID + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, // +1 + fixedClass = args[6] || '', // ranger + totalLevels = parseInt(args[3]) || drainLevels, // +1 + classes = classObjects( charCS, senderId ); + + let classChosen = args[2] || fixedClass, // ranger hitPoints = Math.abs(parseInt(evalAttr(args[4],charCS)) || 0), // [[1d10]] totalHP = parseInt(args[5]) || 0, // always called = 0 loopCount = Math.abs(drainLevels), // 1 increment = drainLevels > 0 ? 1 : -1, //1 levelHP = hitPoints * increment, - classes = classObjects( charCS, senderId ), - levelField, hd, baseClass; + levelField, baseClass; const warriors = ['warrior','fighter'], wizards = ['wizard','mage','magicuser'], @@ -5527,7 +5476,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (psions.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (psions.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => psions.includes(c.name)) || {base:''}).base; }; hitPoints = parseInt(hitPoints || evalAttr((classes[0].classData.hd.replace(/(\d+)(d.+)/i,'(('+String(drainLevels)+'*$1)$2)')),charCS)) || 0; - levelHP = hitPoints * increment; + levelHP = hitPoints; loopCount = 1; increment = increment * Math.abs(drainLevels); } else if (!classChosen) { @@ -5561,24 +5510,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - let hpConBonus = parseInt(attrLookup( charCS, fields.HPconAdj )) || 0; +// let hpConBonus = parseInt(attrLookup( charCS, fields.HPconAdj )) || 0; setAttr( charCS, levelField, Math.max(0,((parseInt(attrLookup( charCS, levelField ) || 1) || 1) + increment)) ); setAttr( charCS, fields.HP,((parseInt(attrLookup( charCS, fields.HP ) || 0) || 0) + levelHP) ); setAttr( charCS, fields.MaxHP, Math.max(0,((parseInt(attrLookup( charCS, fields.MaxHP ) || 0) || 0) + levelHP)) ); totalHP += hitPoints; if (--loopCount > 0) { - let content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen - + ' class by one level, which in total makes '+(Math.abs(totalLevels) - loopCount)+' across all classes.' - + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by one level, which in total makes '+(Math.abs(totalLevels) - loopCount)+' across all classes.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; sendResponse( charCS, content ); handleLevelDrain( [tokenID,(drainLevels-increment),'',totalLevels,0,totalHP,fixedClass], senderId, 'Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen+' class by 1 level' ); } else { setAttr( charCS, fields.Thac0_base, handleGetBaseThac0( charCS ) ); - let content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen - + ' class by '+((fixedClass || Math.abs(increment) > 1) ? (totalLevels+' levels') : ('one level, which in total makes '+totalLevels+' across all classes')) - + ', and recalculated all saves, reassessed all weapon use and reset usable powers.' - + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by '+((fixedClass || Math.abs(increment) > 1) ? (totalLevels+' levels') : ('one level, which in total makes '+totalLevels+' across all classes')) + + ', and recalculated all saves, reassessed all weapon use and reset usable powers.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; sendResponse( charCS, content ); setTimeout( () => handleMemAllPowers( [BT.MEMALL_POWERS,tokenID,1,-1,-1,'',''], senderId, true ), 100); setTimeout( () => handleCheckWeapons( tokenID, charCS ), 200); @@ -5589,40 +5538,39 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle undertaking a short rest to recover 1st level spells */ - - var handleRest = function( args, senderId ) { + + const handleRest = function( args, senderId ) { - var tokenID = args[0], - isShort = args[1].toLowerCase().includes('short'), - casterType = (args[2] || 'MU+PR').toUpperCase(), - spellName = (args[3] || '').dbName(), - r, c, w, - col, rep; + const tokenID = args[0], + charCS = getCharacter(tokenID), + isShort = args[1].toLowerCase().includes('short'), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let spellName = (args[3] || '').dbName(), + r, c, w; if (casterType.includes('MI') && casterType.includes('POWER')) { return; } + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (!isNaN(spellName)) spellName = ''; - var isMU = casterType.includes('MU'), + let isMU = casterType.includes('MU'), isPR = casterType.includes('PR'), isMI = !isShort, isPower = !isShort, - isMIPower = !isShort, - charCS = getCharacter(tokenID); + isMIPower = !isShort; - if (!charCS) { - sendDebug('handleRest: invalid tokenID parameter'); - sendError('Internal MagicMaster error'); - return; - } - - var levelSpells, + let levelSpells, level, levelLimit, restType, - powerQty, valueObj, + spell, spellTables = []; while (isMU || isPR || isPower || isMIPower) { @@ -5644,7 +5592,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables[w] = getTableField( charCS, spellTables[w], fields.Spells_table, fields.Spells_castValue, c ); } valueObj = spellTables[w].tableLookup( fields.Spells_castValue, r, true, true ); - let spell = spellTables[w].tableLookup( fields.Spells_name, r ) || '-'; + spell = spellTables[w].tableLookup( fields.Spells_name, r ) || '-'; if (!valueObj) { levelSpells[level].spells = 0; break; @@ -5684,18 +5632,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (isMI) { - let miBase = 0, - MagicItems = getTableGroup( charCS, fieldGroups.MI ); + let MagicItems = getTableGroup( charCS, fieldGroups.MI ), + prefix, miSpeedObj, miQtyObj, miTrueName, miType, miReveal, ItemSpecs; for (const table in MagicItems) { - for (r = miBase; r < (MagicItems[table].sortKeys.length+miBase); r++) { - let prefix = fieldGroups[table].prefix; - let miSpeedObj = MagicItems[table].tableLookup( fields[prefix+'speed'], r, true, true ), - miQtyObj = MagicItems[table].tableLookup( fields[prefix+'qty'], r, true, true ), - miTrueName = MagicItems[table].tableLookup( fields[prefix+'trueName'], r ), - miType = MagicItems[table].tableLookup( fields[prefix+'type'], r ), - miReveal = MagicItems[table].tableLookup( fields[prefix+'reveal'], r ).toLowerCase(), - ItemSpecs = abilityLookup( fields.MagicItemDB, miTrueName, charCS ); + for (r = 0; r < (MagicItems[table].sortKeys.length); r++) { + prefix = fieldGroups[table].prefix; + miSpeedObj = MagicItems[table].tableLookup( fields[prefix+'speed'], r, true, true ); + miQtyObj = MagicItems[table].tableLookup( fields[prefix+'qty'], r, true, true ); + miTrueName = MagicItems[table].tableLookup( fields[prefix+'trueName'], r ); + miType = MagicItems[table].tableLookup( fields[prefix+'type'], r ); + miReveal = MagicItems[table].tableLookup( fields[prefix+'reveal'], r ).toLowerCase(); + ItemSpecs = abilityLookup( fields.MagicItemDB, miTrueName, charCS ); if (_.isUndefined(miSpeedObj) || _.isUndefined(miQtyObj)) {break;} if (miTrueName && miTrueName != '-') { if (miReveal == 'rest') { @@ -5713,7 +5661,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } } -// log('handleRest: while resting, triggering a version test of '+charCS.get('name')+'\'s character sheet'); updateCharSheets( args, senderId ); return; } @@ -5723,69 +5670,59 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * this character, and the global date if it is behind the * character date */ - - var handleTimePassing = function( charCS, timeSpent ) { + + const handleTimePassing = function( charCS, timeSpent ) { timeSpent = Math.ceil(timeSpent); - var charDay = parseInt((attrLookup( charCS, fields.CharDay ) || 0),10) + timeSpent, - today = parseInt((state.moneyMaster.inGameDay || 0),10), - globalDay = Math.max( today, charDay ); + const charDay = parseInt((attrLookup( charCS, fields.CharDay ) || 0),10) + timeSpent, + today = parseInt((state.moneyMaster.inGameDay || 0),10), + globalDay = Math.max( today, charDay ); setAttr( charCS, fields.CharDay, globalDay ); return globalDay; } - /* - * Handle the selection of a magic item - * to use or view - */ - - var handleChooseMI = function( args, senderId ) { - - makeViewUseMI( args, senderId ); - return; - } - /* * Handle viewing or using a magic item. * The calling of the MI macro from the MI-DB is performed * in the [Submit] button of the menu. */ - async function handleViewUseMI( args, isSilent, senderId, charges, chargeOverride='' ) { // get + async function handleViewUseMI( args, isSilent, senderId, charges, chargeOverride='' ) { // miData - var action = args[0].toUpperCase(), - tokenID = args[1], - MIrowref = parseInt(args[2],10), - charCS = getCharacter(tokenID), - msVersion = csVer(charCS), - inHand, inHandRow, content, miData, - index, rowID, table; - + if (isSilent) sendWait(senderId,0,'Magic handleViewUseMI'); + + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = parseInt(args[2],10), + charCS = getCharacter(tokenID); + +// msVersion = csVer(charCS), + if (!charCS) { - sendDebug('handleViewUseMI: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroup( charCS, fieldGroups.MI ); + const MItables = getTableGroup( charCS, fieldGroups.MI ); - [index,table,rowID] = tableGroupIndex( MItables, MIrowref ); + let [index,table,rowID] = tableGroupIndex( MItables, MIrowref ); if (isNaN(MIrowref) || MIrowref < 0 || _.isUndefined(index)) { - sendDebug('handleViewUseMI: invalid MIrowref parameter is '+MIrowref); sendError('Internal MagicMaster error'); return; } - var prefix = MItables[table].fieldGroup, - MInameObj = MItables[table].tableLookup( fields[prefix+'name'], index, false, true ), - MItypeObj = MItables[table].tableLookup( fields[prefix+'type'], index, false, true ), - MIrevealObj = MItables[table].tableLookup( fields[prefix+'reveal'], index, false, true ), - MIname = MInameObj.get(fields.Items_name[1]), - MItrueName = MItables[table].tableLookup( fields[prefix+'trueName'], index ) || MIname, - MIreveal = !MIrevealObj ? '' : MIrevealObj.get(fields.Items_reveal[1]).toLowerCase(); + const prefix = MItables[table].fieldGroup, + MInameObj = MItables[table].tableLookup( fields[prefix+'name'], index, false, true ), + MItypeObj = MItables[table].tableLookup( fields[prefix+'type'], index, false, true ), + MIrevealObj = MItables[table].tableLookup( fields[prefix+'reveal'], index, false, true ); + + let MIname = MInameObj.get(fields.Items_name[1]); + + const MItrueName = MItables[table].tableLookup( fields[prefix+'trueName'], index ) || MIname, + MIreveal = !MIrevealObj ? '' : MIrevealObj.get(fields.Items_reveal[1]).toLowerCase(); setAttr( charCS, fields.ItemChosen, MIname ); setAttr( charCS, fields.ItemRowRef, MIrowref ); @@ -5797,39 +5734,37 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MItypeObj.set(fields.Items_type[1], MItables[table].tableLookup( fields[prefix+'trueType'], index)); MIrevealObj.set(fields.Items_reveal[1], ''); } -// content = '[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+args[1]+'|'+(msVersion < 4 ? '' : args[2])+')'; -// setTimeout(() => sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ),500); checkForBag( charCS, MItrueName, MIrowref ); -// if (msVersion < 4) { -// setTimeout( () => sendAPI('!cmd --button '+BT.SORT_ITEMS+'|'+tokenID), 1000 ); -// }; - return; - } - var charName = charCS.get('name'), - MIqtyObj = MItables[table].tableLookup( fields[prefix+'qty'], index, false, true ), - MIqty = MIqtyObj.get(fields.Items_qty[1]), - MImaxQty = MIqtyObj.get(fields.Items_trueQty[1]), - MItype = (chargeOverride || MItables[table].tableLookup( fields[prefix+'trueType'], index, 'uncharged' ) - || MItables[table].tableLookup( fields[prefix+'type'], index, 'uncharged' )).toLowerCase(), - MIdb = getAbility( fields.MagicItemDB, MIname, charCS, null, null, null, index, rowID ), - MIdbName = MIdb, + return; + } + const MIqtyObj = MItables[table].tableLookup( fields[prefix+'qty'], index, false, true ), + MIqty = MIqtyObj.get(fields.Items_qty[1]), + MImaxQty = MIqtyObj.get(fields.Items_trueQty[1]), + MItype = (chargeOverride || MItables[table].tableLookup( fields[prefix+'trueType'], index, 'uncharged' ) + || MItables[table].tableLookup( fields[prefix+'type'], index, 'uncharged' )).toLowerCase(); + + let MIdb = getAbility( fields.MagicItemDB, MIname, charCS, null, null, null, index, rowID ), MIchangeTo = '', - MIcVal = 1; + MIcVal = 1, + recalcWeight = false, + miData; + + const MIdbName = MIdb; if (MItrueName !== MIname) MIdb = getAbility( fields.MagicItemDB, MItrueName, charCS, null, null, null, index, rowID ); - var displayChangedMI = (row, table, mi) => { + const displayChangedMI = (row, table, mi) => { setAttr( charCS, fields.ItemRowRef, row ); setAttr( charCS, fields.ItemTableRef, table ); setAttr( charCS, fields.ItemChosen, mi ); - let miObj = abilityLookup( fields.MagicItemDB, mi, charCS ); + const miObj = abilityLookup( fields.MagicItemDB, mi, charCS ); if (String(((miObj.obj ? miObj.specs() : undefined) || [['','','','','']])[0][2]).toLowerCase().includes('hide')) { doDisplayAbility( ['c',tokenID,fields.MagicItemDB,mi], null, senderId ); }; }; if (MIdb.obj) { - miData = resolveData( MItrueName, fields.MagicItemDB, reItemData, charCS, {charges:reSpellSpecs.charges,changeTo:reSpellSpecs.changeTo,zero:reSpellSpecs.zero}, index, rowID ).parsed; + miData = resolveData( MItrueName, fields.MagicItemDB, reItemData, charCS, {charges:reSpellSpecs.charges,changeTo:reSpellSpecs.changeTo,zero:reSpellSpecs.zero,on:reSpellSpecs.on}, {row:index, rowID:rowID} ).parsed; MIcVal = miData.charges; MIchangeTo = miData.changeTo; } @@ -5841,23 +5776,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars charges = 1; } if (MIqty < charges) { - content = '&{template:'+fields.menuTemplate+'}{{name=Using '+MIname+'}}{{desc='+MIname+' does not have enough charges left to do this}}' - +'{{desc1=[Show '+MIname+' again](\~'+MIdbName.dB+'|'+MIname+') or do something else}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name=Using '+MIname+'}}{{desc='+MIname+' does not have enough charges left to do this}}' + +'{{desc1=[Show '+MIname+' again](\~'+MIdbName.dB+'|'+MIname+') or do something else}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return false; } - let item = MIname.replace(/\s/g,'-'); +// let item = MIname.replace(/\s/g,'-'); switch (MItype) { case 'change-each': case 'cursed+change-each': if (MIchangeTo && MIchangeTo.length && charges > 0) { - let changeRow,trueTable,chgRowID; - [changeRow,trueTable,chgRowID] = tableGroupFind( MItables, 'trueName', MIchangeTo ); - let toType = resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},changeRow,chgRowID).parsed.type; - if (isNaN(changeRow) || !stackable.includes(resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},changeRow,chgRowID).parsed.type.toLowerCase())) { + let [changeRow,trueTable,chgRowID] = tableGroupFind( MItables, 'trueName', MIchangeTo ); + if (isNaN(changeRow) || !stackable.includes(resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},{row:changeRow,rowID:chgRowID}).parsed.type.toLowerCase())) { [changeRow,trueTable] = await handleStoreMI( ['', tokenID, '', MIchangeTo, charges, 'silent' ], false, senderId ); } else { MItables[trueTable].tableSet( fields[MItables[trueTable].fieldGroup+'qty'], changeRow, (parseInt(MItables[trueTable].tableLookup( fields[MItables[trueTable].fieldGroup+'qty'], changeRow ) || 0)+charges) ); @@ -5890,6 +5823,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MIqtyObj.set('max',(MImaxQty-charges)); // addMIspells( charCS, MIdb.obj[1], rowID ); } + recalcWeight = true; break; case 'selfchargeable': @@ -5922,7 +5856,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (MIqty > charges) checkForBag( charCS, MItrueName, MIrowref ); if ((MIqty - charges == 0) && miData.zero && miData.zero.length) { sendAPI( parseStr(miData.zero).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) - .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); + .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); } if (miData.on && miData.on.length) { sendAPI( parseStr(miData.on).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) @@ -5937,16 +5871,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); - if (isSilent) { - sendWait(senderId,0); - } else { - content = '&{template:'+fields.menuTemplate+'}{{name='+charName+' is using '+MItrueName+(MIname !== MItrueName ? (' hidden as '+MIname) : '')+'}}' - + '{{desc=To see the effects, select '+charName+'\'s token and press ['+MItrueName+'](! /w gm %{'+MIdb.dB+'|'+(MItrueName.hyphened())+'})}}'; + if (!isSilent) { + const charName = charCS.get('name'); + const content = '&{template:'+fields.menuTemplate+'}{{name='+charName+' is using '+MItrueName+(MIname !== MItrueName ? (' hidden as '+MIname) : '')+'}}' + + '{{desc=To see the effects, select '+charName+'\'s token and press ['+MItrueName+'](! /w gm %{'+MIdb.dB+'|'+(MItrueName.hyphened())+'})}}'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); }; // if (msVersion < 4) { // setTimeout( () => sendAPI('!cmd --button '+BT.SORT_ITEMS+'|'+tokenID), 1000 ); // }; + if (recalcWeight) await itemSlotData( tokenID, MItables, senderId ); return true; } @@ -5955,37 +5889,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a Magic Item, and the slot in the MI spellbook * to store it in. */ - - var handleSelectMIspell = function( args, senderId ) { + + const handleSelectMIspell = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMIspell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - spellButton = args[(isMI ? 5 : 2)], - spellRow = args[(isMI ? 6 : 3)], - spellCol = args[(isMI ? 7 : 4)], - MIbutton = args[(isMI ? 2 : 5)], - MIrow = args[(isMI ? 3 : 6)], - MIcol = args[(isMI ? 4 : 7)], - spellName = '', - col, - content = ''; + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIbutton = args[(isMI ? 2 : 5)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)]; + + let content = ''; if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + const spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; content += 'Selected '+spellName+' to store'; } if (MIbutton >= 0) { - col = (fields.SpellsFirstColNum || MIcol != 1) ? MIcol : ''; - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, MIrow, MIcol ) || '-'; - content += (spellButton >= 0 ? '' : 'Selected to store') + ' in the slot for '+spellName; +// const col = (fields.SpellsFirstColNum || MIcol != 1) ? MIcol : ''; + const miName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; + content += (spellButton >= 0 ? '' : 'Selected to store') + ' in the slot for '+miName; } makeStoreMIspell( args, senderId, content ); return; @@ -5995,31 +5927,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle selecting a magic item power */ - var handleSelectMIpower = function( args, isUse, senderId ) { // table + const handleSelectMIpower = function( args, isUse, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMIpower: invalid token_id'); sendError('Incorrect MagicMaster syntax'); return; } - const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]], + itemName = (args[3] || '').split('/'), + charges = parseInt(args[5] || '1'), + maxChange = parseInt(args[6] || '0'), + miChargeUsed = parseInt(args[7] || '0'), + MIlibrary = charCS; - var powerName = args[2] || '', - itemName = (args[3] || '').split('/'), + let powerName = args[2] || '', castLevel = args[4], - charges = parseInt(args[5] || '1'), - maxChange = parseInt(args[6] || '0'), - miChargeUsed = parseInt(args[7] || '0'), - tokenName = getObj('graphic',tokenID).get('name'), - MIlibrary = charCS, powerType = powerName.substring(0,3), - powerHyphen = powerName.hyphened(), Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), item, powerObj, table, itemRow, itemRowID; + const powerHyphen = powerName.hyphened(); + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) { powerName = powerName.slice(powerType.length); if (!castLevel) castLevel = casterLevel( charCS, powerType.substring(0,2) ); @@ -6041,7 +5972,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('handleSelectMIpower: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -6049,23 +5979,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars powerObj = miSpellLookup( MIlibrary, item, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); }; if (!powerObj) { - sendDebug('handleSelectMIpower: not found item power index attribute for '+item+'-'+powerHyphen); sendError('Invalid item/power combination'); return; }; - var powerRow = powerObj.get('current'), - powerCol = powerObj.get('max'), - magicItem = getAbility( fields.MagicItemDB, item, charCS ), - Powers = getTable( MIlibrary, fieldGroups.POWERS, powerCol ), - power = Powers.tableLookup( fields.Powers_name, powerRow, '-' ), - powerDB = Powers.tableLookup( fields.Powers_db, powerRow, '-' ), + const powerRow = powerObj.get('current'), + powerCol = powerObj.get('max'), + magicItem = getAbility( fields.MagicItemDB, item, charCS ); + + let Powers = getTable( MIlibrary, fieldGroups.POWERS, powerCol ), powerCount = Powers.tableLookup( fields.Powers_castValue, powerRow, 0 ), - toWho = sendToWho(charCS,senderId,false,true), - content = '', powerLib; + + const power = Powers.tableLookup( fields.Powers_name, powerRow, '-' ), + powerDB = Powers.tableLookup( fields.Powers_db, powerRow, '-' ); - if (powerDB != '-' && !powerType) { + if (powerDB !== '-' && !powerType) { powerLib = abilityLookup( powerDB, power, null, true ); } if (!powerLib || !powerLib.obj) { @@ -6073,14 +6002,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (!powerLib.obj) { - sendDebug('handleSelectMIpower: power ability macro not found'); sendError('Invalid Power definition'); return; } powerLib = getAbility( powerLib.dB, power, charCS ); const itemDesc = item.dispName(), - powerDesc = powerName.dispName(); + powerDesc = powerName.dispName(); if (isUse) { if (powerCount > 0) { @@ -6091,15 +6019,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } Powers = Powers.tableSet( fields.Powers_castValue, powerRow, powerCount-charges ); } - content = charCS.get('name') + ' is using [' + power + '](! /w gm %{'+powerLib.dB+'|'+(power.hyphened())+'}). ' - + 'Select ' + charCS.get('name') + '\'s token before pressing to see effects.'; + const content = charCS.get('name') + ' is using [' + power + '](! /w gm %{'+powerLib.dB+'|'+(power.hyphened())+'}). ' + + 'Select ' + charCS.get('name') + '\'s token before pressing to see effects.'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); } else if (powerCount == 0) { - content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' - + '{{desc=You have already used all **'+itemDesc+'\'s** *'+powerDesc+'* charges for today. ' - + 'You need to allow '+itemDesc+' to have a long rest so it can regain all its powers}}' - + '{{desc1=[Redisplay '+itemDesc+'](~'+magicItem.dB+'|'+item+') or just do something else}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc=You have already used all **'+itemDesc+'\'s** *'+powerDesc+'* charges for today. ' + + 'You need to allow '+itemDesc+' to have a long rest so it can regain all its powers}}' + + '{{desc1=[Redisplay '+itemDesc+'](~'+magicItem.dB+'|'+item+') or just do something else}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); if (!!miChargeUsed) { Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); @@ -6119,8 +6047,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.SpellCharges, (powerCount < 0 ? powerCount : powerCount-charges) ); args.shift(); - content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' - + '{{desc='+tokenName+' is about to use **'+itemDesc+'\'s** '+powerDesc+' power. Is this correct?}}' + const tokenName = getObj('graphic',tokenID).get('name'), + toWho = sendToWho(charCS,senderId,false,true), + content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc='+tokenName+' is about to use **'+itemDesc+'\'s** '+powerDesc+' power. Is this correct?}}' + '{{desc1=[Use '+powerDesc+'](! '+(powerLib.api ? '' : toWho)+'%{'+powerLib.dB +'|'+ (power.hyphened()) +'} !magic --button '+ BT.MI_POWER_USED +'|'+ args.join('|')+ ')' + ' or [Return to '+itemDesc+'](! '+(magicItem.api ? '' : toWho)+'%{'+magicItem.dB+'|'+item+'})\nOr just do something else}}'; sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); @@ -6131,21 +6061,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Restore the uses per day of a single power of a magic item */ - - var handleRestoreMIpowers = function( args, senderId ) { + + const handleRestoreMIpowers = function( args, senderId ) { - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleRestoreMIpower: invalid token_id'); sendError('Incorrect MagicMaster syntax'); return; } - var itemName = args[1] || '', - change = '+-'.includes(args[2][0]), - charges = parseInt(args[2]), - powerName = args[3] || '', + const change = '+-'.includes(args[2][0]), + charges = parseInt(args[2]), + powerName = args[3] || ''; + + let itemName = args[1] || '', Powers = [], row, itemRow, itemRowID, table; @@ -6161,14 +6091,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars row = indexTableGroup( Items, table, itemRow ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('makeSpellsMenu: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var itemHyphen = itemName.replace(/\s/g,'-'), - powersList = (miSpellLookup( charCS, itemHyphen, itemRow, itemRowID, fields.ItemPowersList ) || '').split(','), - action = ((isNaN(charges) || charges > 0) ? 'regained' : 'used'); + const itemHyphen = itemName.replace(/\s/g,'-'); + let powersList = (miSpellLookup( charCS, itemHyphen, itemRow, itemRowID, fields.ItemPowersList ) || '').split(','), + action = ((isNaN(charges) || charges > 0) ? 'regained' : 'used'), + powerHyphen, powerObj, powerRow, powerCol, + maxCharges, curCharges; if (powerName && powersList.includes(powerName)) { powersList = [powerName]; @@ -6179,25 +6110,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars _.each(powersList, powerName => { - let powerHyphen = powerName.replace(/\s/g,'-'), - powerObj = miSpellLookup( charCS, powerHyphen, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); + powerHyphen = powerName.replace(/\s/g,'-'); + powerObj = miSpellLookup( charCS, powerHyphen, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); // powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+itemHyphen+'+'+itemRow+'-'+powerHyphen, null] ); // if (!powerObj) powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+powerHyphen, null] ); if (!powerObj) { - sendDebug('handleRestoreMIpower: not found item power index attribute for '+itemHyphen+'-'+powerHyphen); sendError('Invalid item/power combination'); return; }; - let powerRow = powerObj.get('current'), - powerCol = powerObj.get('max'); + powerRow = powerObj.get('current'); + powerCol = powerObj.get('max'); if (!Powers[powerCol]) { Powers[powerCol] = getTable( charCS, fieldGroups.POWERS, powerCol ); } - let maxCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castMax, powerRow, 1 ) || '1'), - curCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castValue, powerRow, 1 ) || '1'); + maxCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castMax, powerRow, 1 ) || '1'); + curCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castValue, powerRow, 1 ) || '1'); if (change && maxCharges >= 0 && !isNaN(charges)) { Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castMax,powerRow,Math.max(0,(charges + maxCharges))); Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castValue,powerRow,Math.min(curCharges,(charges + maxCharges))); @@ -6213,86 +6143,83 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle storing a spell from a characters memorised * spells into a spell-storing magic item. */ - - var handleStoreMIspell = function( args, senderId ) { //split + + const handleStoreMIspell = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleStoreMIspell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isChange = args[0].toUpperCase().includes('ANY') || args[0].toUpperCase().includes('CHANGE'), - MIbutton = args[2], - MIrow = args[3], - MIcol = args[4], - spellButton = args[5], - spellRow = args[6], - spellCol = args[7], - item = attrLookup( charCS, fields.ItemChosen ) || '-', - row = attrLookup( charCS, fields.ItemRowRef ) || '', - itemRow, itemRowID, itemTable; - - [itemRow,itemTable,itemRowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); - - var itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), - itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,itemRowID), - storeSpells = (itemData.store || 'store').toLowerCase(), - csv = csVer(charCS), - msgField = (csv >= 2.1 ? fields.Spells_msg : fields.Spells_macro); + const isMU = args[0].toUpperCase().includes('MU'), + MIbutton = args[2], + MIrow = args[3], + MIcol = args[4], + spellButton = args[5], + spellRow = args[6], + spellCol = args[7], + item = attrLookup( charCS, fields.ItemChosen ) || '-'; + + let isChange = args[0].toUpperCase().includes('ANY') || args[0].toUpperCase().includes('CHANGE'), + [itemRow,itemTable,itemRowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), (attrLookup( charCS, fields.ItemRowRef ) || '') ); + + const itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,itemRowID), + storeSpells = (itemData.store || 'store').toLowerCase(), + csv = csVer(charCS), + msgField = (csv >= 2.1 ? fields.Spells_msg : fields.Spells_macro); if (isNaN(MIbutton) || MIbutton<0 || isNaN(MIrow) || isNaN(MIcol) || isNaN(spellButton) || spellButton<0 || isNaN(spellRow) || isNaN(spellCol)) { - sendDebug('handleStoreMIspell: invalid button, row or col parameter'); sendError('Internal MagicMaster error'); return; } isChange = isChange || storeSpells === 'any' || storeSpells === 'change'; + + let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); - var SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ), - MIspellsTable = getTable( charCS, fieldGroups.SPELLS, MIcol ), - spellName = SpellsTable.tableLookup( fields.Spells_name, spellRow ).hyphened(), - MIspellName = MIspellsTable.tableLookup( msgField, MIrow ); - + const MIspellsTable = getTable( charCS, fieldGroups.SPELLS, MIcol ), + spellName = SpellsTable.tableLookup( fields.Spells_name, spellRow ).hyphened(), + MIspellName = MIspellsTable.tableLookup( msgField, MIrow ); + if (!isChange && !stdEqual(spellName, MIspellName )) { sendParsedMsg( tokenID, messages.fixedSpell, senderId, getObj('graphic',tokenID).get('name')+'\'s magic item'); makeStoreMIspell( args, senderId, 'Could not store '+spellName+' in '+getObj('graphic',tokenID).get('name')+'\'s spell storing magic item' ); return; } - var values = MIspellsTable.copyValues(), - level = attrLookup( charCS, fields.CastingLevel ), - spellObj = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spellName, charCS ); - + const level = attrLookup( charCS, fields.CastingLevel ), + spellObj = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spellName, charCS ); + if (!spellObj.obj) { sendError('Not found spell definition for '+spellName+'. Unable to store this spell'); return; } - values[fields.Spells_name[0]][fields.Spells_name[1]] = spellName; - values[fields.Spells_db[0]][fields.Spells_db[1]] = (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB); - values[fields.Spells_speed[0]][fields.Spells_speed[1]] = SpellsTable.tableLookup( fields.Spells_speed, spellRow );; - values[fields.Spells_castValue[0]][fields.Spells_castValue[1]] = 1; - values[fields.Spells_castMax[0]][fields.Spells_castMax[1]] = 1; - values[fields.Spells_storedLevel[0]][fields.Spells_storedLevel[1]] = level; - values[fields.Spells_spellLevel[0]][fields.Spells_spellLevel[1]] = String((spellObj.obj[1].type.match(/\d+/) || 1)); - values[fields.Spells_cost[0]][fields.Spells_cost[1]] = 0; - values[fields.Spells_msg[0]][fields.Spells_msg[1]] = spellName; - values[msgField[0]][msgField[1]] = spellName; - if (csv >= 2.1) values[fields.Spells_macro[0]][fields.Spells_macro[1]] = '%{'+charCS.get('name')+'|'+spellName+'}'; + let p = MIspellsTable.fieldGroup; + let values = initValues( p ); + + values.valLine( p, 'name', spellName ) + .valLine( p, 'db', (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB) ) + .valLine( p, 'speed', SpellsTable.tableLookup( fields.Spells_speed, spellRow ) ) + .valLine( p, 'castValue', 1 ) + .valLine( p, 'castMax', 1 ) + .valLine( p, 'storedLevel', level ) + .valLine( p, 'spellLevel', String((spellObj.obj[1].type.match(/\d+/) || 1)) ) + .valLine( p, 'cost', 0 ) + .valLine( p, 'msg', spellName ) + .valLine( p, 'macro', ((csv < 2.1) ? spellName : ('%{'+charCS.get('name')+'|'+spellName+'}')) ); MIspellsTable.addTableRow( MIrow, values ); if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { SpellsTable = SpellsTable.tableSet( fields.Spells_castValue, spellRow, 0 ); } - let muRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, '-mu' ), - prRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, '-pr' ), - muCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, '-mu' ), - prCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, '-pr' ), + let muRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'mu' ), + prRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'pr' ), + muCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'mu' ), + prCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'pr' ), muSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellsList ), prSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemPRspellsList ), muLevels = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellValues ), @@ -6309,6 +6236,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars prLevels = (prLevels || '').split(','); let index = muRows.findIndex( (e,i) => e == MIrow && muCols[i] == MIcol ), muSave = false, prSave = false; + if (index > -1 && muCols[index] === MIcol) { if (!isMU) { muRows.splice(index,1); @@ -6349,7 +6277,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars prSave = true; } }; - if (muSave) { setAttr( charCS, [fields.MIspellRows[0]+item+'-mu+'+itemRowID,fields.MIspellRows[1]], muRows.join() ); setAttr( charCS, [fields.MIspellCols[0]+item+'-mu+'+itemRowID,fields.MIspellCols[1]], muCols.join() ); @@ -6372,31 +6299,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Add a selected spell or power to a spell-storing item */ - + async function handleChangeSpellStore( args, senderId ) { - var del = args[0].toUpperCase().includes('DEL'), - pwSpell = args[0].toUpperCase().includes('PWR'), - tokenID = args[1], - item = args[2].hyphened(), - cmd = args[3].toUpperCase(), - level = parseInt(args[4]) || 1, - retMenu = args[5], + const del = args[0].toUpperCase().includes('DEL'), + pwSpell = args[0].toUpperCase().includes('PWR'), + tokenID = args[1], + cmd = args[3].toUpperCase(), + retMenu = args[5], + answer1 = args[7], + answer2 = args[8] || answer1, + repSpell = args[9], + spellRow = args[10], + spellCol = args[11], + rep = !!repSpell, + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let item = args[2].hyphened(), spell = args[6].hyphened(), - answer1 = args[7], - answer2 = args[8] || answer1, - repSpell = args[9], - spellRow = args[10], - spellCol = args[11], - rep = !!repSpell, - charCS = getCharacter(tokenID), - maxVal = 0, - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isPower = cmd.includes('POWER'), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), itemRow, itemRowID, storedSpellsAttr, storedLevelAttr, table, - currentList, currentValues, spellType = 'ALL'; + spellType = 'ALL'; if (/^\d/.test(item)) { itemRow = parseInt(item); @@ -6409,7 +6335,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('handleChangeSpellStore: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -6430,13 +6355,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars storedLevelAttr = fields.ItemPRspellValues; }; - await moveMIspells( senderId, charCS, itemRow, itemRowID, null, null, null, item, spellType ); + let currentList = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr, '', '', '' ).split(',').filter(e=>!!e), + currentValues = miSpellLookup( charCS, item, itemRow, itemRowID, storedLevelAttr, '', '', '' ).split(',').filter(e=>!!e), + newList = !currentList[0]; - currentList = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr, '', '', '' ).split(',').filter(e=>!!e); - currentValues = miSpellLookup( charCS, item, itemRow, itemRowID, storedLevelAttr, '', '', '' ).split(',').filter(e=>!!e); +// await moveMIspells( senderId, charCS, itemRow, itemRowID, null, null, null, item, spellType ); + +// log('handleChangeSpellStore: after moveMIspells, newList = '+newList+', currentList = '+currentList); if (del || rep) { - let index = currentList.findIndex((s,i) => (s === (rep ? repSpell : spell)) && (!rep || currentValues[i].split('.')[0] == 0)); + const index = currentList.findIndex((s,i) => (s === (rep ? repSpell : spell)) && (!rep || currentValues[i].split('.')[0] == 0)); if (rep) { if (index >= 0) { currentList[index] = spell; @@ -6456,8 +6384,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]], currentList.join(',') ); setAttr( charCS, [storedLevelAttr[0]+item+'+'+itemRowID,storedLevelAttr[1]], currentValues.join(',') ); - await moveMIspells( senderId, null, null, null, charCS, itemRow, itemRowID, item, spellType ); + if (newList) { + await moveMIspells( senderId, null, null, null, charCS, itemRow, itemRowID, item, spellType ); + } else { + await moveMIspells( senderId, charCS, itemRow, itemRowID, charCS, itemRow, itemRowID, item, spellType ); + }; +// log('handleChangeSpellStore: after adding, at '+storedSpellsAttr[0]+item+'+'+itemRowID+', currentList = '+currentList+', and stored currentList = '+attrLookup( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]])); + if (retMenu === 'STORE-MI-SPELL') { let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { @@ -6476,28 +6410,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * handle where somehow the player has been able to select an empty slot **/ - var handlePickupNothing = function( args, pickMI, putSlot, senderId, buy ) { + const handlePickupNothing = function( args, pickMI, putSlot, senderId, buy ) { - var tokenID = args[1], - fromID = args[3], - toID = args[4], - fromRow = args[2], - toRow = args[5], - fromCS = getCharacter(fromID), - toCS = getCharacter(toID); + const tokenID = args[1], + fromID = args[3], + toID = args[4], + fromRow = args[2], + toRow = args[5], + fromCS = getCharacter(fromID), + toCS = getCharacter(toID); if (!fromCS || !toCS){ - sendDebug('handlePickupNothing: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var fromName = fromCS.get('name'), - toName = toCS.get('name'), - targetID = (tokenID == fromID) ? toID : fromID, - content = messages.nothingToPick + '{{desc1=Trying to pick up "'+pickMI+'" from '+fromName+' and putting in '+toName+'\'s "'+putSlot+'"}}' - + '{{desc2=[Other way round](!magic --button '+(buy ? BT.BUY_STORE : BT.POP_STORE)+'|'+tokenID+'|'+toRow+'|'+toID+'|'+fromID+'|'+fromRow+'|-1)' - + ' or [Pick something else](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP) +'|'+tokenID+'|'+targetID+')}}'; + const fromName = fromCS.get('name'), + toName = toCS.get('name'), + targetID = (tokenID == fromID) ? toID : fromID, + content = messages.nothingToPick + '{{desc1=Trying to pick up "'+pickMI+'" from '+fromName+' and putting in '+toName+'\'s "'+putSlot+'"}}' + + '{{desc2=[Other way round](!magic --button '+(buy ? BT.BUY_STORE : BT.POP_STORE)+'|'+tokenID+'|'+toRow+'|'+toID+'|'+fromID+'|'+fromRow+'|-1)' + + ' or [Pick something else](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP) +'|'+tokenID+'|'+targetID+')}}'; sendParsedMsg( tokenID, content, senderId ); return; }; @@ -6506,11 +6439,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle switching to a treasure menu **/ - var handleTreasure = function( args, senderId ) { + const handleTreasure = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter( tokenID ), - content = makeLootMenu( senderId, args ); + const tokenID = args[1], + charCS = getCharacter( tokenID ), + content = makeLootMenu( senderId, args ); sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; @@ -6519,32 +6452,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * handle the failure of an attempt to pick pockets **/ - var handlePPfailed = function( args, senderId ) { + const handlePPfailed = function( args, senderId ) { - var tokenID = args[1], - pickID = args[2], - putID = args[3], - ppRoll = parseInt(args[4],10), - search = putID === tokenID, - targetID = search ? pickID : putID, - charCS = getCharacter( tokenID ), - targetCS = getCharacter( targetID ); + const tokenID = args[1], + pickID = args[2], + putID = args[3], + ppRoll = parseInt(args[4],10), + search = putID === tokenID, + targetID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + targetCS = getCharacter( targetID ); if (!tokenID || !targetID || !charCS || !targetCS) { - sendDebug('handlePPfailure: invalid ID argument passed'); sendError('Invalid MagicMaster parameter'); return; }; if (isNaN(ppRoll)) { - sendDebug('handlePPfailure: invalid ppRoll'); sendError('Invalid MagicMaster parameter'); return; } - var charName = charCS.get('name'), - targetName = targetCS.get('name'), - targetLevel = parseInt(characterLevel( targetCS )), + const charName = charCS.get('name'), + targetName = targetCS.get('name'); + + let targetLevel = parseInt(characterLevel( targetCS )), content = '&{template:'+fields.menuTemplate+'}{{name=Failed pick pocket attempt by '+charName+'}}'; if (isNaN(targetLevel)) { @@ -6563,223 +6495,175 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; /** - * Handle a character picking or putting away an item to/from a store - * args[] is the standard action|charID|fromID|toID|fromRow|toRow|qty|cost - * qty -1 means not yet chosen, cost -1 means not yet agreed or no cost + * Handle toggling the selection of one or more items to pick up or + * put away. Can take a row number or a table name or "All" as the pick + * reference. **/ - async function handlePickOrPut( args, senderId ) { // resolveData - - try { - - var buy = (args[0] || '').toUpperCase().includes('BUY'), - sell = (args[0] || '').toUpperCase().includes('SELL'), - offer = (args[0] || '').toUpperCase().includes('OFFER'), - tokenID = args[1], - fromRowRef = args[2], - fromTokenID = args[3], - toTokenID = args[4], - toRowRef = args[5], - qty = args[6], - expenditure = args[7], - newName = (args[8] || '').hyphened(), - charCS = getCharacter( tokenID ), - fromCS = getCharacter( fromTokenID ), - toCS = getCharacter( toTokenID ), - traderCS = buy ? fromCS : toCS, - parseTable = { - itemType:reSpellSpecs.itemType, - hide:reSpellSpecs.hide, - reveal:reSpellSpecs.reveal, - pick:reSpellSpecs.pick, - put:reSpellSpecs.put, - cost:reSpellSpecs.cost, - weight:reSpellSpecs.weight, + const handleFlagPicks = function ( args, senderId ) { + + const pickRow = args[2] || -1, + pickID = args[3], + charCS = getCharacter(pickID); + + if (!charCS) throw( 'pickID does not represent a valid character' ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + name; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + + if (isNaN(pickRow)) { + const pickedTable = pickRow.toUpperCase(); + if (pickedTable !== 'ALL' && _.isUndefined(Items[pickedTable])) throw( 'Invalid item table type specified' ); + for (const table in Items) { + if (pickedTable === table || pickedTable === 'ALL') { + for (let row = 0; !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false )); row++) { + if (name !== '-') { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; }; - - if (!charCS || !fromCS || !toCS) { - sendDebug( 'handlePickOrPut: one or more tokenIDs do not represent valid characters' ); - sendError('Invalid MagicMaster button arguments'); - return; - } - if (isNaN(fromRowRef) || fromRowRef<0 || isNaN(toRowRef) || toRowRef<0) { - sendDebug('handlePickOrPut: invalid row or column parameter'); - sendError('Internal MagicMaster error'); - return; - } - - var toMIbag = getTableGroup( toCS, fieldGroups.MI ), - fromMIbag = getTableGroup( fromCS, fieldGroups.MI ), - toTable, toIndex, toID, fromTable, fromIndex, fromID; - [toIndex,toTable,toID] = tableGroupIndex( toMIbag, toRowRef ); - [fromIndex,fromTable,fromID] = tableGroupIndex( fromMIbag, fromRowRef ); - if (_.isUndefined(toTable) || _.isUndefined(fromTable)) { - sendDebug('handlePickOrPut: toRowRef extends beyond MIbag'); - sendError('Internal MagicMaster error'); - return; }; - - var toSlotName = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'name'], toIndex, false ), - toMIvalues = initValues( toMIbag[toTable].fieldGroup ), - toSlotTrueName, toSlotType, toSlotQty, toSlotCharges, toSlotTrueType, toSlotCost, - MIname = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'name'], fromIndex ), - MItrueName = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueName'], fromIndex ), - fromTrueName = MItrueName, - fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'type'], fromIndex ) || '').toLowerCase(), - fromSlotTrueType = (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueType'], fromIndex ) || fromSlotType).toLowerCase(), - MItrueObj = getAbility( fields.MagicItemDB, MItrueName, fromCS, null, null, null, fromIndex, fromID ), - MIdata = resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, parseTable, fromIndex, fromID ).parsed, - showType = parseInt(attrLookup( fromCS, fields.ItemContainerHide )), - hide = (MIdata.hide.length && MIdata.hide !== 'nohide' && MIdata.hide !== 'reveal') || (!MIdata.hide.length && (MIname === MItrueName) && state.MagicMaster.autoHide && !!MItrueObj.obj && reLooksLike.test(MItrueObj.obj[1].body)), - rev = hide ? (MIdata.reveal || '') : '', - pickPutText = (tokenID === fromTokenID) ? 'put away' : 'pick up'; - - if (hide) MIname = (!MIdata.hide.length || MIdata.hide === 'hide') ? getShownType( MItrueObj, fromRowRef, MIdata.itemType ) : MIdata.hide; - - if (!_.isUndefined(toSlotName)) { - toSlotType = (toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'type'], toIndex ) || fromSlotType).toLowerCase(); - toSlotTrueName = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueName'], toIndex ); - toSlotTrueType = (toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueType'], toIndex ) || fromSlotTrueType).toLowerCase(); - toSlotQty = parseInt((toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'qty'], toIndex ) || 0),10); - toSlotCharges = parseInt((toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueQty'], toIndex ) || 0),10); - toSlotCost = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'cost'], toIndex ); - } else { - toSlotName = '-'; - toSlotTrueName = toMIvalues[fields.Items_trueName[0]][fields.Items_trueName[1]]; - toSlotType = toMIvalues[fields.Items_type[0]][fields.Items_type[1]]; - toSlotTrueType = toSlotType; - } - - var sameMI = (MItrueName.toLowerCase() === toSlotTrueName.toLowerCase()) && (toSlotType === fromSlotType || !toSlotType.dbName()) && (toSlotTrueType === fromSlotTrueType || !toSlotTrueType.dbName()), - toSlotEmpty = toSlotName === '-'; - - if (((toSlotType && toSlotType.includes('cursed')) || (toSlotTrueType && toSlotTrueType.includes('cursed'))) && !sameMI && !toSlotEmpty) { - sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Select another slot](!magic --button '+BT.POP_PICK+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}', senderId ); - return; - } - - if (((fromSlotType && fromSlotType.includes('cursed')) || (fromSlotTrueType && fromSlotTrueType.includes('cursed'))) && fromTokenID == tokenID) { - sendParsedMsg( tokenID, messages.cursedItem + '{{desc1=[Select another item](!magic --button '+BT.POP_PICK+'|'+tokenID+'|-1|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+')}}', senderId ); - return; - } - - var MIqty = parseInt( (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex ) || 0), 10) || 0, - MItrueQty = parseInt((fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex) || 0),10), - MIspeed = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'speed'], fromIndex ), - MItrueSpeed = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueSpeed'], fromIndex ), - MItype = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'type'], fromIndex ), - MIcost = evalAttr( fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'cost'], fromIndex ) || 0, charCS ), - MIcost = MIcost != 0 ? MIcost : (!sell ? 0 : resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, {cost:reSpellSpecs.cost} ).parsed.cost || 0), - MIbaseCost = sell ? toSlotCost : MIcost, - MIreveal = rev || fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'reveal'], fromIndex ), - MItrueType = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueType'], fromIndex ), - MItext = MIname, - MIobj = abilityLookup( fields.MagicItemDB, MIname, fromCS ), - MIsuperTypes = MIdata.itemType ? [MIdata.itemType.dbName()] : (MIobj.specs() || [['','','','','']]).reduce((a,b) => a.concat([b[4].dbName()]), []), - slotInc = 1, - isStackable = (stackable.includes(fromSlotType) && stdEqual( toSlotName.replace(/\-v\d+$/, ''), MIname ) && stdEqual( toSlotType, MItype ) && stdEqual( toSlotTrueName, MItrueName )), - finalQty, finalCharges, pickQty, charges, content; - - if (showType) { - MItext = !MIobj.obj ? MItext : getShownType( MIobj, fromRowRef, MIdata.itemType ); - } - -// MIqty = isNaN(MIqty) ? 0 : MIqty; -// MIcost = isNaN(MIcost) ? 0 : MIcost; - toSlotQty = isNaN(toSlotQty) ? 0 : toSlotQty; - toSlotCharges = isNaN(toSlotCharges) ? 0 : toSlotCharges; - -// log('handlePickOrPut: item '+MIname+', table cost = '+fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'cost'], fromIndex )+', dB cost = '+resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, {cost:reSpellSpecs.cost} ).parsed.cost+', MIcost = '+MIcost); + } else if (pickRow >=0) { + let [row,table] = tableGroupIndex( Items, pickRow ); +// log('handleFlagPicks: row = '+row+', table = '+table+', chosen = '+Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row )); + if (!_.isUndefined(row) && !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false ))) { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; + }; + + /** + * Handle a character picking or putting away an item to/from a store + * args[] is the standard action|charID|fromID|toID|fromRow|toRow|qty|cost + * qty -1 means not yet chosen, cost -1 means not yet agreed or no cost + **/ -// log('handlePickOrPut: singular = '+singular+', MIsuperTypes = '+MIsuperTypes+', intersection = '+_.intersection(singular,MIsuperTypes)+', specs = '+MIobj.specs()); + async function handlePickOrPut( args, senderId ) { + + try { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + offer = (args[0] || '').toUpperCase().includes('OFFER'), + tokenID = args[1], + fromRowRef = args[2], + fromTokenID = args[3], + toTokenID = args[4], + toRowRef = args[5], + newName = (args[8] || '').hyphened(), + charCS = getCharacter( tokenID ), + fromCS = getCharacter( fromTokenID ), + toCS = getCharacter( toTokenID ), + traderCS = buy ? fromCS : toCS, + parseTable = { + itemType:reSpellSpecs.itemType, + hide:reSpellSpecs.hide, + reveal:reSpellSpecs.reveal, + pick:reSpellSpecs.pick, + put:reSpellSpecs.put, + cost:reSpellSpecs.cost, + weight:reSpellSpecs.weight, + }; + + let qty = args[6], + expenditure = args[7]; - switch (MIqty) { - case 0: - if (!splitable.includes(fromSlotType)) { - qty = pickQty = 0; - charges = MItrueQty; - } else { - handlePickupNothing( args, MItext, toSlotName, senderId, buy ); - return; - }; - break; - - case 1: - qty = 1; - pickQty = charges = MItrueQty; - MIqty = 0; - break; + if (isNaN(parseInt(qty))) qty = -1; - default: - if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { - qty = 1; - charges = pickQty = (qty >= MIqty ? MItrueQty : 1); - if (qty >= MIqty) MIqty = 0; - } else if (!splitable.includes(fromSlotType)) { - qty = MIqty; - pickQty = (recharging.includes(fromSlotType)) ? MIqty : MItrueQty; - charges = MItrueQty; - MIqty = 0; - } else if (qty < 0) { - howMany( args, MItext, fromSlotType, MIqty, senderId ); - return; - } else if (qty >= MIqty) { - qty = MIqty; - pickQty = charges = MItrueQty; - MIqty = 0; - } else if (qty == 0) { - return; - } else { - pickQty = charges = qty * Math.ceil(MItrueQty/MIqty); - } - break; + if (!_.isUndefined(expenditure) && expenditure.length) { + expenditure = parseFloat(expenditure); } - finalQty = pickQty; - finalCharges = charges; - if (isStackable) { - finalQty = (parseInt(finalQty)||0) + (parseInt(toSlotQty)||0); - finalCharges = (parseInt(finalCharges)||0) + (parseInt(toSlotCharges)||0); - slotInc = 0; - } else if (toSlotType !== '' && (toSlotName !== '-')) { - content = messages.slotFull; - content += '{{[Choose another slot](!magic --pickorput|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}'; - sendParsedMsg( tokenID, content, senderId ); + if (!charCS || !fromCS || !toCS) { + sendError('Invalid MagicMaster button arguments'); return; } - - if (!_.isUndefined(expenditure)) { - expenditure = parseFloat(expenditure); + if (isNaN(fromRowRef) || fromRowRef<0 || isNaN(toRowRef) || toRowRef<0) { + sendError('Internal MagicMaster error'); + return; } - var pickPocket = (attrLookup( charCS, fields.PickPocket ) || 'false') == 'true'; + + const toMIbag = getTableGroup( toCS, fieldGroups.MI ), + fromMIbag = getTableGroup( fromCS, fieldGroups.MI ); + + let fromIndexes, fromTables, fromIDs, prefix; + + [fromIndexes,fromTables,fromIDs] = tableGroupFind( fromMIbag, 'chosen', 1, true, true ); + + let single = (!_.isUndefined(fromIndexes) && fromIndexes.length <= 1); + let miNames = []; + let miQtys = []; + const pickPocket = (attrLookup( charCS, fields.PickPocket ) || 'false') == 'true', + showType = parseInt(attrLookup( fromCS, fields.ItemContainerHide )); -// log('handlePickOrPut: pickPocket = '+pickPocket+', (buy || sell) = '+(buy || sell)+', expenditure = '+expenditure); + if (!pickPocket && (buy || sell) && (_.isUndefined(expenditure) || !expenditure.length) && (_.isUndefined(expenditure) || isNaN(expenditure) || offer)) { + + let MIname = single ? tableGroupLookup( fromMIbag, 'name', fromRowRef ) : 'items'; + let MIcost, MIdata, fromSlotType, fromSlotTrueType, totalQty = 0, + fromTable, fromIndex, fromPrefix, MIqty, MItrueName, MIobj, MIsuperTypes; - if (!pickPocket && (buy || sell) && (_.isUndefined(expenditure) || isNaN(expenditure) || offer)) { if (!offer) { - MIcost = !buy ? MIcost : (!MIdata.cost.includes('^^') ? MIcost : MIdata.cost); + expenditure = 0; let notes = attrLookup( traderCS, fields.AttrNotes ), match = (notes.match(/n?pcdata=(\[.+?\])/i) || ['',''])[1], reTrade = {buy:reClassSpecs.buy, sell:reClassSpecs.sell}, tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade ).parsed, trade = buy?'sell':'buy', - buyFormula = parseData(match, reTrade)[trade] || tradingRace[trade] || classObjects( traderCS, senderId, reTrade)[0].classData[trade] || (buy?'(cost*(1+((4+2d6)/100)))':'(cost*(1-((4+2d6)/100)))'), - replaced = buyFormula.replace(/cost/g,MIcost); - MIcost = evalAttr(replaced,charCS); - expenditure = (Math.round(100 * MIcost * ((!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType)) ? 1 : qty))/100); -// log('handlePickOrPut: notes = '+notes+', match = '+match+', parsed = '+parseData(match, reTrade)[trade]+', race = '+tradingRace[trade]+', formula = '+buyFormula+', replaced = '+replaced+', MIcost = '+MIcost+', expenditure = '+expenditure); + buyFormula = parseData(match, reTrade)[trade] || tradingRace[trade] || classObjects( traderCS, senderId, reTrade)[0].classData[trade] || (buy?'(cost*(1+((4+2d6)/100)))':'(cost*(1-((4+2d6)/100)))'); + + for (let k=0; k a.concat([b[4].dbName()]), []); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(); + if (MIqty <= 1) { + qty = MIqty; + } else if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + } else if (qty < 0) { + let MItext = (!showType ? MIname : (!MIobj.obj ? MIname : getShownType( MIobj, fromRowRef, MIdata.itemType ))); + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + }; + MIcost = parseFloat(evalAttr((fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0), fromCS)); +// log('handlePickOrPut: cost from table = '+MIcost); + if (!single) qty = parseInt( fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 1); + totalQty += parseInt(qty) || 0; + MIcost = MIcost !== 0 ? MIcost : (!sell ? 0 : MIdata.cost || 0); +// log('handlePickOrPut: MIcost (if zero) now '+MIcost); + MIcost = !buy ? MIcost : (!MIdata.cost.includes('^^') ? MIcost : MIdata.cost); +// log('handlePickOrPut: buy = '+buy+', MIdata.cost = '+MIdata.cost+', MIcost = '+MIcost); + buyFormula = buyFormula.replace(/cost/g,MIcost); +// log('handlePickOrPut: buyFormula = '+buyFormula); + MIcost = parseFloat(evalAttr(buyFormula,charCS)) || 0; +// log('handlePickOrPut: buyFormula = '+buyFormula+', replacced = '+buyFormula.replace(/cost/g,MIcost)+', evaluated = '+MIcost); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(), + fromSlotTrueType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'trueType'], fromIndex ) || fromSlotType).toLowerCase(), + expenditure += (Math.round(100 * MIcost * ((!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType)) ? 1 : qty))/100); +// log('handlePickOrPut: MIcost = '+MIcost+', not splitable = '+(!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType))+', qty = '+qty+', expenditure = '+expenditure); + }; + } else { + totalQty = qty; }; if (expenditure) { - setAttr( charCS, ['expenditure', 'current'], expenditure ); + setAttr( charCS, fields.Expenditure, expenditure ); if (args[0].toUpperCase() === BT.BUY_OFFER || args[0].toUpperCase() === BT.SELL_OFFER) { - content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Accept Offer' : 'Pay for Goods')+'}}' - + '{{desc='+traderCS.get('name')+' offers '+(sell ? 'to buy the goods from you' : 'to sell you the goods')+' for '+showCost(Math.abs(expenditure))+'. Are you happy to '+(sell ? 'accept' : 'pay')+' this? You currently have '+(attrLookup(charCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(charCS,fields.Money_gold) || 0)+'GP, '+(attrLookup(charCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(charCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(charCS,fields.Money_copper) || 0)+'CP.}}' - + '{{desc1=['+(sell ? 'Sell' : 'Buy')+' goods](!magic --button '+(sell ? BT.SELL_ITEM : (buy ? BT.BUY_ITEM : BT.PICK_ITEM))+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|'+expenditure+') or' - + '[Choose something else](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Accept Offer' : 'Pay for Goods')+'}}' + + '{{desc='+traderCS.get('name')+' offers '+(sell ? 'to buy the goods from you' : 'to sell you the goods')+' for '+showCost(Math.abs(expenditure))+'. Are you happy to '+(sell ? 'accept' : 'pay')+' this? You currently have '+(attrLookup(charCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(charCS,fields.Money_gold) || 0)+'GP, '+(attrLookup(charCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(charCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(charCS,fields.Money_copper) || 0)+'CP.}}' + + '{{desc1=['+(sell ? 'Sell' : 'Buy')+' goods](!magic --button '+(sell ? BT.SELL_ITEM : (buy ? BT.BUY_ITEM : BT.PICK_ITEM))+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+') or' + + '[Choose something else](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); } else if (sell && expenditure > spendMoney( traderCS, 0 )) { - content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, this trader cannot afford to buy the '+MIname+'. Perhaps you have something else more affordable?' - + ' Or you could buy some items from them first.}}{{desc1=[Return to inventory]('+fields.magicMaster+' --button '+BT.SELL_POP+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, this trader cannot afford to buy the '+MIname+'. Perhaps you have something else more affordable?' + + ' Or you could buy some items from them first.}}{{desc1=[Return to inventory]('+fields.magicMaster+' --button '+BT.SELL_POP+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, the trader can\'t afford to buy the '+MIname+'. They could buy it for ' + showCost(Math.abs(expenditure))+' but they only have '+(attrLookup(traderCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(traderCS,fields.Money_gold) || 0)+'GP, ' @@ -6787,114 +6671,221 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'CP (which is equivalent to '+showCost(spendMoney(traderCS,0))+'). They\'ll need to sell some stuff first to make money.}}'; sendResponse( traderCS, content ); } else { - content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Make Offer' : 'Set Cost')+'}}' - + '{{desc=You are thinking of making an offer '+(buy ? ('to sell '+qty+' '+MIname+' to ') : ('to buy '+qty+' '+MIname+' from '))+charCS.get('name')+' for a total of '+showCost(Math.abs(expenditure))+'. Are you happy with this offer?}}' - + '{{desc1=[Make the offer](!magic --button '+(sell ? BT.SELL_OFFER : BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|'+expenditure+')' - + ' or [Haggle a price](!magic --button '+(sell ? BT.SELL_OFFER: BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|?{What offer do you want to make? GP|'+expenditure+'})' - + ' or [Refuse to trade](!magic --message '+tokenID+'|Trade Refused|The person you are attempting to trade with has refused to '+(sell ? 'buy' : 'sell')+' you '+qty+' '+MIname+' but feel free to try a different trade --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Make Offer' : 'Set Cost')+'}}' + + '{{desc=You are thinking of making an offer '+(buy ? ('to sell '+totalQty+' '+MIname+' to ') : ('to buy '+totalQty+' '+MIname+' from '))+charCS.get('name')+' for a total of '+showCost(Math.abs(expenditure))+'. Are you happy with this offer?}}' + + '{{desc1=[Make the offer](!magic --button '+(sell ? BT.SELL_OFFER : BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+')' + + ' or [Haggle a price](!magic --button '+(sell ? BT.SELL_OFFER: BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|?{What offer do you want to make? GP|'+expenditure+'})' + + ' or [Refuse to trade](!magic --message '+tokenID+'|Trade Refused|The person you are attempting to trade with has refused to '+(sell ? 'buy' : 'sell')+' you '+totalQty+' '+MIname+' but feel free to try a different trade --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( traderCS, content ); } return; } } - if (!isNaN(expenditure) && expenditure != 0 && (buy || sell) ) { - log('handlePickOrPut: expenditure = '+expenditure); - spendMoney( toCS, Math.abs(expenditure), fromCS ); - } + for (let i=0; i a.concat([b[4].dbName()]), []), + MIqty = parseInt( (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 0), 10) || 0, + MIcost = evalAttr( fromMIbag[fromTable].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0, charCS ), + MItext = MIname, + slotInc = 1, + pickQty, charges; + + if (showType) { + MItext = !MIobj.obj ? MItext : getShownType( MIobj, fromRowRef, MIdata.itemType ); + } + + toSlotQty = isNaN(toSlotQty) ? 0 : toSlotQty; + toSlotCharges = isNaN(toSlotCharges) ? 0 : toSlotCharges; + + switch (MIqty) { + case 0: + if (!splitable.includes(fromSlotType)) { + qty = pickQty = 0; + charges = MItrueQty; + } else if (single) { + handlePickupNothing( args, MItext, toSlotName, senderId, buy ); + return; + } else { + continue; + } + break; + + case 1: + qty = 1; + pickQty = charges = MItrueQty; + MIqty = 0; + break; + + default: + if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + charges = pickQty = (qty >= MIqty ? MItrueQty : 1); + if (qty >= MIqty) MIqty = 0; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + pickQty = (recharging.includes(fromSlotType)) ? MIqty : MItrueQty; + charges = MItrueQty; + MIqty = 0; + } else if (single && qty < 0) { + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + } else if (qty < 0 || qty >= MIqty) { + qty = MIqty; + pickQty = charges = MItrueQty; + MIqty = 0; + } else if (qty == 0) { + continue; + } else { + pickQty = charges = qty * Math.ceil(MItrueQty/MIqty); + } + break; + } + let finalQty = pickQty, + finalCharges = charges; + + if (isStackable) { + finalQty = (parseInt(finalQty)||0) + (parseInt(toSlotQty)||0); + finalCharges = (parseInt(finalCharges)||0) + (parseInt(toSlotCharges)||0); + slotInc = 0; + } else if (toSlotType !== '' && (toSlotName !== '-')) { + let content = messages.slotFull; + content += '{{desc9=[Choose another slot](!magic --pickorput|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}'; + sendParsedMsg( tokenID, content, senderId ); + return; + } + + if (!isNaN(expenditure) && expenditure != 0 && (buy || sell) ) { + spendMoney( toCS, Math.abs(expenditure), fromCS ); } - if (newName !== MIname) { - if (MIname === MItrueName) MItrueName = newName; - if (MIobj.obj && MIobj.obj[0] && MIobj.obj[1]) { - MIobj.obj[0].set('name',newName); - let key = 'ababzzqqrst', - oldDispName = MIname.replace(/-/g,' '), - action = MIobj.obj[1].body.replace(new RegExp(MIname,'img'),key).replace(new RegExp(oldDispName,'img'),args[8]).replace(new RegExp(key,'img'),newName); - setAbility( toCS, newName, action ); + + const MIbaseCost = sell ? toSlotCost : MIcost; + let p = fieldGroups[toTable].prefix; + + toMIvalues.valLine(p,'name',MIname) + .valLine(p,'trueName',MItrueName) + .valLine(p,'qty',finalQty) + .valLine(p,'trueQty',finalCharges) + .valLine(p,'speed',MIspeed) + .valLine(p,'trueSpeed',MItrueSpeed) + .valLine(p,'cost',(sell ? MIbaseCost : MIcost )) + .valLine(p,'type',MItype) + .valLine(p,'reveal',MIreveal) + .valLine(p,'weight',(MIdata.weight || 1)) + .valLine(p,'trueType',MItrueType); + + toMIbag[toTable].addTableRow( toIndex, toMIvalues ); + + if (!newName || !newName.length || MItrueName !== MIname) { + if (MItrueObj.obj) { + setAbility( toCS, MItrueName, MItrueObj.obj[1].body ); + } else { + log('handlePickOrPut: storing '+MItrueName+' to '+toCS.get('name')+', ability not found in any database or '+fromCS.get('name')); } - MIname = newName; + } + + let containerType = (parseInt(attrLookup(toCS, fields.ItemContainerType) || 0) || 0); + containerType = (containerType == 0 ? 1 : (containerType == 2 ? 3 : containerType)); + setAttr( toCS, fields.ItemContainerType, containerType ); + setAttr(charCS, fields.ItemOldContainerType, containerType); + + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MIname ); + if (!stdEqual(MIname,MItrueName)) { + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MItrueName ); + } + checkForBag( toCS, MItrueName, toRowRef ); + if (!!MIdata.pick && !!MIdata.pick.length) { + pickPutCmd( MIdata.pick, toTokenID, toCS, 'magic handlePickOrPut' ); }; - }; -*/ - let p = fieldGroups[toTable].prefix; - let valLine = (p,t,v) => {toMIvalues[fields[p+t][0]][fields[p+t][1]] = v}; - - valLine(p,'name',MIname); - valLine(p,'trueName',MItrueName); - valLine(p,'qty',finalQty); - valLine(p,'trueQty',finalCharges); - valLine(p,'speed',MIspeed); - valLine(p,'trueSpeed',MItrueSpeed); - valLine(p,'cost',(sell ? MIbaseCost : MIcost )); - valLine(p,'type',MItype); - valLine(p,'reveal',MIreveal); - valLine(p,'weight',(MIdata.weight || 1)); - valLine(p,'trueType',MItrueType); - - toMIbag[toTable].addTableRow( toIndex, toMIvalues ); - - if (!newName || !newName.length || MItrueName !== MIname) { - MIobj = abilityLookup( fields.MagicItemDB, fromTrueName, fromCS ); - if (MIobj.obj) { - setAbility( toCS, MItrueName, MIobj.obj[1].body ); + if (MIqty == 0) { + if (!!MIdata.put && !!MIdata.put.length) { + pickPutCmd( MIdata.put, fromTokenID, fromCS, 'magic handlePickOrPut' ); + }; + fromMIbag[fromTable].addTableRow( fromIndex ); // Blanks this row of the table + setTimeout(() => removeMIability( fromCS, MIname, fromMIbag[fromTable], fromTable ), 100); // Only removes ability if does not exist elsewhere in the equipment list + setTimeout(() => removeMIability( fromCS, MItrueName, fromMIbag[fromTable], fromTable ), 100); } else { - log('handlePickOrPut: storing '+MItrueName+' to '+toCS.get('name')+', ability not found in any database or '+fromCS.get('name')); - } - } - - let containerType = (parseInt(attrLookup(toCS, fields.ItemContainerType) || 0) || 0); - containerType = (containerType == 0 ? 1 : (containerType == 2 ? 3 : containerType)); - setAttr( toCS, fields.ItemContainerType, containerType ); - setAttr(charCS, fields.ItemOldContainerType, containerType); - - await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MIname ); - if (!stdEqual(MIname,MItrueName)) { - await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MItrueName ); - } - checkForBag( toCS, MItrueName, toRowRef ); - if (!!MIdata.pick && !!MIdata.pick.length) { - pickPutCmd( MIdata.pick, toTokenID, toCS, 'magic handlePickOrPut' ); - }; - if (MIqty == 0) { - if (!!MIdata.put && !!MIdata.put.length) { - pickPutCmd( MIdata.put, fromTokenID, fromCS, 'magic handlePickOrPut' ); + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex, (MItrueQty - charges) ); + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex, (MIqty - qty) ); }; - fromMIbag[fromTable].addTableRow( fromIndex ); // Blanks this row of the table - setTimeout(() => removeMIability( fromCS, MIname, fromMIbag[fromTable], fromTable ), 100); // Only removes ability if does not exist elsewhere in the equipment list - setTimeout(() => removeMIability( fromCS, MItrueName, fromMIbag[fromTable], fromTable ), 100); - } else { - fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex, (MItrueQty - charges) ); - fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex, (MIqty - qty) ); + if (single) pickupMessage( args, MIname, MItype, qty, (MItrueQty - qty), finalCharges, senderId ); + miNames.push(MIname); + miQtys.push(qty); + qty = -1; }; - - content = fields.attackMaster + ' --checkac ' + fromTokenID + '|silent||' + senderId + let content = fields.attackMaster + ' --checkac ' + fromTokenID + '|silent||' + senderId + ' --checkac ' + toTokenID + '|silent||' + senderId; sendAPI( content, senderId ); content = fields.initMaster + ' --checkinit ' + fromTokenID + '|silent' + ' --checkinit ' + toTokenID + '|silent'; sendAPI( content, senderId ); setTimeout( updateCoins, 10, charCS ); + + if (!single) pickupMessage( args, miNames, null, miQtys, null, null, senderId ); + await itemSlotData( toTokenID, toMIbag, senderId ); + await itemSlotData( fromTokenID, fromMIbag, senderId ); - pickupMessage( args, MIname, MItype, qty, (MItrueQty - qty), finalCharges, senderId ); return; } catch (e) { sendDebug('MagicMaster handlePickOrPut: JavaScript '+e.name+': '+e.message+' while searching, looting, storing, buying or selling items'); @@ -6908,29 +6899,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * displayed magic item bag. */ - var handleSelectMI = function( args, GMonly, senderId ) { + const handleSelectMI = function( args, GMonly, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MItoStore = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MItoStore = args[3], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (!MItoStore || MItoStore.length == 0) { - sendDebug('handleSelectMI: invalid Magic Item passed'); sendError('Internal MagicMaster error'); return; } if (MItoStore.toLowerCase() != 'remove') { - let index,rowID,table; - [index,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), MIrowref ); -// let itemObj = abilityLookup( fields.MagicItemDB, MItoStore, charCS ); - let itemSpeed = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {speed:reSpellSpecs.speed}, index, rowID ).parsed.speed; + let [index,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), MIrowref ); + let itemSpeed = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {speed:reSpellSpecs.speed}, {row:index, rowID:rowID} ).parsed.speed; setAttr( charCS, fields.ItemCastingTime, itemSpeed ); setAttr( charCS, fields.ItemSelected, 1 ); }; @@ -6947,25 +6934,23 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle selecting a slot in the displayed MI bag */ - var handleSelectSlot = function( args, GMonly, senderId ) { + const handleSelectSlot = function( args, GMonly, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); + + let MIrowref = args[2]; if (!charCS) { - sendDebug('handleSelectSlot: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (!MIrowref || isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleSelectSlot: invalid MI parameter passed'); sendError('Internal MagicMaster error'); return; } - var table, index, - MagicItems = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + let MagicItems = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), [index,table] = tableGroupIndex( MagicItems, MIrowref ); if (_.isUndefined(index)) { @@ -6974,15 +6959,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MagicItems[table] = MagicItems[table].addTableRow(); index = MagicItems[table].sortKeys.length-1; args[2] = MIrowref = indexTableGroup( MagicItems, table, index ); -// log('handleSelectSlot: table = '+table+', index = '+index+', rowref = '+MIrowref+', name of new row = '+tableGroupLookup( MagicItems, MIrowref )); }; - var slotItem = MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'name'], index ); + const slotItem = MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'name'], index ); -// if (MIrowref >= MagicItems.sortKeys.length) { -// MagicItems.addTableRow( MIrowref ); -// } - setAttr( charCS, fields.ItemChosen, slotItem.hyphened() ); setAttr( charCS, fields.ItemRowRef, MIrowref ); setAttr( charCS, fields.Expenditure, (MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], index ) || 0 ) ); @@ -7002,38 +6982,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * A flag parameter determines if this is a GM-only action */ - async function handleStoreMI( args, GMonly, senderId ) { //resolveData + async function handleStoreMI( args, GMonly, senderId ) { - var tokenID = args[1], + const cmd = (args[0].toUpperCase().includes('MARTIAL') ? BT.EDIT_MARTIAL : (args[0].toUpperCase().includes('ALLITEMS') ? BT.EDIT_ALLITEMS : BT.EDIT_MI)); + + let tokenID = args[1], MIrowref = String(args[2] || ''), - MIchosen = args[3], + replace = (args[3] || '').split('/'), MIqty = args[4] || '1', - silent = (args[5] || '').toUpperCase() === 'SILENT', - cmd = (args[0].toUpperCase().includes('MARTIAL') ? BT.EDIT_MARTIAL : (args[0].toUpperCase().includes('ALLITEMS') ? BT.EDIT_ALLITEMS : BT.EDIT_MI)), - charCS = getCharacter( tokenID ), - queries = args.slice(6); + silent = (args[5] || '').toUpperCase() === 'SILENT'; - if (!getObj( 'graphic', tokenID )) { + const queries = args.slice(6), + charCS = getCharacter( tokenID ); + + if (!getObj( 'graphic', tokenID )) { // i.e. if args[1] is actually a characterID tokenID = undefined; silent = true; } if (!charCS) { - sendDebug('handleStoreMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroup( charCS, fieldGroups.MI ), - inHand = MIrowref.dbName().startsWith('inhand'), - hand = inHand ? parseInt(MIrowref.split('/')[1] || '0') : 0, - replace = (MIchosen || '').split('/'), - MIchosen = replace[0], - MIreplace = replace[1], - isRing = MIrowref === '=', - repQty = '0', - qtyOp = isNaN(parseInt(MIqty[0])) && MIqty[0] !== '=', - reMIspecs = { + const inHand = MIrowref.dbName().startsWith('inhand'), + MIchosen = replace[0], + MIreplace = replace[1], + isRing = MIrowref === '=', + qtyOp = isNaN(parseInt(MIqty[0])) && MIqty[0] !== '=', + reMIspecs = { qty:reSpellSpecs.qty, max:reSpellSpecs.maxQty, speed:reSpellSpecs.speed, @@ -7044,14 +7021,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars pick:reSpellSpecs.pick, cost:reSpellSpecs.cost, weight:reSpellSpecs.weight, - }, + }; + + let MItables = getTableGroup( charCS, fieldGroups.MI ), + repQty = '0', // magicItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ), - typeTable='', typeIndex, selTable, selIndex, selRowID; + typeTable='', + typeIndex; - [selIndex,selTable,selRowID] = tableGroupIndex( MItables, parseInt(MIrowref) ); + let [selIndex,selTable,selRowID] = tableGroupIndex( MItables, parseInt(MIrowref) ); - var magicItem = getAbility( fields.MagicItemDB, MIchosen, charCS, null, null, null, (isNaN(MIrowref) ? '' : selIndex), (isNaN(MIrowref) ? '' : selRowID) ), - MImaxQty = 0; + const magicItem = getAbility( fields.MagicItemDB, MIchosen, charCS, null, null, null, (isNaN(MIrowref) ? '' : selIndex), (isNaN(MIrowref) ? '' : selRowID) ); if (!!magicItem.obj) { typeTable = getItemTable( magicItem.obj[1].type ); @@ -7066,22 +7046,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (inHand && isNaN(parseInt(MIrowref))) [selIndex,selTable,selRowID] = tableGroupFind( MItables, 'trueName', MIchosen ); if (isNaN(parseInt(selIndex)) || selIndex<0) { - let miObj = abilityLookup( fields.MagicItemDB, MIchosen ); + const miObj = abilityLookup( fields.MagicItemDB, MIchosen ); selTable = getItemTable( miObj.obj[1].type ); selIndex = MItables[selTable].tableFind( fields[fieldGroups[selTable].prefix+'name'], '-' ); selRowID = MItables[selTable].rowID(selIndex); }; if (queries && queries.length && queries[0].length) _.each( queries, q => setAttr( charCS, [fields.ItemVar[0]+MIchosen.hyphened()+'+'+selRowID+'-'+q.split('=')[0],fields.ItemVar[1]], (q.split('=') || ['',''])[1] )); - var miData = resolveData( MIchosen, fields.MagicItemDB, reItemData, charCS, reMIspecs, (isNaN(MIrowref) ? '' : selIndex ), (isNaN(MIrowref) ? '' : selRowID) ).parsed; + const miData = resolveData( MIchosen, fields.MagicItemDB, reItemData, charCS, reMIspecs, {row:(isNaN(MIrowref) ? '' : selIndex ), rowID:(isNaN(MIrowref) ? '' : selRowID)} ).parsed; -// log('handleStoreMI: item '+MIchosen+' has a cost of '+miData.cost+', MIrowref = '+MIrowref+', selIndex = '+selIndex+', selTable = '+selTable+', selRowID = '+selRowID); - MIqty = Math.floor(evalAttr((qtyOp ? repQty+MIqty : (!MIqty.length ? repQty : MIqty)),charCS) || 0); if (!qtyOp && MIqty == 0) { MIqty = (parseInt(evalAttr(miData.qty,charCS)) || 0); }; - MImaxQty = qtyOp ? MIqty : (parseInt(evalAttr(miData.maxQty,charCS)) || MIqty); + const MImaxQty = qtyOp ? MIqty : (parseInt(evalAttr(miData.maxQty,charCS)) || MIqty); MIqty = Math.min( MIqty, MImaxQty ); if (selTable !== typeTable) { @@ -7097,20 +7075,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; MIrowref = indexTableGroup(MItables,selTable,selIndex); - var prefix = MItables[selTable].fieldGroup, - slotName = MItables[selTable].tableLookup( fields[prefix+'name'], selIndex ), - slotTrueName = MItables[selTable].tableLookup( fields[prefix+'trueName'], selIndex ), - slotType = MItables[selTable].tableLookup( fields[prefix+'type'], selIndex ), - containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0, - values = MItables[selTable].copyValues(); - -// if (!magicItem.ct) { -// sendDebug('handleStoreMI: selected magic item speed/type not defined'); -// sendError('Selected Magic Item not fully defined'); -// return; -// } - - var midbCS, MIdisplayName; + const p = MItables[selTable].fieldGroup, + slotName = MItables[selTable].tableLookup( fields[p+'name'], selIndex ), + slotTrueName = MItables[selTable].tableLookup( fields[p+'trueName'], selIndex ), + slotType = MItables[selTable].tableLookup( fields[p+'type'], selIndex ), + containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + + let values = initValues( p ), + MIdisplayName; if (!GMonly && slotType.toLowerCase().includes('cursed')) { if (!silent) sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); @@ -7130,28 +7102,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MIdisplayName = MIchosen; } - let p = MItables[selTable].fieldGroup; - let valLine = (p,t,v) => {values[fields[p+t][0]][fields[p+t][1]] = v}; - - valLine(p,'name',MIdisplayName); - valLine(p,'trueName',MIchosen); - valLine(p,'qty',MIqty); - valLine(p,'trueQty',MImaxQty); - valLine(p,'speed',miData.speed); - valLine(p,'trueSpeed',miData.speed); - valLine(p,'cost',miData.cost); - valLine(p,'type',miData.type); - valLine(p,'trueType',miData.type); - valLine(p,'reveal',(miData.reveal.toLowerCase() !== 'manual' ? miData.reveal : '')); - valLine(p,'weight',(miData.weight || 1)); + values.valLine(p,'name',MIdisplayName) + .valLine(p,'trueName',MIchosen) + .valLine(p,'qty',MIqty) + .valLine(p,'trueQty',MImaxQty) + .valLine(p,'speed',miData.speed) + .valLine(p,'trueSpeed',miData.speed) + .valLine(p,'cost',miData.cost) + .valLine(p,'type',miData.type) + .valLine(p,'trueType',miData.type) + .valLine(p,'reveal',(miData.reveal.toLowerCase() !== 'manual' ? miData.reveal : '')) + .valLine(p,'weight',(miData.weight || 1)); MItables[selTable].addTableRow( selIndex, values ); if (isRing) { - let ringHand = ((attrLookup( charCS, fields.Equip_leftTrueRing ) === MIreplace) ? BT.LEFTRING : ((attrLookup( charCS, fields.Equip_rightTrueRing ) === MIreplace) ? BT.RIGHTRING : undefined)); + const ringHand = ((attrLookup( charCS, fields.Equip_leftTrueRing ) === MIreplace) ? BT.LEFTRING : ((attrLookup( charCS, fields.Equip_rightTrueRing ) === MIreplace) ? BT.RIGHTRING : undefined)); if (!_.isUndefined(ringHand)) { - let cmdStr = (fields.attackMaster + ' --button ' + ringHand + (GMonly ? '-NOCURSE' : '') + '|' + tokenID + '|' + MIrowref + '|SILENT'); - sendAPI( cmdStr, senderId ); + sendAPI((fields.attackMaster + ' --button ' + ringHand + (GMonly ? '-NOCURSE' : '') + '|' + tokenID + '|' + MIrowref + '|SILENT'), senderId); } }; @@ -7166,7 +7134,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars await moveMIspells( senderId, null, null, null, charCS, selIndex, selRowID, MIchosen ); checkForBag( charCS, MIchosen, MIrowref ); - if (!!tokenID) { sendAPI( (fields.attackMaster + ' --checkac ' + tokenID + '|Silent||' + senderId), senderId ); if (!!miData.pick && !!miData.pick.length) { @@ -7174,12 +7141,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; }; - sendAPI( (fields.initMaster+' --checkinit '+tokenID+'|silent'), senderId ); + sendAPI( (fields.initMaster+' --checkinit '+(tokenID || charCS.id)+'|silent'), senderId ); setTimeout( updateCoins, 10, charCS ); if (silent) { + const hand = inHand ? parseInt(MIrowref.split('/')[1] || '0') : 0; if (tokenID && inHand && !isRing) sendAPI( (fields.attackMaster + ' --button ' + (['PRIMARY','OFFHAND','BOTH','HAND'][Math.min(hand,3)]) + '-NOCURSE|' + tokenID + '|' + MIchosen + '|' + hand + '||Silent'), senderId ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleStoreMI'); return [selIndex,selTable]; } args = [cmd,tokenID,-1,'']; @@ -7189,28 +7157,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { makeEditBagMenu( args, senderId, MIchosen+' has overwritten '+slotName ); } + await itemSlotData( tokenID, MItables, senderId ); return [selIndex,selTable]; } /** * Handle renaming an item. Make sure that the new name is unique **/ - - var handleRenameItem = function( args, senderId ) { + + const handleRenameItem = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MInewName = (args[4] || '').hyphened(), - override = String(args[5] || '').toLowerCase() === 'true', - charCS = getCharacter( tokenID ), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index,rowID, + const tokenID = args[1], + MIrowref = args[2], + MInewName = (args[4] || '').hyphened(), + override = String(args[5] || '').toLowerCase() === 'true', + charCS = getCharacter( tokenID ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), [index,table,rowID] = tableGroupIndex( Items, MIrowref ), - MIoldName = tableGroupLookup( Items, 'name', MIrowref ), - MIhyphenOld = MIoldName.hyphened(), item = getAbility( fields.MagicItemDB, MInewName, charCS, true ); - var miStoredSpell = function( charCS, oldName, newName, rowID, spell, field ) { + const MIoldName = tableGroupLookup( Items, 'name', MIrowref ), + MIhyphenOld = MIoldName.hyphened(); + + const miStoredSpell = function( charCS, oldName, newName, rowID, spell, field ) { let o = attrLookup( charCS, [field[0]+oldName+'+'+rowID+'-'+spell,null] ); if (!o) { o = attrLookup( charCS, [field[0]+oldName+'-'+spell,null] ); @@ -7231,42 +7201,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars item = getAbility( fields.MagicItemDB, MIoldName, charCS, null, null, null, index, rowID ); // Check if this should actually be an abilityLookup() if (!item.obj) return; item.obj[0].set('name',MInewName); - let key = 'ababzzqqrst', - oldDispName = MIoldName.replace(/-/g,' '), - action = item.obj[1].body.replace(new RegExp(MIoldName,'img'),key).replace(new RegExp(oldDispName,'img'),args[4]).replace(new RegExp(key,'img'),MInewName); + const key = 'ababzzqqrst', + oldDispName = MIoldName.replace(/-/g,' '), + action = item.obj[1].body.replace(new RegExp(MIoldName,'img'),key).replace(new RegExp(oldDispName,'img'),args[4]).replace(new RegExp(key,'img'),MInewName); setAbility( charCS, MInewName, action ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'name'], index, MInewName ); Items[table] = getTableField( charCS, Items[table], fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueName'], index, MInewName ); - let MUspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemMUspellsList[0], null] ), - PRspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPRspellsList[0], null] ), - powerObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPowersList[0], null] ); + const MUspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemMUspellsList[0], null] ), + PRspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPRspellsList[0], null] ), + powerObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPowersList[0], null] ); + if (MUspellObj) { MUspellObj.set('name',fields.ItemMUspellsList[0]+MInewName+'+'+rowID); - let spellList = MUspellObj.get('current').split(','); + const spellList = MUspellObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'mu' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'mu' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-mu+'+rowID ); } if (PRspellObj) { PRspellObj.set('name',fields.ItemPRspellsList[0]+MInewName+'+'+rowID); - let spellList = PRspellObj.get('current').split(','); + const spellList = PRspellObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pr' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pr' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pr+'+rowID ); } if (powerObj) { powerObj.set('name',fields.ItemPowersList[0]+MInewName+'+'+rowID); - let spellList = powerObj.get('current').split(','); + const spellList = powerObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIpowerPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pw' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pw' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pw+'+rowID ); } + let objName; filterObjs( obj => { if (obj.get('_type') !== 'attribute' || obj.get('_characterid') !== charCS.id) return false; - let objName = obj.get('name'); + objName = obj.get('name'); if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+index+'-')) { obj.set('name',objName.replace( MIhyphenOld, MInewName ).replace('+'+index+'-','+'+rowID+'-')); } else if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+rowID)) { @@ -7288,27 +7260,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * without changing what it actually is. Only available to GM */ - var handleHideMI = function( args, senderId ) { + const handleHideMI = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MIchosen = args[3], - charCS = getCharacter(tokenID), - Items, newItem, reveal, table, index, rowID; - + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); + if (!charCS) { - sendDebug('handleHideMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleHideMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); @@ -7318,10 +7287,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars Items = Items.tableSet( fields[fieldGroups[table].prefix+'name'], index, MIchosen ); Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) ); - reveal = resolveData( Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), fields.MagicItemDB, reItemData, charCS, {reveal:reSpellSpecs.reveal}, index, rowID ).parsed.reveal; + const reveal = resolveData( Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), fields.MagicItemDB, reItemData, charCS, {reveal:reSpellSpecs.reveal}, {row:index, rowID:rowID} ).parsed.reveal; Items = Items.tableSet( fields[fieldGroups[table].prefix+'reveal'], index, (reveal.toLowerCase() !== 'manual' ? reveal : '')); - newItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ); + const newItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ); if (newItem.obj) Items = Items.tableSet( fields[fieldGroups[table].prefix+'type'], index, newItem.obj[1].charge ); getAbility( fields.MagicItemDB, MIchosen, charCS, true, playerIsGM(senderId), Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), index, rowID ); @@ -7337,39 +7306,34 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function handleRemoveMI( args, GMonly, senderId, silent=false, delAbility=true ) { - var tokenID = args[1], - MIrowref = args[2], - MIchosen = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleRemoveMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleRemoveMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index,rowID; - - [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); Items = getTable( charCS, fieldGroups[table] ); - var slotType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) || '', - slotTrueType = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], index ) || '', - slotTrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ) || ''; + const slotType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) || '', + slotTrueType = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], index ) || '', + slotTrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ) || ''; + if (!GMonly && (slotType.toLowerCase().includes('cursed') || slotTrueType.toLowerCase().includes('cursed'))) { sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); return; } - var putCmd = resolveData( slotTrueName, fields.MagicItemDB, reItemData, charCS, {put:reSpellSpecs.put}, index, rowID ).parsed.put; - if (!!putCmd && !!putCmd.length) { - pickPutCmd( putCmd, tokenID, charCS, 'magic handleRemoveMI' ); - }; + const putCmd = resolveData( slotTrueName, fields.MagicItemDB, reItemData, charCS, {put:reSpellSpecs.put}, {row:index, rowID:rowID} ).parsed.put; + if (!!putCmd && !!putCmd.length) pickPutCmd( putCmd, tokenID, charCS, 'magic handleRemoveMI' ); Items.addTableRow( index ); await moveMIspells( senderId, charCS, index, rowID, null, null, null, slotTrueName, 'ALL', true ); @@ -7386,7 +7350,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); if (silent) { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleRemoveMI'); return; } @@ -7395,6 +7359,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { makeEditBagMenu( args, senderId, 'Slot '+MIrowref+' has been removed' ); } + await itemSlotData( tokenID, null, senderId ); return; }; @@ -7402,35 +7367,33 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle changing the type of a Magic Item. Only available to the GM. */ - var handleChangeMItype = function( args, senderId ) { + const handleChangeMItype = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - newType = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID); + + let newType = args[4]; if (!charCS) { - sendDebug('handleChangeMItype: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleChangeMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index; - - [index,table] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table] = tableGroupIndex( Items, MIrowref ); + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'type'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueType'] ); - var MIname = Items.tableLookup( fields[fieldGroups[table].prefix+'name'], index ), - MItrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ); + const MIname = Items.tableLookup( fields[fieldGroups[table].prefix+'name'], index ), + MItrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ); if (newType === 'removeCurse') { Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ).replace(/cursed\+/i,'').replace(/cursed/i,'uncharged') ); @@ -7454,31 +7417,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the displayed charges, the actual charges or both are set. */ - var handleChangeMIcharges = function( args, changeType, senderId ) { + async function handleChangeMIcharges( args, changeType, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MInewQty = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MInewQty = args[4], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleChangeMIcharges: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleChangeMIcharges: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - MIname = tableGroupLookup( MItables, 'name', MIrowref ) || '-', - index, table; - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'trueQty' ); + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + const MIname = tableGroupLookup( MItables, 'name', MIrowref ) || '-'; + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'trueQty' ); - [index,table] = tableGroupIndex( MItables, MIrowref ); + let [index,table] = tableGroupIndex( MItables, MIrowref ); if (changeType == 'Displayed' || changeType == 'Both') { MItables[table] = MItables[table].tableSet( fields[fieldGroups[table].prefix+'qty'], index, MInewQty ); @@ -7489,6 +7451,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+'\'s '+changeType+' quantity has been changed to '+MInewQty ); + await itemSlotData( tokenID, null, senderId ); return; } @@ -7496,34 +7459,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle change the cost of an MI, to support shops and Inns */ - var handleSetMIcost = function( args, senderId ) { + const handleSetMIcost = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - newMIcost = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + newMIcost = args[4], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSetMIcost: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleSetMIcost: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - index, table; - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'cost' ); - - [index,table] = tableGroupIndex( MItables, MIrowref ); + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - var MIname = MItables[table].tableLookup( fields.Items_trueName, MIrowref ) || '-'; + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'cost' ); + + let [index,table] = tableGroupIndex( MItables, MIrowref ); + const MIname = MItables[table].tableLookup( fields.Items_trueName, MIrowref ) || '-'; MItables[table].tableSet( fields.Items_cost, MIrowref, newMIcost ); - makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+' now costs '+newMIcost+'GP' ); return; } @@ -7534,14 +7493,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * meaning a shift() creates the follow-on command call to doButton() */ - var handleAddMIrow = function( args, senderID ) { + const handleAddMIrow = function( args, senderID ) { args.shift(); - var tokenID = args[1], - index = args[2], - table = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + table = args[3], + charCS = getCharacter(tokenID); getTable(charCS, fieldGroups[table]).addTableRow(); @@ -7554,20 +7512,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle blanking the selected Magic Item bag. */ - var handleBlankMIBag = function( args ) { + const handleBlankMIBag = function( args ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleDeleteTreasure: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var content = '&{template:'+fields.menuTemplate+'}{{name=TOTALLY BLANK THE MI BAG}}' - + '{{desc=Are you REALLY sure you want to delete the complete MI Bag with all its contents?}}' - + '{{desc1=[Yes](!magic --button GM-ConfirmedBlank|'+tokenID+'|-1|) or [No](!magic --button GM-NoBlank|'+tokenID+'|-1|)}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name=TOTALLY BLANK THE MI BAG}}' + + '{{desc=Are you REALLY sure you want to delete the complete MI Bag with all its contents?}}' + + '{{desc1=[Yes](!magic --button GM-ConfirmedBlank|'+tokenID+'|-1|) or [No](!magic --button GM-NoBlank|'+tokenID+'|-1|)}}'; sendFeedback(content,flags.feedbackName,flags.feedbackImg,tokenID,charCS); return; @@ -7577,18 +7534,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * The GM confirmed they want to Blank the MI Bag */ - var handleConfirmedBlank = function( args, senderId ) { + const handleConfirmedBlank = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleConfirmedBlank: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroup( charCS, fieldGroups.MI ); + let Items = getTableGroup( charCS, fieldGroups.MI ); for (const table in Items) { if (table.dbName() === 'coins') continue; for (let i=0; i { try { - var Items, i, itemName, charCS, itemList, - errFlag = false, + let itemName, spellsList = ''; - charCS = getCharacter(token.id); + const charCS = getCharacter(token.id); if (!(!charCS || !_.isUndefined(namesList[charCS.id]) || charCS.get('name').toLowerCase().includes('-db'))) { - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + itemList = [], + i = -1, + itemRow, itemRowID, table; Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'trueName' ); - itemList = []; - - i = -1; while (!_.isUndefined(itemName = tableGroupLookup( Items, 'name', ++i, false ))) { itemList.push(itemName,tableGroupLookup( Items, 'trueName', i )); - let itemRow, itemRowID, table; [itemRow,table,itemRowID] = tableGroupIndex( Items, i ); itemName = itemName.replace(/\s/g,'-'); itemList = itemList.concat(miSpellLookup( charCS, itemName, itemRow, itemRowID, fields.ItemMUspellsList, '', '', '' ).split(','), @@ -7844,7 +7793,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } catch (e) { log('MagicMaster getNamesList: JavaScript '+e.name+': '+e.message+' while doing a tidy'); - sendDebug('MagicMaster getNamesList: JavaScript '+e.name+': '+e.message+' while doing a tidy'); sendCatchError('MagicMaster',null,e,'MagicMaster error in handleCStidy()'); namesList = undefined; } finally { @@ -7856,26 +7804,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if ((!tokenList || !tokenList.length) && silent) { - tokenList = filterObjs( obj => { - if (obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token') return false; - return (!(!obj.get('represents') || !obj.get('represents').length)); - }); - } + tokenList = filterObjs( obj => (obj.get('type') === 'graphic' && obj.get('subtype') === 'token' && (!(!obj.get('represents') || !obj.get('represents').length)))); + }; tokenList = tokenList.filter( n => !!n ); for (const token of tokenList) { namesList = await getNamesList( token, namesList ); if (_.isUndefined(namesList)) return; } + let charID, objName, objCurrent, objMax, foundName, + dbItem, attack, menuCmd, owned; objList = filterObjs( obj => { if (obj.get('type') != 'attribute' && obj.get('type') != 'ability') return false; - let charID = obj.get('characterid'); + charID = obj.get('characterid'); if (_.isUndefined(namesList[charID])) return false; - let objName = obj.get('name'), - objCurrent = String(obj.get('current') || ''), - objMax = String(obj.get('max') || ''); + objName = obj.get('name'); + objCurrent = String(obj.get('current') || ''); + objMax = String(obj.get('max') || ''); if (obj.get('type') !== 'ability') { if (objName.startsWith('repeating_')) return false; - let foundName = undefined; + foundName = undefined; if (objName.startsWith(fields.CastingTimePrefix[0])) foundName = objName.substring(fields.CastingTimePrefix[0].length) else if (objName.startsWith(fields.ItemMUspellsList[0])) foundName = objName.substring(fields.ItemMUspellsList[0].length) else if (objName.startsWith(fields.ItemPRspellsList[0])) foundName = objName.substring(fields.ItemPRspellsList[0].length) @@ -7884,16 +7831,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars else if (objName.startsWith(fields.MIpowerPrefix[0])) foundName = objName.substring(fields.MIpowerPrefix[0].length) else if (objName.startsWith(fields.Prev_round[0])) foundName = objName else if (objName.startsWith(fields.ItemVar[0])) foundName = objName.substring(fields.ItemVar[0].length,objName.lastIndexOf('+')); - let testVal = (!!foundName && ((!namesList[charID].some(elem => (!!elem.dbName() && foundName.dbName().includes(elem.dbName())))) || !(objCurrent+objMax).length)); - testVal = testVal || ((objName.startsWith(fields.Magical_hitAdj[0]) || objName.startsWith(fields.Magical_dmgAdj[0])) && !parseInt(objCurrent || 0) && !parseInt(objMax || 0)); - return testVal; + return (!!foundName && ((!namesList[charID].some(elem => (!!elem.dbName() && foundName.dbName().includes(elem.dbName())))) || !(objCurrent+objMax).length)) + || ((objName.startsWith(fields.Magical_hitAdj[0]) || objName.startsWith(fields.Magical_dmgAdj[0])) && !parseInt(objCurrent || 0) && !parseInt(objMax || 0)); } else { - let dbItem = false; - let attack = objName.startsWith('Do-not-use'); - let menuCmd = obj.get('istokenaction'); - let owned = namesList[charID].includes(objName); - objName = (objName || '').dbName(); + dbItem = false; + attack = objName.startsWith('Do-not-use'); + menuCmd = obj.get('istokenaction'); + owned = namesList[charID].includes(objName); if (!menuCmd && !owned && !attack) { + objName = (objName || '').dbName(); dbItem = _.some(DBindex, (d) => !_.isUndefined(d[objName])); } return (attack || (!menuCmd && !owned && dbItem)); @@ -7903,7 +7849,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendFeedback( '&{template:'+fields.messageTemplate+'}{{desc='+objList.length+' objects have been removed from '+_.size(namesList)+' characters.}}' ); } else { log(objList.length+' objects have been removed from '+_.size(namesList)+' characters.'); - sendWait(findTheGM(),0); + sendWait(findTheGM(),0,'Magic handleCStidy'); } for (const obj of objList) { @@ -7918,15 +7864,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Copy a character to a new character sheet e.g. to dump corrupted attributes */ - - var handleCleanCS = function( charCS, silent=false ) { + + const handleCleanCS = function( charCS, silent=false ) { - var newCS = createObj( 'character', { + const newCS = createObj( 'character', { name: (charCS.get('name')), avatar: charCS.get('avatar'), inplayerjournals: charCS.get('inplayerjournals'), controlledby: charCS.get('controlledby') - }); + }); charCS.get('bio', function(bio) { newCS.set('bio',bio); }); @@ -7934,35 +7880,36 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars newCS.set('gmnotes',gmnotes); }); - var objList = filterObjs( obj => { - let type = obj.get('type'); - if (type === 'graphic' && obj.get('subtype') === 'token') { - if (obj.get('represents') !== charCS.id) return false; - obj.set('represents',newCS.id); - return false; - } - if (type !== 'attribute' && type !== 'ability') return false; - if (obj.get('characterid') !== charCS.id) return false; - if (obj.get('name').length && obj.get('name') != 'Untitled') { - if (type !== 'ability') { - createObj( 'attribute', { - characterid: newCS.id, - name: obj.get('name'), - current: obj.get('current'), - max: obj.get('max') - }); - } else { - createObj( 'ability', { - characterid: newCS.id, - name: obj.get('name'), - description: obj.get('description'), - action: obj.get('action'), - istokenaction: obj.get('istokenaction') - }); - }; + let type; + const objList = filterObjs( obj => { + type = obj.get('type'); + if (type === 'graphic' && obj.get('subtype') === 'token') { + if (obj.get('represents') !== charCS.id) return false; + obj.set('represents',newCS.id); + return false; + } + if (type !== 'attribute' && type !== 'ability') return false; + if (obj.get('characterid') !== charCS.id) return false; + if (obj.get('name').length && obj.get('name') != 'Untitled') { + if (type !== 'ability') { + createObj( 'attribute', { + characterid: newCS.id, + name: obj.get('name'), + current: obj.get('current'), + max: obj.get('max') + }); + } else { + createObj( 'ability', { + characterid: newCS.id, + name: obj.get('name'), + description: obj.get('description'), + action: obj.get('action'), + istokenaction: obj.get('istokenaction') + }); }; - return true; - }); + }; + return true; + }); // Remove all objects on objList // then remove charCS @@ -7984,44 +7931,48 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a linear progression due to Exceptional Strength */ - var handleStrengthChange = function( charCS, field, increment, senderId, silent=true ) { + async function handleStrengthChange( tokenID, field, increment, senderId, silent=true ) { // tokenID - var curStrength, maxStrength, - originalData, strData, - newStr, newExp, + let newStr, newExp, original = '', changeBy = 0, change = (isNaN(increment[0]) ? increment[0] : '+'); - curStrength = attrLookup( charCS, [field,'current'] ); + const charCS = getCharacter( tokenID ); + if (!charCS || !field) { sendError('Invalid token or field name when handling an attribute change.'); return; } + let curStrength = attrLookup( charCS, [field+'-real','current']); + if (!curStrength || isNaN(parseInt(curStrength))) curStrength = attrLookup( charCS, [field,'current'] ); if (!curStrength || isNaN(parseInt(curStrength))) { sendError('Invalid '+field+' value on character sheet when handling an attribute change.'); return; } - increment = parseInt(evalAttr(((change !== '-') ? increment.slice(1) : increment),charCS)) || 0; + increment = parseInt(evalAttr(((change !== '-' && isNaN(increment[0])) ? increment.slice(1) : increment),charCS)) || 0; - maxStrength = attrLookup( charCS, [field,'max'] ); - if (!maxStrength || increment == 0) { - setAttr( charCS, [field,'max'], (maxStrength = curStrength) ); - } - strData = curStrength.match(/(\d+)(?:\((\d+)\))?/); + let strData = curStrength.match(/(\-?\d+)(?:\((\d+)\))?/); strData[1] = parseInt(strData[1]); strData[2] = !_.isUndefined(strData[2]) ? (parseInt(strData[2]) || 100) : strData[2]; - originalData = maxStrength.match(/(\d+)(?:\((\d+)\))?/); + + let maxStrength = attrLookup( charCS, [field,'max'] ); + if ((!maxStrength || increment == 0) && strData[1] > 0 && strData[1] < 26) { + setAttr( charCS, [field,'max'], (maxStrength = curStrength) ); + } + let originalData = maxStrength.match(/(\d+)(?:\((\d+)\))?/); originalData[1] = parseInt( originalData[1] ); originalData[2] = (!_.isUndefined(originalData[2])) ? (originalData[2] = parseInt(originalData[2]) || 100) : strData[2]; if (change === '=') increment = increment - strData[1]; if (increment != 0) { - + newStr = (change === '*' ? (strData[1] * increment) : ((change === '/') ? (strData[1] / increment) : (strData[1] + increment))); + newStr = ((change === '*' && increment < 1) || (change === '/' && increment > 1) || increment < 0) ? Math.ceil(newStr) : Math.floor(newStr); + if (strData[2]) { if (strData[1] == originalData[1] && ((increment < 0 && strData[2] > originalData[2]) || (increment > 0 && strData[2] < originalData[2]))) { newStr = originalData[1]; @@ -8041,15 +7992,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars changeBy = newStr - strData[1]; if (strData[2] && ((change == '*' && increment < 1) || (change == '/' && increment > 1) || increment < 0)) changeBy--; if (newExp && ((change == '*' && increment > 1) || (change == '/' && increment < 1) || increment > 0)) changeBy++; - setAttr( charCS, [field,'current',,true], newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + + setAttr( charCS, [field+'-real','current'], newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + setAttr( charCS, [field,'current',,true], (Math.max(1,Math.min(newStr,25)))+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); } if (!silent) { - let content = '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s '+field+'}}{{desc='+charCS.get('name')+'\'s '+field + const content = '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s '+field+'}}{{desc='+charCS.get('name')+'\'s '+field + (increment != 0 ? (' has changed by '+changeBy+', to be '+original+newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '')) : (' has been memorised as an original roll')) +'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); } else { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleStrengthChange'); } + await itemSlotData( tokenID, null, senderId, false ); } /* @@ -8058,8 +8012,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * passed back by the Library output parser * to recall the message text */ - - var handleShowMore = function( args, senderId ) { + + const handleShowMore = function( args, senderId ) { // log('handleShowMore: called, showMoreObj[args[1]] = '+showMoreObj[args[1]]); sendAPI( showMoreObj[args[1]], senderId, '', true ); @@ -8071,11 +8025,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /** * Show help message */ + + const showHelp = function() { - var showHelp = function() { - - var handoutIDs = getHandoutIDs(); - var content = '&{template:'+fields.menuTemplate+'}{{title=MagicMaster Help}}{{MagicMaster Help=For help on using MagicMaster, and the !magic commands, [**Click Here**]('+fields.journalURL+handoutIDs.MagicMasterHelp+')}}{{Spells & Magic Items Help=For help on the Spells, Powers and Magic Items databases, [**Click Here**]('+fields.journalURL+handoutIDs.MagicDatabaseHelp+')}}{{Effects Database=For help on using and adding Effects and the Effects Database, [**Click Here**]('+fields.journalURL+handoutIDs.EffectsDatabaseHelp+')}}{{Class Database=For help on using and adding to the Class Database, [**Click Here**]('+fields.journalURL+handoutIDs.ClassRaceDatabaseHelp+')}}{{Character Sheet Setup=For help on setting up character sheets for use with RPGMaster APIs, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterCharSheetSetup+')}}{{RPGMaster Templates=For help using RPGMaster Roll Templates, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterLibraryHelp+')}}'; + const handoutIDs = getHandoutIDs(); + const content = '&{template:'+fields.menuTemplate+'}{{title=MagicMaster Help}}{{MagicMaster Help=For help on using MagicMaster, and the !magic commands, [**Click Here**]('+fields.journalURL+handoutIDs.MagicMasterHelp+')}}{{Spells & Magic Items Help=For help on the Spells, Powers and Magic Items databases, [**Click Here**]('+fields.journalURL+handoutIDs.MagicDatabaseHelp+')}}{{Effects Database=For help on using and adding Effects and the Effects Database, [**Click Here**]('+fields.journalURL+handoutIDs.EffectsDatabaseHelp+')}}{{Class Database=For help on using and adding to the Class Database, [**Click Here**]('+fields.journalURL+handoutIDs.ClassRaceDatabaseHelp+')}}{{Character Sheet Setup=For help on setting up character sheets for use with RPGMaster APIs, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterCharSheetSetup+')}}{{RPGMaster Templates=For help using RPGMaster Roll Templates, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterLibraryHelp+')}}'; sendFeedback(content,flags.feedbackName,flags.feedbackImg); }; @@ -8084,7 +8038,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle casting a spell */ - var doCastSpell = function( args, selected, senderId ) { + const doCastSpell = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8095,7 +8049,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'); + const chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'); args = setCaster( args, messages.castSpellClass, senderId ); if (!args) { @@ -8114,7 +8068,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if there are any charges left */ - var doCastAgain = function( args, senderId ) { + const doCastAgain = function( args, senderId ) { if (!args) return; @@ -8123,11 +8077,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendResponseError(senderId,'Missing caster type or token ID'); return; } - var isPower = args[0].toUpperCase().includes('POWER'), - isMU = args[0].toUpperCase().includes('MU'), - tokenID = args[1], - charCS = getCharacter(tokenID), - spellName = args[2]; + const isPower = args[0].toUpperCase().includes('POWER'), + isMU = args[0].toUpperCase().includes('MU'), + tokenID = args[1], + charCS = getCharacter(tokenID); + + let spellName = args[2]; if (!charCS) { sendDebug('doCastAgain: invalid token_id'); @@ -8135,14 +8090,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var castingName = attrLookup( charCS, fields.Casting_name ), - castingLevel = attrLookup( charCS, fields.CastingLevel ), - spellRow = attrLookup( charCS, fields.SpellRowRef ), - spellCol = attrLookup( charCS, fields.SpellColIndex ), - firstColNum = isPower ? fields.PowersFirstColNum : fields.SpellsFirstColNum, - col = (firstColNum || spellCol != 1) ? spellCol : '', - rep = (isPower ? fields.Powers_table[0] : fields.Spells_table[0]) + col + '_$' + spellRow + '_', - spellCharges = parseInt((attrLookup( charCS, fields.Spells_castValue, (isPower ? fields.Powers_table[0] : fields.Spells_table[0]), spellRow, spellCol ) || 0),10); + const spellRow = attrLookup( charCS, fields.SpellRowRef ), + spellCol = attrLookup( charCS, fields.SpellColIndex ), + firstColNum = isPower ? fields.PowersFirstColNum : fields.SpellsFirstColNum, + col = (firstColNum || spellCol != 1) ? spellCol : '', + spellCharges = parseInt((attrLookup( charCS, fields.Spells_castValue, {tableDef:(isPower ? fields.Powers_table[0] : fields.Spells_table[0]), row:spellRow, col:spellCol} ) || 0),10); if (spellCharges <= 0) { sendParsedMsg( tokenID, messages.noMoreCharges, senderId ); @@ -8166,21 +8118,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Target a spell that requires a "to-hit" roll at a token */ - var doTouch = function( args, isGM ) { + const doTouch = function( args, isGM ) { if (!args) return; if (args.length < 4) { - sendDebug('doTouch: invalid number of arguments'); sendError('Too few targeting arguments'); return; } - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('doTouch: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } @@ -8192,7 +8142,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu to change the memorised spells for the day */ - var doMemoriseSpells = function( args, selected, senderId ) { + const doMemoriseSpells = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8208,15 +8158,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var isMU = args[0].toUpperCase().includes('MU'), - isPR = args[0].toUpperCase().includes('PR'), - isPower = args[0].toUpperCase().includes('POWER'), - isMI = args[0].toUpperCase().includes('MI'), - tokenID = args[1], - charCS = getCharacter(tokenID), - classObjs = classObjects( charCS, senderId ), - isWiz = classObjs.some( c => c.base === 'wizard' ), - isPriest = classObjs.some( c => c.base === 'priest' ); + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + tokenID = args[1], + charCS = getCharacter(tokenID), + classObjs = classObjects( charCS, senderId ), + isWiz = classObjs.some( c => c.base === 'wizard' ), + isPriest = classObjs.some( c => c.base === 'priest' ); if ((isMU && !isWiz) || (isPR && !isPriest) || (isMU && isPR && !(isWiz || isPriest))) { sendParsedMsg( tokenID, messages.wrongSpellCaster, senderId ); @@ -8231,12 +8180,55 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } + /* + * Change the number of power uses per day + */ + + const doChangePerDay = function( args, selected, senderId ) { + + if (!args) return; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (args.length < 3) { + sendError('Missing token ID or power name when trying to set power uses per day'); + return; + } + const tokenID = args[0], + power = args[1], + change = args[2], + charCS = getCharacter(tokenID); + if (!charCS) { + sendError('Invalid character trying to set power uses per day',msg_orig[senderId]); + return; + } + let [row,col] = powerRowCol( charCS, power ); + if (_.isUndefined(row)) { + sendError('Invalid power name when trying to set uses per day',msg_orig[senderId]); + return; + }; + let upd = String(attrLookup( charCS, fields.Powers_castMax, {tableDef:fields.Powers_table,row:row,col:col} )); + if (_.isUndefined(upd)) { + sendError('Invalid power object when trying to set uses per day',msg_orig[senderId]); + return; + }; + if (change[0] === '=') { + upd = evalAttr(change.slice(1)); + } else if (isNaN(parseInt(change[0]))) { + upd = evalAttr(upd + change); + } else { + upd = evalAttr(upd + '+' + change); + }; + + handleMemoriseSpell([BT.MEMALL_POWERS,tokenID,1,row,col,power,upd],senderId); + return; + } + /* * Create a menu to see what spells the character has memorised for the day, * and allow selection to see the description of each spell. */ - var doViewMemorisedSpells = function( args, selected, senderId ) { + const doViewMemorisedSpells = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8262,17 +8254,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * magic item that has stored spells */ - var doLearnSpell = function( args, selected, senderId ) { + const doLearnSpell = function( args, selected, senderId ) { if (!args) return; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (args.length < 2) { - sendDebug('doLearnSpell: invalid arguments, missing token_id or spell name'); sendError('Missing token ID or spell name when trying to learn a spell',msg_orig[senderId]); return; } - var charCS = getCharacter(args[0]); + const charCS = getCharacter(args[0]); if (!charCS) { sendError('Invalid character trying to learn a spell',msg_orig[senderId]); return; @@ -8287,7 +8278,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * possible actions are BT.VIEW_MI or BT.USE_MI */ - var doViewUseMI = function( args, action, senderId, selected ) { + const doViewUseMI = function( args, action, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8298,11 +8289,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('doViewUseMI: invalid token_id'); sendResponseError(senderId,'Invalid token selected'); return; } @@ -8320,7 +8310,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or actually use the Magic Item power (isUse = true) */ - var doSelectMIpower = function( args, isUse, senderId ) { + const doSelectMIpower = function( args, isUse, senderId ) { if (!args) return; @@ -8339,7 +8329,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Restore uses per day of a specific power of a specific magic item */ - var doRestoreMIpowers = function( args, senderId ) { + const doRestoreMIpowers = function( args, senderId ) { if (!args) return; @@ -8359,7 +8349,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * long rest if the DM has enabled it. */ - var doRest = function( args, selected, senderId ) { + const doRest = function( args, selected, senderId ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8370,18 +8360,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - restType = (args[1] || 'SELECT').toUpperCase(), - casterType = (args[2] || 'MU+PR').toUpperCase(), - timeSpent = args[3]; + const tokenID = args[0], + restType = (args[1] || 'SELECT').toUpperCase(), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let timeSpent = args[3]; if (casterType.includes('MI') && casterType.includes('POWER')) { handleRest( args, senderId ); return; } - var curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doRest: invalid token_id'); @@ -8394,7 +8385,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isNaN(timeSpent)) timeSpent = 1; if (restType.toUpperCase() !== 'SELECT') { - var charRetail = parseData('['+((attrLookup( charCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {name:reClassSpecs.name,buy:reClassSpecs.buy,sell:reClassSpecs.sell}); + const charRetail = parseData('['+((attrLookup( charCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {name:reClassSpecs.name,buy:reClassSpecs.buy,sell:reClassSpecs.sell}); if (charRetail.buy || charRetail.sell) { sendAPI( fields.commandMaster+' --restock '+tokenID, senderId ); }; @@ -8434,27 +8425,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * actual name and speed are displayed. */ - var doResetSingleMI = function( args, senderId, selected ) { + const doResetSingleMI = function( args, senderId, selected ) { - var tokenID = args[0], - MIrowref = args[1], - reveal = (args[2] || '').toLowerCase(), - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), + const tokenID = args[0], + reveal = (args[2] || '').toLowerCase(), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let MIrowref = args[1], index = MIrowref, - MIname, MItrueName, item, inHandRow, - table, index; + MIname, inHandRow, table; if (!charCS) { charCS = getObj('character',tokenID); } if (!charCS) { - sendDebug('doResetSingleMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), InHand = getTable( charCS, fieldGroups.INHAND ); if (isNaN(MIrowref)) { @@ -8465,12 +8455,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [MIrowref,table] = tableGroupIndex( Items, MIrowref ); } if (_.isUndefined(table) || _.isUndefined(MIrowref)) { - sendDebug('doResetSingleMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } Items = getTable( charCS, fieldGroups[table] ); - MItrueName = Items.tableLookup( fields[Items.fieldGroup+'trueName'], MIrowref, '-' ); + const MItrueName = Items.tableLookup( fields[Items.fieldGroup+'trueName'], MIrowref, '-' ); Items = Items.tableSet( fields[Items.fieldGroup+'name'], MIrowref, MItrueName ); Items = Items.tableSet( fields[Items.fieldGroup+'speed'], MIrowref, Items.tableLookup( fields.Items_speed, MIrowref )); Items = Items.tableSet( fields[Items.fieldGroup+'type'], MIrowref, Items.tableLookup( fields.Items_trueType, MIrowref )); @@ -8483,7 +8472,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (MItrueName.trueCompare(attrLookup( charCS, fields.Equip_rightTrueRing ))) setAttr( charCS, fields.Equip_rightRing, MItrueName ); if (reveal.toLowerCase() !== 'silent') { if (reveal && reveal.length) { - item = abilityLookup( fields.MagicItemDB, MItrueName, charCS ); + const item = abilityLookup( fields.MagicItemDB, MItrueName, charCS ); doDisplayAbility( [tokenID,item.dB,index+'/'+MItrueName], senderId, selected ); } else if (curToken) { makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MItrueName+' has been reset' ); @@ -8503,60 +8492,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or more increments current by the value unless the max is reached. */ - var doChangeCharges = function( args, selected, senderId ) { //miRow + const doChangeCharges = function( args, selected, senderId ) { - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic doChangeCharges' ); if (!args) return; if (!args[0] && args[1] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0] || !args[1]) { - sendDebug('doChangeCharges: invalid arguments, missing token_id, item name or recharges'); sendError('Missing item name, recharges or token ID'); return; } - var tokenID = args[0], - command = args[1][0] == '-' ? 'DEDUCT' : (args[1][0] == '+' ? 'ADD' : (args[1][0] == '0' ? 'SELFCHARGE' : 'SET')), - MIname = args[2], - maxCharges = parseInt(args[3]), - chargeOverride = args[4] || '', + const tokenID = args[0], + command = args[1][0] == '-' ? 'DEDUCT' : (args[1][0] == '+' ? 'ADD' : (args[1][0] == '0' ? 'SELFCHARGE' : 'SET')), + MIname = args[2], + chargeOverride = args[4] || '', + fail = args[6] || '', + charCS = getCharacter(tokenID); + + let maxCharges = parseInt(args[3]), success = args[5] || '', - fail = args[6] || '', - r, i, m, charges, table, rowID, MIrow, - charCS = getCharacter(tokenID); + r, i, charges, table, rowID, MIrow, Items; try { - charges = args[1].match(/[\d\/\*\+\-]+/); + charges = args[1]; // .match(/[\d\/\*\+\-]+/); charges = Math.abs(parseFloat(evalAttr(charges,charCS))); } catch { charges = 0; } if (!charCS || isNaN(charges)) { - sendDebug('doNewMaxCharges: invalid token_id or charges'); sendError('Incorrect MagicMaster syntax'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); - if (MIname && MIname.length>0) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); [r,table,rowID] = tableGroupFind( Items, 'trueName', MIname ); MIrow = indexTableGroup( Items, table, r ); - } + if (_.isUndefined(r)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + [r,table,rowID] = tableGroupFind( Items, 'name', MIname ); + MIrow = indexTableGroup( Items, table, r ); + }; + }; if (_.isUndefined(r)) { - MIrow = attrLookup( charCS, ['MIrowref', 'current'] ); + MIrow = attrLookup( charCS, fields.ItemRowRef ); [r,table,rowID] = tableGroupIndex( Items, MIrow ); } if (_.isUndefined(r)) { - sendDebug('doChangeCharges: magic item "'+MIname+'" not found'); sendError('Magic Item "'+MIname+'" not found in '+charCS.get('name')+'\'s items'); return; } Items = getTable( charCS, fieldGroups[table] ); - var MImaxQty = Items.tableLookup( fields[Items.fieldGroup+'trueQty'], r ) || maxCharges || 1, - MItype = (chargeOverride || Items.tableLookup( fields[Items.fieldGroup+'trueType'], r ) || '').toLowerCase(), - absorbing = MItype.includes('absorbing'), - exploding = MItype.includes('exploding'); + const MImaxQty = Items.tableLookup( fields[Items.fieldGroup+'trueQty'], r ) || maxCharges || 1, + MItype = (chargeOverride || Items.tableLookup( fields[Items.fieldGroup+'trueType'], r ) || '').toLowerCase(), + absorbing = MItype.includes('absorbing'), + exploding = MItype.includes('exploding'); switch (command.toUpperCase()) { case 'ADD': @@ -8580,7 +8571,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'SELFCHARGE': i = 1+(parseInt( Items.tableLookup(fields[Items.fieldGroup+'qty'], r) ) || 0); - m = (!isNaN(maxCharges)) ? maxCharges : (parseInt( Items.tableLookup(fields[Items.fieldGroup+'trueQty'], r) ) || 0); + const m = (!isNaN(maxCharges)) ? maxCharges : (parseInt( Items.tableLookup(fields[Items.fieldGroup+'trueQty'], r) ) || 0); if (charges != 0 && i < m) { sendAPI('!rounds --target-nosave caster|'+tokenID+'|'+MIname+'-recharge|'+charges+'|-1|'+MIname+' is recharging|stopwatch'); } else { @@ -8592,10 +8583,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars default: log('doChangeCharges: invalid command'); } -// sendAPI(fields.attackMaster+' --setAmmo '+tokenID+'|'+MIname+'|'+Items.tableLookup( fields.Items_qty, r )+'|'+Items.tableLookup( fields.Items_trueQty, r )+'|silent'); if (success || fail) { - sendResponse( charCS, '&{template:'+(success ? fields.menuTemplate : fields.warningTemplate)+'}{{name='+MIname.replace(/-/g,' ')+'}}{{desc='+(success || fail)+'}}' ); + if (success[0] === '!') { + sendAPI(success,senderId); + } else if (fail[0] === '!') { + sendAPI(fail,senderId); + } else { + sendResponse( charCS, '&{template:'+(success ? fields.menuTemplate : fields.warningTemplate)+'}{{name='+MIname.replace(/-/g,' ')+'}}{{desc='+(success || fail)+'}}' ); + }; } return; } @@ -8609,7 +8605,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if the character has both types, ask which the player wants to use. */ - var doSpellsMenu = function( args, selected, senderId ) { + const doSpellsMenu = function( args, selected, senderId ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8620,12 +8616,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - isMU = args[1] && args[1].toUpperCase().includes('MU'), - isPR = args[1] && args[1].toUpperCase().includes('PR'), - isPower = args[1] && args[1].toUpperCase().includes('POWER'), - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + isMU = args[1] && args[1].toUpperCase().includes('MU'), + isPR = args[1] && args[1].toUpperCase().includes('PR'), + isPower = args[1] && args[1].toUpperCase().includes('POWER'), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doSpellsMenu: invalid token_id'); @@ -8670,7 +8665,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * magic item (instead of programming in the database) **/ - var doStoreSpells = function( args, senderId ) { + const doStoreSpells = function( args, senderId ) { if (!args) return; @@ -8680,30 +8675,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - item = (args[1] || '').split('/'), - cmd = (args[2] || '').toUpperCase(), - level = args[3] || 1, - retMenu = args[4] || 'VIEW-ITEM', - charCS = getCharacter(tokenID), - ability, specs, isSpell, isPower; - + const tokenID = args[0], + cmd = (args[2] || '').toUpperCase(), + level = args[3] || 1, + retMenu = args[4] || 'VIEW-ITEM', + charCS = getCharacter(tokenID); + if (!charCS) { sendDebug('doStoreSpells: invalid token_id'); sendResponseError(senderId,'Invalid token specified'); return; }; + let item = (args[1] || '').split('/'); + item = item.length > 1 ? item[1] : item[0]; - ability = getAbility( fields.MagicItemDB, item, charCS ); + const ability = getAbility( fields.MagicItemDB, item, charCS ); if (!ability.obj || !ability.obj.length) { sendDebug('doStoreSpells: invalid item name'); sendResponseError(senderId,'Invalid item specified'); return; }; - - isSpell = reCastMIspellCmd.test(ability.obj[1].body); - isPower = reCastMIpowerCmd.test(ability.obj[1].body); + const isSpell = reCastViewMIspellCmd.test(ability.obj[1].body), + isPower = reCastViewMIpowerCmd.test(ability.obj[1].body); + if (isSpell || isPower) { setCaster( ['MI',tokenID,level,item], '', senderId ); args.unshift((isSpell && isPower) ? 'BOTH' : (isPower ? 'POWERS' : 'SPELLS')); @@ -8728,33 +8723,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * otherwise asks the GM if there is a trap. **/ - var doFindTraps = function( args, senderId ) { + const doFindTraps = function( args, senderId ) { if (!args) return; - - var msg = args; if (args.length != 3) { sendDebug('doFindTraps: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - pickToken = getObj('graphic',pickID), - charCS = getCharacter( tokenID ), - putCS = getCharacter( putID ), - pickCS = getCharacter( pickID ), - content; + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickToken = getObj('graphic',pickID), + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ); if (!charCS || !putCS || !pickToken) { sendDebug('doFindTraps: invalid ID arguments'); sendResponseError(senderId,'One or more invalid tokens specified'); return; }; - var pickName = pickToken.get('name'), - putName = putCS.get('name'); + const pickName = pickToken.get('name'), + putName = putCS.get('name'); setAttr( putCS, ['target-level', 'current'], (pickCS ? characterLevel(pickCS) : 6) ); setAttr( putCS, ['target-token', 'current'], pickName ); @@ -8765,13 +8757,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( pickCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); setAttr( pickCS, fields.Trap_status, (attrLookup( pickCS, fields.Trap_status ) || 'Armed')); setAttr( pickCS, fields.Lock_status, (attrLookup( pickCS, fields.Lock_status ) || 'Locked')); - let findTraps = findObjs({_type:'ability',characterid:pickCS.id,name:'Trap-2'},{caseInsensitive:true}); + const findTraps = findObjs({_type:'ability',characterid:pickCS.id,name:'Trap-2'},{caseInsensitive:true}); if (findTraps && findTraps.length) { sendAPImacro( senderId, putID, pickID, findTraps[0].get('name') ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic doFindTraps'); if (csVer(pickCS) < 3.5 && ((attrLookup( pickCS, fields.Gender ) || '').dbName() === 'container')) { - let lock = (attrLookup( pickCS, fields.Container_lock ) || ''), - trap = (attrLookup( pickCS, fields.Container_trap ) || ''); + const lock = (attrLookup( pickCS, fields.Container_lock ) || ''), + trap = (attrLookup( pickCS, fields.Container_trap ) || ''); sendAPI( fields.commandMaster + ' --button '+BT.LOCKTYPE+'|'+pickID+'|'+lock+'|silent' ); sendAPI( fields.commandMaster + ' --button '+BT.TRAPTYPE+'|'+pickID+'|'+trap+'|silent' ); setAttr( pickCS, fields.msVersion, '3.5' ); @@ -8779,11 +8771,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } } - let chance = Math.max((parseInt(attrLookup( charCS, [fields.Find_Traps[0]+fields.Thief_postfix[0],fields.Find_Traps[1]] )) || 5),5); - content = '&{template:RPGMwarning}{{desc='+putCS.get('name')+' has just attempted to *Find Traps* on '+pickName+' which does not have a *Trap-2* or *Find Traps* macro. ' - + 'Their *Find/Remove Traps* chance is [['+chance+']]%}}'; + const chance = Math.max((parseInt(attrLookup( charCS, [fields.Find_Traps[0]+fields.Thief_postfix[0],fields.Find_Traps[1]] )) || 5),5); + let content = '&{template:RPGMwarning}{{desc='+putCS.get('name')+' has just attempted to *Find Traps* on '+pickName+' which does not have a *Trap-2* or *Find Traps* macro. ' + + 'Their *Find/Remove Traps* chance is [['+chance+']]%}}'; sendFeedback( content ); - let findTrapMacro = (state.MagicMaster.gmRolls ? 'GM-Roll-' : '')+'Magic-FindTrap'; + const findTrapMacro = (state.MagicMaster.gmRolls ? 'GM-Roll-' : '')+'Magic-FindTrap'; getAbility( fields.AbilitiesDB, findTrapMacro, charCS ); getAbility( fields.AbilitiesDB, 'Magic-NoTrap', charCS ); getAbility( fields.AbilitiesDB, 'Magic-NotFoundTrap', charCS ); @@ -8794,7 +8786,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content = '&{template:RPGMdefault}{{title=Find Traps}}{{desc=Do you want to search '+pickName+' for traps? Your chance of success would appear to be [['+chance+']]%, but that might alter with circumstance}}{{desc1=[Yes]('+(state.MagicMaster.gmRolls ? ('!magic --display-ability gm|'+putID+'|'+putCS.id+'|GM-Roll-Magic-FindTrap|gm{Find Traps Roll? Chance is '+chance+'%/1d100,[[1d100]]/Succeed,[[1d'+chance+']]/Fail,[['+chance+'+1d'+(99-chance)+']]}') : ('~'+putName+'|Magic-FindTrap'))+') or [No](!magic --message '+tokenID+'|Not Finding Traps|OK, having thought about your chance of success, you decide to let someone else have a go...)}}'; setAttr( charCS, fields.PlayerID, senderId ); sendResponse( charCS, content, senderId ); + }; + + /* + * Function to display the menu for picking up or putting away Magic Items + * from one Magic Item bag into another Magic Item bag. + */ + + const doPickOrPut = function( args, senderId, buy=false ) { + + if (!args) return; + + if (args.length < 3) { + sendError('Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickPocket = (!buy && !!args[4] ? 'true' : 'false'), + charCS = getCharacter( tokenID ), + pickCS = getCharacter( pickID ); + + let menuType = args[3]; + + if (!tokenID || !putID || !pickID || !charCS || !pickCS) { + sendError('One or more invalid tokens specified'); + return; + }; + setAttr( charCS, fields.PickPocket, pickPocket ); + + let playerConfig = getSetPlayerConfig( senderId ); + + if (menuType && ['short','long'].includes(menuType.toLowerCase())) { + playerConfig.pickOrPutType = menuType.toLowerCase(); + getSetPlayerConfig( senderId, playerConfig ); + } else if (playerConfig && playerConfig.pickOrPutType) { + menuType = playerConfig.pickOrPutType; + } else { + if (!playerConfig) { + playerConfig = {}; + } + playerConfig.pickOrPutType = menuType = 'short'; + getSetPlayerConfig( senderId, playerConfig ); + }; + + setAttr( charCS, fields.ItemRowRef, -1 ); + setAttr( charCS, fields.ItemCastingTime, 0 ); + setAttr( charCS, [fields.Expenditure[0],'current'], 0 ); + setAttr( charCS, [fields.Expenditure[0],'max'], 0 ); + clearItemSelection( pickCS ); + + args = ['POPmenu',tokenID,-1,pickID,putID,-1]; + makeShortPOPmenu( args, senderId, buy ); + return; }; /** @@ -8804,29 +8851,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the target might also be trapped. **/ - var doSearchForMIs = function( args, senderId, buy=false ) { + const doSearchForMIs = function( args, senderId, buy=false ) { // get if (!args) return; - var msg = args; + const msg = args; if (args.length != 3) { sendDebug('doSearchForMIs: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - search = (tokenID === putID), - containerID = search ? pickID : putID, - charCS = getCharacter( tokenID ), - putCS = getCharacter( putID ), - pickToken = getObj('graphic',pickID), - pickCS = getCharacter( pickID ), - containerCS = getCharacter( containerID ), - MIBagSecurity, - content; + const tokenID = args[0], + pickID = args[1], + putID = args[2], + search = (tokenID === putID), + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickToken = getObj('graphic',pickID), + pickCS = getCharacter( pickID ), + containerCS = getCharacter( containerID ); if (!charCS || !putCS) { sendDebug('doSearchForMIs: invalid ID arguments'); @@ -8839,6 +8884,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } + if (!pickCS) { + sendDebug('doSearchForMIs: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens selected'); + return; + }; + + if (csVer(containerCS) < 3.5 && ((attrLookup( containerCS, fields.Gender ) || '').dbName() === 'container')) { let lock = (attrLookup( containerCS, fields.Container_lock ) || ''), trap = (attrLookup( containerCS, fields.Container_trap ) || ''); @@ -8854,27 +8906,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( containerCS, fields.Container_put, putID ); setAttr( containerCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); - MIBagSecurity = parseInt(attrLookup( containerCS, fields.ItemContainerType )) || 0; + let MIBagSecurity = parseInt(attrLookup( containerCS, fields.ItemContainerType )) || 0; // buy = buy || retailers.includes(attrLookup( containerCS, fields.Profession )); - let intelligence = Math.max( (parseInt(attrLookup( containerCS, fields.Intelligence )) || 0), (parseInt(attrLookup( containerCS, fields.Monster_int )) || 0)), - hp = parseInt(attrLookup( containerCS, fields.HP )) || 0; + const intelligence = Math.max( (parseInt(attrLookup( containerCS, fields.Intelligence )) || 0), (parseInt(attrLookup( containerCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( containerCS, fields.HP )) || 0; if (buy && ((MIBagSecurity != 2 && MIBagSecurity != 3 && MIBagSecurity != 7) || hp <= 0 || intelligence <= 3)) { - content = '&{template:'+fields.warningTemplate+'}{{title=Not a Sentient Creature}}{{desc=Either this creature has never been sentient, or they are no longer sentient. You cannot trade with non-sentient beings!}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Not a Sentient Creature}}{{desc=Either this creature has never been sentient, or they are no longer sentient. You cannot trade with non-sentient beings!}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } else if (buy) { - let charRetail = parseData('['+((attrLookup( containerCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}), - classRetail = classObjects( containerCS, senderId, {buy:reClassSpecs.buy,sell:reClassSpecs.sell})[0].classData, - raceRetail = resolveData( (attrLookup( containerCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, containerCS, {buy:reClassSpecs.buy,sell:reClassSpecs.sell} ).parsed, - sells = !!charRetail.sell || !!classRetail.sell || !!raceRetail.sell, - buys = !!charRetail.buy || !!classRetail.buy || !!raceRetail.buy; + const charRetail = parseData('['+((attrLookup( containerCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}), + classRetail = classObjects( containerCS, senderId, {buy:reClassSpecs.buy,sell:reClassSpecs.sell})[0].classData, + raceRetail = resolveData( (attrLookup( containerCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, containerCS, {buy:reClassSpecs.buy,sell:reClassSpecs.sell} ).parsed, + sells = !!charRetail.sell || !!classRetail.sell || !!raceRetail.sell, + buys = !!charRetail.buy || !!classRetail.buy || !!raceRetail.buy; buy = search ? sells : buys; -// log('doSearchForMIs: buying from '+containerCS.get('name')+', string = '+_.pairs(parseData('['+((attrLookup( containerCS, fields.AttrNotes ).match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1])+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}))+', charRetail.buy = '+charRetail.buy+' = '+!!charRetail.buy+', buys = '+buys+', sells = '+sells+', thus buy = '+buy); -// log('doSearchForMIs: buys = '+buys+', char = '+charRetail.buy+', race = '+raceRetail.buy+', class = '+classRetail.buy); if (!buy) { - content = '&{template:'+fields.menuTemplate+'}}{{title=Nothing to '+(search ? 'Buy' : 'Sell')+'}}{{desc=I\'m sorry, but I am not someone who '+(search ? 'sells' : 'buys')+' items. Perhaps you\'d do better talking to a retailer in a shop in town?}}'; + const content = '&{template:'+fields.menuTemplate+'}}{{title=Nothing to '+(search ? 'Buy' : 'Sell')+'}}{{desc=I\'m sorry, but I am not someone who '+(search ? 'sells' : 'buys')+' items. Perhaps you\'d do better talking to a retailer in a shop in town?}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } @@ -8884,8 +8934,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars doPickOrPut( msg, senderId, buy ); return; } else if (MIBagSecurity === 4 || MIBagSecurity === 5) { - var trapVersion = (attrLookup( containerCS, ['trap-version', 'current'] ) || 0), - trapName = 'trap-'+trapVersion, + const trapVersion = (attrLookup( containerCS, ['trap-version', 'current'] ) || 0); + let trapName = 'trap-'+trapVersion, trapMacro = findObjs({ _type : 'ability', characterid : containerCS.id, name : trapName }, {caseInsensitive: true}); if (!trapMacro || trapMacro.length === 0) { trapName = 'Check-for-MIBag-'+trapVersion; @@ -8897,7 +8947,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (trapMacro && trapMacro.length) { sendAPImacro( senderId, tokenID, containerID, trapName ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic doSearchForMIs'); } else { sendDebug('doSearchForMIs: Not found trapMacro'); MIBagSecurity = 1; @@ -8909,14 +8959,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else if ((MIBagSecurity < 4 || MIBagSecurity == 7) && (!search || MIBagSecurity < 2 || hp <= 0 || intelligence <= 0)) { doPickOrPut( msg, senderId ); } else if (MIBagSecurity < 4 || MIBagSecurity == 7) { + // target is a creature that might detect any snooping. // A pick pockets roll is necessary - content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets}}' - + '{{desc=Are you trying to '+(search ? 'pick ' : 'sneak something into ')+containerCS.get('name')+'\'s pocket?\n' - + '[Yes](!magic --pickpockets '+tokenID+'|'+pickID+'|'+putID+'|[[?{Roll vs Pick Pockets|1d100}]])' - + ' or [No](!magic --message '+tokenID+'|Pick Pocket|OK, not making the attempt)' - + '\nor I\'m trying to [buy items](!magic --buy '+tokenID+'|'+pickID+'|'+putID+') from '+containerCS.get('name')+'}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets}}' + + '{{desc=Are you trying to '+(search ? 'pick ' : 'sneak something into ')+containerCS.get('name')+'\'s pocket?\n' + + '[Yes](!magic --pickpockets '+tokenID+'|'+pickID+'|'+putID+'|[[?{Roll vs Pick Pockets|1d100}]])' + + ' or [No](!magic --message '+tokenID+'|Pick Pocket|OK, not making the attempt)' + + '\nor I\'m trying to [buy items](!magic --buy '+tokenID+'|'+pickID+'|'+putID+') from '+containerCS.get('name')+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -8926,8 +8977,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /** * Function to display the Edit MI Bag menu */ - - var doEditMIbag = function( args, senderId, selected ) { + + const doEditMIbag = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8938,9 +8989,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - cmd = (_.isUndefined(args[1]) || args[1].toUpperCase() == 'MAGICAL') ? BT.EDIT_MI : (args[1].toUpperCase() == 'MARTIAL' ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS), - charCS = getCharacter(tokenID); + const tokenID = args[0], + cmd = (_.isUndefined(args[1]) || args[1].toUpperCase() == 'MAGICAL') ? BT.EDIT_MI : (args[1].toUpperCase() == 'MARTIAL' ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doEditMIbag: invalid ID arguments'); @@ -8958,23 +9009,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * options and ability macros set in the target character sheet. **/ - var doPickPockets = function( args, senderId ) { + const doPickPockets = function( args, senderId ) { if (!args) return; - if (args.length != 4) { sendDebug('doPickPockets: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - ppRoll = parseInt(args[3],10), - search = putID === tokenID, - containerID = search ? pickID : putID, - charCS = getCharacter( tokenID ); + const tokenID = args[0], + pickID = args[1], + putID = args[2], + ppRoll = parseInt(args[3],10), + search = putID === tokenID, + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ); if (!charCS || !containerID) { sendDebug('doPickPockets: invalid ID arguments'); @@ -8988,9 +9038,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var pick_pockets = Math.max(parseInt(attrLookup( charCS, [fields.Pick_Pockets[0]+fields.Thief_postfix[0], fields.Pick_Pockets[1]] ) || 0),state.attackMaster.thieveCrit), - pp_target = (Math.min(Math.ceil(Math.max(pick_pockets,0)),96)), - content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets '+(search ? 'for items' : 'to place items')+'}}' + const pick_pockets = Math.max(parseInt(attrLookup( charCS, [fields.Pick_Pockets[0]+fields.Thief_postfix[0], fields.Pick_Pockets[1]] ) || 0),state.attackMaster.thieveCrit), + pp_target = (Math.min(Math.ceil(Math.max(pick_pockets,0)),96)); + let content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets '+(search ? 'for items' : 'to place items')+'}}' + '{{Target=[['+pp_target+']]}}' + '{{Rolled=[[' + ppRoll + ']]}}' + '{{Result=Rolled<=Target}}'; @@ -9006,75 +9056,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - - /* - * Function to display the menu for picking up or putting away Magic Items - * from one Magic Item bag into another Magic Item bag. - */ - - var doPickOrPut = function( args, senderId, buy=false ) { - - if (!args) return; - - if (args.length < 3) { - sendDebug('doPickOrPut: Invalid number of arguments'); - sendError('Invalid MagicMaster command syntax'); - return; - }; - - var tokenID = args[0], - pickID = args[1], - putID = args[2], - menuType = args[3], - pickPocket = (!buy && !!args[4] ? 'true' : 'false'), - charCS = getCharacter( tokenID ), - pickCS = getCharacter( pickID ), - content; - - if (!tokenID || !putID || !pickID || !charCS || !pickCS) { - sendDebug('doPickOrPut: One or more IDs are invalid'); - sendError('One or more invalid tokens specified'); - return; - }; - setAttr( charCS, fields.PickPocket, pickPocket ); - - var menu, - playerConfig = getSetPlayerConfig( senderId ), - pickName = pickCS.get('name'); - - if (menuType && ['short','long'].includes(menuType.toLowerCase())) { - playerConfig.pickOrPutType = menuType.toLowerCase(); - getSetPlayerConfig( senderId, playerConfig ); - } else if (playerConfig && playerConfig.pickOrPutType) { - menuType = playerConfig.pickOrPutType; - } else { - if (!playerConfig) { - playerConfig = {}; - } - playerConfig.pickOrPutType = menuType = 'short'; - getSetPlayerConfig( senderId, playerConfig ); - }; - - setAttr( charCS, fields.ItemRowRef, -1 ); - setAttr( charCS, fields.ItemCastingTime, 0 ); - setAttr( charCS, [fields.Expenditure[0],'current'], 0 ); - setAttr( charCS, [fields.Expenditure[0],'max'], 0 ); - - args = ['POPmenu',tokenID,-1,pickID,putID,-1]; - - makeShortPOPmenu( args, senderId, buy ); - - return; - - }; - /* * Add a magic item directly to a creature or container, with * additional options to replace another item and/or take the * added item in-hand */ - var doAddItem = function( args, senderID, selected ) { + const doAddItem = function( args, senderID, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9085,21 +9073,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - miRowRef = args[1], - miChosen = args[2], - miQty = args[3] || 0, - miInHand = (args[4] || '='), - isGM = (args[5] || '').toUpperCase() === 'NOCURSE', - hand = '', - charCS = getCharacter(tokenID); - + const tokenID = args[0], + miRowRef = args[1], + miChosen = args[2], + isGM = (args[5] || '').toUpperCase() === 'NOCURSE', + charCS = getCharacter(tokenID); + if (!charCS) { sendDebug('doAddItem: invalid ID argument'); sendResponseError(senderId,'Invalid token specified'); return; }; + let miInHand = (args[4] || '='), + hand = ''; + if (miRowRef.length && isNaN(miRowRef) && miInHand === '=') { hand = getTableField( charCS, {}, fields.InHand_table, fields.InHand_trueName ).tableFind( fields.InHand_trueName, miRowRef ); miInHand = _.isUndefined(hand) ? '' : hand; @@ -9118,24 +9106,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle the Config command, to configure the API */ - var doConfig = function( args ) { + const doConfig = function( args ) { if (!args || args.length < 2) { makeConfigMenu( args ); return; } - var flag = args[0].toLowerCase(), - value = args[1].toLowerCase() === 'true', - msg = ''; + const flag = args[0].toLowerCase(), + value = args[1].toLowerCase() === 'true'; + let msg = ''; switch (flag.toLowerCase()) { -/* case 'fancy-menus': - state.MagicMaster.fancy = value; - if (!_.isUndefined(state.attackMaster.fancy)) state.attackMaster.fancy = value; - msg = value ? 'Fancy menus will be used' : 'Plain menus will be used'; - break; -*/ case 'specialist-rules': state.MagicMaster.spellRules.specMU = value; msg = value ? 'Only rules-based specialists get extra spell' : 'Any specialist gets extra spell'; @@ -9188,6 +9170,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars msg = value ? 'GM rolls skill-based chances' : 'Player rolls skill-based chances'; break; + case 'encumbrance': + state.MagicMaster.encumbrance = value; + msg = value ? 'Encumbrance penalties applied' : 'Encumbrance ignored'; + break; + default: sendError('Invalid Config Command syntax'); return; @@ -9196,93 +9183,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - /** - * Set options for a particular player - **/ - - var doSetOptions = function( args, senderId ) { - - if (!args) return; - - if (args.length != 2) { - sendDebug('doSetOptions: invalid argument pair. Must be [option|value]'); - sendError('Invalid MagicMaster command syntax'); - } - - var option = args[0], - value = args[1], - player = getObj('player',senderId), - playerName, content, - config = getSetPlayerConfig( senderId ) || {}; - - if (player) { - playerName = player.get('_displayname'); - } else { - playerName = 'GM'; - } - content = '&{template:'+fields.menuTemplate+'}{{name='+playerName+'\'s MagicMaster options}}'; - - switch (option.toLowerCase()) { - - case 'menutype': - value = value.toLowerCase(); - if (!['short','long'].includes(value)) { - sendResponseError( senderId, 'Invalid menuType option. Use short or long' ); - return; - } - config.pickOrPutType = value; - getSetPlayerConfig( senderId, config ); - content += '{{desc=Menu type set to '+value+'}}'; - sendResponsePlayer(senderId,content); - config = getSetPlayerConfig( senderId ); - break; - - case 'menudisplay': - value = value.toLowerCase(); - if (!['images','plain','dark'].includes(value)) { - sendResponseError( senderId, 'Invalid menuDisplay option. Use images, plain, or dark.' ); - return; - } - config.menuImages = (value === 'images'); - config.menuPlain = (value === 'plain'); - config.menuDark = (value === 'dark'); - config = getSetPlayerConfig(senderId,config); - doDispConfig(senderId); - redisplayOutput(senderId); - break; - - default: - sendResponseError( senderId, 'Invalid MagicMaster option. [Show Help](!magic --help)'); - break; - }; - return config; - }; - - /** - * Present a menu to select player-specific chat display options - **/ - - var doDispConfig = function( senderId ) { - - let config = getSetPlayerConfig( senderId ) || {}; - if (!config) config = {menuImages:state.MagicMaster.fancy, menuPlain:!state.MagicMaster.fancy, menuDark:false}; - let player = getObj('player',senderId); - let content = '/w "' + player.get('_displayname') + '" ' + design.info_msg - + '' - + '' - + '' - + '' - + '
    Menu images'+(config.menuImages ? '\u2705' : '\u2B1C')+'
    Menu plain'+(config.menuPlain ? '\u2705' : '\u2B1C')+'
    Menu dark'+(config.menuDark ? '\u2705' : '\u2B1C')+'
    '; - sendAPI( content, senderId, '', true ); - return; - } - /** * Add or subtract an increment to the Strength value, * taking into account any Exceptional Strength set **/ - var doStrengthChange = function( args, senderId, selected ) { + const doStrengthChange = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9293,18 +9199,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - increment = args[1], - field = args[2] || fields.Strength[0], - silent = (args[3] || 'SILENT').toUpperCase() == 'SILENT', - charCS = getCharacter(tokenID); + const tokenID = args[0], + increment = args[1], + field = args[2] || fields.Strength[0], + silent = (args[3] || 'SILENT').toUpperCase() == 'SILENT', + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doStrengthChange: invalid ID argument'); sendResponseError(senderId,'One or more invalid tokens specified'); return; }; - handleStrengthChange( charCS, field, increment, senderId, silent ); + handleStrengthChange( tokenID, field, increment, senderId, silent ); return; } @@ -9314,7 +9220,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the class to change is not in the argument list **/ - var doLevelChange = function( args, senderId, selected ) { + const doLevelChange = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9325,8 +9231,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var change = (parseInt(args[1]) || -1), - charCS = getCharacter(args[0]); + const change = (parseInt(args[1]) || -1), + charCS = getCharacter(args[0]); if (!charCS) { sendDebug('doLevelChange: invalid ID argument'); @@ -9345,7 +9251,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Present the Magic Item Bag menu for the tokenID passed, if it has one **/ - var doMIBagMenu = function( args, senderId, selected ) { + const doMIBagMenu = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; @@ -9355,8 +9261,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - curToken = getObj( 'graphic', tokenID ); + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ); if (!curToken){ sendDebug('doMIBagMenu: Invalid tokenID: ' + tokenID); @@ -9364,28 +9270,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var charID = curToken.get('represents'), - tokenName = curToken.get('name'), - ppt, ppTarget, ppTargetMax, - content, menuType, - charCS = getObj( 'character', charID ), - charName = charCS.get('name'); - - ppt = (attrLookup( charCS, ['ppt', 'current'] ) || 5); - ppTarget = Math.min(Math.ceil(1.5*Math.max(ppt,0)),96); - ppTargetMax = Math.min(Math.ceil(Math.max(ppt,0)),96); - - content = '&{template:'+fields.menuTemplate+'} {{name=' + tokenName + '\'s\n' - + 'Items & Equipment Menu}}' - + '{{Section1=[Use a Magic Item](!magic --use-mi '+tokenID+')' - + '[View your Item bag](!magic --view-mi '+tokenID+')}}' - + '{{Section2=[Find Traps](!magic --find-traps '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' - + '[Search for Items & Treasure](!magic --search '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' - + '[Store Items](!magic --search '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})}}' - + '{{Section3=[Buy Items from someone](!magic --buy '+tokenID+'|@{target|Buy from whom?|token_id}|'+tokenID+')' - + '[Sell Items to someone](!magic --sell '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})' - + '[Pick someone\'s Pocket](!magic --search '+tokenID+'|@{target|Pick who\'s pocket?|token_id}|'+tokenID+')}}' - + '{{Section4=[Change Your Items](!magic --edit-mi '+tokenID+')}}'; + const tokenName = curToken.get('name'), + charCS = getCharacter(tokenID); + + const content = '&{template:'+fields.menuTemplate+'} {{name=' + tokenName + '\'s\n' + + 'Items & Equipment Menu}}' + + '{{Section1=[Use a Magic Item](!magic --use-mi '+tokenID+')' + + '[View your Item bag](!magic --view-mi '+tokenID+')}}' + + '{{Section2=[Find Traps](!magic --find-traps '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Search for Items & Treasure](!magic --search '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Store Items](!magic --search '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})}}' + + '{{Section3=[Buy Items from someone](!magic --buy '+tokenID+'|@{target|Buy from whom?|token_id}|'+tokenID+')' + + '[Sell Items to someone](!magic --sell '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})' + + '[Pick someone\'s Pocket](!magic --search '+tokenID+'|@{target|Pick who\'s pocket?|token_id}|'+tokenID+')}}' + + '{{Section4=[Change Your Items](!magic --edit-mi '+tokenID+')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -9402,16 +9300,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0]) { - sendDebug('doGMonlyMImenu: Invalid number of arguments'); sendError('Invalid MagicMaster syntax'); return; }; - var tokenID = args[0]; + const tokenID = args[0], + charCS = getCharacter(tokenID); args = ['GM-MIMENU', tokenID, -1, '' ]; - makeGMonlyMImenu( args, senderId ); + if (!!charCS) { + clearItemSelection( charCS ); + makeGMonlyMImenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noChar, senderId ); + }; return; } @@ -9421,39 +9324,38 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * rest, or only manually by the GM using the GM-edit-MI Reset Single * function. */ - - var doSetReveal = function( args, senderId, selected ) { + + const doSetReveal = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0]) { - sendDebug('doGMonlyMImenu: Invalid number of arguments'); sendError('Invalid MagicMaster syntax'); return; }; - var tokenID = args[0], - hiddenItem = args[1] || '', - revealType = (args[2] || '').toLowerCase(), - MIrowref = parseInt(args[3]), - dispMenu = (args[4] || '').toUpperCase() === 'MENU', - charCS = getCharacter(tokenID); + const tokenID = args[0], + hiddenItem = args[1] || '', + revealType = (args[2] || '').toLowerCase(), + dispMenu = (args[4] || '').toUpperCase() === 'MENU', + charCS = getCharacter(tokenID); + + let MIrowref = parseInt(args[3]); if (!charCS) { - sendDebug('doSetReveal: Invalid tokenID: ' + tokenID); sendError('Invalid token specified'); return; } if (revealType && !['view','use','rest'].includes(revealType)) { - sendDebug('doSetReveal: Invalid reveal type: ' + revealType); sendError('Invalid reveal type specified'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ), + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ), table; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'name' ); if (isNaN(MIrowref)) { @@ -9462,7 +9364,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [MIrowref,table] = tableGroupIndex( Items, MIrowref ); } if (_.isUndefined(MIrowref) || isNaN(MIrowref)) { - sendDebug('doSetReveal: Item not found: ' + hiddenItem); sendError('Invalid Item specified'); return; } @@ -9476,11 +9377,41 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; + /* + * Display the dialog explaining the encumbrance and + * move of a character/NPC. + */ + + async function doCheckMove( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doCheckMove: Invalid number of arguments'); + sendResponseError(senderId,'Valid token not specified'); + return; + }; + + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendResponseError(senderId,'Invalid token specified'); + return; + } + + await itemSlotData( tokenID, null, senderId ); + if (!silent) sendAPI( fields.attackMaster+' --button '+BT.CHECK_MOVE+'|'+tokenID ); + return; + }; + /* * RED: v1.012 A menu to allow players to choose light sources */ - var doLightSourcesMenu = function( args, senderId, selected ) { + const doLightSourcesMenu = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9491,156 +9422,189 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - curToken = getObj( 'graphic', tokenID ); + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let lightSource = 'None'; - if (!curToken){ - sendDebug('doLightSourcesMenu: Invalid tokenID: ' + tokenID); - sendResponseError(senderId,'Invalid token specified'); - return; - } - - var charCS = getCharacter( tokenID ); if (!charCS) { sendDebug('doLightSourcesMenu: Invalid tokenID: ' + tokenID); sendResponseError(senderId,'Invalid token specified'); return; } - - var lightSource = attrLookup( charCS, fields.LightSource ) || 'None', - weaponSwitch = (lightSource == 'Weapon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Weapon)Off'), - torchSwitch = (lightSource == 'Torch') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Torch)Off'), - hoodedSwitch = (lightSource == 'Hooded') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Hooded)Off'), - bullseyeSwitch = (lightSource == 'Bullseye') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Bullseye)Off'), - contLightSwitch = (lightSource == 'ContLight') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|ContLight)Off'), - beaconSwitch = (lightSource == 'Beacon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Beacon)Off'), - - content = '&{template:'+fields.menuTemplate+'}{{name=Manage '+curToken.get('name')+'\'s Light Sources}}' - + '{{desc=Current state indicated by a green button like On. ' - + 'Select a red button to turn the current source off and choose a different one.}}' - + '{{desc1=In order of illumination' - + ''+weaponSwitch+'' - + ''+torchSwitch+'' - + ''+hoodedSwitch+'' - + ''+bullseyeSwitch+'' - + ''+contLightSwitch+'' - + ''+beaconSwitch+'' - + '
    Magic Weapon5ft
    Torch15ft
    Hooded Lantern30ft
    Bullseye Lantern60ft beam
    Cont-Light gem60ft
    Beacon Lantern240ft beam
    }}'; + if (!curToken) { + curToken = charCS; + lightSource = attrLookup( charCS, fields.LightSource ) || 'None'; + } else { + const lowLight = curToken.get('emits_low_light'), + lightDist = parseInt(curToken.get('low_light_distance')); + lightSource = (!lightDist ? 'None' : (lightDist <= 5 ? 'Weapon' : (lightDist <= 15 ? 'Torch' : (lightDist <= 30 ? 'Hooded' : (lightDist <= 60 ? (!lowLight ? 'Bullseye' : 'ContLight') : 'Beacon'))))); + }; + + const weaponSwitch = (lightSource === 'Weapon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Weapon)Off'), + torchSwitch = (lightSource === 'Torch') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Torch)Off'), + hoodedSwitch = (lightSource === 'Hooded') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Hooded)Off'), + bullseyeSwitch = (lightSource === 'Bullseye') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Bullseye)Off'), + contLightSwitch = (lightSource === 'ContLight') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|ContLight)Off'), + beaconSwitch = (lightSource === 'Beacon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Beacon)Off'), + + content = '&{template:'+fields.menuTemplate+'}{{name=Manage '+(curToken.get('name'))+'\'s Light Sources}}' + + '{{desc=Current state indicated by a green button like On. ' + + 'Select a red button to turn the current source off and choose a different one.}}' + + '{{desc1=In order of illumination' + + ''+weaponSwitch+'' + + ''+torchSwitch+'' + + ''+hoodedSwitch+'' + + ''+bullseyeSwitch+'' + + ''+contLightSwitch+'' + + ''+beaconSwitch+'' + + '
    Magic Weapon5ft
    Torch15ft
    Hooded Lantern30ft
    Bullseye Lantern60ft beam
    Cont-Light gem60ft
    Beacon Lantern240ft beam
    }}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } - var doLightSource = function( args, dispMenu, senderId ) { + async function doLightSource( args, dispMenu, senderId ) { + const changeTokenLight = function( token, newSource ) { + + return new Promise(resolve => { + let errFlag = false; + try { +// log('changeTokenLight: called to set token '+token.get('name')+' on page '+getObj('page',token.get('_pageid')).get('name')+' to have '+newSource+' light'); + switch (newSource.toLowerCase()) { + case 'weapon': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 5, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'torch': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 15, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'hooded': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 15, low_light_distance: 30, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'contlight': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 50, low_light_distance: 60, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'bullseye': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 60, low_light_distance: 60, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 19 + }); + break; + + case 'beacon': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 240, low_light_distance: 240, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 21 + }); + break; + + case 'none': + default: + token.set({emits_bright_light: false, emits_low_light: false, + bright_light_distance: 0, low_light_distance: 0, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_dim_light_centre: 180, directional_dim_light_total: 360, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + }; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve(errFlag); + }, 10); + } + }); + }; + if (!args) return; - if (args.length != 2) { sendDebug('doLightSource: Invalid number of arguments'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; }; - var tokenID = args[0], - newSource = args[1], - curToken = getObj( 'graphic', tokenID ); - - if (!curToken){ - sendDebug('doLightSource: Invalid tokenID: ' + tokenID); - sendResponseError(senderId,'Invalid token specified'); - return; - } - - var charCS = getCharacter( tokenID ); + const tokenID = args[0], + newSource = args[1], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let tokenList = [], + errFlag = false; + if (!charCS) { sendDebug('doLightSource: Invalid tokenID: ' + tokenID); sendResponseError(senderId,'Invalid token specified'); return; } +// log('doLightSource: calling for '+(!curToken ? ('character '+charCS.get('name')) : ('token'+curToken.get('name')))+', lightSource '+newSource); - switch (newSource.toLowerCase()) { - case 'none': - curToken.set({emits_bright_light: false, emits_low_light: false, - bright_light_distance: 0, low_light_distance: 0, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_dim_light_centre: 180, directional_dim_light_total: 360, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'weapon': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 1, low_light_distance: 5, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'torch': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 1, low_light_distance: 15, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'hooded': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 15, low_light_distance: 30, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'contlight': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 50, low_light_distance: 60, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'bullseye': - curToken.set({emits_bright_light: true, emits_low_light: false, - bright_light_distance: 60, low_light_distance: 60, - has_directional_bright_light: true, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 19}); - break; - - case 'beacon': - curToken.set({emits_bright_light: true, emits_low_light: false, - bright_light_distance: 240, low_light_distance: 240, - has_directional_bright_light: true, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 21}); - break; - - default: - sendDebug( 'doLightSource: Invalid light source type '+newSource ); - sendResponseError(senderId,'Invalid light source specified'); - break; - } + if (!curToken){ + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== tokenID ))); + } else { + let name = curToken.get('name'), + represents = curToken.get('represents'); + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== represents || obj.get('name') !== name))); +// log('doLightSource: specific token name = '+name+', tokenList has '+tokenList.length+' entries'); + }; + for (const token of tokenList) { + errFlag = await changeTokenLight( token, newSource ); + if (errFlag) break; + }; + setAttr( charCS, fields.LightSource, newSource ); + if (tokenList && tokenList.length) setDefaultTokenForCharacter( charCS, curToken || tokenList[0] ); if (dispMenu) { doLightSourcesMenu( args, senderId ); } else { - sendWait(senderId,0); + sendWait(senderId,0,'Magic doLightSource'); } return; - } + }; /* * Display a simple message to the specified range of players */ - var doMessage = function( args, selected, senderId ) { + const doMessage = function( args, selected, senderId ) { + sendWait(senderId,0,'Magic doMessage'); + if (!args) args = []; - - var sel = ''; + let sel = ''; if (selected && selected.length) { sel = selected[0]._id; } @@ -9651,7 +9615,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var cmd = (args[0] || '-').toLowerCase(), + let cmd = (args[0] || '-').toLowerCase(), tokenID = args[1] || sel, charCS = getCharacter(tokenID), isCmd = ['gm','whisper','w','character','c','standard','s','public','p'].includes(cmd); @@ -9664,12 +9628,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } cmd = cmd.toLowerCase(); if (!charCS && cmd !== 'gm') { - sendDebug( 'doMessage: tokenID is invalid' ); sendError( 'No token selected' ); return; } - var msg = '&{template:'+fields.messageTemplate+'}{{name=' + (args[2] || '') + '}}{{desc=' + parseStr(args[3] || '',msgReplacers) + '}}'; + let msg = '&{template:'+fields.messageTemplate+'}{{name=' + (args[2] || '') + '}}{{desc=' + parseStr(args[3] || '',msgReplacers) + '}}'; const reVals = /\^\^(\d+)\^\^/; const valRes = ( a, v ) => args[v] || ''; const reAttrs = /\^\^([^\|\^]+)\|?(max|current)?\|?([^\|\^]+)?\^\^/i; @@ -9681,7 +9644,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars switch (cmd.toLowerCase()) { case 'gm': sendFeedback(msg); - sendWait(senderId,0); break; case 'whisper': case 'w': @@ -9713,13 +9675,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * for attacks. */ - var doTidyCS = function( args, selected ) { + const doTidyCS = function( args, selected ) { - var tokenList = []; + let tokenList = []; if (args && args[0]) { let token = getObj('graphic',args[0]); if (!token) { - sendDebug('doTidyCS: Invalid tokenID argument'); sendError('Valid token not specified'); return; } @@ -9741,7 +9702,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * for attacks. */ - var doCleanCS = function( args, selected ) { + const doCleanCS = function( args, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9752,10 +9713,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - silent = (args[1] || '').toUpperCase() === 'SILENT', - curToken = getObj( 'graphic', tokenID ), - charCS = getCharacter( tokenID ); + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); if (!curToken || !charCS) { sendDebug('doCopyCS: Invalid tokenID: ' + tokenID); @@ -9775,12 +9736,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * to a handout in object format to be cut&pasted to an API */ - var doWriteDB = function(args) { + const doWriteDB = function(args) { - var dbName = args[0], - dbVersion = args[1], - filter = args[2] || '', - dbHandout; + const dbName = args[0], + dbVersion = args[1], + filter = args[2] || ''; + + let dbHandout; if (dbVersion && dbVersion.length && (dbVersion !== '=') && isNaN(parseFloat(dbVersion))) { sendError( 'Invalid database version number' ); @@ -9809,12 +9771,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function doUpdateDB(args, senderId, silent) { try { - var dbName = args[0], - forceIndexUpdate = false; + const dbName = args[0]; + let forceIndexUpdate = false; if (dbName && dbName.length) { - let dbLabel = dbName.replace(/-/g,'_'); - let dbList = Object.keys(dbNames).filter(k => k.startsWith(dbLabel)); + const dbLabel = dbName.replace(/-/g,'_'), + dbList = Object.keys(dbNames).filter(k => k.startsWith(dbLabel)); if (dbList && dbList.length > 1) { sendFeedback('&{template:'+fields.messageTemplate+'}{{title=Extract Database}}{{desc=Multiple databases start with '+dbName+'. [Select the one you want](!magic --extract-db ?{Choose which to extract|'+dbList.join('|')+'}) }}',senderId); return; @@ -9831,23 +9793,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendFeedback(design.info_msg+'Updating all MagicMaster databases
    ',flags.feedbackName,flags.feedbackImg); _.each( dbNames, (db,dbName) => { if (db.api.includes('magic')) { - let dbCS = findObjs({ type:'character', name:dbName.replace(/_/g,'-') },{caseInsensitive:true}); + const dbCS = findObjs({ type:'character', name:dbName.replace(/_/g,'-') },{caseInsensitive:true}); if (dbCS && dbCS.length) { setAttr( dbCS[0], fields.dbVersion, 0 ); } } }); + let result; for (const name in dbNames) { if (dbNames[name].api.includes('magic')) { - let result = await buildDB( name, dbNames[name], senderId, silent ); + result = await buildDB( name, dbNames[name], senderId, silent ); } } forceIndexUpdate = true; }; apiDBs.magic = true; - sendAPI('!attk --index-db magic'); - sendAPI('!cmd --index-db magic'); + sendAPI('!attk --nowaitmsg --index-db magic'); + sendAPI('!cmd --nowaitmsg --index-db magic'); updateDBindex(forceIndexUpdate); return; } catch (e) { @@ -9861,15 +9824,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * GMs / game creators to change markers easily */ - var doExtractMarkers = function (args) { + const doExtractMarkers = function (args) { - var APIdbName = args[0], - UserDbName = args[1], - itemClass = args[2] || 'specs', - result, dbLabel, rootDB; + const APIdbName = args[0], + UserDbName = args[1], + itemClass = args[2] || 'specs'; if (APIdbName && APIdbName.length && UserDbName && UserDbName.length) { - dbLabel = UserDbName.replace(/-/g,'_'); + const dbLabel = UserDbName.replace(/-/g,'_'); if (dbNames[dbLabel]) { sendError(UserDbName+' is an API dataabse and cannot be overwritten'); return; @@ -9888,7 +9850,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the number of charges left on the specified spell, power or item */ - var doSetCharges = function( args, selected, senderId ) { + const doSetCharges = function( args, selected, senderId ) { if (!args) args=[]; if ((!args[0] || !args[0].length) && selected && selected.length) { @@ -9899,12 +9861,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - type = (args[1] || 'MI').toUpperCase(), - item = args[2] || '-', - silent = ((args[3] || '').toLowerCase() === 'silent'), - charCS = getCharacter(tokenID), - qty, Tables, index; + const tokenID = args[0], + type = (args[1] || 'MI').toUpperCase(), + item = args[2] || '-', + silent = ((args[3] || '').toLowerCase() === 'silent'), + charCS = getCharacter(tokenID); + + let qty = 0; if (!charCS) { sendDebug('doSetCharges: invalid ID argument'); @@ -9912,29 +9875,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; if (!['MU','PR','POWER','MI','MIPOWER'].includes(type)) { - sendDebug('doSetCharges: invalid item type '+type+'. Should be one of MU, PR, POWER, or MI'); sendError('Invalid item type specified'); return; }; if (type === 'MI') { - Tables = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); - [table,index] = tableGroupFind( Tables, 'trueName', item ); + let Tables = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); + let [table,index] = tableGroupFind( Tables, 'trueName', item ); if (!_.isUndefined(index)) { Tables = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); qty = Tables.tableLookup( fields[fieldGroups[table].prefix+'qty'], index, false ); }; } else { var levelSpells = shapeSpellbook( charCS, type ); + let Tables, index, c, w; for (let lv=1; lv < levelSpells.length && _.isUndefined(qty); lv++) { - let c = levelSpells[lv].base; - let w = 1; + c = levelSpells[lv].base; + w = 1; do { - tables = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); - index = tables.tableFind( fields.Spells_name, item ); + Tables = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); + index = Tables.tableFind( fields.Spells_name, item ); if (!_.isUndefined(index)) { - tables = getTableField( charCS, tables, fields.Spells_table, fields.Spells_castValue, c ); - qty = tables.tableLookup( fields.Spells_castValue, index, false ); + Tables = getTableField( charCS, Tables, fields.Spells_table, fields.Spells_castValue, c ); + qty = Tables.tableLookup( fields.Spells_castValue, index, false ); }; c++; } while ((w <= fields.SpellsCols) && _.isUndefined(qty)); @@ -9951,13 +9914,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle a button press, and redirect to the correct handler + * Note: keep as "var" to allow direct calls from code */ var doButton = function( args, senderId, selected ) { if (!args) return; - var handler = args[0].toUpperCase(); + const handler = args[0].toUpperCase(); switch (handler) { @@ -10024,7 +9988,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.REVIEW_MIPOWER : case 'GM-REVIEWMI' : - handleReviewSpell( args, senderId ); +// handleReviewSpell( args, senderId ); break; case BT.MEM_MUSPELL : @@ -10167,12 +10131,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.POP_PICK : + handleFlagPicks( args, senderId ); makeShortPOPmenu( args, senderId, false ); break; case BT.BUY_PICK : case BT.SELL_PICK : + handleFlagPicks( args, senderId ); makeShortPOPmenu( args, senderId, true ); break; @@ -10191,7 +10157,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.BUY_OFFER : case BT.SELL_OFFER : - sendWait( senderId, 1 ); + sendWait( senderId, 1, 'Magic doButton sell/buy/store' ); setTimeout( handlePickOrPut, 10, args, senderId ); break; @@ -10366,7 +10332,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars default: - sendDebug( 'doButton: invalid button type specified' ); sendError( 'Invalid MagicMaster button call' ); return; }; @@ -10379,7 +10344,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a database indexing handshake **/ - var doIndexDB = function( args ) { + const doIndexDB = function( args ) { apiDBs[args[0]] = true; updateDBindex(); @@ -10391,13 +10356,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle handshake request **/ - var doHsQueryResponse = function(args) { + const doHsQueryResponse = function(args) { if (!args) return; - var from = args[0] || '', - func = args[1] || '', - funcTrue = ['spellmenu','mem-spell','view-spell','cast-spell','cast-again','mimenu','edit-mi','view-mi','use-mi','mi-charges','mi-power','touch','rest','gm-edit-mi','search','pickorput','lightsources', + const from = args[0] || '', + func = args[1] || '', + funcTrue = ['spellmenu','mem-spell','view-spell','cast-spell','cast-again','mimenu','edit-mi','view-mi','use-mi','mi-charges','mi-power','touch','rest','gm-edit-mi','search','pickorput','lightsources', 'light','changelight','help','check-db','debug'].includes(func.toLowerCase()), - cmd = '!'+from+' --noWaitMsg --hsr magic'+((func && func.length) ? ('|'+func+'|'+funcTrue) : ''); + cmd = '!'+from+' --noWaitMsg --hsr magic'+((func && func.length) ? ('|'+func+'|'+funcTrue) : ''); sendAPI(cmd); return; @@ -10407,14 +10372,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle the response to a handshake query **/ - var doHandleHsResponse = function(args) { + const doHandleHsResponse = function(args) { if (!args) { sendError('Invalid handshake response received'); return; } - var from = args[0] || '', - func = args[1] || '', - funcExists = (!!args[2]) || false; + const from = args[0] || '', + func = args[1] || '', + funcExists = (!!args[2]) || false; if (!apiCommands[from]) { apiCommands[from] = {}; @@ -10430,10 +10395,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle Pending Requests */ - var doRelay = function(args,senderId) { + const doRelay = function(args,senderId) { if (!args) return; - var carry, + let carry, hash; args = args.split(' %% '); if (!args) { log(args); return; } @@ -10445,7 +10410,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars carry = args[1]; if (carry) {carry = carry.trim();} - var pr = findPending(hash); + let pr = findPending(hash); if (pr) { pr.doOps(carry); clearPending(hash); @@ -10455,6 +10420,45 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } }; + + /** + * Debugging routine to get table info of an item + **/ + + const doGetRowInfo = function(args) { // rowID + const tokenID = args[0], + table = args[1] || '', + row = parseInt(args[2]), + miName = args[3] || '', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid token selected'); + return; + }; + + let Items = getTableGroup( charCS, fieldGroups.MI ); + if (!Items) { + sendError('Invalid table group'); + return; + }; + if (miName.length) { +// log('miName defined as '+miName); + let [miRow,miTable,miRowID] = tableGroupFind( Items, 'name', miName ); + sendFeedback('Item '+miName+' is at row '+miRow+' of table '+miTable+', with the rowID = '+miRowID); + }; + if (table.length && !isNaN(row)) { +// log('table is '+table+' and row is '+row); + sendFeedback('Table '+table+' row '+row+' has a rowID = '+Items[table].rowID(row)); + }; + if (!table.length && !isNaN(row)) { +// log('table should be empty but is '+table.length+' long as '+table+', row is '+row); + let [miRow,miTable,miRowID] = tableGroupIndex(Items,row); + sendFeedback('Group row '+row+' is in table '+miTable+' row '+miRow+', with ID '+miRowID); + }; + return; + }; + // -------------------------------------------------------- Event Handlers -------------------------------------------------- @@ -10466,13 +10470,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars */ - var handleChatMessage = function(msg) { - var args = processInlinerolls(msg), + const handleChatMessage = function(msg) { + let args = processInlinerolls(msg), senderId = findThePlayer(msg.who), selected = msg.selected, t = 2; - var doMagicCmd = function( e, selected, senderId, isGM ) { + const doMagicCmd = function( e, selected, senderId, isGM ) { var arg = e, i=arg.indexOf(' '), cmd, argString; sendDebug('Processing arg: '+arg); @@ -10504,6 +10508,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case 'learn-spell': doLearnSpell(arg,selected,senderId); break; + case 'power-per-day': + doChangePerDay(arg,selected,senderId); + break; case 'mem-all-powers': handleMemAllPowers([BT.MEMALL_POWERS,arg[0],1,-1,-1,'',''], senderId, true ); break; @@ -10512,7 +10519,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars handleMemAllPowers(arg, senderId, true ); break; case 'touch': - sendWait(senderId,0); + sendWait(senderId,0,'Magic --touch'); doTouch(arg,senderId); break; case 'target': @@ -10587,7 +10594,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'level-change': doLevelChange(arg,senderId,selected); - break + break; + case 'check-move': + doCheckMove(arg,senderId,selected); + break; case 'lightsources': doLightSourcesMenu(arg,senderId,selected); break; @@ -10606,18 +10616,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case 'message': doMessage(arg,selected,senderId); break; - case 'options': - doSetOptions(arg,senderId); - break; case 'disp-config': - doDispConfig(senderId); + sendAPI('!rpgm '+senderId+' --disp-config', senderId); + break; + case 'options': + sendAPI('!rpgm '+senderId+' --options '+arg.join('|'), senderId); break; case 'write-db': if (isGM) doWriteDB(arg,senderId); break; case 'extract-db': case 'update-db': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --extract-db' ); if (isGM) doUpdateDB(arg,senderId,false); break; case 'check-db': @@ -10633,7 +10643,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isGM) doConfig(arg,senderId); break; case 'update-cs': - log('magicMaster handleChatMessage: something issued a --update-cs command'); +// log('magicMaster handleChatMessage: something issued a --update-cs command'); if (isGM) updateCharSheets(arg,senderId); break; case 'handout': @@ -10642,11 +10652,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'hsq': case 'handshake': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --hsq' ); doHsQueryResponse(arg); break; case 'hsr': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --hsr' ); doHandleHsResponse(arg); break; case 'button': @@ -10662,10 +10672,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // RED: v1.207 allow anyone to set debug and who to send debug messages to doSetDebug(argString,senderId); break; + case 'nowaitmsg': case 'skip': // RED: v4.1 added to allow viewed abilities to not execute certain live commands break; - case 'nowaitmsg': + case 'get-rowid': + doGetRowInfo(arg); break; default: sendFeedback('Invalid command " '+msg.content+' "',flags.feedbackName); @@ -10675,7 +10687,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } catch (err) { log('MagicMaster handleChatMsg: JavaScript '+err.name+': '+err.message+' while processing command '+cmd+' '+argString); - sendDebug('MagicMaster handleChatMsg: JavaScript '+err.name+': '+err.message+' while processing command '+cmd+' '+argString); sendCatchError('MagicMaster',msg_orig[senderId],err); } } @@ -10704,7 +10715,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars time = Date.now(); args = args.split(' --'); - let senderMod = args.shift().split(' '); + const senderMod = args.shift().split(' '); if (senderMod.length > 1) senderId = fixSenderId( [senderMod[1]], selected, senderId ); if (_.isUndefined(senderId) || _.isUndefined(getObj('player',senderId))) { @@ -10719,9 +10730,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendDebug('senderId is defined as ' + getObj('player',senderId).get('_displayname')); }; - var isGM = (playerIsGM(senderId) || state.MagicMaster.debug === senderId); + const isGM = (playerIsGM(senderId) || state.MagicMaster.debug === senderId); - if (!flags.noWaitMsg && args[0] && !args[0].toLowerCase().startsWith('nowaitmsg')) sendWait(senderId,1,'magicMaster'); + if (!flags.noWaitMsg && args[0] && !args[0].toLowerCase().startsWith('nowaitmsg')) sendWait(senderId,2,'Magic cmd '+args[0].split(' ')[0]); _.each(args, function(e) { setTimeout( doMagicCmd, (1*t++), e, selected, senderId, isGM ); @@ -10736,8 +10747,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars */ var cmdMasterRegister = function() { - var cmd = fields.commandMaster - + ' --noWaitMsg' + const cmd = fields.commandMaster + + ' --nowaitmsg' + ' --register Cast_MU_spell|Cast a Wizard spell|magic|~~cast-spell|MU%%`{selected|token_id}' + ' --register Cast_PR_spell|Cast a Priest spell|magic|~~cast-spell|PR%%`{selected|token_id}' + ' --register Cast_spell|Ask for which type of spell to cast|magic|~~cast-spell|MU-PR%%`{selected|token_id}' @@ -10755,11 +10766,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a change to the page the Player ribbon is on **/ - var handleChangePlayerPage = function(obj,prev) { + const handleChangePlayerPage = function(obj,prev) { try { - var page = Campaign().get('playerpageid'), - tokens = filterObjs( obj => { + const page = Campaign().get('playerpageid'), + tokens = filterObjs( obj => { if (obj.get('type') != 'graphic' || obj.get('subtype') != 'token') return false; if (obj.get('pageid') != page) return false; return (!!obj.get('represents') && !!obj.get('represents').length); @@ -10778,7 +10789,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * current Player page and, if so, tidy it's character sheet. */ - var handleChangeToken = function(obj,prev) { + const handleChangeToken = function(obj,prev) { try { if (!obj) @@ -10786,7 +10797,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (obj.get('name') == prev['name']) {return;} - + if (obj.get('_pageid') == Campaign().get('playerpageid') && obj.get('represents') && obj.get('represents').length) { handleCStidy( [obj], true ); } @@ -10800,7 +10811,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Set the magicMaster version of a new character sheet */ - var handleAddCharacter = function(obj) { + const handleAddCharacter = function(obj) { try { if (!obj) return; @@ -10814,10 +10825,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Set the charType of a dead creature to 6 (dead) */ - var handleTokenDeath = function(obj,prev) { + const handleTokenDeath = function(obj,prev) { try { if (!obj) return; - let charCS = getCharacter( obj.id ); + const charCS = getCharacter( obj.id ); if (!charCS) return; if (obj.get("status_dead")) { // If the token dies and is marked as "dead" by the GM diff --git a/MagicMaster/magicMaster.js b/MagicMaster/magicMaster.js index d09493aa1..c6d29fb01 100644 --- a/MagicMaster/magicMaster.js +++ b/MagicMaster/magicMaster.js @@ -117,14 +117,21 @@ API_Meta.MagicMaster={offset:Number.MAX_SAFE_INTEGER,lineCount:-1}; * v5.0.2 05/10/2025 Add (temporary?) fix to API button cmd / macro pair action. * v5.0.3 17/10/2025 Fixed crash on calling !magic without any command. Fixed sloppy checking of spell * schools and spheres. + * v5.1.0 25/09/2025 Converted var declarations to use let and const where possible. Tried to enhance + * speed of algorithms. + * v5.2.0 18/11/2025 Added selection of multiple items to pick, put, buy or sell with traders and + * containers. Used new hyperlink RPGM template syntax to add hyperlinks to select + * all of a type of item, or all items in the container. + * v5.3.0 23/12/2025 Added encumbrance. Updated attrLookup() and resolveData() to use objects for + * optional parameters. Fixed viewing spell storing MIs in innanimate containers. */ -var MagicMaster = (function() { // eslint-disable-line no-unused-vars +const MagicMaster = (function() { // eslint-disable-line no-unused-vars 'use strict'; - var version = '5.0.3', - author = 'RED', - pending = null; - const lastUpdate = 1760686967; + const version = '5.3.0'; + const author = 'RED'; + let pending = null; + const lastUpdate = 1777318205; /* * Define redirections for functions moved to the RPGMaster library @@ -133,7 +140,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const getRPGMap = (...a) => libRPGMaster.getRPGMap(...a); const getHandoutIDs = (...a) => libRPGMaster.getHandoutIDs(...a); const setAttr = (...a) => libRPGMaster.setAttr(...a); - const attrLookup = (...a) => libRPGMaster.attrLookup(...a); + const attrLookup = (...a) => libRPGMaster.newAttrLookup(...a); const setAbility = (...a) => libRPGMaster.setAbility(...a); const miSpellLookup = (...a) => libRPGMaster.miSpellLookup(...a); const abilityLookup = (...a) => libRPGMaster.abilityLookup(...a); @@ -179,7 +186,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const parseClassDB = (...a) => libRPGMaster.parseClassDB(...a); const parseData = (...a) => libRPGMaster.parseData(...a); const parseStr = (...a) => libRPGMaster.parseStr(...a); - const resolveData = (...a) => libRPGMaster.resolveData(...a); + const resolveData = (...a) => libRPGMaster.newResolveData(...a); const getSetPlayerConfig = (...a) => libRPGMaster.getSetPlayerConfig(...a); const makeConfigMenu = (...a) => libRPGMaster.makeConfigMenu(...a); const sendToWho = (...m) => libRPGMaster.sendToWho(...m); @@ -240,7 +247,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * are used. */ - const design = { + const design = Object.freeze({ turncolor: '#D8F9FF', roundcolor: '#363574', statuscolor: '#F0D6FF', @@ -252,15 +259,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars apply_icon: 'https://s3.amazonaws.com/files.d20.io/images/11407460/cmCi3B1N0s9jU6ul079JeA/thumb.png?1439137300', bag_icon: 'https://s3.amazonaws.com/files.d20.io/images/335981697/ocKqy1UIfPMSD-TYEO6oXA/thumb.png?1680722832', info_msg: '
    ', - grey_button: '"display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: dimgrey; font-weight: extra-light;"', - dark_button: '"display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: black; font-weight: normal;"', - selected_button: '"display: inline-block; background-color: white; border: 1px solid red; padding: 4px; color: red; font-weight: bold;"', - green_button: '"display: inline-block; background-color: white; border: 1px solid lime; padding: 4px; color: darkgreen; font-weight: bold;"', + grey_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: gray; font-weight: extra-light; padding: 1px 5px;"', + dark_button: '"background-color: lightgrey; display: inline-block; border: 1px solid black; border-radius: 5px ; color: black; font-weight: normal; padding: 1px 5px;"', + selected_button: '"display: inline-block; background-color: white; border: 1px solid red; border-radius: 5px ; color: red; font-weight: bold; padding: 1px 5px;"', + green_button: '"display: inline-block; background-color: white; border: 1px solid lime; border-radius: 5px ; color: darkgreen; font-weight: bold; padding: 1px 5px;"', boxed_number: '"display: inline-block; background-color: yellow; border: 1px solid blue; padding: 2px; color: black; font-weight: bold;"', success_box: '"display: inline-block; background-color: yellow; border: 1px solid lime; padding: 2px; color: green; font-weight: bold;"', failure_box: '"display: inline-block; background-color: yellow; border: 1px solid red; padding: 2px; color: maroon; font-weight: bold;"', // grey_action: '<span style="display: inline-block; background-color: lightgrey; border: 1px solid black; padding: 4px; color: dimgrey; font-weight: extra-light;">$2</span>$4', - }; + }); /* * MagicMaster related help handout information. @@ -268,20 +275,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const handouts = Object.freeze({ MagicMaster_Help: {name:'MagicMaster Help', - version:3.11, + version:3.13, avatar:'https://s3.amazonaws.com/files.d20.io/images/257656656/ckSHhNht7v3u60CRKonRTg/thumb.png?1638050703', bio:'
    ' - +'MagicMaster Help v3.11' + +'MagicMaster Help v3.13' +'
    ' +'
    ' +'

    MagicMaster API v'+version+'

    ' +'

    and later

    ' +'
    ' +'

    New: in this Help Handout

    ' - +'

    New: The ability to buy and sell with Traders

    ' - +'

    New: Services such as purchaseable weapon proficiency training

    ' - +'

    New: --clean command to fix any (rare) corrupted character sheets

    ' - +'

    New: Use of character sheet fields in RPGM maths

    ' + +'

    New: Ability to select multiple items to buy or sell

    ' + +'

    New: Ability to pick up, loot or store multiple items at the same time

    ' + +'

    Updated: --mi-charges can take API commands as success and/or fail parameters

    ' + +'

    New: Calculation of encumbrance (configurable) and --check-move command

    ' +'
    ' +'

    The MagicMaster API provides functions to manage all types of magic, including Wizard & Priest spell use and effects; Character, NPC & Monster Powers; and discovery, looting, use and cursing of Magic Items. All magical aspects can work with the RoundMaster API to implement token markers that show and measure durations, and produce actual effects that can change token or character sheet attributes temporarily for the duration of the spell or permanently if so desired. They can also work with the InitiativeMaster API to provide menus of initiative choices and correctly adjust individual initiative rolls, including effects of Haste and Slow and similar spells. This API can also interact with the MoneyMaster API (under development) to factor in the passing of time, the cost of spell material use, the cost of accommodation for resting, and the cost of training for leveling up as a spell caster (Wizard, Priest or any other).

    ' +'

    Syntax of MagicMaster calls

    ' @@ -305,14 +312,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    The Ability Macros for spells and powers include descriptions of the spell they represent (limited, I\'m afraid, to avoid copyright issues), and also can optionally have API Buttons embedded in them which, if selected by the Player, can enact the actions of the spell or power. The API Buttons call one or more of the API commands listed in this document, or commands provided by other APIs. This is most powerful when combined with the RoundMaster API to implement token statuses and status markers with durations and effect macros, enabling the spells & powers to make temporary (or permanent, if desired) changes to the targeted creature\'s token and character sheet attributes.

    ' +'

    The best way to learn about these capabilities is to look at example spell definitions in the databases and use those spells or powers to see what they do.

    ' +'

    Types of Item Provided

    ' - +'

    The Item database is currently split into twelve parts: Weapons, Ammunition, Armour, Equipment, Lights, Potions, Scrolls & Spellbooks, Treasure, Wands Staves & Rods, Rings, Miscellaneous, custom items of all these types, and now New: Services. More might be added in future releases, and any DM can add more databases with their own items.

    ' + +'

    The Item database is currently split into twelve parts: Weapons, Ammunition, Armour, Equipment, Lights, Potions, Scrolls & Spellbooks, Treasure, Wands Staves & Rods, Rings, Miscellaneous, custom items of all these types, and now Services. More might be added in future releases, and any DM can add more databases with their own items.

    ' +'

    Many magic items have actions that they can perform in the same way as Spells & Powers, using API Buttons in their macros that call MagicMaster API commands, or commands from other APIs. As with spells & powers, this is most powerful when combined with the capabilities of the RoundMaster API.

    ' +'

    Items can have stored spells (like Rings of Spell Storing) and the spells can be cast from them, and/or can have powers that can be consumed and are refreshed each day. Again, using the RoundMaster API, the spells and powers can have temporary or permanent effects on Tokens and Character Sheets, if desired. Some items can even store other items, such as a Bag of Holding.

    ' +'

    Adding Items to the Character

    ' +'

    Classes are set using the CommandMaster API or via the AttackMaster !attk --other-menu menu (or can be set manually on the Character Sheet). Classes can be those provided in the Class-DB, or any other class. Class names that are not in the database will adopt the attributes of the standard classes depending on the character sheet field the class name and level are entered into: Warrior, Wizard, Priest, Rogue, and Psion. Depending on the settings selected by the GM under the --config menu, the choise of class will restrict or grant the character\'s ability to use certain items and cast certain spells.

    ' +'

    The MagicMaster API provides commands to perform menu-driven addition of items to the Character Sheet. Using these commands will set up all the necessary fields so that the Player can use the items with the other APIs - if using MagicMaster then items should not be added directly to the Character Sheet.

    ' +'

    Items can also be acquired by finding them in chests or on tables (simply tokens with images of chests or tables that represent Character Sheets with items added to them) that can be looted, or even dead bodies of NPCs that have been killed in battle. MagicMaster provides commands that support a menu-driven way to perform looting. Characters, especially Rogues, can even try to Pick Pockets to take items from NPCs (or even other Characters...), though failure may alert the DM (or other Player) to the attempt. Containers can even be trapped, with magical consequences if the trap goes off! On the other hand, Characters can also put items away into chests or onto tables or other storage places, or give them to other Characters or NPCs.

    ' - +'

    New: Trading Items & Services

    ' + +'

    New:Encumbrance

    ' + +'

    Almost all items weigh something, and there is a limit to what a character of a particular strength can carry. When items are added to a character, NPC, creature, or other container the total weight carried is calculated, including the weight of items in bags carried. This weight can be displayed by viewing the item list. As this weight increases, it can "encumber" the carrier - slowing movement, impacting the ability to fight and reducing their ability to dodge so impacting AC. The degree of encumbrance is tracked by the API and the appropriate penalties applied (unless disabled by the GM using a configuration option). The Attk Menu > Check Movement dialog (or !magic --check-move command) will display how the encumbrance is calculated from carried items and current modifications to movement (AttackMaster API is required).

    ' + +'

    While some magical items may have a weight that needs to be born by the carrier, they may not "encumber" the carrier or impact movement, attacks or AC. Magical armour has this effect. Data in the MI database sets the weights and encumbrance values for each item. See the Items Database Help handout for more information.

    ' + +'

    Trading Items & Services

    ' +'

    From v4.1 of the RPGMaster suite, characters can be defined as Traders, with the ability to buy & sell items in their inventories. This even includes Drag & Drop Innkeepers, Shopkeepers, and Blacksmiths in their Forge (and many others listed under the [Services] button on the Drag & Drop dialog), from which Player Characters (and others) can buy equipment and items from as well as sell items to in exchange for money. Training Schools also exist that sell training in weapon proficiencies and even levelling up. See the Class Database Help and Race & Creature Database Help handouts for more information.

    ' +'

    All items in the API databases have been given monetary values, based on the rules stated in the DMG and the Dungeon Master Option: High Level Campaigns for the cost of creating the items (sometimes adjusted for game balance). This cost is then adjusted by each Trader depending on the trading margin each has defined using their buy: and sell: data tag formulas. This means the same item can be offered at different prices by two different traders: indeed, many margin calculations are based on a degree of variability based on a dice roll so the price of an item from a single Trader can vary over time. The trading system also allows the Trader (or the GM or player controlling the Trader) to haggle a price with the player controlling the PC.

    ' +'

    A coin system is now included for each character consisting of numbers of Platinum, Gold, Electrum, Silver and Copper Coin items being held in each character\'s inventory. The quantity of these coins are automatically reflected to the Currency fields on the character sheet. The coin numbers are updated as trades are made: Traders cannot go "overdrawn" with negative numbers of coins (to ensure there is a balance of buying & selling to preserve game balance), but player characters and other NPCs are not prevented from doing so - the DM should keep an eye on borrowing levels and impose penalties (such as interest charges) for excessive overdrafts. Coins can be stored into and recovered (or looted) from containers (such as chests, or perhaps containers called "bank accounts").

    ' @@ -349,29 +359,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'--view-mi [token_id]
    ' +'--use-mi [token_id]
    ' +'--add-mi [token_id]|(mi-to-replace/row#)|mi-to-add|quantity|hand#|[NOCURSE]|[SILENT]
    ' - +'--mi-charges token_id|value|[mi_name]|[maximum]|[charge_override]
    ' + +'--mi-charges token_id|value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
    ' +'--mi-power token_id|power_name|mi_name|[casting-level]
    ' +'--store-spells token_id|mi-name
    ' +'--mem-spell (MI-MU/MI-PR)[-ANY/-ADD/-CHANGE]|[token_id]|[mi-name]
    ' +'--view-spell (MI/MI-MU/MI-PR/MI-POWER)|[token_id]|[mi-name]
    ' +'--cast-spell (MI/MI-POWER)|[token_id]|[casting_level]|[casting_name]|[CHARGED]|[mi-name]
    ' - +'--learn-spell [token_id]|spell_name' + +'--learn-spell [token_id]|spell_name
    ' + +'New:--check-move [token_id]|[SILENT]' +'

    3.Spell, power & magic item effects and resting

    ' +'
    !rounds --target CASTER|caster_token_id|caster_token_id|spell_name|duration|increment|[msg]|[marker]
    '
 							+'!rounds --target (SINGLE/AREA)|caster_token_id|target_token_id|spell_name|duration|increment|[msg]|[marker]
    '
 							+'--touch token_id|effect-name|duration|per-round|message|marker
    '
 							+'--level-change [token_id]|[# of levels]|[HP change]|[class]
    '
 							+'--change-attr [token_id]|change|[field]|[SILENT]
    '
-							+'Updated: --rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale / spellname]
    '
+							+'--rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale / spellname]
    '
 							+'--mi-rest [token_id]|mi_name|[charges]|[power_name]
    '
 							+'--query-qty [token_id]|(MU/PR/POWER/MI/MIPOWER)|item|[SILENT]
    ' +'

    4.Treasure & Item container management

    ' - +'
    Updated: --gm-edit-mi [token_id]
    '
+							+'
    --gm-edit-mi [token_id]
    '
 							+'--find-traps token_id|pick_id|put_id
    '
-							+'Updated:--search token_id|pick_id|put_id
    '
+							+'--search token_id|pick_id|put_id
    '
 							+'--pickorput token_id|pick_id|put_id|[SHORT/LONG]
    '
-							+'New: --buy token_id|pick_id|put_id
    '
-							+'New: --sell token_id|pick_id|put_id
    '
+							+'--buy token_id|pick_id|put_id
    '
+							+'--sell token_id|pick_id|put_id
    ' +'

    5.Light source management

    ' +'
    --lightsources [token_id]
    '
 							+'--light token_id|(NONE/WEAPON/TORCH/HOODED/CONTLIGHT/BULLSEYE/BEACON)
    ' @@ -380,8 +391,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'--message [who|][token_id]|title|message|[command]|[var1]|[var2]...
    ' +'--display-ability [who|][token_id]|database|db_item|[dice_roll1]|[dice_roll2]|[target_id]
    ' +'--tidy [token_id]|[SILENT]
    ' - +'New: --clean [token_id]|[SILENT]
    ' - +'Update:--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/REVEAL/VIEW-ACTION/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
    ' + +'--clean [token_id]|[SILENT]
    ' + +'Updated:--config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/REVEAL/VIEW-ACTION/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
    ' +'--check-db [db-name]
    ' +'--extract-db [db-name]
    ' +'--handshake from | [cmd]
    ' @@ -454,17 +465,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    This command can be used to add a named item from the databases to a character, NPC, creature or other container without going through other dialogs to select the item. It will add the item to a numbered row in the equipment list or, more usefully, replace a named item that already exists in the list (or \'-\' to find an empty row). If the item is one that can be taken in-hand (e.g. a weapon or a shield, or a magic item like a wand or staff), the optional \'hand number\' can be used to specify which hand to take it in. 0=prime hand,1=offhand,2=both,3 onwards for other hands, or just \'=\' (or blank) means replace in-hand if mi-to-replace is in-hand or worn as a ring - if the item is not one that can be held the item will not be taken in-hand. If the item to be replaced is cursed, it will not be replaced and an error message will be displayed unless the NOCURSE option is used. Finally, the command will pop up the edit-mi dialog or the gm-edit-mi dialog (if NOCURSE is specified) showing the resulting equipment list unless the SILENT flag is also used.

    ' +'

    The quantity can be a number to set the amount of the item to add. If preceeded by an operator (such as \'+\', \'-\', \'*\', or \'/\'), the quantity will modify the quantity of the item replaced (up to the maximum quantity of the replaced item). If the quantity is just \'=\' the quantity will set to the same as the replaced item, or 1 for an added item, or if the item to be replaced is not found and quantity is \'=\', the item will not be added.

    ' +'

    2.6 Add, set or deduct Magic Item charges

    ' - +'
    --mi-charges token_id|[+/-/0]value|[mi_name]|[maximum]|[charge_override]
    ' - +'

    Takes a mandatory token ID, a mandatory value preceeded by an optional + or -, an optional magic item name, an optional maximum value, and an optional magic item charge type override as arguments.

    ' - +'

    Does not display anything but alters the number of current or recoverable charges on an item. By default, alters the last magic item used by the character, or will affect the named magic item. Warning: a character can have two items of the same name, and there is no guarantee which will be affected if the name is used.

    ' + +'
    Updated: --mi-charges token_id|[+/-/0]value|[mi_name]|[maximum]|[charge_override]|[success]|[fail]
    ' + +'

    Takes a mandatory token ID, a mandatory value preceeded by an optional + or -, an optional magic item name, an optional maximum value, an optional magic item charge type override, a success message or ccommand, and a fail message or command as arguments.

    ' + +'

    Alters the number of current or recoverable charges on an item. By default, alters the last magic item used by the character, or will affect the named magic item. Warning: a character can have two items of the same name, and there is no guarantee which will be affected if the name is used.

    ' +'

    Remember: using a Charged, Recharging, Rechargeable or Self-Charging Magic Item will automatically use 1 charge on use (unless the ItemData specification includes the field c:0, in which case no charges will automatically be deducted on use). If the c: tag is not used, or is anything other than 0, then charges will be deducted (default 1 charge) on use of the item. In addition, that one charge deduction always happens - if an effect of a Magic Item uses 2 charges, only 1 more needs to be deducted.

    ' +'

    Note: \'-\' reduces current remaining charges, \'+\' adds to the maximum recoverable charges, no + or - sets the maximum recoverable charges, and \'0\' (or starting with 0 e.g. \'01\') the item will recharge to the set or current maximum. This command cannot otherwise be used to increase the current remaining charges unless the item is of type absorbing.

    ' +'

    Using minus \'-\' before the value will deduct charges from the current quantity/charges: e.g. if using an optional power of the item that uses more than 1 charge. Using + before the value will add the value to the number of recoverable charges (overnight or rechargeable to), up to any specified maximum (often used for magic items that regain variable numbers of charges overnight). Just using the value without + or - will just set the number of recoverable charges to the given value. This command is not required to recharge self-charging items but can be used to change the maximum number of charges they will self-charge up to.

    ' +'

    Absorbing items can gain charges in use from other sources, so the --mi-charges command works differently: \'-\' reduces both current and maximum charges and \'+\' only increases current charges (but only to maximum and not beyond). Using neither \'-\' or \'+\' will set the current charges (but, again, only up to the maximum).

    ' +'

    The charge-override can be used to temporarily change the charge behaviour of the magic item. Specifying an override will cause the magic item to behave as if its charging type was that of the override only for this call. Thus charges could be deducted from an uncharged item by overriding by rechargeable or charged.

    ' + +'

    Updated: If the command is able to sucessfully change the number of charges and the item remains in existance, the optional *success* command will be executed or message displayed. If not, if the item "expires" with no remaining charges, or if the command fails for any other reason an optional *fail* command will be executed or message displayed.

    ' +'

    2.7 Use a Magic Item power

    ' +'
    --mi-power token_id|[type-]power_name|mi_name|[casting-level]
    ' - +'

    Takes a mandatory token ID, mandatory power name (optionally prefixed by a power type), mandatory magic item name (New which can be several names separated by forward slash), and an optional casting level as parameters.

    ' + +'

    Takes a mandatory token ID, mandatory power name (optionally prefixed by a power type), mandatory magic item name (which can be several names separated by forward slash), and an optional casting level as parameters.

    ' +'

    Magic Items, especially artefacts, can have their own powers that can be used a specified number of times a day, or at will. This command can be used in API buttons in the Magic Item macro to call on that power. The power name and the magic item name (or names, especially where items that change with use have powers) must be specified to select the right power. If a casting level is specified, any relevant impacts on use of the power will be taken into account: it is often the case that magic items use powers at specific levels. If not specified, the item using Character\'s level is used (user does not need to be a spell caster).

    ' +'

    Generally, magic item powers have unique names, though they do not have to. Such magic items require specific setting up by the DM - see later sections. However, powers can have a prefix that indicates a power type that specifies the power is in fact a Wizard spell (MU-), a Priest spell (PR-), or a Magic Item (MI-) or (for completeness) confirmed as a Power (PW-). Specifying a power type prefix means the appropriate database types will be searched for the named power - thus (for instance) a Wizard or Priest spell can be specified as a Magic Item power without having to program a duplicate in the Powers Databases. If no power type prefix is specified, the system will first search for a matching power in the Powers Databases (both API-supplied and user-supplied), then all Wizard spell databases, then Priest spell databases, then all Magic Item databases, and finally the character sheet of the creature wielding the Magic Item.

    ' +'

    2.8 Add spells to a spell-storing Magic Item

    ' @@ -495,6 +507,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'
  • Check that the spell is of a level the character can cast;
    • ' +'
  • Present a dialog to the player to roll "Spell Knowledge" with a target pre-adjusted for specialism;
    • ' +'
  • If all of the above checks are passed, add the spell to the character\'s correct level of spellbook.
    • ' + +'

    2.12 New:Check Weights and Encumbrance

    ' + +'
    --check-move [token_id]|[SILENT]
    ' + +'

    Takes an optional token_id which defaults to that of the currently selected token, followed by an optional litteral command of SILENCE (case insensitive).

    ' + +'

    This command calculates the weight and encumbrance of items listed as carried on the character sheet represented by the itentified token. This includes the weight contained in any items classified as bags (such as backpacks) modified by the weight and encumbrance specification of the bag (e.g. a Bag of Holding will only weigh a set amount regardless of what it contains). Items (including bags) can have a different encumbrance from their weight (e.g. magical armour has a weight but no encumbrance). These values are specified in the item specification in the MI databases (see the Item Database Help handout).

    ' + +'

    Items carried can also modify the calculated movement. For example, Boots of Speed will always set the movement rate to 12 regardless of encumbrance, though if weight carried exceeds the maximum possible for the strength of the character the GM may say movement should be zero despite the boots (the API does not restrict Boots of Speed).

    ' + +'

    If the AttackMaster API is loaded and SILENT is not specified, a dialog will appear displaying all elements that make up the calculation of weight, encumbrance and movement. The effect on attacks will also be applied to that character/NPC/Creature.

    ' + +'

    If the RoundMaster API is loaded and the character is calculated as being encumbered to any degree, a status will be placed on the identified token indicating the encumbrance and resulting movement limit, and the effect on AC will automatically be applied.

    ' + +'

    While weight and encumbrance will always be calculated, their effects on attacks and AC can be disabled by the GM using a configuration option. The AttacksMaster API and RoundMaster API are required for full functionality of Encumbrance.

    ' +'
    ' +'

    3.Spell, power & magic item effects and resting

    ' +'

    If this API is used in conjunction with the RoundMaster API, Magic Items, Spells & Powers can all place status markers on tokens, and also cause real Effects to alter token & character sheet attributes and behaviours: when cast; during each round of their duration; and when they expire. See the RoundMaster documentation for further information, especially on Effects and the Effects Database.

    ' @@ -513,7 +533,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    3.2 Cast a spell that requires a "touch" attack roll

    ' +'
    --touch token_id|effect-name|duration|per-round|[message]|[marker]
    ' +'

    Takes mandatory token ID, effect name, duration of the effect, an increment to the duration per round (often -1), an optional message each round for the targeted token, and an optional status marker to use (if not supplied, the DM or user will be asked to select one).

    ' - +'

    Note: this command requires RoundMaster API to also be loaded, but is a !magic command.

    ' + +'

    Note: this command requires RoundMaster API to also be loaded, but this is a !magic command.

    ' + +'

    Note: This is a legacy command that has been superceeded by "Touch" being able to be taken in-hand as a weapon. It is retained for backwards compatability.

    ' +'

    Sets up the Character represented by the specified token ready for an "Attack Roll" to deliver a touch attack for a spell or power or magic item use that requires an attack. The parameters are those that will be passed to the !rounds --target command if the attack is successful (see above).

    ' +'

    To use this command, add it as part of a spell, power or MI macro in the appropriate database, before or after the body of the macro text (it does not matter which, as long as it is on a separate line in the macro - the Player will not see the command). Then include in the macro (in a place the Player will see it and be able to click it) an API Button call [Button name](~Selected|To-Hit-Spell) which will run the Ability "To-Hit-Spell" on the Character\'s sheet (which has just been newly written there or updated by the --touch command).

    ' +'

    Thus, when the Player casts the Character\'s spell, power or MI, they can then press the API Button when the macro runs and the attack roll will be made. If successful, the Player can then use the button that appears to mark the target token and apply the spell effect to the target.

    ' @@ -528,7 +549,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Mainly used to support magical effects and creature attacks that drain or add to attributes such as Strength, this command specifically deals with aspects such as Exceptional Strength, remembering if a Character has exceptional strength as a characteristic and taking it into account as the value is changed. Going up or down from the original rolled value and then back the other way will include as a step the exceptional, percentage value. If the change requested would take the value past the original rolled value, the change will only go as far as the original value, whatever change was requested. However, the change can then continue with subsequent calls to beyond the original value with subsequent calls.

    ' +'

    The optional operator before the increment will work in (hopefully) an obvious way: \'+\' adds to the attribute value, \'-\' subtracts, \'*\' multiplies (e.g. *2 will double the current attribute value), \'/\' will divide (e.g. /2 halves it), and \'=\' sets the value to that given. The value in each case can be a formula using RPGM maths operators.

    ' +'

    Note:Should the rolled value need to change permanently to a new rolled value, the change value of 0 (zero) will reset the remembered original rolled value to the current value of the attribute - this is not needed the first time the command is used on a character sheet, which will trigger this value to be remembered for the first time.

    ' - +'

    3.5 Updated: Perform Short or Long Rests

    ' + +'

    3.5 Perform Short or Long Rests

    ' +'
    --rest [token_id]|[SHORT/LONG]|[MU/PR/MU-PR/POWER/MI/MI-POWER]|[timescale/spellname]
    ' +'

    Takes an optional token ID (if not specified, uses the selected token), an optional rest type, short or long, an optional magic type to regain charges for, and an optional timescale for days passing OR an optional spell or power name to individually rest.

    ' +'

    Most magic requires the character to rest periodically to study spell books, rememorise spells, and regain powers and charges of magic items. This command implements both Short and Long rests.

    ' @@ -538,7 +559,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    A Long rest can only be undertaken if certain conditions are met: either the optional Timescale (in days) must be specified as 1 or more days, or the Character Sheet must have a Roll20 attribute called Timescale, current, set to a value of 1 or more (can be set by InitiativeMaster API --end-of-day command). An internal date system is incremented: an attribute on the Character Sheet called In-Game-Day is incremented by the Timescale, and Timescale is then set to 0.

    ' +'

    If the InitiativeMaster API is being used, the system will interact with the "End of Day" command to allow rests to be coordinated with the choice of accommodation (and its cost...!) or with earnings made for the day\'s adventuring.

    ' +'

    Instead of the timescale parameter, a spell or power name can be provided as the 4th parameter. In this case, all memorised instances of that specific spell or power (depending on the magic type selected) will be "rested".

    ' - +'

    New:Warning: Undertaking a rest of either type on a Trader (see "Adding Items to the Character" above) will "restock" the Trader\'s inventory, which first empties all previously held items of all types except coins, and then restocks the inventory using the original definition of the Trader\'s items in the relevant database. If the Trader has items in their inventory that they want to keep, it is recommended that they use a Drag & Drop container to store those items in to keep them safe.

    ' + +'

    Warning: Undertaking a rest of either type on a Trader (see "Adding Items to the Character" above) will "restock" the Trader\'s inventory, which first empties all previously held items of all types except coins, and then restocks the inventory using the original definition of the Trader\'s items in the relevant database. If the Trader has items in their inventory that they want to keep, it is recommended that they use a Drag & Drop container to store those items in to keep them safe.

    ' +'

    3.6 Perform a Single Item Rest

    ' +'
    --mi-rest [token_id]|mi_name|[charges]|[power_name]
    ' +'

    Takes an optional Token ID (defaults to the selected token), a mandatory magic item name (case insensitive), an optional number of charges to recharge to, and an optional power name (case insensitive).

    ' @@ -549,7 +570,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Some spells, powers, and magic items need to know how many charges they have left in order to impact the effect they have. The quantity is difficult to find from the table entry in macro code unless the row number is known, so this command finds the item for the macro and saves the current quantity in the character sheet attribute that can be accessed using @{selected|spellcharges}. Generally a call to this command should be outside of any roll template so that the command runs before the roll template is displayed and any API buttons become available.

    ' +'
    ' +'

    4.Treasure & Item container management

    ' - +'

    Updated: 4.1 DM/GM version of Magic Item management

    ' + +'

    4.1 DM/GM version of Magic Item management

    ' +'
    --gm-edit-mi [token_id]
    ' +'

    Takes an optional token ID. If token ID is not specified, uses the selected token.

    ' +'

    This command opens a menu showing all the items in the Items table of the character sheet associated with the specified token. Unlike the Player version of the command (--edit-mi), this command shows all attributes of every magic item, including those of hidden and cursed items, and also offers an additional lists of "DM Only" items from the item databases, tradeable services, treasure items and other lists restricted to GM use.

    ' @@ -567,7 +588,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' Reset Qty to Max:Allows the DM to reset the quantity of the selected Bag slot to the actual (max) values.' +' Reveal Now:Only available when a hidden item is selected. Reveals the item, setting the displayed name to the actual name, which will function as the revealed item from that point on.' +' Reveal MI:Allows selection of when a hidden item is revealed: MANUALLY by DM (the default) using the Reveal Now button; on VIEWING the item; or on USING the item; or on a long REST. From the point the item is revealed onwards, the item will behave as the revealed item.' - +' Update:
    Edit Treasure:Mainly for use on Magic Item containers, such as Treasure Chests, but also useful for NPCs and Monsters. Allows the DM to add text only treasure descriptions to the container. The displayed menu allows [Add], [Edit], and [Delete] functions to manage multiple lines/rows of treasure description. This is less useful now: instead consider adding items from the [Treasure] and [Coins] lists to the container, which are then saleable to Traders for money.' + +'
    Edit Treasure:Mainly for use on Magic Item containers, such as Treasure Chests, but also useful for NPCs and Monsters. Allows the DM to add text only treasure descriptions to the container. The displayed menu allows [Add], [Edit], and [Delete] functions to manage multiple lines/rows of treasure description. This is less useful now: instead consider adding items from the [Treasure] and [Coins] lists to the container, which are then saleable to Traders for money.' +' Container Type:Sets the type of the Magic Item container or Bag. Available choices are: Untrapped container, Trapped container, Force to be an Inanimate Container, Force to be a Sentient creature. If searched, Inanimate objects can be looted without penalty; Sentient beings require a Pick Pockets check; Trapped containers call a Trap ability macro on the container\'s character sheet to determine the effect. See the --search command below.' +' Container Size:Sets the maximum number of items that can be stored in the selected Character\'s/containers bag. The default is 18 items, though identical items can be stacked.' +' Show As:Sets what level of item description a Player sees when looting a container. Either "Show as Item Types" (e.g. potion, scroll, melee weapon, etc), or "Show as Item Names" (default) which shows the display names of the items. Once picked up from the container, will always show their display names.' @@ -577,7 +598,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to check for traps, mandatory token ID of the token doing the checking.

    ' +'

    This command will check a token for any traps. If the container represented by the token was created using the Drag & Drop container system (see CommandMaster API documentaion for details of the Drag & Drop container system) this command will start the selected container\'s "Find & Remove Traps" programmed sequence, with a (small) chance of the trap (if any) being triggered. If the trap is successfully removed, the container may still be locked but will no longer be trapped. If the token represents any other type of character, container, creature or object a standard "Find/Remove Traps" sequence will ensue, resulting in the party (and the GM) being alerted to the success or otherwise of the outcome.

    ' +'

    In either case, the default approach to the Find Traps roll is that the GM is asked to make it - being presented with a drop-down list of options that includes (a) just rolling 1d100 against the character\'s chance, (b) forcing a successful roll (e.g. if they were meant to find it), and (c) forcing a failure to find a trap (e.g. if there is no trap to be found). The GM can use the !magic --config command to change this action so that the player always rolls to Find Traps, though this might result in an indication for a (non-Drag & Drop) container indicating success for a container that is not trapped!

    ' - +'

    Updated: 4.3 Searching/Storing tokens with Items and Treasure

    ' + +'

    4.3 Searching/Storing tokens with Items and Treasure

    ' +'
    --search token_id|pick_id|put_id
    ' +'

    Takes a mandatory token ID of the character\'s token, mandatory token ID of the token to search and pick up items from, mandatory token ID of the token to put picked up items into.

    ' +'

    This command can be used to pick the pockets of an NPC or even another Player Character, as well as to loot magic item and treasure containers such as Chests and dead bodies. It can also be used for putting stuff away, storing items from the character\'s Item Bag into a container, for instance if the MI Bag is getting too full (it is limited to the number of items specified via the --gm-edit-mi menu, though similar items can be stacked). The effect of this command depends on the type of the container: intelligent characters, NPCs and creatures (even if only with animal intelligence of 1) are considered sentient unless they are dead (Hit Points equal to or less than zero). The trapped container status is set by any Drag & Drop container, or via the GM\'s [Add Items] button or !magic --gm-edit-mi command. All other containers (tokens with character sheets) are considered inanimate and untrapped. Any status can also be overridden if so desired by resetting the container type using the Add Items dialog to set the type to a different value - a sentient creature can be forced to be inanimate (i.e. does not need a pick pockets roll), and visa-versa (e.g. luggage Terry Pratchett style).

    ' @@ -587,13 +608,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' Sentient Creature:if searching, a Pick Pockets check is undertaken - the Player is asked to roll a dice and enter the result (or Roll20 can do it for them), which is compared to the Pick Pockets score on their character sheet. If successful, a message is displayed in the same way as an Inanimate object. If unsuccessful, a further check is made against the level of the being targeted to see if they notice, and the DM is informed either way. The DM can then take whatever action they believe is needed. Of course, you can always freely give/store items to another creature.' +' Trapped container:Traps can be as simple or as complex as the DM desires. Traps may be nothing more than a lock that requires a Player to say they have a specific key, or a combination that has to be chosen from a list, and nothing happens if it is wrong other than the items in the container not being displayed. Or setting a trap off can have damaging consequences for the character searching or the whole party. It can just be a /whisper gm message to let the DM know that the trapped container has been searched. Searching a trapped container with this command calls an ability macro called "Trap-@{container_name|version}" on the container\'s character sheet: if this does not exist, it calls an ability macro just called "Trap". The first version allows the Trap macro to change the behaviour on subsequent calls to the Trap functionality (if using the ChatSetAttr API to change the version attribute), for instance to allow the chest to open normally once the trap has been defused or expended. This functionality requires confidence in Roll20 macro programming.
    Important Note: all Character Sheets representing Trapped containers must have their \'ControlledBy\' value (found under the [Edit] button at the top right of each sheet) set to \'All Players\'. Otherwise, Players will not be able to run the macros contained in them that operate the trap!' +'' - +'

    Updated:Note: Some items are not stackable - they are single items with charges such as a wand or rod, or a spell-storing item which must retain its uniqueness so the spells remain associated. Previously, non-stackable items like these needed to have unique names in the container to retain their unique identity. However, this is strictly speaking no longer the case - the APIs now use unique object identifiers "under the hood". However, you may want to give similar items different names in order to differentiate them,

    ' + +'

    Note: Some items are not stackable - they are single items with charges such as a wand or rod, or a spell-storing item which must retain its uniqueness so the spells remain associated. Previously, non-stackable items like these needed to have unique names in the container to retain their unique identity. However, this is strictly speaking no longer the case - the APIs now use unique object identifiers "under the hood". However, you may want to give similar items different names in order to differentiate them,

    ' +'

    4.4 Looting and storing without searching a container

    ' +'
    --pickorput token_id|pick_id|put_id|[SHORT/LONG]
    ' +'

    Takes a mandatory token ID for the Player\'s character, a mandatory token ID for the token to pick items from, a mandatory token ID for the token to put items in to, and an optional argument specifying whether to use a long or a short menu.

    ' +'

    This command displays a menu from which items on the character sheet associated with the Pick token can be selected to put in the character sheet associated with the Put token. The Player character\'s token can be either the Put token (if picking up items from a container) or the Pick token (if storing items from their sheet into the container). The other token can be another Player Character (useful for one character giving a magic item to another character) or any other selectable token with a character sheet. No traps or sentient being checks are made by this command - this allows the DM to allow Players to bypass the searching functionality when looting a container or storing items in it. Note: the Player\'s Magic Item menu (accessed via the --mimenu command) does not have an option to loot without searching.

    ' +'

    There are two forms of this menu - the Long form displays all items in the container as individual buttons for the Player to select from, and a single button to store the item: this is generally OK when looting containers with not much in them. The Short form of the menu shows only two buttons: one button which, when clicked, brings up a pick list of all the items in the Pick container, and another button to store the item in the Put container: this is generally best for when a character is storing something from their character sheet items into a chest or other container, or giving an MI to another character, as a character\'s sheet often has many items in it which can make a Long menu very long. Each type of menu has a button on it to switch to the other type of menu without re-issuing the command. If not specified in the command, the type of menu the Player last used in this campaign is remembered and used by the system.

    ' - +'

    New: 4.5 Buying and Selling

    ' + +'

    4.5 Buying and Selling

    ' +'
    --buy token_id|pick_id|put_id
    '
 							+'--sell token_id|pick_id|put_id
    ' +'

    Takes a mandatory token ID for the player\'s character, a mandatory token ID for the token to pick items from, and a mandatory token ID for the token to put items in to.

    ' @@ -646,13 +667,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'

    This command takes an optional token_id. If not specified, the command will act on the character sheets represented by all currently selected tokens.

    ' +'

    This command tidies up the character sheet, removing Spell and Magic Item attribute and ability objects that are no longer for items held, and for spells no longer in any spell book. Attack ability objects will also all be removed. All of these will be recreated as and when these items, spells or attacks are again picked up, added to spell books, or used for attacks. This simplifies and speeds up the system, removing redundant processing and memory usage.

    ' +'

    Note: this command is automatically run whenever the DM moves the "Player Ribbon" to a new map page, for every token on that map page that represents a character sheet, and also whenever a character token is dragged onto the active Player page. This continually tidies the system while not imposing a heavy overhead on processing.

    ' - +'

    6.5 New: Recover a corrupt character sheet

    ' + +'

    6.5 Recover a corrupt character sheet

    ' +'
    --clean [token_id]|[SILENT]
    ' +'

    Takes an optional token ID (uses selected token if not specified), and an optional SILENT argument to supress messages.

    ' +'

    Very rarely, a character sheet can become corrupt, for instance so that attributes become read-only for no apparent reason. This command creates an identical copy of the character sheet with all attributes, abilities and table entries copied across. It then updates all tokens that did point to the previous sheet to use the new one, and then deletes the original, corrupt sheet. Finally, it conducts a --tidy command on the new sheet.

    ' +'

    Warning: this is a radical solution and there may well have been a valid reason why the original character sheet became corrupted. It is recommended that all options are explored before using a --clean command.

    ' - +'

    6.6Update: Configure API behavior

    ' - +'
    --config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/ALPHA-LISTS/GM-ROLLS] | [TRUE/FALSE]
    ' + +'

    6.6 Updated:Configure API behavior

    ' + +'
    --config [FANCY-MENUS/SPECIALIST-RULES/SPELL-NUM/ALL-SPELLS/ALL-POWERS/CUSTOM-SPELLS/AUTO-HIDE/ALPHA-LISTS/GM-ROLLS/ENCUMBRANCE] | [TRUE/FALSE]
    ' +'

    Takes two optional arguments, the first a switchable flag name, and the second TRUE or FALSE.

    ' +'

    Allows configuration of several API behaviors. If no arguments given, displays menu for DM to select configuration. Parameters have the following effects:

    ' +'' @@ -664,10 +685,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +' ' +' ' +' ' - +' ' - +' ' + +' ' + +' ' +' ' +' ' + +' ' +'
    ALL-POWERSClass powers not restricted by levelClass powers are restricted by level as per spec
    CUSTOM-SPELLSNo distributed custom spells/items allowed (but CS DB allowed)All custom spells and items allowed
    AUTO-HIDEItems defined to be hideable will be automatically hidden when added to containersHideable items must be hidden manually if desired
    REVEALAuto-hidden items will reveal themselves when usedThe GM will need to reveal auto-hidden items manually
    VIEW-ACTIONAction API buttons on items/spells clickable when viewedAction API buttons greyed out when viewed
    REVEALAuto-hidden items will reveal themselves when usedThe GM will need to reveal auto-hidden items manually
    VIEW-ACTIONAction API buttons on items/spells clickable when viewedAction API buttons greyed out when viewed
    ALPHA-LISTSLong lists will automatically be split into alpha listsWhole long lists will be displayed for selection
    GM-ROLLSGM is asked to roll thievish skill-based chances when using Find TrapsPlayer rolls skill-based chances for Find Traps
    ENCUMBRANCEEncumbrance rules are applied as per PHBWeight, Encumbrance & Move calculated but no adverse effects applied
    ' +'

    6.7 Check database completeness & integrity (GM only)

    ' +'
    --check-db [ db-name ]
    ' @@ -709,6 +731,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars var reSpellSpecs; var reClassSpecs; var reWeapSpecs; + var reACSpecs; var saveFormat; var spellsPerLevel; var casterLevels; @@ -717,6 +740,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars var wisdomSpells; var spellLevels; var showMoreObj; + var encumberDef; /* * MagicMaster specific global data tables and variables. @@ -736,7 +760,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars const messages = Object.freeze({ header: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}', restHeader: '&{template:'+fields.menuTemplate+'} {{name=^^cname^^ is Resting}}', - noChar: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Items Bag}}{{desc=^^cname^^ does not have an associated Character Sheet, and so cannot have a Magic Item Bag.}}', + noChar: '&{template:'+fields.warningTemplate+'} {{name=^^tname^^\'s\nMagic Items Bag}}{{desc=^^tname^^ does not have an associated Character Sheet, and so cannot have a Magic Item Bag.}}', noMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Items Bag}}{{desc=^^cname^^ does not have a Magic Item bag! Perhaps you ought to invest in one... Go and find an appropriate vendor (ask the DM).}}', oldMIBag: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=^^cname^^ has an old v3 Magic Item bag, which will not hold the latest, cutting edge Magic Items! Perhaps you ought to invest in a new one... Go and find an appropriate vendor (ask the DM).}}', cursedSlot: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^\'s\nMagic Item Bag}}{{desc=Oh what a shame. No, you can\'t overwrite a cursed item with a different item. You\'ll need a *Remove Curse* spell or equivalent to be rid of it!}}', @@ -753,7 +777,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars longRest: 'After a good long rest, ^^cname^^ has regained their powers, read their spellbooks and rememorised their spells, and magic items that recharge have regained their charges.}}', noLongRest: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Unable to Rest}}{{desc=I don\'t think the DM has declared it is time for a rest yet, perhaps due to system lag.}}{{desc1=[Try Again](!magic --rest ^^tid^^|long) once the DM says you can}}', noMoreCharges: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ Has No Charges}}{{desc=^^cname^^ has used all the charges of the Power, Spell or Magic Item that they are using, and needs to rest before any charges are available again.}}', - miBagFull: '&{template:'+fields.warningTemplate+'} {{name=^^c2name^^ MI Bag Full}}{{desc=There are no slots left in the selected container for any more items to store}}', + miBagFull: '&{template:'+fields.warningTemplate+'} {{name=^^c2name^^ Can\'t Store That}}{{desc=There are not enough slots left to store the selected item(s)}}', fixedSpell: '&{template:'+fields.warningTemplate+'} {{name=Fixed MI Spell Slot}}{{desc=The chosen slot in your spell-storing Magic Item is fixed to be the named spell. You may only refresh it with the same spell}}', convertItems: '&{template:'+fields.warningTemplate+'} {{name=Converting Items Bag}}{{desc=Please wait while I convert your Items Bag to add sections and make better use of the Character Sheet}}', notSpellCaster: '&{template:'+fields.warningTemplate+'} {{name=^^cname^^ is Not a Spell Caster}}{{desc=^^cname^^ may aspire to be a wonderful Wizard or powerful Priest, but has yet to fulfil those desires. Until then, refrain from pretending - you will be found out!}}', @@ -836,6 +860,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars SLOT_MI: 'SLOT_MI', SLOT_MARTIAL_MI: 'SLOT_MARTIAL_MI', SLOT_ALLITEMS_MI: 'SLOT_ALLITEMS_MI', + CHECK_MOVE: 'CHECK_MOVE', MISC_SPELL: 'MISC_SPELL', MEM_MUSPELL: 'MEM_MUSPELL', MEM_PRSPELL: 'MEM_PRSPELL', @@ -935,8 +960,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); const reIgnore = /[\s\-\_]*/gi; - const reCastMIspellCmd = /!magic\s+--(?:cast|view)-spell\s+MI(?:-SPELLS)?\s*\|/im; - const reCastMIpowerCmd = /!magic\s+--(?:cast|view)-spell\s+MI-POWERS?\s*\|/im; + const reCastViewMIspellCmd = /!magic\s+--(?:cast|view)-spell\s+MI(?:-SPELLS)?\s*\|/im; + const reCastViewMIpowerCmd = /!magic\s+--(?:cast|view)-spell\s+MI-POWERS?\s*\|/im; + const reCastMIspellCmd = /!magic\s+--cast-spell\s+MI(?:-SPELLS)?\s*\|/im; const reLooksLike = /Looks\s?Like=/im; const reInitMIqty = /}}\s*?\w*?data\s*?=.*?[\[,]\s*?qty:([d\d\+\-\*\/.]+?)[,\s\]]/im; const reSpecs = /}}\s*?specs\s*?=(.*?){{/im; @@ -956,7 +982,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // const reActionButton = /((?"], [/\\lt;?/gm, "<"], [/¦/g, "|"], - ]; + ]); - const msgReplacers = [ + const msgReplacers = Object.freeze([ [/\\api;?/g, "!"], [/\\lbrc;?/g, "{"], [/\\rbrc;?/g, "}"], @@ -998,16 +1024,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [/&&/g, "/"], [/%%/g, "%"], [/\\fs;?/g, "\\"], - ]; - + ]); - const dbEncoders = [ + const dbEncoders = Object.freeze([ [/\r?\n/gm,'\\n'], [/'/gm,"\\'"], [/&/gm,"\\\\amp;"], [/>/gm,"\\\\gt;"], [/<%= text %>'), confirm_box: _.template('
    ' @@ -1080,7 +1105,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; }()); - +*/ /** * Init */ @@ -1100,6 +1125,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars {state.MagicMaster.reveal = false;} if (_.isUndefined(state.MagicMaster.viewActions)) {state.MagicMaster.viewActions = false;} + if (_.isUndefined(state.MagicMaster.encumbrance)) + {state.MagicMaster.encumbrance = true;} if (_.isUndefined(state.MagicMaster.gmRolls)) {state.MagicMaster.gmRolls = true;} if (_.isUndefined(state.MagicMaster.debug)) @@ -1123,6 +1150,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars reSpellSpecs = RPGMap.reSpellSpecs; reClassSpecs = RPGMap.reClassSpecs; reWeapSpecs = RPGMap.reWeapSpecs; + reACSpecs = RPGMap.reACSpecs; saveFormat = RPGMap.saveFormat; spellsPerLevel = RPGMap.spellsPerLevel; casterLevels = RPGMap.casterLevels; @@ -1131,10 +1159,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars wisdomSpells = RPGMap.wisdomSpells; spellLevels = RPGMap.spellLevels; showMoreObj = RPGMap.showMoreObj; + encumberDef = RPGMap.encumberDef; DBindex = undefined; flags.noWaitMsg = true; reSpellSpecs.reveal.def = state.MagicMaster.reveal ? 'use' : ''; - setTimeout( () => flags.noWaitMsg=false, 5000 ); + setTimeout( () => flags.noWaitMsg=false, 10000 ); // RED: v2.040 check what other APIs are loaded setTimeout( () => issueHandshakeQuery('rounds'), 20); @@ -1143,140 +1172,80 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( () => updateHandouts(handouts,true,findTheGM()), 30); setTimeout(cmdMasterRegister, 40); setTimeout( () => updateDBindex(false), 80); -// setTimeout( () => handleCStidy( [], true ), 5000 ); - -// updateCharSheets(''); // Update any out-of-date character sheets to current version + setTimeout(setWeights,1000); // RED: log the version of the API Script - log('-=> MagicMaster v'+version+' <=- ['+(new Date(lastUpdate*1000))+']'); + } catch (e) { log('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); sendDebug('MagicMaster Initialisation: JavaScript '+e.name+': '+e.message+' while initialising the API'); sendCatchError('MagicMaster',null,e,'MagicMaster initialisation'); } }; + +/* ------------------------------ Simple String Manipulation ----------------------------------- */ -// ------------------------------------------------ Deal with in-line expressions -------------------------------- + /* + * Function to encode special characters in a string + */ + + const encodeStr = (str,encoders=dbEncoders) => encoders.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - /** - * Return the string with the roll formatted, this is accomplished by simply - * surrounding roll equations with [[ ]] TODO, should be replaced with a - * single regex - * - */ - - var getFormattedRoll = function(str) { - if (!str) {return "";} - var retval = str, - re = /\d+d\d+/, - idx, - expr, - roll, - pre, - post; - - if ((roll=re.exec(str))) { - expr = getExpandedExpr(roll[0],str,roll.index); - idx = str.indexOf(expr); - pre = str.substring(0,idx); - post = str.substring(idx+expr.length); - } else { return retval;} - - return pre+"[["+expr+"]]"+getFormattedRoll(post); - }; + /* + * Function to standardise two strings and compare them. + */ + + const stdEqual = (strA,strB) => ((strA.dbName() || '-') === (strB.dbName() || '-')); + + /* + * Function to return the msVersion of the Character Sheet + * i.e. which versions of MagicMaster it is matched to + */ + + const csVer = (charCS) => parseFloat(((attrLookup( charCS, fields.msVersion ) || '1.5').match(/^\d+\.?\d*/) || ['1.5'])[0]) || 1.5; - /** - * Return the target expression expanded as far as it logically can span - * within the provided line. - * - * ie: target = 1d20 - * locHint = 4 - * line = "2+1d20+5+2d4 bla (bla 1d20+8 bla) bla (4d8...) bla bla" - * - * result = 2+1d20+5+2d4 - */ - - var getExpandedExpr = function(target, line, locHint) { - if (!target || !line) - {return;} - if (!locHint) - {locHint = 0;} - var retval = target, - re = /\d|[\+\-]|d/, - loc = -1, - start = 0, - end = 0; - - if((loc=line.indexOf(target,locHint)) !== -1) { - start = loc; - while (start > 0) { - if (line[start].match(re)) - {start--;} - else - {start++;break;} - } - end = loc; - while (end < line.length) { - if (line[end].match(re)) - {end++;} - else - {break;} - } - retval = line.substring(start,end); - retval = getLegalRollExpr(retval); - } - - return retval; - }; + /* + * Build an array of values to store in a table row + */ +// const valLine = (a,p,t,v) => a[fields[p+t][0]][fields[p+t][1]] = v; + /** - * Gets a legal roll expression. + * Express a cost in coins for display + **/ + + const showCost = (cost) => '**' + Math.floor(cost) + 'GP, ' + Math.floor((cost*10)%10) + 'SP, ' + Math.floor((cost*100)%10) +'CP**'; + + /* + * Determine the class or classes of the character, and + * the level of each + * */ - - var getLegalRollExpr = function(expr) { - if (!expr) {return;} - var retval = expr, - stray = expr.match(/d/g), - valid = expr.match(/\d+d\d+/g), - errMsg = "Illegal expression " + expr; - - try { - if (expr.match(/[^\s\d\+-d]/g) || - !stray || - !valid || - (stray.length =! valid.length)) - {throw errMsg;} - - stray = expr.match(/\+/g); - valid = expr.match(/\d+\+\d+/g); - if ((stray !== null) && (valid !== null) && - (stray.length !== valid.length)) - {throw errMsg;} - stray = expr.match(/-/g); - valid = expr.match(/\d+-\d+/g); - if ((stray !== null) && (valid !== null) && - (stray.length !== valid.length)) - {throw errMsg;} - } catch (e) { - throw e; - } - - //check for leading, trailing, operands - if (retval[0].match(/\+|-/)) - {retval = retval.substring(1);} - if (retval[retval.length-1].match(/\+|-/)) - {retval = retval.substring(0,retval.length-1);} - - return retval; - }; + + const getCharLevels = ( charCS ) => _.filter( fields, (elem,l) => {return l.toLowerCase().includes('_level')}).filter( elem => {return 0 < (attrLookup( charCS, elem ) || 0)}); + + /* + * Get a caster level + */ + + const casterLevel = (charCS, casterType) => caster( charCS, casterType ).clv; + + /** + * Add a message to a character sheet Journal. Generally + * used to record items picked up, put away, bought and sold + * so that they can be distributed as part of treasure + * at the end of the campaign. + **/ + + const diaryEntry = (charCS, msg) => setAttr( charCS, fields.Diary, (attrLookup( charCS, fields.Diary ) + '\n' + String(new Date(Date.now())).substring(0,15) + ': '+msg)); /** * In the inline roll evaluator from ChatSetAttr script v1.9 * by Joe Singhaus and C Levett. **/ - var processInlinerolls = function (msg) { + const processInlinerolls = function (msg) { if (msg.inlinerolls && msg.inlinerolls.length) { return msg.inlinerolls.map(v => { const ti = v.results.rolls.filter(v2 => v2.table) @@ -1298,62 +1267,57 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Function to send an API command to chat * that has '^^parameter^^' replaced by relevant names & ids **/ - var sendAPImacro = function(senderId,charID,targetID,ability,modifier) { + + const sendAPImacro = function(senderId,charID,targetID,ability,modifier) { if (!charID || !targetID || !ability) { sendDebug('sendAPImacro: a parameter is null'); return; } modifier = modifier || ''; - var journal, - curToken = getObj('graphic',charID), - tid = charID, - tname = curToken.get('name'), - cid = curToken.get('represents'), - targetCS = getCharacter(targetID), - words; - - journal = getObj( 'character', cid ); - if (targetCS && journal) { - var cname = journal.get('name'), - bar1 = curToken.get('bar1_value'), - bar2 = curToken.get('bar2_value'), - bar3 = curToken.get('bar3_value'), - ac = getTokenValue(curToken,fields.Token_AC,fields.AC,fields.MonsterAC,fields.Thac0_base).val, - thac0 = getTokenValue(curToken,fields.Token_Thac0,fields.Thac0,fields.MonsterThac0,fields.Thac0_base).val, - hp = getTokenValue(curToken,fields.Token_HP,fields.HP,null,fields.Thac0_base).val, - targetcid = targetCS.id, - targetchar = targetCS.get('name'), - targettoken = getObj('graphic',targetID).get('name'), - abilityMacro = findObjs({ _type : 'ability' , characterid : targetCS.id, name : ability + modifier }, {caseInsensitive: true}); + const curToken = getObj('graphic',charID), + tid = charID, + tname = curToken.get('name'), + cid = curToken.get('represents'), + targetCS = getCharacter(targetID), + journal = getObj( 'character', cid ); + if (targetCS && journal) { + const abilityMacro = findObjs({ _type : 'ability' , characterid : targetCS.id, name : ability + modifier }, {caseInsensitive: true}); if (!abilityMacro || abilityMacro == undefined || abilityMacro.length === 0) { sendDebug('Not found macro ' + targetCS.get('name') + '|' + ability + modifier); return; } - if (!cname) { - cname = curToken.get('name'); - } + const cname = journal.get('name') || curToken.get('name'), + bar1 = curToken.get('bar1_value'), + bar2 = curToken.get('bar2_value'), + bar3 = curToken.get('bar3_value'), + ac = getTokenValue(curToken,fields.Token_AC,fields.AC,fields.MonsterAC,fields.Thac0_base).val, + thac0 = getTokenValue(curToken,fields.Token_Thac0,fields.Thac0,fields.MonsterThac0,fields.Thac0_base).val, + hp = getTokenValue(curToken,fields.Token_HP,fields.HP,null,fields.Thac0_base).val, + targetcid = targetCS.id, + targetchar = targetCS.get('name'), + targettoken = getObj('graphic',targetID).get('name'); + if (abilityMacro.length > 0) { - var macroBody = abilityMacro[0].get('action'); - - macroBody = macroBody.replace( /\@\{selected\|token_id}/gi, tid ) - .replace( /\@\{selected\|/gi, '\@{'+cname+'|' ) - .replace( /\^\^cname\^\^/gi , cname ) - .replace( /\^\^tname\^\^/gi , tname ) - .replace( /\^\^cid\^\^/gi , cid ) - .replace( /\^\^tid\^\^/gi , tid ) - .replace( /\^\^pid\^\^/gi , senderId ) - .replace( /\^\^targetchar\^\^/gi , cname ) - .replace( /\^\^targettoken\^\^/gi , tname ) - .replace( /\^\^targetcid\^\^/gi , targetcid ) - .replace( /\^\^targettid\^\^/gi , targetID ) - .replace( /\^\^bar1_current\^\^/gi , bar1 ) - .replace( /\^\^bar2_current\^\^/gi , bar2 ) - .replace( /\^\^bar3_current\^\^/gi , bar3 ) - .replace( /\^\^token_ac\^\^/gi , ac ) - .replace( /\^\^token_thac0\^\^/gi , thac0 ) - .replace( /\^\^token_hp\^\^/gi , hp ); + const macroBody = abilityMacro[0].get('action') + .replace( /\@\{selected\|token_id}/gi, tid ) + .replace( /\@\{selected\|/gi, '\@{'+cname+'|' ) + .replace( /\^\^cname\^\^/gi , cname ) + .replace( /\^\^tname\^\^/gi , tname ) + .replace( /\^\^cid\^\^/gi , cid ) + .replace( /\^\^tid\^\^/gi , tid ) + .replace( /\^\^pid\^\^/gi , senderId ) + .replace( /\^\^targetchar\^\^/gi , cname ) + .replace( /\^\^targettoken\^\^/gi , tname ) + .replace( /\^\^targetcid\^\^/gi , targetcid ) + .replace( /\^\^targettid\^\^/gi , targetID ) + .replace( /\^\^bar1_current\^\^/gi , bar1 ) + .replace( /\^\^bar2_current\^\^/gi , bar2 ) + .replace( /\^\^bar3_current\^\^/gi , bar3 ) + .replace( /\^\^token_ac\^\^/gi , ac ) + .replace( /\^\^token_thac0\^\^/gi , thac0 ) + .replace( /\^\^token_hp\^\^/gi , hp ); sendChat("character|"+cid,sendMsgToWho(journal,senderId,macroBody),null,{noarchive:!flags.archive, use3d:false}); } @@ -1365,33 +1329,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * RED: v1.207 Send a debugging message if the debugging flag is set */ - var sendDebug = function(msg) { + const sendDebug = function(msg) { if (!!state.MagicMaster.debug) { if (playerIsGM(state.MagicMaster.debug)) { log('MagicMaster Debug: '+msg); } else { - var player = getObj('player',state.MagicMaster.debug), - to; + const player = getObj('player',state.MagicMaster.debug); + let to; if (player) { to = '/w "' + player.get('_displayname') + '" '; - } else - {throw ('sendDebug could not find player');} - if (!msg) - {msg = 'No debug msg';} + } else { + throw ('sendDebug could not find player'); + } + if (!msg) msg = 'No debug msg'; sendChat('MagicMaster Debug',to + ''+msg+'',null,{noarchive:!flags.archive, use3d:false}); }; }; }; - var doSetDebug = function(args,senderId) { - var player = getObj('player',senderId), - playerName; - if (player) { - playerName = player.get('_displayname'); - } - else - {throw ('doSetDebug could not find player: ' + args);} - if (!!args && args.indexOf('off') != 0) { + const doSetDebug = function(args,senderId) { + const player = getObj('player',senderId); + if (!player) throw ('doSetDebug could not find player: ' + args); + const playerName = player.get('_displayname'); + if (!!args && args.indexOf('off') !== 0) { state.MagicMaster.debug = senderId; sendResponseError(senderId,'MagicMaster Debug set on for ' + playerName,'MagicMaster Debug'); sendDebug('Debugging turned on'); @@ -1405,70 +1365,77 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Display a message when a character has picked up a magic item **/ - var pickupMessage = function( args, miName, miType, pickedQty, fromCharges, toCharges, senderId ) { - - var buy = (args[0] || '').toUpperCase().includes('BUY'), - sell = (args[0] || '').toUpperCase().includes('SELL'), - tokenID = args[1], - fromID = args[3], - toID = args[4], - cost = parseFloat(args[7]), - charCS = getCharacter( tokenID ), - picking = (tokenID == toID), - whereStr = picking ? (' from '+getObj('graphic',fromID).get('name')) : (' to '+getObj('graphic',toID).get('name')), - content, pickOrPut, charges, msg; - - content = '&{template:'+fields.messageTemplate+'}{{name='+(picking?'Picking Up':'Putting Away')+' Items}}{{desc='; - - pickOrPut = sell ? 'sold ' : (buy ? 'bought ' : (picking ? 'picked up ' : 'put away ')); - charges = picking ? toCharges : fromCharges; + const pickupMessage = function( args, miName, miType, pickedQty, fromCharges, toCharges, senderId ) { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + tokenID = args[1], + fromID = args[3], + toID = args[4], + cost = parseFloat(args[7]), + charCS = getCharacter( tokenID ), + picking = (tokenID == toID), + whereStr = picking ? (' from '+getObj('graphic',fromID).get('name')) : (' to '+getObj('graphic',toID).get('name')), + pickOrPut = sell ? 'sold ' : (buy ? 'bought ' : (picking ? 'picked up ' : 'put away ')), + charges = picking ? toCharges : fromCharges; + let msg; + let content = '&{template:'+fields.messageTemplate+'}{{name='+(pickOrPut.dispName()+' Items')+' Items}}{{desc='; + + if (_.isArray(miName)) { + let msgArray = []; + msg = 'You have '+pickOrPut+' '; + for (let i=0; i1)?'\'s':'')+whereStr+', and now have '+charges; - break; - } + default: + msg = 'You have '+pickOrPut+pickedQty+' '+miName+((pickedQty>1)?'\'s':'')+whereStr+', and now have '+charges; + break; + } + }; if (cost && !isNaN(cost) && cost > 0) { msg += ', at a cost of '+showCost( cost ); @@ -1488,8 +1455,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * specific API command is present **/ - var issueHandshakeQuery = function( api, cmd ) { - var handshake = '!'+api+' --noWaitMsg --hsq magic'+((cmd && cmd.length) ? ('|'+cmd) : ''); + const issueHandshakeQuery = function( api, cmd ) { + const handshake = '!'+api+' --noWaitMsg --hsq magic'+((cmd && cmd.length) ? ('|'+cmd) : ''); sendAPI(handshake); return; }; @@ -1501,31 +1468,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function updateACS( charCS, tokenID, curVer, senderId ) { try { - var charName = charCS.get('name'), - updated = false, - csv = csVer(charCS); + const charName = charCS.get('name'), + csv = csVer(charCS); - var updateCSspellCol = function( charCS, charName, c, senderId ) { + const updateCSspellCol = function( charCS, charName, c, senderId ) { return new Promise(resolve => { try { - var spellName, SpellCol, - updated = false, + let spellName, SpellCol, msg, r = 0; + var updated = false; SpellCol = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_macro, c, '' ); SpellCol = getTableField( charCS, SpellCol, fields.Spells_table, fields.Spells_msg, c, '' ); while (!_.isUndefined(spellName = SpellCol.tableLookup( fields.Spells_name, r, false ))) { if (spellName != '-') { updated = true; - let msg = SpellCol.tableLookup( fields.Spells_macro, r ); - SpellCol = SpellCol.tableSet( fields.Spells_msg, r, msg ); + SpellCol = SpellCol.tableSet( fields.Spells_msg, r, SpellCol.tableLookup( fields.Spells_macro, r ) ); SpellCol = SpellCol.tableSet( fields.Spells_macro, r, (spellName != '-' ? ('%{'+charName+'|'+spellName+'}') : '')); } r++; } } catch (e) { log('MagicMaster updateCharSheets: JavaScript '+e.name+': '+e.message+' while converting sheet '+charCS.get('name')); - sendDebug('MagicMaster updateCharSheets: JavaScript '+e.name+': '+e.message+' while converting sheet '+charCS.get('name')); sendCatchError('MagicMaster',msg_orig[senderId],e); } finally { setTimeout(() => { @@ -1555,16 +1519,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; - var updateCharSheets = function(args,senderId) { + const updateCharSheets = function(args,senderId) { log('updateCharSheets: a character sheet version test has been triggered'); - var curVer = parseFloat(((version || '1.5').match(/^\d+\.\d+/) || ['1.5'])[0]) || 1.5, - CSarray = [], - charObj; + const curVer = parseFloat(((version || '1.5').match(/^\d+\.\d+/) || ['1.5'])[0]) || 1.5; + let CSarray = [], + delay; if (args && args.length) { - charObj = getCharacter(args[0]); + const charObj = getCharacter(args[0]); if (charObj) { if (curVer > csVer(charObj)) { CSarray = [{cs:charObj,tid:args[0]}]; @@ -1584,7 +1548,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }; for (const ct of CSarray) { - let delay = Math.round(1000+(Math.random() * 1000)); + delay = Math.round(1000+(Math.random() * 1000)); setTimeout( updateACS, delay, ct.cs, ct.tid, curVer, senderId ); } }; @@ -1593,13 +1557,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Find the GM, generally when a player can't be found */ - var findTheGM = function() { - var playerGM, - players = findObjs({ _type:'player' }); + const findTheGM = function() { + let playerGM; + const players = findObjs({ _type:'player' }); if (players.length !== 0) { if (!_.isUndefined(playerGM = _.find(players, function(p) { - var player = p; + const player = p; if (player) { if (playerIsGM(player.id)) { state.MagicMaster.gmID = player.id; @@ -1613,23 +1577,41 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return state.MagicMaster.gmID; } +/* ------------------------------- Character Sheet Database Management -------------------------- */ + /** - * Get the configuration for the player who's ID is passed in - * or, if the config is passed back in, set it in the state variable + * Create an internal index of items in the databases + * to make searches much faster. Index entries indexed by + * database root name & short name (name in lower case with + * '-', '_' and ' ' ignored). index[0] = abilityID, + * index[1] = ct-attributeID + * v3.051 Check that other database-handling APIs have finished + * updating their databases and performed a handshake **/ -/* - var getSetPlayerConfig = function( playerID, configObj ) { + + const updateDBindex = function(forceUpdate=false) { - if (!state.MagicMaster.playerConfig[playerID]) { - state.MagicMaster.playerConfig[playerID]={}; - } - if (!_.isUndefined(configObj)) { - state.MagicMaster.playerConfig[playerID] = configObj; - }; - return state.MagicMaster.playerConfig[playerID]; - }; - -/* ------------------------------- Character Sheet Database Management -------------------------- */ + apiDBs.attk = !!apiDBs.attk || ('undefined' === typeof attackMaster); + + DBindex = getDBindex(forceUpdate); + parseClassDB(forceUpdate); + return; + } + + /* + * Check a character sheet database and update/create the + * required attributes from the definitions. This should + * be run after updating or adding item or spell definitions. + */ + + const checkDB = function( args ) { + + checkCSdb( args[0] ); + + apiDBs.magic = true; + updateDBindex(true); + return; + } /* * Check the version of a Character Sheet database and, if @@ -1637,7 +1619,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * it to the latest version. */ - var buildDB = function( dbFullName, dbObj, senderId, silent ) { + const buildDB = function( dbFullName, dbObj, senderId, silent ) { return new Promise(resolve => { @@ -1657,10 +1639,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }; - var copyMarkerCSdb = function( APIdbName, UserDbName, itemClass ) { + const copyMarkerCSdb = function( APIdbName, UserDbName, itemClass ) { let APIdbCS = findObjs({ _type:'character', name:APIdbName }); - let reItemClass = new RegExp( itemClass, 'im' ); + const reItemClass = new RegExp( itemClass, 'im' ); if (!APIdbCS || !APIdbCS.length) { sendError(APIdbName+' not found'); return; @@ -1674,12 +1656,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars UserDbCS = UserDbCS[0]; } - let abilities = findObjs({ _type:'ability', _characterid:APIdbCS.id }) + const abilities = findObjs({ _type:'ability', _characterid:APIdbCS.id }) .filter( o => /\s--target\s|\s--touch\s/im.test(o.get('action')) ) .filter( o => reItemClass.test(o.get('action'))); - + let UserObj; _.each(abilities, a => { - let UserObj = findObjs({_type:'ability', _characterid:UserDbCS.id, name:a.get('name') }); + UserObj = findObjs({_type:'ability', _characterid:UserDbCS.id, name:a.get('name') }); if (!UserObj || !UserObj.length) { createObj( 'ability', {name: a.get('name'), action: a.get('action'), characterid: UserDbCS.id} ); } @@ -1687,142 +1669,56 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars checkDB([UserDbName]); return; }; - - /* - * Check a character sheet database and update/create the - * required attributes from the definitions. This should - * be run after updating or adding item or spell definitions. - */ - - var checkDB = function( args ) { - - checkCSdb( args[0] ); - - apiDBs.magic = true; - updateDBindex(true); - return; - } - /** - * Create an internal index of items in the databases - * to make searches much faster. Index entries indexed by - * database root name & short name (name in lower case with - * '-', '_' and ' ' ignored). index[0] = abilityID, - * index[1] = ct-attributeID - * v3.051 Check that other database-handling APIs have finished - * updating their databases and performed a handshake - **/ - - var updateDBindex = function(forceUpdate=false) { - - apiDBs.attk = !!apiDBs.attk || ('undefined' === typeof attackMaster); +/* ---------------------------- Update Legacy Character Sheets ------------------------- */ + + async function setWeights() { + const gmID = findTheGM(); + let delay = 50; + let doneList = []; + const charList = filterObjs( obj => { + if (obj.get('_type') !== 'graphic' || obj.get('subtype') !== 'token' || !obj.get('represents').length) return false; + const charID = obj.get('represents'); + if (doneList.includes(charID)) return false; + doneList.push(charID); + const charCS = getObj('character',charID); + if (!charCS || !charCS.get('controlledby').length) return false; + return (!String(attrLookup( charCS, fields.Weight_total ) || '').length); + }); + for (const obj of charList) { + const Items = getTableGroup( obj, fieldGroups.MI ); + await itemSlotData( obj.id, Items, gmID ); + }; + }; - DBindex = getDBindex(forceUpdate); - parseClassDB(forceUpdate); - return; - } - /* ------------------------------- Magic Utility functions ----------------------------- */ - /* - * Function to replace special characters in a string - */ -/* - var parseStr=function(str='',replacers=dbReplacers){ - return replacers.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - } - - /* - * Function to encode special characters in a string - */ - - var encodeStr=function(str,encoders=dbEncoders){ - return encoders.reduce((m, rep) => m.replace(rep[0], rep[1]), str); - } - - /* - * Function to standardise two strings and compare them. - */ - - var stdEqual=function(strA,strB){ - return ((strA.dbName() || '-') === (strB.dbName() || '-')); - } - - /* - * Function to return the msVersion of the Character Sheet - * i.e. which versions of MagicMaster it is matched to - */ - - var csVer = (charCS) => parseFloat(((attrLookup( charCS, fields.msVersion ) || '1.5').match(/^\d+\.?\d*/) || ['1.5'])[0]) || 1.5; - - /** - * Express a cost in coins for display - **/ - - var showCost = function( cost ) { - var content = '**' + Math.floor(cost) + 'GP, ' + Math.floor((cost*10)%10) + 'SP, ' + Math.floor((cost*100)%10) +'CP**'; - return content; - }; - - /* - * Determine the class or classes of the character, and - * the level of each - * - */ - - var getCharLevels = function( charCS ) { - return _.filter( fields, (elem,l) => {return l.toLowerCase().includes('_level')}) - .filter( elem => {return 0 < (attrLookup( charCS, elem ) || 0)}); - } - - var casterLevel = function( charCS, casterType ) { - return caster( charCS, casterType ).clv; - } - - /** - * Add a message to a character sheet Journal. Generally - * used to record items picked up, put away, bought and sold - * so that they can be distributed as part of treasure - * at the end of the campaign. - **/ - - var diaryEntry = function( charCS, msg ) { - setAttr( charCS, fields.Diary, (attrLookup( charCS, fields.Diary ) - + '\n' - + String(new Date(Date.now())).substring(0,15) - + ': '+msg) - ); - return; - }; - /** * Determine the type of caster and set the correct levels **/ - var setCaster = function( args, msg, senderId ) { + const setCaster = function( args, msg, senderId ) { - var isPower = args[0].toUpperCase().includes('POWER'), + const tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + itemName = args[5] || ''; + let isPower = args[0].toUpperCase().includes('POWER'), isMU = args[0].toUpperCase().includes('MU'), isMI = args[0].toUpperCase().includes('MI'), isPR = args[0].toUpperCase().includes('PR'), - tokenID = args[1], - curToken = getObj('graphic',tokenID), - charCS = getCharacter( tokenID ), - level = args[2], - pr_level, mu_level, - castingName = args[3], -// chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'), - itemName = args[5] || ''; + level = parseInt(evalAttr(args[2])), + castingName = args[3]; if (!charCS) { - sendDebug('setCaster: invalid token_id'); sendError('No token selected'); return; } - mu_level = parseInt(casterLevel( charCS, 'MU' ),10); - pr_level = parseInt(casterLevel( charCS, 'PR' ),10); - + let mu_level = parseInt(casterLevel( charCS, 'MU' ),10); + let pr_level = parseInt(casterLevel( charCS, 'PR' ),10); + const charType = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + if (isMU && isPR) { isMU = !isNaN(mu_level) && mu_level > 0; isPR = !isNaN(pr_level) && pr_level > 0; @@ -1852,6 +1748,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars mu_level = pr_level = level; } + if (isMI && charType !== 2 && charType !== 3 && charType !== 7) { + level = 1; + } if (!level || level <= 0) { sendParsedMsg( tokenID, ((mu_level || pr_level) ? messages.wrongSpellCaster : messages.notSpellCaster), senderId ); return; @@ -1867,7 +1766,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.Casting_name, castingName ); if (itemName.length) { setAttr( charCS, fields.ItemChosen, itemName ); - let item = abilityLookup( fields.MagicItemDB, itemName ); + const item = abilityLookup( fields.MagicItemDB, itemName ); if (args[0].toLowerCase().includes('mi') && !!item.obj && !!item.obj[1].charge) { if (chargedList.includes(item.obj[1].charge.toLowerCase())) { args[0] = BT.MI_SCROLL; @@ -1883,21 +1782,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the 2E sheet L5 MU Spells start out-of-sequence at column 70 */ - var shapeSpellbook = function( charCS, spellbook ) { + const shapeSpellbook = function( charCS, spellbook ) { - var sheetTypes, charClass, level, maxLevel, miscSpells, noSpells, - specSpells = 0, - levelSpec = 0, - levelSpells = []; - - var countSpells = function( levelSpells ) { + const countSpells = function( levelSpells ) { levelSpells[1].spells = 0; - let r = 0, + let r = 0, c = 0, spellName = '', hasDash = false, spellTables = []; do { - let c = levelSpells[1].base; + c = levelSpells[1].base; for (let w = 1; (w <= fields.SpellsCols); w++) { if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); @@ -1918,10 +1812,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; + let levelSpells = []; if (charCS) { - var casterSpecs = caster( charCS, spellbook ), - level = casterSpecs.lv, - charClass = casterSpecs.ccl; + const casterSpecs = caster( charCS, spellbook ), + charClass = casterSpecs.ccl, + level = casterSpecs.lv; + + let maxLevel, miscSpells, noSpells, specSpells, levelSpec; switch (spellbook.toUpperCase()) { @@ -1967,7 +1864,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; default: - sendDebug('shapeSpellbook: invalid spellbook type '+spellbook+' specified'); sendError('Internal MagicMaster error'); break; } @@ -1980,80 +1876,117 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * selected to use or memorise */ - var checkValidSpell = function( args ) { - - var isMU = args[0].includes('MU'), - isPR = args[0].includes('PR'), - tokenID = args[1], - spell = args[5], - charCS = getCharacter(tokenID), - casterDef = caster(charCS, (isMU ? 'MU' : 'PR')), - reAllowedSpells = { majorsphere: reClassSpecs.majorsphere, - minorsphere: reClassSpecs.minorsphere, - bannedsphere: reClassSpecs.bannedsphere, - }, - allowAll = state.MagicMaster.spellRules.allowAll, + const checkValidSpell = function( args ) { + + const isMU = args[0].includes('MU'), + isPR = args[0].includes('PR'), + tokenID = args[1], + spell = args[5], + charCS = getCharacter(tokenID), + casterDef = caster(charCS, (isMU ? 'MU' : 'PR')), + reAllowedSpells = {majorsphere: reClassSpecs.majorsphere, + minorsphere: reClassSpecs.minorsphere, + bannedsphere: reClassSpecs.bannedsphere, + }, + allowAll = state.MagicMaster.spellRules.allowAll; - spellSpec, spellData, school, sphere, level, banned, specialist, specStd, - casterSpec, casterData, majorSpells, minorSpells, bannedSpells; - if (!args[5] || !args[5].length) return 1; - spellSpec = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spell, charCS ); + const spellSpec = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spell, charCS ); if (!spellSpec.obj) return 0; - spellData = spellSpec.obj[1].body; - school = spellSpec.specs(); - school = (!school || !school[0] || !school[0][4]) ? 'Invalid' : school[0][4]; - school = (school ||'any').dbName().split('|'); + let spellData = spellSpec.obj[1].body; spellData = (spellData.match(reSpellData) || ['',''])[1]; spellData = parseData( spellData, reSpellSpecs ); - sphere = (spellData.sph || 'any').dbName().split('|'); - level = spellData.level || 1; - casterSpec = abilityLookup( fields.ClassDB, casterDef.cl, charCS, true, false ); + let school = spellSpec.specs(); + school = (!school || !school[0] || !school[0][4]) ? 'Invalid' : school[0][4]; + school = (school ||'any').dbName().split('|'); + const sphere = (spellData.sph || 'any').dbName().split('|'); + const level = spellData.level || 1; + let casterSpec = abilityLookup( fields.ClassDB, casterDef.cl, charCS, true, false ); if (!casterSpec.obj) { casterSpec = abilityLookup( fields.ClassDB, casterDef.ccl, charCS ); } - let test = (spellsPerLevel[casterDef.ccl] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level][casterDef.lv]); + const test = (spellsPerLevel[casterDef.ccl] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level] && spellsPerLevel[casterDef.ccl][(isMU ? 'MU' : 'PR')][level][casterDef.lv]); if (!casterSpec.obj || !test) return 0; - casterData = casterSpec.obj[1].body; + let casterData = casterSpec.obj[1].body; casterData = (casterData.match(reClassData) || ['',''])[1]; casterData = parseData( casterData, reAllowedSpells ); - majorSpells = casterData.sps.dbName().split('|'); - minorSpells = casterData.spm.dbName().split('|'); - bannedSpells = casterData.spb.dbName().split('|'); + const majorSpells = (casterData.sps.dbName() || '-').split('|'); + const minorSpells = (casterData.spm.dbName() || '-').split('|'); + const bannedSpells = (casterData.spb.dbName() || '-').split('|'); + let banned, specialist, specStd; return _.reduce( (isMU ? school : sphere), (r,s) => { banned = !(s === 'any' || ((isMU || majorSpells.includes('any') || majorSpells.some(sph => s.startsWith(sph)) || (minorSpells.some(sph => s.startsWith(sph)) && level < 4)) && (isPR || !bannedSpells.some(sph => s.startsWith(sph))))); specialist = isMU && majorSpells.includes(s); specStd = isMU && !majorSpells.includes('any'); +// log('checkValidSpell: r:'+r+', s:'+s+', isMU:'+isMU+', bannedSpells.some:'+bannedSpells.some(sph => s.startsWith(sph))+', specialist:'+specialist+', specStd:'+specStd+', allowAll:'+allowAll+', banned:'+banned); + return ((!allowAll && (!r || banned)) ? 0 : (specialist ? 3 : (specStd ? 2 : r))); },1); } - /* - * Check if the specified power is a class-defined power and, if so - * assess if the power can be used by a character of this level + /** + * Find an item identified as a Power, but which might actually + * be in a different database, as powers can be anything magical + **/ + + const findPower = function( charCS, power ) { + + if (!power || !power.length) return abilityLookup( fields.PowersDB, '', charCS, true, false ); + + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; + const powerType = power.substring(0,3); + let powerLib; + + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) power = power.slice(powerType.length); + + if (!_.some(dbList, dB => { + if (powerType.toUpperCase() === dB[0]) { + powerLib = abilityLookup( dB[1], power, null, true ); + return true; + } else { + return false; + } + })) { + _.some(dbList, dB => { + powerLib = abilityLookup( dB[1], power, null, true ); + return !_.isUndefined(powerLib.obj); + }); + }; + if (!powerLib.obj) { + powerLib = abilityLookup( fields.PowersDB, power, charCS ); + } + powerLib.name = power; + return powerLib; + } + + /* + * Check if the specified power is a class-defined power and, if so + * assess if the power can be used by a character of this level */ - var checkValidPower = function( args, senderId ) { + const checkValidPower = function( args, senderId ) { - var matchPower = (args[5] || '').dbName(), - charCS = getCharacter( args[1] ), - classObj = classObjects( charCS, senderId ), - age = parseInt(attrLookup( charCS, fields.AgeVal ) || 9999), - castAsLvl = -1; + const matchPower = (args[5] || '').dbName(), + charCS = getCharacter( args[1] ), + classObj = classObjects( charCS, senderId ), + age = parseInt(attrLookup( charCS, fields.AgeVal ) || 9999); + let castAsLvl = -1, + classData, powerData, powerName, + isClassPower, isValidPower; if (!matchPower || !matchPower.length || state.MagicMaster.spellRules.allowAnyPower) {log('checkValidPower: no check possible. !matchPower='+!matchPower+', matchPower.length='+matchPower.length+', !matchPower.length='+!matchPower.length+', allowAll='+state.MagicMaster.spellRules.allowAnyPower); return true;} - let success = classObj.some( c => { - let classData = resolveData( c.name, c.dB, reRaceData ).raw; + const success = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; return _.some(classData, p => { - let powerData = parseData( String(p), reSpellSpecs ); - let powerName = powerData.name.toLowerCase(); + powerData = parseData( String(p), reSpellSpecs ); + powerName = powerData.name.toLowerCase(); if (powerName.startsWith('mu-') || powerName.startsWith('pr-') || powerName.startsWith('pw-')) powerName = powerName.slice(3); - let isClassPower = matchPower == powerName.dbName(); - let isValidPower = (parseInt(powerData.age) <= age && parseInt(powerData.level) <= parseInt(c.level)); + isClassPower = matchPower == powerName.dbName(); + isValidPower = (parseInt(powerData.age) <= age && parseInt(powerData.level) <= parseInt(c.level)); castAsLvl = !isClassPower ? castAsLvl : (isValidPower ? (powerData.castlvl || -1) : 0); return (isClassPower && isValidPower); }); @@ -2066,20 +1999,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * from the Powers database */ - var getUsesPerDay = function( charCS, power, senderId ) { + const getUsesPerDay = function( charCS, power, senderId ) { - var matchPower = (power || '').dbName(), - classObj = classObjects( charCS, senderId ), - foundPower, perDay; + const matchPower = (power || '').dbName(), + classObj = classObjects( charCS, senderId ); + let perDay, perLevel, classData, + powerData, foundName, + isClassPower, isRacePower; - foundPower = classObj.some( c => { - let classData = resolveData( c.name, c.dB, reRaceData ).raw; + let foundPower = classObj.some( c => { + classData = resolveData( c.name, c.dB, reRaceData ).raw; return _.some(classData, p => { - let powerData = parseData( String(p), reSpellSpecs, false ); - let foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; - let isClassPower = matchPower == foundName.dbName(); + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isClassPower = matchPower == foundName.dbName(); if (isClassPower) { - let perLevel = (powerData.perDay || '').match(/(\d+)L(\d+?)/i); + perLevel = (powerData.perDay || '').match(/(\d+)L(\d+?)/i); if (perLevel) { perDay = perLevel[1] * Math.ceil(c.level / perLevel[2]); } else { @@ -2090,23 +2025,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }); }); if (!foundPower || _.isUndefined(perDay)) { - let race = attrLookup( charCS, fields.Race ); - let raceDef = abilityLookup( fields.RaceDB, race, charCS ); + const raceDef = abilityLookup( fields.RaceDB, attrLookup( charCS, fields.Race ), charCS ); if (raceDef.obj) { - let raceData = raceDef.data(reRaceData); + const raceData = raceDef.data(reRaceData); foundPower = _.some(raceData, p => { - let powerData = parseData( String(p), reSpellSpecs, false ); - let foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; - let isRacePower = matchPower == foundName.dbName(); + powerData = parseData( String(p), reSpellSpecs, false ); + foundName = ((powerData.name || '').match(/(?:MU\-|PR\-|PW\-|MI\-)?(.*)$/i) || ['',''])[1]; + isRacePower = matchPower == foundName.dbName(); if (isRacePower) perDay = powerData.perDay; return (isRacePower); }); }; }; if (!foundPower || _.isUndefined(perDay)) { - let powerDef = findPower( charCS, power ); + const powerDef = findPower( charCS, power ); if (powerDef.obj) { - let powerData = powerDef.data(reSpellData); + powerData = powerDef.data(reSpellData); powerData = powerData ? parseData( String(powerData), reSpellSpecs, false ) : powerData; if (powerData) perDay = powerData.perDay; }; @@ -2119,7 +2053,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Return a string containing the in-game date in short or long form */ - var inGameDate = function( inGameDay ) { + const inGameDate = function( inGameDay ) { return ['Mon','Tue','Wed','Thur','Fri','Sat','Sun'][((inGameDay%7))]+', ' + (1+(inGameDay%28)) + ['st','nd','rd','th'][Math.min((((inGameDay%28)%20)),3)]+' ' @@ -2127,34 +2061,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars + Math.floor(inGameDay/336); }; - /* - * Lookup a spell or power storing attribute in both legacy and current forms - * (moved to library) - */ -/* - var miSpellLookup = function( charCS, miName, index, objID, attr, postfix='', spell='', def=true ) { - - if (_.isNull(postfix)) postfix = ''; - let dashPost = postfix ? '-'+postfix : ''; - if (_.isNull(spell)) spell = ''; - let dashSpell = spell ? '-'+spell : ''; - if (_.isNull(objID) || !objID) objID = index; - let val = attrLookup( charCS, [attr[0]+miName+dashPost+dashSpell+'+'+objID,attr[1]], null, null, null, false, false ); - if (_.isUndefined(val)) val = attrLookup( charCS, [attr[0]+miName+dashPost+'+'+index+dashSpell,attr[1]], null, null, null, false, false ); - if (_.isUndefined(val)) val = attrLookup( charCS, [attr[0]+miName+dashPost+dashSpell,attr[1],attr[2]], null, null, null, false, ((postfix.length || spell.length) ? false : def) ); - if (_.isUndefined(val) && (postfix.length || spell.length)) val = attrLookup( charCS, [attr[0]+postfix+(postfix ? dashSpell : spell),attr[1],attr[2]], null, null, null, false, def ); - return val; - }; -*/ /* * insert a spell into an identified spellbook slot */ - - var setSpell = function( charCS, spellTables, altSpellTable, spellDB, spellName, r, c, lv, cost, msg, levelOrPerDay, castAsLvl='' ) { + + const setSpell = function( charCS, spellTables, altSpellTable, spellDB, spellName, r, c, lv, cost, msg, levelOrPerDay, castAsLvl='' ) { - var isPower = spellDB.toUpperCase().includes('POWER'), - isMU = spellDB.toUpperCase().includes('MU'), - newSpellObj, altValues, altSpellRow; + const isPower = spellDB.toUpperCase().includes('POWER'); +// isMU = spellDB.toUpperCase().includes('MU'), + let newSpellObj, altValues, altSpellRow; if (fields.GameVersion === 'AD&D1e') { altSpellRow = altSpellTable.tableFind( (isPower ? fields.AltPowers_name : fields.AltSpells_name), (spellTables.tableLookup( fields.Spells_name, r ) || '-') ); @@ -2162,12 +2077,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c); } if (!isPower) { - newSpellObj = getAbility( spellDB, spellName, charCS, true ); + newSpellObj = abilityLookup( spellDB, spellName, charCS, true ); } else { newSpellObj = findPower( charCS, spellName ); spellDB = newSpellObj.dB; spellName = newSpellObj.obj ? newSpellObj.obj[1].name : spellName; - if (newSpellObj.obj) getAbility( spellDB, spellName, charCS, true ); }; if (!newSpellObj.obj) { @@ -2178,17 +2092,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return spellTables.addTableRow( r ); } - var speed = newSpellObj.obj[1].ct, - level = parseInt(newSpellObj.obj[1].type.match(/\d+/)) || 1, - specs = newSpellObj.specs(), - data = newSpellObj.data(), - spellData = data ? parseData( data[0][0], reSpellSpecs ) : {}, - values = spellTables.copyValues(), - csv = csVer(charCS), - weapon = newSpellObj.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.+?\]/im), - equip = (!weapon ? '' : (weapon[0].match(/[\[,\s]equip:(.+?)[,\]]/i) || ['',''])[1].toLowerCase()); + const speed = newSpellObj.obj[1].ct, + level = parseInt(newSpellObj.obj[1].type.match(/\d+/)) || 1, + specs = newSpellObj.specs(), + data = newSpellObj.data(), + spellData = data ? parseData( data[0][0], reSpellSpecs ) : {}, + csv = csVer(charCS), + weapon = newSpellObj.obj[1].body.match(/}}\s*tohitdata\s*=\s*\[.+?\]/im), + equip = (!weapon ? '' : (weapon[0].match(/[\[,\s]equip:(.+?)[,\]]/i) || ['',''])[1].toLowerCase()); + + let values = spellTables.copyValues(); - if (!specs || !specs[0]) log('setSpell: specs = '+(specs ? (specs[0] ? specs[0] : 'specs[0] undefined, spell is '+spellName) : 'specs undefined, spell is '+spellName)); +// if (!specs || !specs[0]) log('setSpell: specs = '+(specs ? (specs[0] ? specs[0] : 'specs[0] undefined, spell is '+spellName) : 'specs undefined, spell is '+spellName)); values[fields.Spells_name[0]][fields.Spells_name[1]] = spellName; values[fields.Spells_db[0]][fields.Spells_db[1]] = spellDB; @@ -2234,35 +2149,168 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return spellTables.addTableRow( r, values ); } + /* + * Find an item table row to put an item in + */ + + const findPutRow = function( tokenID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotCount ) { // addTableRow + let putRow = -1, + miTable = '', + pickedMI = ''; + if (!isNaN(pickRow) && pickRow >= 0) { + pickedMI = tableGroupLookup( pickItems, 'name', pickRow ) || ''; + const pickedTrueMI = (tableGroupLookup( pickItems, 'trueName', pickRow ) || '').dbName() || '-'; + const pickedType = (tableGroupLookup( pickItems, 'type', pickRow ) || '').dbName() || '-'; + const miTrueObj = abilityLookup( fields.MagicItemDB, pickedTrueMI, pickCS ); + const lowerMI = pickedMI.dbName().replace(/v\d+$/,'') || '-'; + miTable = miTrueObj.obj ? getItemTable( miTrueObj.obj[1].type ) : 'GEAR'; + let putItemsTable = putItems[miTable]; + let mi, miTrueName, miType; + for (let i = 0; i < putItemsTable.sortKeys.length; i++) { + mi = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'name'],i) || '').dbName().replace(/v\d+$/,'') || '-'; + if (_.isUndefined(mi)) break; + if (mi != lowerMI) continue; + miTrueName = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'trueName'],i) || '').dbName() ||'-'; + if (miTrueName != pickedTrueMI) continue; + miType = (putItemsTable.tableLookup(fields[fieldGroups[miTable].prefix+'type'],i) || pickedType); + if (miType.dbName() !== '' && (miType.dbName() !== pickedType || !stackable.includes(miType.toLowerCase()))) continue; + putRow = i; + break; + } + if (showTypes && !buy) { + const miObj = abilityLookup( fields.MagicItemDB, pickedMI, pickCS ); + pickedMI = !miObj.obj ? pickedMI : getShownType( miObj, pickRow ); + } + if (putRow < 0) { + const bagSize = (attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); +// if (slotCount <= bagSize) { +// sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); +// putRow = -1; +// miTable = pickedMI = ''; +// } else { + putRow = putItemsTable.tableFind( fields[fieldGroups[miTable].prefix+'name'], '-', false ); + if (_.isUndefined(putRow)) { + putItemsTable = putItemsTable.addTableRow(); + putRow = putItemsTable.sortKeys.length-1; +// } + } + } + }; + return [putRow,miTable,pickedMI]; + }; + + /* + * Remove MI powers specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIpowers = function( charCS, MIname, miRow, miRowID, powerList, powerValues ) { + + let powerName = '', + removeList = [], + PowersTable = [], + r, c, i=0; + + powerValues = powerValues.split(','); + powerList = powerList.split(','); + MIname = MIname.hyphened(); + while (powerList.length > 0) { + powerName = powerList.shift(); + powerName = powerName.hyphened(); + let attrObj = miSpellLookup( charCS, MIname, miRow, miRowID, [fields.MIpowerPrefix[0],null], '', powerName ); + if (attrObj) { + r = attrObj.get('current'); + c = attrObj.get('max'); + if (!_.isUndefined(r) && !_.isUndefined(c)) { + if (_.isUndefined(PowersTable[c])) { + PowersTable[c] = getTable( charCS, fieldGroups.POWERS, c ); + } + powerValues[i] = PowersTable[c].tableLookup( fields.Powers_castMax, r ) + '.' + PowersTable[c].tableLookup( fields.Powers_storedLevel, r ); + PowersTable[c].addTableRow( r ); + } + removeList.push(attrObj); + i++; + } + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return powerValues.join(); + } + + /* + * Remove MI spells specified in the list, using the + * row/column references saved on the character sheet + */ + + const removeMIspells = function( charCS, MIname, MIrow, MIrowID, spellType, spellList, spellValues ) { + + let SpellsTable = [], + removeList = [], + spellQty, r, c, altSpellRow, i=0, spellRows, spellCols, +// attrName = fields.MIspellPrefix[0]+(MIname.replace(/\s/g,'-'))+'-'+(spellType.toLowerCase())+'+'+MIrowID, + altSpellTable = getLvlTable( charCS, fieldGroups.ALTWIZ, fields.MIspellLevel ); + + const base = shapeSpellbook( charCS, 'MI' )[1].base; + + { // Block created to restrict scope of spellRCobj + + let spellRCobj = miSpellLookup( charCS, MIname, MIrow, MIrowID, [fields.MIspellPrefix[0],null] ); + + if (!spellRCobj) return undefined; + + spellRows = spellRCobj.get(fields.MIspellRows[1]).split(','); + spellCols = spellRCobj.get(fields.MIspellCols[1]).split(','); + removeList.push(spellRCobj); + } + + spellValues = spellValues.split(','); + spellList = spellList.split(','); + while (spellRows.length > 0 && spellCols.length > 0) { + r = spellRows.shift(); + c = spellCols.shift(); + if (!_.isUndefined(r) && !_.isUndefined(c) && parseInt(c) >= 0) { + altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c-base); + if (_.isUndefined(SpellsTable[c])) { + SpellsTable[c] = getTable( charCS, fieldGroups.SPELLS, c ); + } + spellQty = SpellsTable[c].tableLookup( fields.Spells_castValue, r ); + spellValues[i] = (spellQty <= 0 ? 0 : (SpellsTable[c].tableLookup(fields.Spells_storedLevel, r))) + + '.' + (SpellsTable[c].tableLookup( fields.Spells_miSpellSet, r )); + + SpellsTable[c].addTableRow( r ); + altSpellTable.addTableRow( altSpellRow ); + }; + i++; + } + _.each(removeList,r => setTimeout( () => r.remove(), 1000 )); + return spellValues.join(); + }; + /* * add or remove spells/powers listed in the parameters to * the specified spell level table in the specified character sheet */ - var changeMIspells = function( charCS, MIname, miRow, miRowID, listType, action, spellList, spellValues = '' ) { + const changeMIspells = function( charCS, MIname, miRow, miRowID, listType, action, spellList, spellValues = '' ) { + - var isAdd = action.toUpperCase() == 'ADD', - c, valueItem, spellHyphen, altGroup, - spellDB, levelSpells, - spellName, spellQty, - toDoList = spellList, + const isAdd = action.toUpperCase() == 'ADD'; + let altGroup, spellDB, + toDoList = spellList.toLowerCase().split(','), spellTables = [], level = fields.MIspellLevel, levelSpells = shapeSpellbook( charCS, 'MI' ), - rows = [], - cols = []; + valueList; if (!isAdd) { valueList = removeMIspells( charCS, MIname, miRow, miRowID, listType, spellList, spellValues ); if (!_.isUndefined(valueList)) return valueList; } - + spellList = spellList.split(','); - toDoList = toDoList.toLowerCase().split(','); - MIname = MIname.replace(/\s/g,'-'); - var indexPrefix = fields.MIspellPrefix[0]+MIname+'-'+(listType.toLowerCase())+'+'+miRowID, - valueList = spellValues ? spellValues.split(',') : [], - altSpellTable; + MIname = MIname.hyphened(); + + let indexPrefix = fields.MIspellPrefix[0]+MIname+'-'+(listType.toLowerCase())+'+'+miRowID; + valueList = spellValues ? spellValues.split(',') : []; switch (listType.toUpperCase()) { case 'MU': @@ -2274,19 +2322,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars altGroup = fieldGroups.ALTPRI; break; case 'POWER': + case 'PW': spellDB = fields.PowersDB; level = fields.MIpowerLevel; indexPrefix = fields.MIpowerPrefix[0]+MIname+'+'+miRowID; levelSpells = shapeSpellbook( charCS, 'MIPOWER' ); altGroup = fields.GameVersion === 'AD&D1e' ? fieldGroups.ALTPWR : undefined; break; + default: + sendError('Invalid list type '+listType+' at changeMIspells'); + return; } + let w, c, r, valueItem, spellHyphen, spellName, spellQty, altSpellTable, + rows = [], + cols = []; for (let lv=1; lv < levelSpells.length; lv++) { if (altGroup) altSpellTable = getLvlTable( charCS, altGroup, (level+lv-1) ); - let r = 0; + r = 0; do { - let c = levelSpells[lv].base; - let w = 1; + c = levelSpells[lv].base; + w = 1; do { if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); @@ -2295,7 +2350,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isAdd && (_.isUndefined(spellName) || spellName === '-')) { spellName = spellList.shift() || ''; spellHyphen = '-'+spellName.hyphened(); - valueItem = valueList.shift().split('.'); +// log('changeMIspells: at shift, valueList = '+valueList); + valueItem = (valueList.shift() || '').split('.'); if (listType === 'POWER') { setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'current'], r ); setAttr( charCS, [fields.MIpowerPrefix[0]+MIname+spellHyphen+'+'+miRowID, 'max'], c ); @@ -2332,116 +2388,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }; - /* - * Remove MI spells/powers specified in the list, using the - * row/column references saved on the character sheet - */ - - var removeMIpowers = function( charCS, MIname, miRow, miRowID, powerList, powerValues ) { - - var powerName, - removeList = [], - PowersTable = [], - r, c, i=0; - - powerValues = powerValues.split(','); - powerList = powerList.split(','); - MIname = MIname.replace(/\s/g,'-'); - while (powerList.length > 0) { - powerName = powerList.shift(); - powerName = powerName.replace(/\s/g,'-'); - let attrObj = miSpellLookup( charCS, MIname, miRow, miRowID, [fields.MIpowerPrefix[0],null], '', powerName ); - if (attrObj) { - r = attrObj.get('current'); - c = attrObj.get('max'); - if (!_.isUndefined(r) && !_.isUndefined(c)) { - if (_.isUndefined(PowersTable[c])) { - PowersTable[c] = getTable( charCS, fieldGroups.POWERS, c ); - } - powerValues[i] = PowersTable[c].tableLookup( fields.Powers_castMax, r ) + '.' + PowersTable[c].tableLookup( fields.Powers_storedLevel, r ); - PowersTable[c].addTableRow( r ); - } - removeList.push(attrObj); - i++; - } - } - _.each(removeList,r => r.remove()); - return powerValues.join(); - } - - /* - * Remove MI spells/powers specified in the list, using the - * row/column references saved on the character sheet - */ - - var removeMIspells = function( charCS, MIname, MIrow, MIrowID, spellType, spellList, spellValues ) { - - var SpellsTable = [], - removeList = [], - spellQty, r, c, altSpellRow, i=0, spellRows, spellCols, -// attrName = fields.MIspellPrefix[0]+(MIname.replace(/\s/g,'-'))+'-'+(spellType.toLowerCase())+'+'+MIrowID, - base = shapeSpellbook( charCS, 'MI' )[1].base, - altSpellTable = getLvlTable( charCS, fieldGroups.ALTWIZ, fields.MIspellLevel ); - - { // Block created to restrict scope of spellRCobj - -// let spellRCobj = attrLookup( charCS, [attrName,null] ); - let spellRCobj = miSpellLookup( charCS, MIname, MIrow, MIrowID, [fields.MIspellPrefix[0],null] ); - - if (!spellRCobj) return undefined; - - spellRows = spellRCobj.get(fields.MIspellRows[1]).split(','); - spellCols = spellRCobj.get(fields.MIspellCols[1]).split(','); - removeList.push(spellRCobj); - } - - spellValues = spellValues.split(','); - spellList = spellList.split(','); - while (spellRows.length > 0 && spellCols.length > 0) { - r = spellRows.shift(); - c = spellCols.shift(); - if (!_.isUndefined(r) && !_.isUndefined(c)) { - altSpellRow = (parseInt(r) * fields.SpellsCols) + parseInt(c-base); - if (_.isUndefined(SpellsTable[c])) { - SpellsTable[c] = getTable( charCS, fieldGroups.SPELLS, c ); - } - spellQty = SpellsTable[c].tableLookup( fields.Spells_castValue, r ); - spellValues[i] = (spellQty <= 0 ? 0 : (SpellsTable[c].tableLookup(fields.Spells_storedLevel, r))) - + '.' + (SpellsTable[c].tableLookup( fields.Spells_miSpellSet, r )); - - SpellsTable[c].addTableRow( r ); - altSpellTable.addTableRow( altSpellRow ); - }; - i++; - } - _.each(removeList,r => r.remove()); - return spellValues.join(); - }; - /* * handle removing and adding magic item spells and powers * from their defining lists * Usually used when picking up or putting away a magic item */ - var moveMIspells = function( senderId, fromCS, fromIndex, fromRowID, toCS, toIndex, toRowID, itemName='', type='ALL', del=false ) { // resolveData + var moveMIspells = function( senderId, fromCS, fromIndex, fromRowID, toCS, toIndex, toRowID, itemName='', type='ALL', del=true ) { return new Promise(resolve => { try { - var MIobj = getAbility( fields.MagicItemDB, itemName, toCS, true, null, null, fromIndex, fromRowID ), - notFrom = !fromCS && !!toCS, - update = (!!fromCS && !!toCS && (fromCS.id === toCS.id)), - oldCS = fromCS, + const moveSpell = function( type, listField, valuesField, indexField, removeList ) { + let spellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [listField[0], null] ), + spellList = (!!spellObj ? (spellObj.get(listField[1]) || '') : ''), + spellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, valuesField ), + spellIndex = miSpellLookup( oldCS, MIname, oldIndex, oldID, [indexField[0],null], type ); + + if (spellList.length) { + let miSpellValues; + if (!notFrom && toCS) setAttr( toCS, [listField[0]+MIname+'+'+toRowID, listField[1]], spellList ); + setAttr( oldCS, [valuesField[0]+MIname+'+'+oldID, valuesField[1]], (miSpellValues = notFrom ? spellValues : (type !== 'PW' ? changeMIspells( fromCS, itemName, fromIndex, fromRowID, type, 'REMOVE', spellList, spellValues) : removeMIpowers( fromCS, itemName, fromIndex, fromRowID, spellList, spellValues )))); + if (toCS) { + if (spellbook) { + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellRows[1]], Array(spellList.split(',').length).fill(0).map((x,i)=>i).join() ); + setAttr( toCS, [indexField[0]+MIname+'-'+type+'+'+toRowID,fields.MIspellCols[1]], Array(spellList.split(',').length).fill(-1).join() ); + } else { +// log('moveSpell: calling changeMIspells to add to MI, with list '+spellList+' and values '+miSpellValues); + setAttr( toCS, [valuesField[0]+MIname+'+'+toRowID, valuesField[1]], changeMIspells( toCS, itemName, toIndex, toRowID, type, 'ADD', spellList, miSpellValues )); + } + } + } + if (!update && del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { + if (!!spellObj) removeList.push(spellObj); + if (!!spellIndex) removeList.push(spellIndex); + } + return removeList; + }; + + const MIobj = getAbility( fields.MagicItemDB, itemName, toCS, true, null, null, fromIndex, fromRowID ), + notFrom = !fromCS && !!toCS, + update = (!!fromCS && !!toCS && (fromCS.id === toCS.id)), + MIname = itemName.hyphened(), + doMU = type === 'MU' || type === 'ALL', + doPR = type === 'PR' || type === 'ALL', + doPW = type === 'PW' || type === 'ALL', + spellbook = MIobj.obj && MIobj.obj[1] && reCastViewMIspellCmd.test(MIobj.obj[1].body) && !reCastMIspellCmd.test(MIobj.obj[1].body); + +// log('moveMIspells: spellbook = '+spellbook+', cast button = '+reCastMIspellCmd.test(MIobj.obj[1].body)); + + let oldCS = fromCS, oldIndex = fromIndex, oldID = fromRowID, - MIname = itemName.hyphened(), - doMU = type === 'MU' || type === 'ALL', - doPR = type === 'PR' || type === 'ALL', - doPW = type === 'PW' || type === 'ALL', - removeList = [], - error = false; + removeList = []; + + var error = false; if (notFrom || update) { if (!MIobj.obj) { @@ -2454,75 +2456,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars oldID = toRowID; } - if (doMU) { - let MUspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemMUspellsList[0], null] ), - MUspellList = (!!MUspellObj ? (MUspellObj.get(fields.ItemMUspellsList[1]) || '') : ''), - MUspellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemMUspellValues ); - - if (MUspellList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemMUspellsList[0]+MIname+'+'+toRowID, fields.ItemMUspellsList[1]], MUspellList ); - setAttr( oldCS, [fields.ItemMUspellValues[0]+MIname+'+'+oldID, fields.ItemMUspellValues[1]], (miSpellValues = notFrom ? MUspellValues : changeMIspells( fromCS, itemName, fromIndex, fromRowID, 'MU', 'REMOVE', MUspellList, MUspellValues))); - if (toCS) { - setAttr( toCS, [fields.ItemMUspellValues[0]+MIname+'+'+toRowID, fields.ItemMUspellValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'MU', 'ADD', MUspellList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(MUspellObj); - MUspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIspellPrefix[0], null] ); - if (!!MUspellObj) removeList.push(MUspellObj); - } - } - if (doPR) { - let PRspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemPRspellsList[0], null] ), - PRspellList = (!!PRspellObj ? (PRspellObj.get(fields.ItemPRspellsList[1]) || '') : ''), - PRspellValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemPRspellValues ); - - if (PRspellList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemPRspellsList[0]+MIname+'+'+toRowID, fields.ItemPRspellsList[1]], PRspellList ); - setAttr( oldCS, [fields.ItemPRspellValues[0]+MIname+'+'+oldID, fields.ItemPRspellValues[1]], (miSpellValues = notFrom ? PRspellValues : changeMIspells( fromCS, itemName, fromIndex, fromRowID, 'PR', 'REMOVE', PRspellList, PRspellValues ))); - if (toCS) { - setAttr( toCS, [fields.ItemPRspellValues[0]+MIname+'+'+toRowID, fields.ItemPRspellValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'PR', 'ADD', PRspellList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(PRspellObj); - PRspellObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIspellPrefix[0], null] ); - if (!!PRspellObj) removeList.push(PRspellObj); - } - } - if (doPW) { - let powerObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.ItemPowersList[0], null] ), - powerList = (!!powerObj ? (powerObj.get(fields.ItemPowersList[1]) || '') : ''), - powerValues = miSpellLookup( oldCS, MIname, oldIndex, oldID, fields.ItemPowerValues ); - - if (powerList.length) { - let miSpellValues; - if (!notFrom && toCS) setAttr( toCS, [fields.ItemPowersList[0]+MIname+'+'+toRowID, fields.ItemPowersList[1]], powerList ); - setAttr( oldCS, [fields.ItemPowerValues[0]+MIname+'+'+oldID, fields.ItemPowerValues[1]], (miSpellValues = notFrom ? powerValues : removeMIpowers( fromCS, itemName, fromIndex, fromRowID, powerList, powerValues ))); - if (toCS) { - setAttr( toCS, [fields.ItemPowerValues[0]+MIname+'+'+toRowID, fields.ItemPowerValues[1]], changeMIspells( toCS, itemName, toIndex, toRowID, 'POWER', 'ADD', powerList, miSpellValues )); - } - } - if (del && !notFrom && !fromCS.get('name').startsWith('MI-DB')) { - removeList.push(powerObj); - powerObj = miSpellLookup( oldCS, MIname, oldIndex, oldID, [fields.MIpowerPrefix[0], null] ); - if (!!powerObj) removeList.push(powerObj); - } - } - var queries = (resolveData(itemName,fields.MagicItemDB,reItemData,(fromCS || toCS),{query:reClassSpecs.query}).parsed.query || '').split('$$'); - if (queries && queries.length && itemName && !notFrom && !update) { - if (!isNaN(fromIndex)) { - _.each( queries, q => { - let varObj; - let toField = [fields.ItemVar[0]+MIname+'+'+toRowID+'-'+q.split('=')[0],fields.ItemVar[1]]; - if (toCS && !isNaN(toIndex)) setAttr( toCS, toField, (miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], fields.ItemVar ) || '') ); - if (!_.isUndefined(varObj = miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], [fields.ItemVar[0],null] ))) removeList.push(varObj); - }); - }; + if (doMU) removeList = moveSpell( 'mu', fields.ItemMUspellsList, fields.ItemMUspellValues, fields.MIspellPrefix, removeList ); + if (doPR) removeList = moveSpell( 'pr', fields.ItemPRspellsList, fields.ItemPRspellValues, fields.MIspellPrefix, removeList ); + if (doPW) removeList = moveSpell( 'pw', fields.ItemPowersList, fields.ItemPowerValues, fields.MIpowerPrefix, removeList ); + + const queries = (resolveData(itemName,fields.MagicItemDB,reItemData,(fromCS || toCS),{query:reClassSpecs.query}).parsed.query || '').split('$$'); + if (queries && queries.length && itemName && !notFrom && !update && !isNaN(fromIndex)) { + let varObj, toField; + _.each( queries, q => { + toField = [fields.ItemVar[0]+MIname+'+'+toRowID+'-'+q.split('=')[0],fields.ItemVar[1]]; + if (toCS && !isNaN(toIndex)) setAttr( toCS, toField, (miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], fields.ItemVar ) || '') ); + if (!_.isUndefined(varObj = miSpellLookup( fromCS, MIname, fromIndex+'-'+q.split('=')[0], fromRowID+'-'+q.split('=')[0], [fields.ItemVar[0],null], '', '', false ))) removeList.push(varObj); + }); }; - _.each(removeList.filter(r => !!r),r => r.remove()); + _.each(removeList.filter(r => !!r),r => setTimeout( () => r.remove(), 1000)); } catch (e) { log('MagicMaster moveMIspells: '+e.name+': '+e.message+' while processing item '+itemName); @@ -2537,42 +2484,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } }); }; - - /** - * Find an item identified as a Power, but which might actually - * be in a different database, as powers can be anything magical - **/ - - var findPower = function( charCS, power ) { - - if (!power || !power.length) return abilityLookup( fields.PowersDB, '', charCS, true, false ); - - const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; - - var powerType = power.substring(0,3), - powerLib; - - if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) power = power.slice(powerType.length); - - if (!_.some(dbList, dB => { - if (powerType.toUpperCase() === dB[0]) { - powerLib = abilityLookup( dB[1], power, null, true ); - return true; - } else { - return false; - } - })) { - _.some(dbList, dB => { - powerLib = abilityLookup( dB[1], power, null, true ); - return !_.isUndefined(powerLib.obj); - }); - }; - if (!powerLib.obj) { - powerLib = abilityLookup( fields.PowersDB, power, charCS ); - } - powerLib.name = power; - return powerLib; - } /* * Check an item to see if it is a "bag" that can contain @@ -2581,33 +2492,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * items. */ - var checkForBag = function( charCS, miName, row ) { + const checkForBag = function( charCS, miName, row ) { - var itemRow, rowID, table; + let itemRow, rowID, table; [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); - var bag = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {bag:reSpellSpecs.bag,store:reSpellSpecs.store}, itemRow, rowID ); + const bag = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {bag:reSpellSpecs.bag,store:reSpellSpecs.store}, {row:itemRow, rowID:rowID} ); if (!bag.parsed.bag) return; -/* var miObj = abilityLookup( fields.MagicItemDB, miName, charCS ); - if (!miObj.obj) return; - - var bagData = miObj.obj[1].body.match(/}}.*?data\s*?=[^{]+?bag:(\d+).*?{{/im); - if (!bagData) return; -*/ - var bagData = parseInt(bag.parsed.bag); - var bagCS = findObjs({ type:"character", name:miName }); - var itemSpecs = {name:reSpellSpecs.name, - trueName:reSpellSpecs.trueName, - speed:reSpellSpecs.speed, - qty:reSpellSpecs.qty, - spell:reSpellSpecs.type, - type:reSpellSpecs.recharge, - trueType:reSpellSpecs.truerc, - reveal:reSpellSpecs.reveal, - cost:reSpellSpecs.cost, - }; + let bagCS = findObjs({ type:"character", name:miName }); + const bagData = parseInt(bag.parsed.bag); + const itemSpecs = {name:reSpellSpecs.name, + trueName:reSpellSpecs.trueName, + speed:reSpellSpecs.speed, + qty:reSpellSpecs.qty, + spell:reSpellSpecs.type, + type:reSpellSpecs.recharge, + trueType:reSpellSpecs.trueType || reSpellSpecs.type || 'uncharged', + reveal:reSpellSpecs.reveal, + cost:reSpellSpecs.cost, + }; if (!bagCS || !bagCS.length) { @@ -2619,34 +2524,36 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( bagCS, fields.Race, 'Magic Item' ); if (bagData > 0) { - let Items = getTableGroup( bagCS, fieldGroups.MI ); + let Items = getTableGroup( bagCS, fieldGroups.MI ), + itemClass, itemData, itemObj, p; + let values; setAttr( bagCS, fields.ItemContainerType, (bag.parsed.store !== 'nostore' ? '1' : '-1') ); setAttr(charCS, fields.ItemOldContainerType, attrLookup(charCS, fields.ItemContainerType)); setAttr( bagCS, fields.ItemContainerSize, Math.max( fields.MIRowsStandard, bagData )); -// bagData = miObj.data(/}}[^{]*?data\s*?=\s*?(\[[^{]+?bag\:[^{]+?\]){{/im); _.each( bag.raw, item => { - let itemClass = 'GEAR'; - let itemData = parseData( item[0], itemSpecs, false, charCS, miName, itemRow, rowID ); + itemClass = 'GEAR'; + itemData = parseData( item[0], itemSpecs, false, charCS, miName, itemRow, rowID ); if ((itemData.spell || '').toUpperCase() != 'MI') return; - let itemObj = abilityLookup( fields.MagicItemDB, (itemData.trueName || itemData.name), charCS ); + itemObj = abilityLookup( fields.MagicItemDB, (itemData.trueName || itemData.name), charCS ); if (itemObj.obj) { itemData.speed = itemData.speed || itemObj.obj[1].ct; itemData.type = itemData.type || itemObj.obj[1].charge; itemClass = getItemTable( itemObj.obj[1].type ) || 'GEAR'; } - let values = Items[itemClass].copyValues(); - let prefix = fieldGroups[itemClass].prefix; - values[fields[prefix+'name'][0]][fields[prefix+'name'][1]] = itemData.name; - values[fields[prefix+'trueName'][0]][fields[prefix+'trueName'][1]] = (itemData.trueName || itemData.name); - values[fields[prefix+'speed'][0]][fields[prefix+'speed'][1]] = evalAttr(itemData.speed,charCS) || 5; - values[fields[prefix+'trueSpeed'][0]][fields[prefix+'trueSpeed'][1]] = evalAttr(itemData.speed,charCS) || 5; - values[fields[prefix+'qty'][0]][fields[prefix+'qty'][1]] = evalAttr(itemData.qty,charCS) || 1; - values[fields[prefix+'trueQty'][0]][fields[prefix+'trueQty'][1]] = evalAttr(itemData.qty,charCS) || 1; - values[fields[prefix+'cost'][0]][fields[prefix+'cost'][1]] = evalAttr(itemData.cost,charCS) || 0; - values[fields[prefix+'type'][0]][fields[prefix+'type'][1]] = itemData.type || 'uncharged'; - values[fields[prefix+'trueType'][0]][fields[prefix+'trueType'][1]] = itemData.trueType || itemData.type || 'uncharged'; - values[fields[prefix+'reveal'][0]][fields[prefix+'reveal'][1]] = itemData.reveal || ''; - + p = Items[itemClass].fieldGroup; + values = initValues( p ); + + values.valLine(p,'name',itemData.name) + .valLine(p,'trueName',(itemData.trueName || itemData.name)) + .valLine(p,'speed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'trueSpeed',evalAttr(itemData.speed,charCS) || 5) + .valLine(p,'qty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'trueQty',evalAttr(itemData.qty,charCS) || 1) + .valLine(p,'cost',evalAttr(itemData.cost,charCS) || 0) + .valLine(p,'type',itemData.type || 'uncharged') + .valLine(p,'trueType',itemData.trueType || itemData.type || 'uncharged') + .valLine(p,'reveal',itemData.reveal || ''); + Items[itemClass].addTableRow( NaN, values ); }); } else { @@ -2666,7 +2573,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * it no longer exists in the equipment list **/ - var removeMIability = function( charCS, itemName, Items, table ) { + const removeMIability = function( charCS, itemName, Items, table ) { if (!Items.tableFind( fields[fieldGroups[table].prefix+'name'], itemName ) && !Items.tableFind( fields[fieldGroups[table].prefix+'trueName'], itemName )) { let MIobjs = filterObjs( obj => { @@ -2682,7 +2589,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Parse a data item query statement and return the parsed version. **/ - var parseQuery = function( query ) { + const parseQuery = function( query ) { query = (query || '').split('$$').map(q => { switch (q) { case 'weaponMagic': q = 'weaponMagic=How magical is this weapon?|+0%%0//0|-4%%-4/Cursed/1700|-3%%-3/Cursed/1350|-2%%-2/Cursed/900|-1%%-1/Cursed/450|0%%0//0|+1%%1//500|+2%%2//1000|+3%%3//1500|+4%%4//2000|+5%%5//3000'; break; @@ -2703,7 +2610,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * then send it to chat on a timeout */ - var pickPutCmd = function( cmd, tokenID, charCS, who ) { + const pickPutCmd = function( cmd, tokenID, charCS, who ) { setTimeout(() => sendAPI( cmd.replace(/,/g,',') .replace(/[/g,'[') @@ -2714,33 +2621,197 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; /* - * Return how full a character's Item Slots are + * Calculate the weight of the items in a container */ - - var itemSlotData = function( Items ) { - var slotCount = 0, + + const calcWeight = function( charCS, Items ) { + + let slotCount = 0, totalWeight = 0.0, - totalQty = 0; + totalEnc = 0.0, + totalQty = 0, + prefix, name, qty, tableWt, tableEnc, trueType, type, data, bagObj, bagData; + + if (!Items) Items = getTableGroup( charCS, fieldGroups.MI ); + for (const table in Items) { for (let i=0; i { + let errFlag = false, + count,qty,tableWt,tableEnc,encumbrance; + try { + let curToken = getObj('graphic',tokenID), + charCS = getCharacter( tokenID ), + baseMove = attrLookup( charCS, fields.BaseMove, {def:false} ), + name, trueType, type, data, move, moveMod, extra, weights, weightData; + + const oldEncumbrance = parseInt(attrLookup( charCS, fields.Encumbrance )) || 0; + + if (_.isUndefined(baseMove) || isNaN(baseMove) || !String(baseMove || '').length) { + const classObjs = classObjects( charCS, senderId, {move:reClassSpecs.move} ); + const classMove = classObjs.reduce( (a,o) => Math.max(a,(parseInt(o.classData.move) || 0)), 0 ); + const raceMove = (resolveData( (attrLookup( charCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, charCS, {move:reClassSpecs.move} ).parsed.move || 12); + setAttr( charCS, fields.BaseMove, Math.max(classMove,raceMove) ); +// log('itemSlotData: raceMove = '+raceMove+', classMove = '+classMove); + } + + if (calc || !String(attrLookup( charCS, fields.Weight_total ) || '').length) { + weightData = calcWeight( charCS, Items ); + tableWt = weightData.weight; + tableEnc = weightData.encumberWt; + count = weightData.count; + qty = weightData.qty; + + setAttr( charCS, fields.Equip_total, 'Total Weight' ); + setAttr( charCS, fields.Equip_totalWeight, tableWt); + setAttr( charCS, fields.Equip_encumberWeight, tableEnc ); + setAttr( charCS, fields.Equip_totalFlag, 1 ); + setAttr( charCS, fields.Weight_total, tableWt ); + setAttr( charCS, fields.Weight_encumbrance, tableEnc); + setAttr( charCS, fields.Weight_count, count); + setAttr( charCS, fields.Weight_qty, qty); + } else { + tableWt = attrLookup( charCS, fields.Weight_total ); + tableEnc = attrLookup( charCS, fields.Weight_encumbrance ); + count = attrLookup( charCS, fields.Weight_count ); + qty = attrLookup( charCS, fields.Weight_qty ); + }; + + let strength = attrLookup( charCS, fields.Strength, {def:false} ); + // log('itemSlotData: strength = '+strength+', flag = '+state.MagicMaster.encumbrance+', Encumbrance stored field = '+attrLookup( charCS, fields.Encumbrance )); + if (state.MagicMaster.encumbrance && !_.isUndefined(strength)) { + const parsedStr = strength.match(/(\d+)(?:[\(\[](\d+)[\)\]])?/) || [null,null]; + strength = parseInt(parsedStr[1]); + extra = parseInt(parsedStr[2]); + if (!isNaN(extra)) { + extra = Math.min(99,Math.max(0,extra)); + weights = encumberDef.stepsExt[encumberDef.exceptional.findIndex(e => e >= extra)]; + } else if (!isNaN(strength)) { + strength = Math.min(25,strength); + weights = encumberDef.stepsStr[encumberDef.strengths.findIndex(s => s >= strength)]; + } + // log('itemSlotData: strength = '+strength+', extra = '+extra+', weights = '+weights); + if (!_.isUndefined(weights)) { + for (encumbrance = 0; encumbrance < 5 && tableEnc > weights[encumbrance]; encumbrance++ ); + // log('itemSlotData: encumbrance = '+encumbrance+', current weight = '+tableEnc+', max weight = '+weights[encumbrance]); + setAttr( charCS, fields.Weight_forStr, weights.join() ); + setAttr( charCS, fields.Weight_label, encumberDef.labels[encumbrance].dispName() ); + setAttr( charCS, fields.Weight_ACmod, encumberDef.ac[encumbrance] ); + baseMove = attrLookup( charCS, fields.BaseMove ); +// let moves = encumberDef.moves[encumberDef.moves.findIndex(m => m[0] >= baseMove)]; +// move = parseInt(encumbrance < 5 ? (moves[encumbrance] || 12) : 0); + move = Math.round(baseMove*([1,2/3,1/2,1/3,1/baseMove,0][encumbrance])); + moveMod = attrLookup( charCS, fields.MoveMod ) || ''; + move = parseFloat(evalAttr(moveMod[0] === '=' ? moveMod.slice(1) : (isNaN(moveMod[0]) ? (move + moveMod) : (move+'+'+moveMod) ), charCS)); +// log('itemSlotData: moveMod = '+moveMod+', move = '+move); + if ((Math.ceil(move) !== Math.ceil(parseFloat(attrLookup( charCS, fields.Move )))) || (encumbrance !== (parseInt(attrLookup( charCS, fields.Encumbrance )) || 99))) { + if (encumbrance === 0) { + if (oldEncumbrance !== 0) sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + } else { + sendAPI( fields.roundMaster+' --addTargetStatus '+tokenID+'|Encumbrance|$'+(encumbrance+90)+'|0|'+curToken.get('name')+' is '+encumberDef.labels[encumbrance]+' and has a move of '+move+'|'+encumberDef.marker[encumbrance], senderId ); + }; + setAttr( charCS, fields.Encumbrance, encumbrance ); + setAttr( charCS, fields.Move, move ); + }; + }; + } else if (!state.MagicMaster.encumbrance && (attrLookup( charCS, fields.Encumbrance ) != 0)) { + // log('itemSlotData: flag is false but encumbered so removing status'); + setAttr( charCS, fields.Encumbrance, 0 ); + sendAPI( fields.roundMaster+' --removeTargetStatus '+tokenID+'|Encumbrance|noerror' ); + }; + // log('itemSlotData: returning with count '+count+', weight '+Math.ceil(tableWt)+', encumberWt '+Math.ceil(tableEnc)); + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve({errorFlag:errFlag,count:count,qty:qty,weight:Math.ceil(tableWt),encumberWt:Math.ceil(tableEnc),encumberNum:encumbrance}); + }, 10); + } + }); + }; + + /** + * Reset the chosen flags of the Items table + **/ + + const clearItemSelection = function( charCS, Items=undefined ) { + if (_.isUndefined(Items)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + }; + let [indexes,tables] = tableGroupFind( Items, 'chosen', '1', true, true ); + if (_.isUndefined(indexes)) return Items; + for (let i=0; i a.concat(b[2].dbName().split('|')), []) : [], - superTypes = !!specs ? specs.reduce((a,b) => a.concat(b[4].dbName().split('|')), []) : [], - types = miClasses.filter(itemClass => _.isUndefined(miTypeLists[itemClass.dbName()]) || !(['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type))); + const specs = miObj.specs(), + miClasses = !!specs ? specs.reduce((a,b) => a.concat(b[2].dbName().split('|')), []) : [], + superTypes = !!specs ? specs.reduce((a,b) => a.concat(b[4].dbName().split('|')), []) : []; + let types = miClasses.filter(itemClass => _.isUndefined(miTypeLists[itemClass.dbName()]) || !(['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type))); if (!types || !types.length) { types = miClasses.filter(itemClass => ['weapon','ammo','armour','armor'].includes(miTypeLists[itemClass.dbName()].type)) || ['miscellaneous']; } types = types.concat(miClasses,superTypes); -// log('canBuyOrSell: banned = '+bannedList.length+' |'+bannedList+'|, allowed = '+allowedList.length+' |'+allowedList+'|, miClasses = '+miClasses+', types = '+types+', returning '+(!bannedList.length && !allowedList.length) || (!bannedList.some(b => types.includes(b.dbName())) && (!allowedList || allowedList.some(a => types.includes(a.dbName()))))); - return (!bannedList.length && !allowedList.length) || (!bannedList.some(b => types.includes(b.dbName())) && (!allowedList.length || allowedList.some(a => types.includes(a.dbName())))); } @@ -2799,21 +2868,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * whether empty slots '-' are included */ - var makeMIlist = function( charCS, senderId, includeEmpty=true, disable0=true, showTypes=false, showMagic=true, putCS, buy=false, refuse='' ) { // type + const makeMIlist = function( charCS, senderId, includeEmpty=true, disable0=true, showTypes=false, showMagic=true, putCS, buy=false, refuse='' ) { // type return new Promise(resolve => { try { - var mi, miText, qty, rows, maxSize, specs, carried, - miList = '', + const bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'); + let mi, qty, rows, maxSize, specs, carried, + cost, miObj, type, zeroOK, slotsUsed = 0, lastSlot = -1, Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), - allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), types = []; + var miList = '', + miText; + if (_.isUndefined(putCS)) putCS = charCS; Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'qty' ); @@ -2832,13 +2904,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars qty = Items[table].tableLookup( fields[fieldGroups[table].prefix+'qty'], i ); if (buy && qty == 0) continue; carried = Items[table].tableLookup( fields[fieldGroups[table].prefix+'carried'], i ); - let cost = parseFloat(evalAttr(Items[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], i ),putCS)) || 0; + cost = parseFloat(evalAttr(Items[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], i ),putCS)) || 0; if (buy && disable0 && cost === 0) continue; if (!carried.length || carried == 'carried') { - let miObj = abilityLookup( fields.MagicItemDB, mi, charCS, true ); - let type = miObj.obj ? miObj.obj[1].type.toLowerCase() : ''; + miObj = abilityLookup( fields.MagicItemDB, mi, charCS, true ); + type = miObj.obj ? miObj.obj[1].type.toLowerCase() : ''; if (mi.length > 0 && (includeEmpty || mi != '-') && (!buy || cost !== 0) && (showMagic || !type.includes('magic'))) { - let zeroOK = (type.includes('selfchargeable') || type.includes('absorbing') || type.includes('recharging')); + zeroOK = (type.includes('selfchargeable') || type.includes('absorbing') || type.includes('recharging')); if (!disable0 || zeroOK || qty > 0) { if (!buy && showTypes && miObj.obj) miText = getShownType( miObj, i ); if (mi != '-') slotsUsed++; @@ -2875,76 +2947,91 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * whether empty slots '-' are included. */ - /* Note: if buy is true or has a string value, disable0 refers to cost rather than quantity (zero quantity is always not shown if buy is true). This ensures all owned goods can be sold. */ - - var makeMIbuttons = function( tokenID, senderId, miField, qtyField, cmd, extension='', MIrowref=-1, disable0=true, includeEmpty=false, showTypes=false, showMagic=true, pickID, putID, buy='', refuse='' ) { + const makeMIbuttons = function( tokenID, senderId, miField, qtyField, cmd, extension='', MIrowref=-1, disable0=true, includeEmpty=false, showTypes=false, showMagic=true, pickID, putID, buy='', refuse='', sectNo=2 ) { + +// Note: if buy is true or has a string value, disable0 refers to cost rather than quantity (zero quantity is always not shown if buy is true). This ensures all owned goods can be sold. return new Promise(resolve => { try { - var charCS = getCharacter(tokenID), - pickCS = !_.isUndefined(pickID) ? getCharacter(pickID) : charCS, - putCS = !_.isUndefined(putID) ? getCharacter(putID) : charCS, - isView = extension == 'viewMI', - buttonNo = 0, + const charCS = getCharacter(tokenID), + pickCS = !_.isUndefined(pickID) ? getCharacter(pickID) : charCS, + putCS = !_.isUndefined(putID) ? getCharacter(putID) : charCS, + isView = extension == 'viewMI', + isGM = playerIsGM(senderId), + Items = getTableGroup( pickCS, fieldGroups.MI ), + rows = _.reduce(Items,(r,i) => r+((i && i.sortKeys) ? i.sortKeys.length : 0),0), + maxSize = attrLookup( pickCS, fields.ItemContainerSize ) || fields.MIRowsStandard, + bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), + allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), + playerConfig = getSetPlayerConfig( senderId ), + sheetVer = csVer(pickCS), + sections = {POTIONS:{n:0,name:'**Potions**'}, + DUSTS:{n:1,name:'**Dusts**'}, + WANDS:{n:2,name:'**Rings, Rods, Staves & Wands**'}, + SCROLLS:{n:3,name:'**Scrolls & Books**'}, + GEAR:{n:4,name:'**Weapons, Armour & Gear**'}, + MISC:{n:5,name:'**Miscellaneous**'}, + TREASURE:{n:6,name:'**Treasure**'}, + COINS:{n:7,name:'**Coins**'}}; + let buttonNo = 0, rowNo = -1, - isGM = playerIsGM(senderId), slotsUsed = 0, - bannedMI = (!buy || !refuse || refuse.toLowerCase() === 'none') ? [] : String(refuse).dbName().split('|'), - allowedMI = (!buy || _.isBoolean(buy) || buy.toLowerCase() === 'any') ? [] : String(buy).dbName().split('|'), renamed, miObj, - playerConfig = getSetPlayerConfig( senderId ), - qty, maxQty, mi, miText, type, makeGrey, Items, rows, maxSize, i, - content = '', - sections = {POTIONS:{n:2,name:'**Potions**'}, - DUSTS:{n:3,name:'**Dusts**'}, - WANDS:{n:4,name:'**Rings, Rods, Staves & Wands**'}, - SCROLLS:{n:5,name:'**Scrolls & Books**'}, - GEAR:{n:6,name:'**Weapons, Armour & Gear**'}, - MISC:{n:7,name:'**Miscellaneous**'}, - TREASURE:{n:8,name:'**Treasure**'}, - COINS:{n:9,name:'**Coins**'}}; + qty, maxQty, mi, miText, type, makeGrey, i, + sectHead, buttonCount, blankAvailable, + ItemsTable, trueMI, carried, cost, zeroOK, + changedMI, miClass, types, highlight, selected, + hide, reveal, action, extIsAbility, prefix; + + var content = ''; if (isView) extension = ''; buy = !!buy; - var sheetVer = csVer(pickCS); - - Items = getTableGroup( pickCS, fieldGroups.MI ); - rows = _.reduce(Items,(r,i) => r+((i && i.sortKeys) ? i.sortKeys.length : 0),0); - maxSize = attrLookup( pickCS, fields.ItemContainerSize ) || fields.MIRowsStandard; + for (const table in Items) { - let sectHead = (sheetVer > 3.9 && playerConfig.sections !== false) ? ('}}{{Section'+sections[table].n+'='+sections[table].name+'\n') : ''; - let buttonCount = buttonNo; - let blankAvailable = false; + + if (sheetVer > 3.9 && playerConfig.sections !== false) { + sectHead = '}}{{Section'+(sectNo+sections[table].n)+'=' + + (pickID && pickID.length ? (' _All_(!magic --button '+ cmd +'|'+ tokenID +'|'+ table + extension + ') ') : '') + + sections[table].name+'\n'; + } else if (rowNo >= 0) { + sectHead = '\n'; + } else { + sectHead = '}}{{Section'+sectNo+'='; + }; + buttonCount = buttonNo; + blankAvailable = false; for (let i=0; i 0 && (includeEmpty || mi != '-')) { miObj = abilityLookup( fields.MagicItemDB, mi, pickCS, true ); renamed = !miObj.dB.toLowerCase().includes('-db'); - let changedMI = renamed ? 'Display-'+mi : mi, - miClass = !miObj.obj ? 'miscellaneous' : getShownType( miObj, i, resolveData( trueMI, fields.MagicItemDB, reItemData, pickCS, {itemType:reSpellSpecs.itemType}, i, Items[table].rowID(i) ).parsed.itemType ), - types = ['-']; + changedMI = renamed ? 'Display-'+mi : mi; + miClass = !miObj.obj ? 'miscellaneous' : getShownType( miObj, i, resolveData( trueMI, fields.MagicItemDB, reItemData, pickCS, {itemType:reSpellSpecs.itemType}, {row:i, rowID:Items[table].rowID(i)} ).parsed.itemType ); +// types = ['-']; makeGrey = makeGrey || (!showMagic && (!miObj.obj || miObj.obj[1].type.toLowerCase().includes('magic'))) || (buy && !canBuyOrSell( miObj, bannedMI, allowedMI )); if (!buy && showTypes && miObj.obj) { @@ -2953,29 +3040,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars qty = Math.min(qty,1); } } - let highlight = rowNo == MIrowref; + selected = rowNo == MIrowref; + highlight = ItemsTable.tableLookup( fields[prefix+'chosen'], i ) == 1; content += sectHead; - content += (highlight || makeGrey) ? ('') : '['; - content += (mi !== '-' ? (qty + ((qty != maxQty && isGM) ? '/'+maxQty : '') + ' ' + miText.replace(/\-/g,' ')) : '-'); + content += selected ? ('') : (makeGrey ? ('') : '['); + content += highlight ? ('') : ''; + content += (mi != '-' ? (qty + ((qty != maxQty && isGM) ? '/'+maxQty : '') + ' ' + miText.replace(/\-/g,' ')) : '-'); if (mi != '-') slotsUsed++; - let extIsAbility = isView && mi.replace(reIgnore,'').length; + extIsAbility = isView && mi.replace(reIgnore,'').length; if (extIsAbility) { - if (ItemsTable.tableLookup( fields[fieldGroups[table].prefix+'reveal'], i ) == 'view') mi = trueMI; - let hide = !miObj.obj ? '' : resolveData( mi, fields.MagicItemDB, reItemData, pickCS, {hide:reSpellSpecs.hide}, i, Items[table].rowID(i) ).parsed.hide, - reveal = (mi !== trueMI) && !!miObj.obj && hide && hide.length && hide !== 'hide'; + if (ItemsTable.tableLookup( fields[prefix+'reveal'], i ) == 'view') mi = trueMI; + hide = !miObj.obj ? '' : resolveData( mi, fields.MagicItemDB, reItemData, pickCS, {hide:reSpellSpecs.hide}, {row:i, rowID:Items[table].rowID(i)} ).parsed.hide; + reveal = (mi !== trueMI) && !!miObj.obj && hide && hide.length && hide !== 'hide'; miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, (reveal ? mi : trueMI), i, Items[table].rowID(i) ); - if (miObj.obj) miObj.obj = greyOutButtons( tokenID, pickCS, miObj.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(sheetVer < 4 ? '' : '@{selected|'+fields.ItemRowRef[0]+'}')+')') ); - extension = ' '+sendToWho(charCS,senderId,false,true)+(miObj.api ? ' ' : '')+'%{'+miObj.dB+'|'+changedMI.hyphened()+'}'; + if (miObj.obj) miObj = greyOutButtons( tokenID, pickCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(sheetVer < 4 ? '' : '@{selected|'+fields.ItemRowRef[0]+'}')+')') ); + extension = ' '+(miObj.api ? '' : sendToWho(charCS,senderId,false,true))+' %{'+miObj.dB+'|'+changedMI.hyphened()+'} !'; } else { miObj = getAbility( fields.MagicItemDB, mi, pickCS, false, isGM, trueMI, i, Items[table].rowID(i) ); - let action = ((!miObj.obj || !miObj.obj[0]) ? '' : (miObj.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); + action = ((!miObj.obj || !miObj.obj[0]) ? '' : (miObj.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); if (renamed) { setAbility( pickCS, changedMI, action ); } else if (!!action && action.length) { miObj.obj[0].set('action',action); } } - content += (highlight || makeGrey) ? '' : '](!'+(!extIsAbility ? '' : (' '+extension+' !'))+'magic --button '+ cmd +'|'+ tokenID +'|'+ rowNo + (!extIsAbility ? extension : '')+')'; + content += (selected || makeGrey) ? '' : ((highlight ? '' : '')+('](!'+(!extIsAbility ? '' : extension)+'magic --button '+ cmd +'|'+ tokenID +'|'+ rowNo + (!extIsAbility ? extension : '')+')')); buttonNo++; sectHead = ''; }; @@ -3003,31 +3092,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * can have memorised at a particular spell level. */ - var makeNumberOfSpells = function( curToken, spellType, level, totalSpells ) { + const makeNumberOfSpells = function( curToken, spellType, level, totalSpells ) { - var charCS = getCharacter(curToken.id), - tokenName = curToken.get('name'), - spellsAtLevel, spellsSpecialist, spellsWisdom, spellsMisc, - wisdom, - content = tokenName + ' can memorise '; + const charCS = getCharacter(curToken.id); + let content = curToken.get('name') + ' can memorise '; if (spellType == 'MI') { content += 'these spells in magic items'; } else { - content += '[[[['+totalSpells+']]'; + content += '[[ [['+totalSpells+']]'; if (spellType == 'MU') { - spellsAtLevel = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); - spellsSpecialist = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); - spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0) : 0; + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0) : 0; content += '['+spellsAtLevel+' at level '+level+',+'+spellsSpecialist+' specialist, +'+spellsMisc+' misc]'; } else { - spellsAtLevel = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); - spellsWisdom = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); - wisdom = parseInt(attrLookup(charCS,fields.Wisdom)||0); - spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0) : 0; + const spellsAtLevel = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = parseInt(attrLookup(charCS,fields.Wisdom)||0); + const spellsMisc = !state.MagicMaster.spellRules.strictNum ? parseInt(attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0) : 0; content += '['+spellsAtLevel+' at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom+', + '+spellsMisc+' misc]'; } - content += ']] spells at level '+level; + content += ' ]] spells at level '+level; } return content; } @@ -3038,13 +3124,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * number can be edited.. */ - var makeEditNumberOfSpells = function( args, spellType, totalSpells ) { + const makeEditNumberOfSpells = function( args, spellType, totalSpells ) { - var mngSpellsCmd = args[0], - tokenID = args[1], - level = args[2], - curToken = getObj('graphic',tokenID), - content = curToken.get('name') + ' can memorise '; + const mngSpellsCmd = args[0], + tokenID = args[1], + level = args[2], + curToken = getObj('graphic',tokenID); + let content = curToken.get('name') + ' can memorise '; if (spellType == 'MI') { content += 'these spells in this magic item'; @@ -3061,28 +3147,28 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a particular spell class and level */ - var makeMiscSpellsEdit = function( args, senderId ) { - - var tokenID = args[1], - spellClass = args[2], - level = args[3], - mngSpellsCmd = args[4], - charCS = getCharacter(tokenID), - spellsAtLevel, spellsSpecialist, spellsMisc, spellsTotal, spellsWisdom, wisdom, + const makeMiscSpellsEdit = function( args, senderId ) { + + const tokenID = args[1], + spellClass = args[2], + level = args[3], + mngSpellsCmd = args[4], + charCS = getCharacter(tokenID); + let spellsMisc, spellsTotal, content = '&{template:'+fields.messageTemplate+'}{{name=Edit Level '+level+' Misc Spells}}' + '{{desc=Here\'s how '+getObj('graphic',tokenID).get('name')+' total '+spellClass+' spells are determined. ' + 'You can adjust the Miscellaneous number by clicking on it and specifying a different value}}{{desc1='; if (spellClass == 'MU') { - spellsAtLevel = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); - spellsSpecialist = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); + const spellsAtLevel = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_memable[0],fields.MUSpellNo_memable[1]])||0); + const spellsSpecialist = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_specialist[0],fields.MUSpellNo_specialist[1]])||0); spellsMisc = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]])||0); spellsTotal = (attrLookup(charCS,[fields.MUSpellNo_table[0] + level + fields.MUSpellNo_total[0],fields.MUSpellNo_total[1]])||0); content += spellsAtLevel+' MU spells at level '+level+', + '+spellsSpecialist+' specialist'; } else { - spellsAtLevel = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); - spellsWisdom = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); - wisdom = (attrLookup(charCS,fields.Wisdom)||0); + const spellsAtLevel = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_memable[0],fields.PRSpellNo_memable[1]])||0); + const spellsWisdom = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_wisdom[0],fields.PRSpellNo_wisdom[1]])||0); + const wisdom = (attrLookup(charCS,fields.Wisdom)||0); spellsMisc = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_misc[0],fields.PRSpellNo_misc[1]])||0); spellsTotal = (attrLookup(charCS,[fields.PRSpellNo_table[0] + level + fields.PRSpellNo_total[0],fields.PRSpellNo_total[1]])||0); content += spellsAtLevel+' PR spells at level '+level+', + '+spellsWisdom+' for wisdom '+wisdom; @@ -3099,59 +3185,61 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * spell row and column arrays, and the number of live spells */ - var getStoredSpells = function( charCS, miName, miRow, miRowID ) { + const getStoredSpells = function( charCS, miName, miRow, miRowID ) { + const spellbook = miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemMUspellsList ).split(',').filter(s=>!!s); let spellTables = {}; let spellCount = 0; let rows = []; let cols = []; rows.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellRows, 'pr' ) || '')); - rows = rows.join().split(',').filter(r=>!!r); cols.push((miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'mu' ) || ''),(miSpellLookup( charCS, miName, miRow, miRowID, fields.MIspellCols, 'pr' ) || '')); + rows = rows.join().split(',').filter(r=>!!r); cols = cols.join().split(',').filter(c=>!!c); - if (rows.length && cols.length) { + if (cols[0] && parseInt(cols[0]) < 0) { + spellCount = spellbook.length; + } else if (rows.length && cols.length) { cols.forEach( (c,i) => { if (_.isUndefined(spellTables[c])) spellTables[c] = getTableField( charCS, {}, fields.Spells_table, fields.Spells_castValue, c ); spellCount += parseInt((spellTables[c].tableLookup( fields.Spells_castValue, rows[i] )),10); }); }; - return {count:spellCount,rows:rows,cols:cols}; + return {count:spellCount,rows:rows,cols:cols,spellbook:spellbook}; }; /* * Make a list of spells in the specified memorised/stored list */ - var makeSpellList = function( senderId, tokenID, command, selectedButton, noDash = false, submitted = false, extension = '', maxLevel = 13 ) { - - var isMU = command.toUpperCase().includes('MU'), - isPR = command.toUpperCase().includes('PR'), - isMI = command.toUpperCase().includes('MI'), - isPower = command.toUpperCase().includes('POWER'), - isView = command.toUpperCase().includes('VIEW'), - isScroll = command.toUpperCase().includes('SCROLL'), - isGM = playerIsGM(senderId), - content = '', + const makeSpellList = function( senderId, tokenID, command, selectedButton, noDash = false, submitted = false, extension = '', maxLevel = 13 ) { + + const isMU = command.toUpperCase().includes('MU'), // toWho + isPR = command.toUpperCase().includes('PR'), + isMI = command.toUpperCase().includes('MI'), + isPower = command.toUpperCase().includes('POWER'), + isView = command.toUpperCase().includes('VIEW'), + isScroll = command.toUpperCase().includes('SCROLL'), + miStore = command.includes('MI_SLOT'), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID), + miName = (attrLookup( charCS, fields.ItemChosen ) || '-').hyphened(), + MIbag = getTableGroup( charCS, fieldGroups.MI ), + oldVer = 2.1 > csVer(charCS); + + let content = '', viewCmd = '', buttonID = 0, buttonList = [], spell, spellType, spellName, - magicDB, levelSpells, table, - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - miStore = command.includes('MI_SLOT'), - miName = attrLookup( charCS, fields.ItemChosen ) || '-', + magicDB, table, miRow = attrLookup( charCS, fields.ItemRowRef ) || '', - MIbag = getTableGroup( charCS, fieldGroups.MI ), - oldVer = 2.1 > csVer(charCS), toWho = sendToWho(charCS,senderId,false,true), spellTables = [], spellLevels = 0, learnData = '', learn = false, rows = [], cols = [], - miRowID; + miRowID, isExtAbility; - miName = miName.replace(/\s/g,'-'); [miRow,table,miRowID] = tableGroupIndex( MIbag, miRow ); if (isPower && isMI) { @@ -3169,7 +3257,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars buttonList += ',' + miSpellLookup( charCS, miName, miRow, miRowID, fields.ItemPRspellsList ) || ''; buttonList = buttonList.dbName().split(','); if (caster(charCS,'MU').clv > 0) { - if (abilityLookup( fields.MagicItemDB, miName, charCS ).obj) learnData = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, miRow, miRowID ).parsed.learn; + if (abilityLookup( fields.MagicItemDB, miName, charCS ).obj) learnData = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:miRow, rowID:miRowID} ).parsed.learn; learn = (learnData && learnData != '0' && (!isScroll || !isView)); }; @@ -3178,36 +3266,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let storedSpells = getStoredSpells( charCS, miName, miRow, miRowID ); rows = storedSpells.rows; cols = storedSpells.cols; + const isSB = parseInt(cols[0]) < 0; + let learnText, spellDB, spellValue, disabled; if (rows.length && cols.length) { _.each( cols, (c,k) => { let r = rows[k]; - if (_.isUndefined(spellTables[c])) spellTables[c] = getTable( charCS, fieldGroups.SPELLS, c ); - let spellMsg = spellTables[c].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ); - if (miStore) spellName = spellMsg; else spellName = spellTables[c].tableLookup( fields.Spells_name, r ); - let spellDB = spellTables[c].tableLookup( fields.Spells_db, r ) || fields.MU_SpellsDB, - spellValue = parseInt((spellTables[c].tableLookup( fields.Spells_castValue, r )),10), - disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); - if (!disabled) spellLevels = spellLevels + (parseInt(spellTables[c].tableLookup( fields.Spells_spellLevel, r )) || 1); - if (!noDash || spellName != '-') { + if (!isSB && _.isUndefined(spellTables[c])) spellTables[c] = getTable( charCS, fieldGroups.SPELLS, c ); + let spellMsg = !isSB ? spellTables[c].tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), r ) : ''; + if (miStore) spellName = spellMsg; else spellName = !isSB ? spellTables[c].tableLookup( fields.Spells_name, r ) : storedSpells.spellbook[r]; + spellDB = !isSB ? (spellTables[c].tableLookup( fields.Spells_db, r ) || fields.MU_SpellsDB) : fields.MU_SpellsDB; + spellValue = !isSB ? parseInt((spellTables[c].tableLookup( fields.Spells_castValue, r )),10) : 1; + disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); + if (!disabled) spellLevels = spellLevels + (isSB ? 1 : (parseInt(spellTables[c].tableLookup( fields.Spells_spellLevel, r )) || 1)); + if (!noDash || spellName !== '-') { let renamed = !abilityLookup( spellDB, spellName ), changedSpell = renamed ? 'Display-'+spellName : spellName; spell = getAbility( spellDB, spellName, charCS ); if (!!spell.obj) { if (isView) { - spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c + extension +')') ); + spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c + extension +')') ); } else { - let action = ((!spell.obj || !spell.obj[0]) ? '' : (spell.obj[0].get('action') || '')).replace(reKeepButton,'[$2]($3$4'); - if (renamed) { - spell.obj = setAbility( charCS, changedSpell, spell.obj[0].body ); - } + let action = ((!spell.obj || !spell.obj[1]) ? '' : (spell.obj[1].body || '')).replace(reKeepButton,'[$2]($3$4'); + if (learn) action = action.replace(/\}\}\s*$/m,('}}{{Learn=Try to [Learn this spell]\lpar;\api;magic ~~learn-spell '+tokenID+'¦'+(learnData != 1 ? learnData : spellName)+'\rpar;}}')); + spell.obj[0] = setAbility( charCS, changedSpell, action ); + spell.dB = charCS.get('name'); }; - let learnText = !learn ? '' : '{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+(learnData != 1 ? learnData : spellName)+')}}'; - if (!!learn) spell.obj[0].set('action',spell.obj[0].get('action').replace(/\}\}\s*$/m,'}}'+learnText) ); }; content += (buttonID == selectedButton ? '' : ((submitted || disabled) ? '' : '[')); content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + (spellName || '-'); -// content += (((buttonID == selectedButton) || submitted || disabled) ? '' : '](!magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + (!isView ? '' : (' --display-ability '+tokenID+'|'+spellDB+'|'+spellName + extension)) + ')'); - content += ((buttonID == selectedButton) || submitted || disabled) ? '' : ('](!'+(!isView ? '' : ' '+sendToWho(charCS,senderId,false,true)+'%{' + spell.dB + '|' + changedSpell.hyphened() + '} !') + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + extension + +')'); + content += ((buttonID == selectedButton) || submitted || disabled) ? '' : ('](!'+(!isView ? '' : ' '+toWho+'%{' + spell.dB + '|' + changedSpell.hyphened() + '} !') + 'magic --button '+ command +'|'+ tokenID +'|'+ buttonID +'|'+ r +'|'+ c + extension +')'); } buttonID++; }); @@ -3224,7 +3311,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } // build the Spell list - levelSpells = shapeSpellbook( charCS, spellType ); + let levelSpells = shapeSpellbook( charCS, spellType ); for (let lv = 1; lv < levelSpells.length; lv++) { let r = 0; @@ -3254,7 +3341,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let spellValue = parseInt((spellTables[w].tableLookup( fields.Spells_castValue, r )),10), disabled = (miStore ? (spellValue != 0) : (spellValue == 0)); if (!noDash || spellName != '-') { - let isExtAbility = isView && spellName.replace(reIgnore,'').length; + isExtAbility = isView && spellName.replace(reIgnore,'').length; if (isExtAbility) { magicDB = spellTables[w].tableLookup( fields.Spells_db,r ); if (!magicDB || magicDB == spellName) { @@ -3263,10 +3350,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } let renamed = !abilityLookup( magicDB, spellName ), changedSpell = renamed ? 'Display-'+spellName : spellName; - spell = getAbility( magicDB, spellName, charCS ); - if (!!spell.obj) spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c +')') ); -// extension = `${!learn ? '' : ` --message ${tokenID}|Learn Spell|Try to [Learn this spell](!magic ~~learn-spell ${tokenID}¦${spellName})`} ${(spell.api ? '' : toWho)}%{${spell.dB}|${spellName}}`; - extension = `$ ${toWho}%{${spell.dB}|${changedSpell}} !`; + spell = abilityLookup( magicDB, spellName, charCS ); + if (!!spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+viewCmd+'|'+tokenID+'|'+buttonID +'|'+ r +'|'+ c +')') ); + extension = ` ${toWho}%{${spell.dB}|${changedSpell}} !`; } content += (buttonID == selectedButton ? '' : ((submitted || disabled || (lv > maxLevel)) ? '' : '[')); content += ((spellType.includes('POWER') && spellValue) ? (spellValue + ' ') : '') + spellName.dispName(); @@ -3288,53 +3374,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu for a player to manage their spell list. */ - var makeManageSpellsMenu = function( args, senderId, msg ) { - - var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isSpell = cmd.includes('SPELL'), - isScroll = cmd.includes('SCROLL'), - isView = cmd.includes('REVIEW'), - isGM = args[0].includes('GM'), - tokenID = args[1], - level = parseInt((args[2]),10), - spellRow = args[3], - spellCol = args[4], - spellToMemorise = args[5] || '', - singleLevel = (args[7] || '').dbName() === 'single', + const makeManageSpellsMenu = function( args, senderId, msg ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isSpell = cmd.includes('SPELL'), + isScroll = cmd.includes('SCROLL'), + isView = cmd.includes('REVIEW'), + isGM = args[0].includes('GM'), + tokenID = args[1], + spellRow = args[3], + spellCol = args[4], + spellToMemorise = args[5] || '', + singleLevel = (args[7] || '').dbName() === 'single', + selectedSpell = (spellToMemorise.length > 0), + selectedSlot = (spellRow >= 0 && spellCol >= 0), + selectedBoth = selectedSpell && selectedSlot, + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let level = parseInt((args[2]),10), spellToDisplay = spellToMemorise, - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), levelSpells; if (!curToken || !charCS) { - sendDebug('makeManageSpellsMenu: invalid tokenID passed'); sendError('Internal MagicMaster parameter error'); return; } - var spellbook, - spell, - spellName, - spellValue, - tokenName = curToken.get('name'), - content, - selectedSpell = (spellToMemorise.length > 0), - selectedSlot = (spellRow >= 0 && spellCol >= 0), - selectedBoth = selectedSpell && selectedSlot, - selected, - slotSpell = '', + let spell, noToMemorise = '1', magicWord = 'spell', spellTables = [], magicDB, magicType, tableType, editCmd, reviewCmd, memCmd, - levelLimit, nextLevel, - col, rep, - l, r, c, w; + levelLimit; if (isPower) { level = 1; @@ -3389,8 +3466,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars levelSpells = shapeSpellbook( charCS, magicType ); - spellbook = attrLookup( charCS, [fields.Spellbook[0]+((fields.SpellsFirstColNum || levelSpells[level].book != 1) ? levelSpells[level].book : ''), fields.Spellbook[1]] ) || ''; - content = '&{template:'+fields.menuTemplate+'}{{name=Select Slot to Use in '+tokenName+'\'s '+tableType+'s}}' + const spellbook = attrLookup( charCS, [fields.Spellbook[0]+((fields.SpellsFirstColNum || levelSpells[level].book != 1) ? levelSpells[level].book : ''), fields.Spellbook[1]] ) || ''; + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Slot to Use in '+curToken.get('name')+'\'s '+tableType+'s}}' + ((isPower) ? ('{{subtitle=All Powers -1 means "At Will"}}') : ('{{subtitle=Level '+level+' spells}}')); if (msg && msg.length > 0) { @@ -3403,7 +3480,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars let renamed = !abilityLookup( magicDB, spellToDisplay ), changedSpell = renamed ? 'Display-'+spellToDisplay : spellToDisplay; spell = getAbility( magicDB, spellToDisplay, charCS ); - if (spell.obj) spell.obj = greyOutButtons( tokenID, charCS, spell.obj, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+level +'|'+ spellRow +'|'+ spellCol +'|'+spellToMemorise+')') ); + if (spell.obj) spell = greyOutButtons( tokenID, charCS, spell, (renamed ? changedSpell : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+level +'|'+ spellRow +'|'+ spellCol +'|'+spellToMemorise+')') ); content += '...Optionally [Review '+spellToDisplay+'](! '+sendToWho(charCS,senderId,false,true)+'%{'+spell.dB+'|'+changedSpell.hyphened()+'})}}'; } else { content += '...Optionally Review the '+magicWord+'}}'; @@ -3413,7 +3490,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // build the Spell list - r = 0; + let w, c, r = 0; + let spellName, spellValue, selected; while (levelSpells[level].spells > 0) { c = levelSpells[level].base; for (w = 1; (w <= fields.SpellsCols) && (levelSpells[level].spells > 0); w++) { @@ -3439,15 +3517,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables = []; } - if (level < levelLimit) { - nextLevel = (levelSpells[(level+1)].spells>0) ? (level+1) : 1; - } else { - nextLevel = 1; - } + const nextLevel = (level >= levelLimit) ? 1 : ((levelSpells[(level+1)].spells>0) ? (level+1) : 1); + const slotSpell = !selectedSlot ? '' : attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || ''; - if (selectedSlot) { - slotSpell = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || ''; - } content += '}}{{desc2=...Then\n' + '3. '+(selectedBoth ? '[' : '') + 'Memorise '+(selectedSpell ? spellToDisplay : ' the '+magicWord ) @@ -3468,43 +3540,43 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * own memorised spells. */ - var makeStoreMIspell = function(args,senderId,msg = '') { + const makeStoreMIspell = function(args,senderId,msg = '') { // isAny - var command = (args[0] || '').toUpperCase(), - tokenID = args[1], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + let command = (args[0] || '').toUpperCase(), + tokenID = args[1], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeStoreMIspell: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var isMU = command.includes('MU'), - isMI = command.includes('MI'), + const isMU = command.includes('MU'), + isMI = command.includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)], + item = attrLookup( charCS, fields.ItemChosen ) || '-', + row = attrLookup( charCS, fields.ItemRowRef ) || '', + itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + wisLevel = casterLevel( charCS, (isMU ? 'MU' : 'PR') ), + oldVer = 2.1 > csVer(charCS), + tokenName = curToken.get('name'); + + let MIbutton = args[(isMI ? 2 : 5)], isAdd = command.includes('ADD'), - isChange = command.includes('CHANGE'), - spellButton = args[(isMI ? 5 : 2)], - spellRow = args[(isMI ? 6 : 3)], - spellCol = args[(isMI ? 7 : 4)], - MIbutton = args[(isMI ? 2 : 5)], - MIrow = args[(isMI ? 3 : 6)], - MIcol = args[(isMI ? 4 : 7)], isAny = command.includes('ANY') || (isAdd && MIbutton < 0), - item = attrLookup( charCS, fields.ItemChosen ) || '-', - row = attrLookup( charCS, fields.ItemRowRef ) || '', - itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), - wisLevel = casterLevel( charCS, (isMU ? 'MU' : 'PR') ), - extra = isAdd ? '_ADD' : (isAny ? '_ANY' : ''), + isChange = command.includes('CHANGE'), spellName = 'spell', MIspellName = '', - oldVer = 2.1 > csVer(charCS), levelLimit = false, - col, - tokenName = curToken.get('name'), table, itemRow, rowID; + let extra = isAdd ? '_ADD' : (isAny ? '_ANY' : ''); + [itemRow,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); if (!itemObj.obj) { @@ -3512,14 +3584,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } else { let itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,rowID); - let storeSpells = (itemData.store || 'store').toLowerCase(); + const storeSpells = (itemData.store || 'store').toLowerCase(); isAdd = isAdd || storeSpells === 'add'; isChange = isChange || storeSpells === 'change'; isAny = isAny || (storeSpells === 'any' || (isAdd && MIbutton < 0)); levelLimit = itemData.lvlimit == 1; }; - var memSpells, storedSpells, storedLevels, itemQty = 99; + let memSpells, storedSpells, storedLevels, itemQty = 99; [storedSpells,storedLevels] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_MI_SLOT : BT.PR_MI_SLOT)+extra, MIbutton, !isAny, false, ('|'+spellButton+'|'+spellRow+'|'+spellCol) ); if (levelLimit) { @@ -3527,26 +3599,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } [memSpells] = makeSpellList( senderId, tokenID, (isMU ? BT.MU_TO_STORE : BT.PR_TO_STORE)+extra, spellButton, true, false, ('|'+MIbutton+'|'+MIrow+'|'+MIcol), (itemQty - storedLevels) ); - var content = '&{template:'+fields.menuTemplate+'}{{name=Store Spell in '+tokenName+'\'s Magic Items}}' + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spell in '+tokenName+'\'s Magic Items}}' + '{{subtitle=Storing ' + (isMU ? 'MU' : 'PR') + ' spells}}' + '{{desc=**1.Choose a spell to store**\n'+memSpells+'}}' + '{{desc1=**2.'+(isAny ? 'Optionally c' : 'C')+'hoose where to store it**\n'+(storedSpells || 'No spells currently stored')+'}}'; if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; } if (MIbutton >= 0) { - MIspellName = attrLookup( charCS, (oldVer ? fields.Spells_macro : fields.Spells_msg), fields.Spells_table, MIrow, MIcol ) || '-'; + MIspellName = attrLookup( charCS, (oldVer ? fields.Spells_macro : fields.Spells_msg), {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; if ((isAdd || isAny) && MIspellName === '-') MIbutton = -1; } - var canStore = isAny || isChange || (isAdd && MIspellName === '-') || (spellName.dbName() == MIspellName.dbName()), - itemRef = (isNaN(parseInt(itemRow)) ? item : itemRow+'/'+item); + let canStore = isAny || isChange || (isAdd && MIspellName === '-') || (spellName.dbName() == MIspellName.dbName()), + itemRef = (isNaN(parseInt(itemRow)) ? item : itemRow+'/'+item); content += '{{desc2=3.Once both spell and '+(isAny ? 'optionally ' : '')+'slot selected\n' + ((canStore && (spellButton >= 0) && (isAdd || isAny || MIbutton >= 0)) ? '[' : '') + ((isAdd || isAny) && MIbutton < 0 ? 'Add ' : 'Store ')+spellName - + ((canStore && (spellButton >= 0)) ? (((isAdd || isAny) && MIbutton<0) ? ('](!magic --button ADD_TO_SPELLS|'+tokenID+'|'+itemRef+'|'+command+'|1|STORE-MI-SPELL|'+spellName+'|'+wisLevel+'||'+MIspellName+'|'+spellRow+'|'+spellCol+')') : ('](!magic --button '+(isMU ? BT.MISTORE_MUSPELL : BT.MISTORE_PRSPELL)+extra+'|'+tokenID+'|'+MIbutton+'|'+MIrow+'|'+MIcol+'|'+spellButton+'|'+spellRow+'|'+spellCol+')')) - : '') + + ((canStore && (spellButton >= 0)) ? (((isAdd || isAny) && MIbutton<0) ? ('](!magic --button ADD_TO_SPELLS|'+tokenID+'|'+itemRef+'|'+command+'|1|STORE-MI-SPELL|'+spellName+'|'+wisLevel+'||'+MIspellName+'|'+spellRow+'|'+spellCol+')') + : ('](!magic --button '+(isMU ? BT.MISTORE_MUSPELL : BT.MISTORE_PRSPELL)+extra+'|'+tokenID+'|'+MIbutton+'|'+MIrow+'|'+MIcol+'|'+spellButton+'|'+spellRow+'|'+spellCol+')')) + : '') + ((spellButton >= 0 && MIbutton >= 0 && !canStore) ? ' Spells don\'t match. Must be the same\n' : '') + ' or switch to ['+(isMU ? 'Priest' : 'Wizard')+'](!magic --mem-spell MI-'+(isMU ? 'PR' : 'MU')+extra+'|'+tokenID+') spells' + '}}'; @@ -3560,67 +3633,64 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create a menu for a player to cast a spell */ - - var makeCastSpellMenu = function( args, senderId, submitted = false ) { - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - tokenID = args[1], - spellButton = args[2], - spellRow = args[3], - spellCol = args[4], - charged = (args[5] || '').toString().toLowerCase() == 'true', - - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - magicDB, + const makeCastSpellMenu = function( args, senderId, submitted = false ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + tokenID = args[1], + spellButton = args[2], + spellRow = args[3], + spellCol = args[4], + charged = (args[5] || '').toString().toLowerCase() == 'true', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + if (!curToken || !charCS) { + sendError('Internal MagicMaster parameter error'); + return; + } + + const miName = attrLookup( charCS, fields.ItemChosen ) || '', + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let magicDB, magicWord = 'spell', spell, spellName = '', - content = '', maxLevel = 13, learn = false, learnText = '', - tokenName, selectCmd, - storeCmd; - - if (!curToken || !charCS) { - sendDebug('makeCastSpellMenu: invalid tokenID passed'); - sendError('Internal MagicMaster parameter error'); - return content; - } - - var miName = attrLookup( charCS, fields.ItemChosen ) || '', + storeCmd, itemRow = parseInt(attrLookup( charCS, fields.ItemRowRef )), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - itemTable, itemRowID; -// itemTable = attrLookup( charCS, fields.ItemTableRef ); + itemTable, + itemRowID; [itemRow,itemTable,itemRowID] = tableGroupIndex( Items, itemRow ); if (isNaN(itemRow)) { [itemRow,itemTable,itemRowID] = tableGroupFind( Items, 'name', miName ); }; - tokenName = curToken.get('name'); - content = '&{template:'+fields.menuTemplate+'}{{name='; + let tokenName = curToken.get('name'); + let content = '&{template:'+fields.menuTemplate+'}{{name='; if (!isPower) {content += 'What Spell is ' + tokenName + ' casting?}}{{subtitle=Casting '}; if (isPower) { content += 'What Power is ' + tokenName + ' using?}}{{subtitle=Using Powers'; - if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, fields.Spells_table, spellRow, spellCol ) || fields.PowersDB;} + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.PowersDB;} magicWord = 'power'; selectCmd = isMI ? BT.MI_POWER : BT.POWER; storeCmd = isMI ? BT.CAST_MIPOWER : BT.USE_POWER; } else if (isMI) { content += 'MI stored spells'; - if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, fields.Spells_table, spellRow, spellCol ) || fields.MU_SpellsDB;} + if (spellButton >= 0) {magicDB = attrLookup( charCS, fields.Spells_db, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || fields.MU_SpellsDB;} selectCmd = charged ? BT.MI_SCROLL : BT.MI_SPELL; storeCmd = charged ? BT.CAST_SCROLL : BT.CAST_MISPELL; if (caster(charCS,'MU').clv > 0) { let miObj = abilityLookup( fields.MagicItemDB, miName, charCS ); - if (miObj.obj) learn = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, itemRow, itemRowID ).parsed.learn == 1; + if (miObj.obj) learn = resolveData( miName, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:itemRow, rowID:itemRowID} ).parsed.learn == 1; }; } else if (isMU) { content += 'MU spells'; @@ -3642,20 +3712,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - content += '}}{{desc=' + (makeSpellList( senderId, tokenID, selectCmd, spellButton, true, submitted, '|'+charged, maxLevel )[0]); + content += '}}{{section=' + (makeSpellList( senderId, tokenID, selectCmd, spellButton, true, submitted, '|'+charged, maxLevel )[0]); if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; if (spellName.replace(reIgnore,'').length) { spell = getAbility( magicDB, spellName, charCS ); learnText = (learn ? '{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+spellName+')}}' : ''); } else { spellButton = -1; } - } else { - spellName = ''; } - content += '}}{{desc1=Select '+magicWord+' above, then ' + content += '}}{{'+(((spellButton < 0) || submitted)?'section1':'highlight1')+'=Select '+magicWord+' above, then ' + (((spellButton < 0) || submitted) ? '' : '[') + 'Cast '+(spellName.length > 0 ? spellName : magicWord) + (((spellButton < 0) || submitted) ? '' : '](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + spellName.hyphened() + '}' + learnText + ' ' @@ -3670,39 +3738,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu for a player to view a character's spells */ - var makeViewMemSpells = function( args, senderId ) { - - var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isScroll = cmd.includes('SCROLL'), - tokenID = args[1], - spellButton = args[2], - learn = (String(args[3]) || '').toUpperCase() === 'LEARN', - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), - spell, - spellName = '', - spellValue, - content = '', - magicWord = 'spell', + const makeViewMemSpells = function( args, senderId ) { + + const cmd = args[0].toUpperCase(), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isMI = cmd.includes('MI'), + isPower = cmd.includes('POWER'), + isScroll = cmd.includes('SCROLL'), + tokenID = args[1], + spellButton = args[2], + learn = (String(args[3]) || '').toUpperCase() === 'LEARN', + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let magicWord = 'spell', magicDB, magicType, tableType, - col, rep, viewCmd, - levelSpells = [], - levelLimit, - l, w, r, c, - buttonID = 0; + levelLimit; if (!charCS) { - sendDebug('makeViewMemSpells: invalid tokenID passed'); sendError('Internal MagicMaster parameter error'); - return content; + return; } - var title = isMI ? attrLookup( charCS, fields.ItemChosen ) : curToken.get('name'); + const title = isMI ? attrLookup( charCS, fields.ItemChosen ) : curToken.get('name'); if (isPower) { levelLimit = 1; magicType = 'POWER'; @@ -3728,11 +3788,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars magicDB = fields.PR_SpellsDB; } - content = '&{template:'+fields.menuTemplate+'}{{name=View '+title+'\'s currently memorised '+magicWord+'s}}' - + '{{subtitle=' + tableType + '}}' - + '{{desc=' + ((makeSpellList( senderId, tokenID, viewCmd, spellButton, true ))[0] || 'No '+magicWord+'s currently memorised'); - - content += '}}{{desc1=Select the '+magicWord+' above that you want to view the details of. It will not be cast and will remain in your memorised '+magicWord+' list.}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name=View '+title+'\'s currently memorised '+magicWord+'s}}' + + '{{subtitle=' + tableType + '}}' + + '{{desc=' + ((makeSpellList( senderId, tokenID, viewCmd, spellButton, true ))[0] || 'No '+magicWord+'s currently memorised') + + '}}{{desc1=Select the '+magicWord+' above that you want to view the details of. It will not be cast and will remain in your memorised '+magicWord+' list.}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -3741,21 +3800,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if they want to cast the same spell/power/MI again */ - var makeCastAgainMenu = function( args, senderId ) { + const makeCastAgainMenu = function( args, senderId ) { - var isMU = args[0].toUpperCase().includes('MU'), - isPR = args[0].toUpperCase().includes('PR'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - spellName = args[5] || '-', - charCS = getCharacter( args[1] ), - macroDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : (isPR ? fields.PR_SpellsDB : fields.MagicItemDB)), - spell = getAbility( macroDB, spellName, charCS ), - content = '&{template:'+fields.menuTemplate+'}{{name='+args[5]+'}}' - + '{{desc=[Use another charge?](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + (args[5].hyphened()) + '} ' - + '!magic --button '+ args[0] +'|'+ args[1] +'|'+ args[2] +'|'+ args[3] +'|'+ args[4]+ ')}}'; + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + spellName = args[5] || '-', + charCS = getCharacter( args[1] ); if (charCS) { + const macroDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : (isPR ? fields.PR_SpellsDB : fields.MagicItemDB)), + spell = getAbility( macroDB, spellName, charCS ), + content = '&{template:'+fields.menuTemplate+'}{{name='+args[5]+'}}' + + '{{desc=[Use another charge?](! '+(spell.api ? '' : sendToWho(charCS,senderId,false,true))+'%{' + spell.dB + '|' + (args[5].hyphened()) + '} ' + + '!magic --button '+ args[0] +'|'+ args[1] +'|'+ args[2] +'|'+ args[3] +'|'+ args[4]+ ')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, args[1] ); } return; @@ -3766,14 +3825,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a short or a long rest. The long rest option can be shown * as disabled. */ - - var makeRestSelectMenu = function( args, longRestEnabled, senderId ) { + + const makeRestSelectMenu = function( args, longRestEnabled, senderId ) { - var tokenID = args[0], - casterType = args[2] || 'MU+PR', - charCS = getCharacter(tokenID), - curToken = getObj('graphic',tokenID), - content = '&{template:'+fields.menuTemplate+'}{{name=Select Type of Rest for '+curToken.get('name')+'}}' + const tokenID = args[0], + casterType = args[2] || 'MU+PR', + charCS = getCharacter(tokenID), + curToken = getObj('graphic',tokenID); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Select Type of Rest for '+curToken.get('name')+'}}' + '{{desc=[Short Rest](!magic --rest '+tokenID+'|short|'+casterType+') or ' + (longRestEnabled ? '[' : '') + 'Long Rest' @@ -3792,26 +3852,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Allow the player to switch from one to the other when looting **/ - var makeLootMenu = function(senderId,args,menuType) { + const makeLootMenu = function(senderId,args,menuType) { - var buy = (args[0] || '') === BT.BUY_TREASURE, - tokenID = args[1], - pickID = args[3], - putID = args[4]; - - var pickCS = getCharacter( pickID ), - putCS = getCharacter( putID ); + const buy = (args[0] || '') === BT.BUY_TREASURE, + tokenID = args[1], + pickID = args[3], + putID = args[4], + pickCS = getCharacter( pickID ), + putCS = getCharacter( putID ); if (!pickCS || !putCS) { - sendDebug( 'makeLootMenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } - var pickName = pickCS.get('name'), - putName = putCS.get('name'), - treasure = (attrLookup( pickCS, fields.Money_treasure ) || ''), - content = '&{template:'+fields.menuTemplate+'}{{name=View Treasure from ' + pickName + '}}'; + const pickName = pickCS.get('name'), + treasure = (attrLookup( pickCS, fields.Money_treasure ) || ''); + + let content = '&{template:'+fields.menuTemplate+'}{{name=View Treasure from ' + pickName + '}}'; if (treasure && treasure.length > 0) { content += treasure; @@ -3828,22 +3886,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create a menu to view or use a magic item */ - + async function makeViewUseMI( args, senderId, menuType ) { try { - var action = args[0].toUpperCase(), - tokenID = args[1], - MIrowref = args[2] || -1, - isGM = playerIsGM(senderId), - isView = action.includes('VIEW'), - charCS = getCharacter(tokenID), - learn = '', - playerConfig = getSetPlayerConfig( senderId ), - sectType; + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = args[2] || -1, + isGM = playerIsGM(senderId), + isView = action.includes('VIEW'), + charCS = getCharacter(tokenID), + playerConfig = getSetPlayerConfig( senderId ); + + let sectType; if (!charCS) { - sendDebug( 'makeViewUseMI: tokenID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } @@ -3857,16 +3914,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars menuType = 'long'; } } - var shortMenu = menuType == 'short', - actionText = (isView ? 'View' : 'Use'), - selectAction = (isView ? (shortMenu ? BT.CHOOSE_VIEW_MI : BT.VIEW_MI) : BT.CHOOSE_USE_MI), - submitAction = (isView ? BT.VIEW_MI : BT.USE_MI), - Items = getTableGroup( charCS, fieldGroups.MI ), - content = '&{template:'+fields.menuTemplate+'}{{name='+actionText+' '+charCS.get('name')+'\'s Magic Items}}' + const shortMenu = menuType == 'short', + actionText = (isView ? 'View' : 'Use'), + selectAction = (isView ? (shortMenu ? BT.CHOOSE_VIEW_MI : BT.VIEW_MI) : BT.CHOOSE_USE_MI), + submitAction = (isView ? BT.VIEW_MI : BT.USE_MI), + Items = getTableGroup( charCS, fieldGroups.MI ); + + let content = '&{template:'+fields.menuTemplate+'}{{name='+actionText+' '+charCS.get('name')+'\'s Magic Items}}' + '{{Section=Select a Magic Item below to '+actionText + (isView ? '. It will not be used and will remain in your Magic Item Bag' : ', and then press the **Use Item** button') - + '. Note that some items, such as Rods, Staves or Wands, may need to be taken in-hand using *Change Weapon* and used via the *Attack* action. *'+sectType+' sections*}}' - + '{{Section0='; + + '. Note that some items, such as Rods, Staves or Wands, may need to be taken in-hand using *Change Weapon* and used via the *Attack* action.'; + if (!shortMenu) content += ' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+BT.CHOOSE_VIEW_MI +'|'+tokenID+'|'+MIrowref+')'; + content += '}}{{section0='; if (shortMenu) { content += '[Select a Magic Item](!magic --button '+selectAction+'|'+tokenID+'|?{Which Magic Item?'; @@ -3878,15 +3937,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '}}'; } if (shortMenu || !isView) { - content += '{{section10='; if (MIrowref >= 0) { + content += '{{highlight=Select above then '; let selectedMI = tableGroupLookup( Items, 'name', MIrowref ), - displayMI = selectedMI.dispName(), - trueMI = tableGroupLookup( Items, 'trueName', MIrowref ), - trueType = tableGroupLookup( Items, 'trueType', MIrowref ).toLowerCase(), reveal = tableGroupLookup( Items, 'reveal', MIrowref ).toLowerCase(), - qty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, tableRow,tableRowID,table; + + const displayMI = selectedMI.dispName(), + trueMI = tableGroupLookup( Items, 'trueName', MIrowref ), + trueType = tableGroupLookup( Items, 'trueType', MIrowref ).toLowerCase(), + qty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0; [tableRow,table,tableRowID] = tableGroupIndex( Items, MIrowref ); @@ -3895,40 +3955,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if ((shortMenu && isView && reveal == 'view') || (!isView && (reveal == 'use' || reveal == 'view'))) { selectedMI = trueMI.hyphened(); } - let hide = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {hide:reSpellSpecs.hide}, tableRow, tableRowID ).parsed.hide, - showDesc = (selectedMI !== trueMI) && hide && hide.length && hide !== 'hide', - renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj, - magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, false, isGM, (showDesc ? selectedMI : trueMI), tableRow, tableRowID ), - changedMI = renamed ? 'Display-'+selectedMI : selectedMI; + const hide = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {hide:reSpellSpecs.hide}, {row:tableRow, rowID:tableRowID} ).parsed.hide, + showDesc = (selectedMI !== trueMI) && hide && hide.length && hide !== 'hide', + renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj, + changedMI = renamed ? 'Display-'+selectedMI : selectedMI; + + let magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, false, isGM, (showDesc ? selectedMI : trueMI), tableRow, tableRowID ); if (isView && !!magicItem.obj) { - magicItem.obj = greyOutButtons( tokenID, charCS, magicItem.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+')') ); - } else { - let action =(!magicItem.obj || !magicItem.obj[0]) ? '' : (magicItem.obj[0].get('action') || '').replace(reKeepButton,'[$2]($3$4'); - if (renamed || !magicItem.obj || !magicItem.obj[0]) { - setAbility( charCS, changedMI, action ); - } else if (!!action && action.length) { - magicItem.obj[0].set('action',action); - } - }; - if (magicItem.obj && caster(charCS,'MU').clv > 0) { - learn = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, tableRow, tableRowID ).parsed.learn; - if ((!isView && learn && learn != '0' && learn != '1' && !!abilityLookup( fields.MU_SpellsDB, learn ).obj)) { - setAbility( charCS, changedMI, magicItem.obj[0].get('action').replace(/\}\}$/m,'}}'+'{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+learn+')}}')); + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+')') ); + } else if (magicItem.obj && magicItem.obj[1]) { + if (reKeepButton.test(magicItem.obj[1].body || '')) { + magicItem.obj[0] = setAbility( charCS, changedMI, (magicItem.obj[1].body || '').replace(reKeepButton,'[$2]($3$4') ); + magicItem.dB = charCS.get('name'); + if (caster(charCS,'MU').clv > 0) { + const learn = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {learn:reSpellSpecs.learn}, {row:tableRow, rowID:tableRowID} ).parsed.learn; + if (learn && learn != '0' && learn != '1' && !!abilityLookup( fields.MU_SpellsDB, learn ).obj) { + magicItem.obj[0] = setAbility( charCS, changedMI, magicItem.obj[0].get('action').replace(/\}\}$/m,'}}'+'{{Learn=Try to [Learn this spell](!magic --learn-spell '+tokenID+'|'+learn+')}}')); + }; + }; }; }; - content += '['+actionText+' '+displayMI+'](! '+((magicItem.api && !isView) ? '' : sendToWho(charCS,senderId,false,true))+'%{'+magicItem.dB+'|'+(changedMI.hyphened())+'} !magic --button '+ submitAction +'|'+ tokenID +'|'+ MIrowref +')'; + content += '['+actionText+' '+displayMI+'](! '+((magicItem.api && !isView) ? '' : sendToWho(charCS,senderId,false,true))+'%{'+magicItem.dB+'|'+(changedMI.hyphened())+'}' + +' !magic --button '+ submitAction +'|'+ tokenID +'|'+ MIrowref +')'; } else { - content += ''+actionText+' Magic Item'; + content += '{{section10=Select above then
    '+actionText+' Magic Item
    '; } content += '}}'; } if (isView) { - let slotData = itemSlotData( Items ); - content += '{{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'; + const slotData = await itemSlotData( tokenID, Items, senderId, false ); +// log('makeViewUseMI: slotData = {{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'); + content += '{{section11=[['+(attrLookup( charCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs}}'; } menuType = (shortMenu ? 'long' : 'short'); - content += '{{section12=[Swap to a '+menuType+' menu](!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}'; + content += '{{section12= _Swap to '+menuType+' menu_(!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}' +// content += '{{section12=*Swap to '+menuType+' menu*}}' + +// [Swap to a '+menuType+' menu](!magic --button '+(isView ? BT.VIEWMI_OPTION : BT.USEMI_OPTION)+'|'+tokenID+'|'+menuType+')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; @@ -3937,73 +4001,45 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - /** - * Make a menu to display when a Player selects to use - * a power of a Magic Item - */ -/* don't enable! - var makeUseMIpowerMenu = function( args, senderId ) { - - var tokenID = args[1], - powerName = args[2], - castLevel = args[3], - itemName = args[4], - MIlibrary = args[5], - power = args[6], - powerLib = args[7], - charCS = getCharacter(tokenID), - tokenName = getObj('graphic',tokenID).get('name'), - spell = getAbility( powerLib, power, charCS ), - item = getAbility( MIlibrary, itemName, charCS ), - toWho = sendToWho(charCS,senderId,false,true), - content = '&{template:'+fields.menuTemplate+'}{{name='+itemName+'\'s '+powerName+' power}}' - + '{{desc='+tokenName+' is about to use '+itemName+'\'s '+powerName+' power. Is this correct?}}' - + '{{desc1=[Use '+powerName+'](!magic --button '+ BT.MI_POWER_USED +'|'+ tokenID +'|'+ powerName +'|'+ itemName +'|'+ castLevel - + ' '+(spell.api ? '' : toWho)+'%{'+spell.dB +'|'+ (power.hyphened()) +'})' - + ' or [Return to '+itemName+'](! '+(item.api ? '' : toWho)+'%{'+MIlibrary+'|'+(itemName.hyphened())+'})\nOr just do something else}}'; - sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); - return; - } -*/ - /** * Create the Edit Magic Item Bag menu. Allow for a short version if * the Short Menus status flag is set, and highlight selected buttons **/ - async function makeEditBagMenu(args,senderId,msg='') { + async function makeEditBagMenu(args,senderId,msg='') { // magicItem try { - var cmd = (args[0] || '').toUpperCase(), - tokenID = args[1], - MIrowref = args[2], - itemName = args[3] || '', - charges = args[4], - selectedMI = itemName.hyphened(), - displayMI = selectedMI, + const cmd = (args[0] || '').toUpperCase(), + tokenID = args[1], + MIrowref = args[2], + itemName = args[3] || '', + charges = args[4], + selectedMI = itemName.hyphened(), + charCS = getCharacter( tokenID ), + cmdStr = args.join('|'); + + let displayMI = selectedMI, alphaLists = state.MagicMaster.alphaLists, - charCS = getCharacter( tokenID ), - cmdStr = args.join('|'), tableIndex, tableRowID, table, MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); [tableIndex,table,tableRowID] = tableGroupIndex( MItables, MIrowref ); if (!charCS) { - sendDebug( 'makeEditMImenu: Invalid character ID passed' ); sendError( 'Invalid MagicMaster argument' ); return; } - var qty, mi, playerConfig, magicItem, removeMI, sectType, menuType, - selected = !!selectedMI && selectedMI.length > 0, - remove = (selectedMI.toLowerCase() == 'remove'), - bagSlot = !!MIrowref && parseInt(MIrowref) >= 0, - queries = '', + const selected = !!selectedMI && selectedMI.length > 0, + remove = (selectedMI.toLowerCase() == 'remove'), + bagSlot = !!MIrowref && parseInt(MIrowref) >= 0, + playerConfig = getSetPlayerConfig( senderId ); + + let qty, mi, removeMI, sectType, menuType, content = '&{template:'+fields.menuTemplate+'}{{name=Edit Magic Item Bag}}'; - - playerConfig = getSetPlayerConfig( senderId ); + if (playerConfig) { menuType = playerConfig.editBagType; alphaLists = playerConfig.alphaLists; @@ -4012,16 +4048,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars menuType = 'long'; sectType = 'hide'; } - var shortMenu = menuType == 'short', - editMartial = cmd.includes('MARTIAL'), - editAll = cmd.includes('ALLITEMS'), - optionCmd = (editMartial ? BT.EDITMARTIAL_OPTION : (editAll ? BT.EDITALLITEMS_OPTION : BT.EDITMI_OPTION)), - chooseCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), - redoCmd = (editMartial ? BT.REDO_MARTIAL_MI : (editAll ? BT.REDO_ALLITEMS_MI : BT.REDO_CHOOSE_MI)), - slotCmd = (editMartial ? BT.SLOT_MARTIAL_MI : (editAll ? BT.SLOT_ALLITEMS_MI : BT.SLOT_MI)), - storeCmd = (editMartial ? BT.STORE_MARTIAL_MI : (editAll ? BT.STORE_ALLITEMS_MI : BT.STORE_MI)), - reviewCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), - removeCmd = (editMartial ? BT.REMOVE_MARTIAL_MI : (editAll ? BT.REMOVE_ALLITEMS_MI : BT.REMOVE_MI)); + const shortMenu = menuType == 'short', + editMartial = cmd.includes('MARTIAL'), + editAll = cmd.includes('ALLITEMS'), + optionCmd = (editMartial ? BT.EDITMARTIAL_OPTION : (editAll ? BT.EDITALLITEMS_OPTION : BT.EDITMI_OPTION)), + chooseCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + redoCmd = (editMartial ? BT.REDO_MARTIAL_MI : (editAll ? BT.REDO_ALLITEMS_MI : BT.REDO_CHOOSE_MI)), + slotCmd = (editMartial ? BT.SLOT_MARTIAL_MI : (editAll ? BT.SLOT_ALLITEMS_MI : BT.SLOT_MI)), + storeCmd = (editMartial ? BT.STORE_MARTIAL_MI : (editAll ? BT.STORE_ALLITEMS_MI : BT.STORE_MI)), + reviewCmd = (editMartial ? BT.CHOOSE_MARTIAL_MI : (editAll ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI)), + removeCmd = (editMartial ? BT.REMOVE_MARTIAL_MI : (editAll ? BT.REMOVE_ALLITEMS_MI : BT.REMOVE_MI)); + let magicItem; if (selected && !remove) { magicItem = getAbility( fields.MagicItemDB, selectedMI, charCS, null, null, null, tableIndex, tableRowID ); @@ -4031,7 +4068,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { let renamed = !abilityLookup( fields.MagicItemDB, selectedMI ).obj; if (renamed) displayMI = 'Display-'+selectedMI; - magicItem.obj = greyOutButtons( tokenID, charCS, magicItem.obj, (renamed ? displayMI : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+'|'+selectedMI+')') ); + magicItem = greyOutButtons( tokenID, charCS, magicItem, (renamed ? displayMI : ''), ('[Return to menu](!magic --button '+reviewCmd+'|'+tokenID+'|'+(csVer(charCS) < 4 ? '' : MIrowref)+'|'+selectedMI+')') ); }; }; @@ -4040,17 +4077,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (!shortMenu || !selected) { - let potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',alphaLists), - scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',alphaLists), - rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',alphaLists), - weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',alphaLists), - ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',alphaLists), - armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',alphaLists), - rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',alphaLists), - equip = getMagicList(fields.MagicItemDB,miTypeLists,'equipment',senderId,'',false,'',alphaLists), - misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',alphaLists); + const potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,'equipment',senderId,'',false,'',alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',alphaLists); - content += '{{Section=**1.Choose what item to store** *show '+(alphaLists ? 'full' : 'alphabetic')+' lists*\n' + content += '{{Section=**1.Choose what item to store** _show '+(alphaLists ? 'full' : 'alphabetic')+' lists_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|'+cmd+')\n' + (editMartial ? '' : '[Potion](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Potion to store|'+potions+'}|'+charges+')') + (editMartial ? '' : '[Scroll](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Scroll to store|'+scrolls+'}|'+charges+')') + (editMartial ? '' : '[Rods, Staves, Wands](!magic --button '+chooseCmd+'|'+tokenID+'|'+MIrowref+'|?{Rod Staff Wand to store|'+rods+'}|'+charges+')') @@ -4079,7 +4116,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '2.Select the item to **remove** '; } else { if (!selected) content += 'Select an Item above then\n'; - content += '**2.Select a slot to add it to** '+(!shortMenu ? ('*'+sectType+' sections*') : '')+'\n'; + content += '**2.Select a slot to add it to** '+(!shortMenu ? ('_'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')') : '')+'\n'; } if (shortMenu) { @@ -4099,23 +4136,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += '}|'+selectedMI+'|)' + ' as slot to '+(remove ? 'remove' : 'store it in')+', click to change}}'; } -/* if (!shortMenu || selected) { - if (!remove) { - if (shortMenu) { - content += '{{Section1=**1.Item chosen** ['+itemName+'](!magic --button '+redoCmd+'|'+tokenID+'|'+MIrowref+'), click to reselect}}'; - } - } else { - } - } -*/ if (!shortMenu || (selected && bagSlot)) { menuType = (shortMenu ? 'long' : 'short'); content += '{{desc2=**3.'; if (!remove) { + let queries = ''; qty = String(qty)+'+1'; if (selected) { - let chosenData = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, tableIndex, tableRowID ).parsed; + let chosenData = resolveData( selectedMI, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:tableIndex, rowID:tableRowID} ).parsed; qty = chosenData.qty || (selectedMI.trueCompare(removeMI) ? qty : 1); queries = parseQuery( chosenData.query ); } @@ -4145,18 +4174,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * on Character Sheets. Hidden information can be what the MI really is, * which the DM can set using this menu. */ - + async function makeGMonlyMImenu(args, senderId, msg) { try { - var cmd = args[0], - tokenID = args[1], - MIrowref = args[2], - MItoStore = args[3], - charCS = getCharacter(tokenID), - cmdStr = args.join('|'), + const cmd = args[0], + tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID), + cmdStr = args.join('|'); + + let MItoStore = args[3]; - ensureUnique = function( Items, name ) { + const ensureUnique = function( Items, name ) { var count = 1, newName = name, table,index; @@ -4165,82 +4195,82 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (!_.isUndefined(index)) newName = name + String(count++); } while (!_.isUndefined(index)); return newName; - }; + }; if (!charCS) { - sendDebug('makeGMonlyMImenu: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var config = getSetPlayerConfig( senderId ), - sectType = (config.sections !== false ? 'hide' : 'show'), - alphaLists = _.isUndefined(config.alphaLists) ? true : config.alphaLists, - qty, mi, - potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',!!alphaLists), - scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',!!alphaLists), - rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',!!alphaLists), - weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',!!alphaLists), - ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',!!alphaLists), - armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',!!alphaLists), - rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',!!alphaLists), - misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',!!alphaLists), - equip = getMagicList(fields.MagicItemDB,miTypeLists,['equipment','light'],senderId,'',false,'',!!alphaLists), - treasure = getMagicList(fields.MagicItemDB,miTypeLists,'treasure',senderId,'',false,'',!!alphaLists), - coins = getMagicList(fields.MagicItemDB,miTypeLists,'coin',senderId,'',false,'',false), - gems = getMagicList(fields.MagicItemDB,miTypeLists,'gem',senderId,'',false,'',!!alphaLists), - services = getMagicList(fields.MagicItemDB,miTypeLists,'services',senderId,'',false,'',!!alphaLists), - dmitems = getMagicList(fields.MagicItemDB,miTypeLists,'dmitem',senderId,'',false,'',false), - content = '&{template:'+fields.menuTemplate+'}{{name=Edit '+charCS.get('name')+'\'s Magic Item Bag}}' + const config = getSetPlayerConfig( senderId ), + sectType = (config.sections !== false ? 'hide' : 'show'), + alphaLists = _.isUndefined(config.alphaLists) ? true : config.alphaLists, + potions = getMagicList(fields.MagicItemDB,miTypeLists,'potion',senderId,'',false,'',!!alphaLists), + scrolls = getMagicList(fields.MagicItemDB,miTypeLists,'scroll',senderId,'',false,'',!!alphaLists), + rods = getMagicList(fields.MagicItemDB,miTypeLists,'rod',senderId,'',false,'',!!alphaLists), + weapons = getMagicList(fields.MagicItemDB,miTypeLists,'weapon',senderId,'',false,'',!!alphaLists), + ammo = getMagicList(fields.MagicItemDB,miTypeLists,'ammo',senderId,'',false,'',!!alphaLists), + armour = getMagicList(fields.MagicItemDB,miTypeLists,'armour',senderId,'',false,'',!!alphaLists), + rings = getMagicList(fields.MagicItemDB,miTypeLists,'ring',senderId,'',false,'',!!alphaLists), + misc = getMagicList(fields.MagicItemDB,miTypeLists,'miscellaneous',senderId,'',false,'',!!alphaLists), + equip = getMagicList(fields.MagicItemDB,miTypeLists,['equipment','light'],senderId,'',false,'',!!alphaLists), + treasure = getMagicList(fields.MagicItemDB,miTypeLists,'treasure',senderId,'',false,'',!!alphaLists), + coins = getMagicList(fields.MagicItemDB,miTypeLists,'coin',senderId,'',false,'',false), + gems = getMagicList(fields.MagicItemDB,miTypeLists,'gem',senderId,'',false,'',!!alphaLists), + services = getMagicList(fields.MagicItemDB,miTypeLists,'services',senderId,'',false,'',!!alphaLists), + dmitems = getMagicList(fields.MagicItemDB,miTypeLists,'dmitem',senderId,'',false,'',false); + + let content = '&{template:'+fields.menuTemplate+'}{{name=Edit '+charCS.get('name')+'\'s Magic Item Bag}}' + (msg && msg.length ? '{{ ='+msg+'}}' : '') - + '{{Section=**1. Choose something to store** *show '+(alphaLists ? 'complete' : 'alphabetic')+' list*\n'; - - content += '[Potion](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Potion?|'+potions+'})' - + '[Scroll](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Scroll?|'+scrolls+'})' - + '[Rods, Staves, Wands](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Rod, Staff or Wand?|'+rods+'})' - + '[Weapon](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Weapon?|'+weapons+'})' - + '[Ammo](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ammo?|'+ammo+'})' - + '[Armour](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which piece of Armour?|'+armour+'})' - + '[Ring](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ring?|'+rings+'})' - + '[Miscellaneous MI](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Misc MI?|'+misc+'})' - + '[Equipment](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Equipment?|'+equip+'})' - + '[Treasure](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Treasure?|'+treasure+'})' - + '[Services](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Service?|'+services+'})' - + '[Coins](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Coin?|'+coins+'})' - + '[Gems](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Gem?|'+gems+'})' - + '[DM only list](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which DM only item?|'+dmitems+'})}}'; - content += '{{Section1=**2. Choose slot to edit or store in** *'+sectType+' sections*\n'; - - var Items = getTableGroup( charCS, fieldGroups.MI ), - slotName = (MIrowref >= 0) ? tableGroupLookup( Items, 'name', MIrowref ) : '', - slotActualName = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueName', MIrowref ) : '', - slotType = (MIrowref >= 0) ? tableGroupLookup( Items, 'type', MIrowref ) : '', - slotTrueType = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueType', MIrowref ) : '', - slotQty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, - slotActualQty = parseInt(tableGroupLookup( Items, 'trueQty', MIrowref )) || 0, - slotCost = parseFloat(tableGroupLookup( Items, 'cost', MIrowref )) || 0, - slotReveal = (MIrowref >= 0) ? tableGroupLookup( Items, 'reveal', MIrowref ) : '', - slotCursed = slotType.toLowerCase().includes('cursed'), - - chosenMI = (MItoStore.length > 0), - chosenSlot = (MIrowref >= 0), - chosenBoth = (chosenMI && chosenSlot), - hideAvail = chosenBoth, - chosenEither = (chosenMI || chosenSlot), - hiddenMI = slotName !== slotActualName, - greyButton = '', - selectableSlot = chosenSlot ? '[' : greyButton, - selectableBoth = chosenBoth ? '[' : greyButton, + + '{{Section=[Add from DMG Treasure Tables](!cmd --addTreasure '+tokenID+'||1|gm-only-mi|)\nor}}' + + '{{Section1=**1. Choose something to store** _show '+(alphaLists ? 'complete' : 'alphabetic')+' list_(!magic --button '+BT.ALPHALIST_OPTION+'|'+tokenID+'|'+(alphaLists ? 'list':'alpha')+'|GMONLY)\n' + + '[Potion](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Potion?|'+potions+'})' + + '[Scroll](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Scroll?|'+scrolls+'})' + + '[Rods, Staves, Wands](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Rod, Staff or Wand?|'+rods+'})' + + '[Weapon](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Weapon?|'+weapons+'})' + + '[Ammo](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ammo?|'+ammo+'})' + + '[Armour](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which piece of Armour?|'+armour+'})' + + '[Ring](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Ring?|'+rings+'})' + + '[Miscellaneous MI](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which Misc MI?|'+misc+'})' + + '[Equipment](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Equipment?|'+equip+'})' + + '[Treasure](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Treasure?|'+treasure+'})' + + '[Services](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Service?|'+services+'})' + + '[Coins](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Coin?|'+coins+'})' + + '[Gems](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{What Gem?|'+gems+'})' + + '[DM only list](!magic --button GM-MItoStore|'+tokenID+'|'+MIrowref+'|?{Which DM only item?|'+dmitems+'})}}' + + '{{Section2=**2. Choose slot to edit or store in** _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+cmdStr+')}}'; + + const Items = getTableGroup( charCS, fieldGroups.MI ), + slotName = (MIrowref >= 0) ? tableGroupLookup( Items, 'name', MIrowref ) : '', + slotActualName = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueName', MIrowref ) : '', + slotType = (MIrowref >= 0) ? tableGroupLookup( Items, 'type', MIrowref ) : '', +// slotTrueType = (MIrowref >= 0) ? tableGroupLookup( Items, 'trueType', MIrowref ) : '', + slotQty = parseInt(tableGroupLookup( Items, 'qty', MIrowref )) || 0, + slotActualQty = parseInt(tableGroupLookup( Items, 'trueQty', MIrowref )) || 0, + slotCost = parseFloat(tableGroupLookup( Items, 'cost', MIrowref )) || 0, + slotReveal = (MIrowref >= 0) ? tableGroupLookup( Items, 'reveal', MIrowref ) : '', + slotCursed = slotType.toLowerCase().includes('cursed'), + + chosenMI = (MItoStore.length > 0), + chosenSlot = (MIrowref >= 0), + chosenBoth = (chosenMI && chosenSlot), + chosenEither = (chosenMI || chosenSlot), + hiddenMI = slotName !== slotActualName, + greyButton = '', + selectableSlot = chosenSlot ? '[' : greyButton, + selectableBoth = chosenBoth ? '[' : greyButton, + selectableEither = chosenEither ? '[' : greyButton, + hiddenSlot = hiddenMI ? '[' : greyButton, + revealType = (!slotReveal || slotReveal.toLowerCase() === 'manual' ? 'Manually' : ('on '+slotReveal)), + intelligence = Math.max( (parseInt(attrLookup( charCS, fields.Intelligence )) || 0), (parseInt(attrLookup( charCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( charCS, fields.HP )) || 0, + sentient = (intelligence > 0 && hp > 0), + showTypes = parseInt(attrLookup( charCS, fields.ItemContainerHide )); + + let hideAvail = chosenBoth, hideableBoth = selectableBoth, - selectableEither = chosenEither ? '[' : greyButton, - hiddenSlot = hiddenMI ? '[' : greyButton, - revealType = (!slotReveal || slotReveal.toLowerCase() === 'manual' ? 'Manually' : ('on '+slotReveal)), - intelligence = Math.max( (parseInt(attrLookup( charCS, fields.Intelligence )) || 0), (parseInt(attrLookup( charCS, fields.Monster_int )) || 0)), - hp = parseInt(attrLookup( charCS, fields.HP )) || 0, - sentient = (intelligence > 0 && hp > 0), containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0, containerSize = attrLookup( charCS, fields.ItemContainerSize ), - showTypes = parseInt(attrLookup( charCS, fields.ItemContainerHide )), spellStoring = false, looksLike = false, queries = '', @@ -4249,7 +4279,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [index,table,rowID] = tableGroupIndex( Items, MIrowref ); // build the character's visible MI Bag - content += await makeMIbuttons( tokenID, senderId, 'max', 'current', 'GM-MIslot', '|'+MItoStore, MIrowref, false, true ); + + content += await makeMIbuttons( tokenID, senderId, 'max', 'current', 'GM-MIslot', '|'+MItoStore, MIrowref, false, true, false, true, undefined, undefined, '', '', 3 ); content += '}}'; if (hiddenMI) { @@ -4262,16 +4293,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (chosenSlot) { slotObj = getAbility( fields.MagicItemDB, slotActualName, charCS, false, true, slotActualName, index, rowID ); if (!!slotObj.obj) { - spellStoring = reCastMIspellCmd.test(slotObj.obj[1].body) || reCastMIpowerCmd.test(slotObj.obj[1].body); + spellStoring = reCastViewMIspellCmd.test(slotObj.obj[1].body) || reCastViewMIpowerCmd.test(slotObj.obj[1].body); looksLike = reLooksLike.test(slotObj.obj[1].body); if (looksLike && !hiddenMI && !chosenMI) { - MItoStore = ensureUnique( Items, getShownType( slotObj, MIrowref, resolveData( slotActualName, fields.MagicItemDB, reItemData, charCS, {itemType:reSpellSpecs.itemType}, index, rowID ).parsed.itemType )); + MItoStore = ensureUnique( Items, getShownType( slotObj, MIrowref, resolveData( slotActualName, fields.MagicItemDB, reItemData, charCS, {itemType:reSpellSpecs.itemType}, {row:index, rowID:rowID} ).parsed.itemType )); hideAvail = MItoStore !== slotName; hideableBoth = hideAvail ? '[' : greyButton; } } } - var storableSlot = (spellStoring && chosenSlot) ? '[' : ''; + const storableSlot = (spellStoring && chosenSlot) ? '[' : ''; if (_.isUndefined(containerSize)) { containerSize = fields.MIRowsStandard; @@ -4304,22 +4335,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.ItemContainerType, containerNo ); setAttr(charCS, fields.ItemOldContainerType, containerNo); - var itemName = MItoStore; + const itemName = MItoStore; MItoStore = (MItoStore || '').hyphened(); initQty = String(slotQty)+'+1'; if (chosenMI) { itemObj = getAbility( fields.MagicItemDB, MItoStore, charCS, false, true, MItoStore, index, rowID ); if (itemObj.obj) { - chosenData = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, index, rowID ); + chosenData = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {qty:reSpellSpecs.qty,query:reSpellSpecs.query}, {row:index, rowID:rowID} ); initQty = chosenData.parsed.qty || (itemName.trueCompare(slotName) ? initQty : 1); queries = parseQuery( chosenData.parsed.query ); } }; - var reviewItem = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotActualName : itemName), - reviewObj = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotObj : itemObj), - renamed = !abilityLookup( fields.MagicItemDB, reviewItem ).obj, - changedItem = renamed ? 'Display-'+reviewItem : reviewItem; - if (!state.MagicMaster.viewActions && reviewObj && reviewObj.obj) reviewObj.obj = greyOutButtons( tokenID, charCS, reviewObj.obj, (renamed ? changedItem : ''), ('[Return to menu](!magic --button GM-MImenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') ); + const reviewItem = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotActualName : itemName), + renamed = !abilityLookup( fields.MagicItemDB, reviewItem ).obj, + changedItem = renamed ? 'Display-'+reviewItem : reviewItem; + + let reviewObj = ((cmd !== 'GM-MItoStore' && chosenSlot) ? slotObj : itemObj); + + if (!state.MagicMaster.viewActions && reviewObj && reviewObj.obj) reviewObj = greyOutButtons( tokenID, charCS, reviewObj, (renamed ? changedItem : ''), ('[Return to menu](!magic --button GM-MImenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') ); content += '{{desc3=**3. '+selectableBoth+(chosenBoth ? ('Store '+itemName+'](!magic --button GM-StoreMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|[[?{Quantity?|'+initQty+'}]]||'+queries+')') : ('Store'+(chosenSlot ? ('d '+slotActualName) : itemName)+''))+' **' + ' or '+hideableBoth+(hideAvail ? ('Hide '+slotName+' as '+itemName+'](!magic --button GM-HideMI|'+tokenID+'|'+MIrowref+'|'+MItoStore+')') : ((hiddenMI ? ('Hidden as '+slotName) : ('Hide Item'+(chosenMI?(' as '+itemName):'')))+''))+'
    ' @@ -4335,8 +4368,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars + selectableSlot+(hiddenMI ? 'Reveal Now' : 'Reset Qty to Max')+(chosenSlot ? ('](!magic --button GM-ResetSingleMI|'+tokenID+'|'+MIrowref+') ') : '     ')+'
    ' + selectableSlot+'Change Cost'+(chosenSlot ? ('](!magic --button GM-SetMIcost|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How much should '+slotName+' now cost (currently '+slotCost+'GP)?|'+slotCost+'})') : '    ')+'
    ' + selectableSlot+'REMOVE MI'+(chosenSlot ? '](!magic --button GM-DelMI|'+tokenID+'|'+MIrowref+'|'+slotActualName+') ' : '     ')+'}}' - + '{{desc5=or [Edit Treasure Description](!magic --button GM-TreasureMenu|'+tokenID+'|'+MIrowref+'|'+MItoStore+')\n' - + '['+containerSize+' slot](!magic --button GM-SetTokenSize|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many slots does this container have?|'+containerSize+'})' + + '{{desc5=['+containerSize+' slot](!magic --button GM-SetTokenSize|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{How many slots does this container have?|'+containerSize+'})' + '['+containerType+'](!magic --button GM-SetTokenType|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|?{What type of token is this?|Untrapped Container,1|Trapped container,4|Force Inanimate Container,6|Force Sentient Creature,7})\n' + '['+(showTypes ? 'Show as Item types' : 'Show as Item names')+'](!magic --button GM-HideAsTypes|'+tokenID+'|'+MIrowref+'|'+MItoStore+'|'+showTypes+') in container. ' + '[BLANK BAG](!magic --button GM-BlankBag|'+tokenID+')' @@ -4352,21 +4384,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Create the DM's Edit Treasure menu */ - - var makeEditTreasureMenu = function(args,senderId,msg) { + + const makeEditTreasureMenu = function(args,senderId,msg) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeEditTreasureMenu: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var charName = charCS.get('name'), - treasure = attrLookup( charCS, fields.Money_treasure ) || '{{Treasure=None found}}', - content = '&{template:'+fields.menuTemplate+'}{{name=Current treasure for '+charName+'}}' + const charName = charCS.get('name'), + treasure = attrLookup( charCS, fields.Money_treasure ) || '{{Treasure=None found}}'; + + let content = '&{template:'+fields.menuTemplate+'}{{name=Current treasure for '+charName+'}}' + treasure +'{{=----- End of current Treasure ----}}' + '{{desc1=[Add](!magic --button GM-AddTreasure|'+tokenID+'|?{Title for Treasure?}|?{Treasure text}) or ' + '[Edit](!magic --button GM-EditTreasure|'+tokenID+') or ' @@ -4390,171 +4422,147 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function makeShortPOPmenu( args, senderId, buy=false, menuType ) { try { - var tokenID = args[1], - pickID = args[3], - putID = args[4], - pickRow = args[2] || -1, - putRow = args[5] || -1; + const tokenID = args[1], + pickID = args[3], + putID = args[4]; + let pickRow = args[2] || -1, + putRow = args[5] || -1; if (!pickID || !putID) { - sendDebug( 'makeShortPOPmenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; }; - - var cmdStr = args.join('|'), - putCS = getCharacter( putID ), - pickCS = getCharacter( pickID ), - pickingUp = (tokenID == putID), - shortMenu = pickingUp, - sectType = 'hide', - pickOrPut = (pickingUp ? (!buy ? 'Pick up' : 'Buy') : (!buy ? 'Put away' : 'Sell')), - charCS = getCharacter(tokenID), - traderCS = pickingUp ? pickCS : putCS, - isGM = playerIsGM(senderId), - sell = buy && tokenID === pickID, - buy = buy && !sell, - reTrade = {nobuy:reClassSpecs.nobuy, nosell:reClassSpecs.nosell, tobuy:reClassSpecs.tobuy, tosell:reClassSpecs.tosell}; - + const putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ), + pickingUp = (tokenID == putID), + pickOrPut = (pickingUp ? (!buy ? 'Pick up' : 'Buy') : (!buy ? 'Put away' : 'Sell')), + charCS = getCharacter(tokenID), + traderCS = pickingUp ? pickCS : putCS, + isGM = playerIsGM(senderId), + sell = buy && tokenID === pickID, + reTrade = {nobuy:reClassSpecs.nobuy, nosell:reClassSpecs.nosell, tobuy:reClassSpecs.tobuy, tosell:reClassSpecs.tosell}; + if (!putCS || !pickCS) { - sendDebug( 'makeShortPOPmenu: pickID or putID is invalid' ); sendError( 'Invalid make-menu call syntax' ); return; } - var pickCmd = sell ? BT.SELL_PICK : (buy ? BT.BUY_PICK : BT.POP_PICK), - storeCmd = sell ? BT.SELL_STORE : (buy ? BT.BUY_STORE : BT.POP_STORE), - match = '['+((attrLookup( traderCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/i) || ['',''])[1]+']', - tradeParse = parseData(match, reTrade, false), - tradeClass = classObjects( traderCS, senderId, reTrade )[0].classData, - tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade, '', '', [], false ).parsed, - noTrade = buy ? (tradeParse.nosell || tradingRace.nosell || tradeClass.nosell) : (sell ? (tradeParse.nobuy || tradingRace.nobuy || tradeClass.nobuy) : ''), - toTrade = buy ? (tradeParse.tosell || tradingRace.tosell || tradeClass.tosell) : (sell ? (tradeParse.tobuy || tradingRace.tobuy || tradeClass.tobuy) : ''); + + buy = buy && !sell; + + const pickCmd = sell ? BT.SELL_PICK : (buy ? BT.BUY_PICK : BT.POP_PICK), + storeCmd = sell ? BT.SELL_STORE : (buy ? BT.BUY_STORE : BT.POP_STORE), + match = '['+((attrLookup( traderCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/i) || ['',''])[1]+']', + tradeParse = parseData(match, reTrade, false), + tradeClass = classObjects( traderCS, senderId, reTrade )[0].classData, + tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade, {defBase:false} ).parsed, + noTrade = buy ? (tradeParse.nosell || tradingRace.nosell || tradeClass.nosell) : (sell ? (tradeParse.nobuy || tradingRace.nobuy || tradeClass.nobuy) : ''), + toTrade = buy ? (tradeParse.tosell || tradingRace.tosell || tradeClass.tosell) : (sell ? (tradeParse.tobuy || tradingRace.tobuy || tradeClass.tobuy) : ''); + + let shortMenu = pickingUp, + sectType = 'hide'; + args[0] = pickCmd; -// log('makeShortPOPmenu: match = '+match+', noTrade = '+noTrade+', toTrade = '+toTrade); - if (!menuType) { - var playerConfig = getSetPlayerConfig( senderId ); + const playerConfig = getSetPlayerConfig( senderId ); if (playerConfig) { shortMenu = !!!((pickingUp ? playerConfig.pickUpMIType : playerConfig.putAwayMIType) == 'long'); - sectType = ((playerConfig.sections !== false || csVer(pickCS) < 4) ? 'hide' : 'show'); + sectType = ((playerConfig.sections !== false || csVer(pickCS) < 4) ? 'Hide' : 'Show'); } } else { shortMenu = !!!(menuType.toLowerCase() == 'long'); } menuType = shortMenu ? 'long' : 'short'; - var putName = putCS.get('name'), - pickName = pickCS.get('name'), - qty, mi, miTrueName, i, - pickItems = getTableGroupField( pickCS, {}, fieldGroups.MI, 'name' ), - bagSize = (attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows), - showTypes = parseInt(attrLookup( pickCS, fields.ItemContainerHide )), - treasure = (attrLookup( pickCS, fields.Money_treasure ) || '{{desc1=and there is no treasure here, either}}'), + const putName = putCS.get('name'), + pickName = pickCS.get('name'), + showTypes = parseInt(attrLookup( pickCS, fields.ItemContainerHide )); + + let treasure = (attrLookup( pickCS, fields.Money_treasure ) || '{{desc1=There is no other treasure here}}'), content = '&{template:'+fields.menuTemplate+'}{{name='+((sell || buy) ? (pickName + ' sells items to '+putName) : ('Take from ' + pickName + ' to add to ' + putName + '\'s Items of Equipment'))+'}}', - putItems, miObj, pickedMI, pickedTrueMI, pickableQty, pickedType, miType, - magicItems = '', miList = '', slotsUsed, miTable; - + miTrueName, mi, pickedMI, miType, miTable, + fullMsg = '', magicItems = '', miList = ''; + + let pickItems = getTableGroupField( pickCS, {}, fieldGroups.MI, 'name' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'trueName' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'qty' ); pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'type' ); - putRow = -1; - if (pickRow >= 0) { - pickedMI = tableGroupLookup( pickItems, 'name', pickRow ) || ''; - pickedTrueMI = (tableGroupLookup( pickItems, 'trueName', pickRow ) || '').dbName() || '-'; - pickableQty = tableGroupLookup( pickItems, 'qty', pickRow ) || ''; - pickedType = (tableGroupLookup( pickItems, 'type', pickRow ) || '').dbName() || '-'; - let miTrueObj = abilityLookup( fields.MagicItemDB, pickedTrueMI, pickCS ); - miTable = miTrueObj.obj ? getItemTable( miTrueObj.obj[1].type ) : 'GEAR'; - putItems = getTableField( putCS, {}, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'name'] ); - putItems = getTableField( putCS, putItems, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'trueName'] ); - putItems = getTableField( putCS, putItems, fieldGroups[miTable].tableDef, fields[fieldGroups[miTable].prefix+'type'] ); - let lowerMI = pickedMI.dbName().replace(/v\d+$/,'') || '-'; - for (i = 0; i < putItems.sortKeys.length; i++) { - mi = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'name'],i) || '').dbName().replace(/v\d+$/,'') || '-'; - if (_.isUndefined(mi)) break; - if (mi != lowerMI) continue; - miTrueName = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'trueName'],i) || '').dbName() ||'-'; - if (miTrueName != pickedTrueMI) continue; - miType = (putItems.tableLookup(fields[fieldGroups[miTable].prefix+'type'],i) || pickedType); - if (miType.dbName() !== '' && (miType.dbName() !== pickedType || !stackable.includes(miType.toLowerCase()))) continue; - putRow = i; - break; - } - if (showTypes && !buy) { - miObj = abilityLookup( fields.MagicItemDB, pickedMI, pickCS ); - pickedMI = !miObj.obj ? pickedMI : getShownType( miObj, pickRow ); - } - if (putRow < 0) { - if (slotsUsed >= bagSize) { - sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); - return; - } else { - putItems = getTable( putCS, fieldGroups[miTable] ); - putRow = putItems.tableFind( fields[fieldGroups[miTable].prefix+'name'], '-', false ); - if (_.isUndefined(putRow)) { - putItems = putItems.addTableRow(); - putRow = putItems.sortKeys.length-1; - } - } - } + pickItems = getTableGroupField( pickCS, pickItems, fieldGroups.MI, 'chosen' ); + + let putItems = getTableGroup( putCS, fieldGroups.MI ); + const slotData = await itemSlotData(tokenID,putItems,senderId,false); + + let [foundButtons,foundTables] = tableGroupFind( pickItems, 'chosen', 1, true, true ), + chosen = !_.isUndefined(foundButtons) ? foundButtons.length : 0; + pickRow = !_.isUndefined(foundButtons) ? indexTableGroup( pickItems, foundTables[0], foundButtons[0] ) : -1; + + const bagSize = parseInt(attrLookup( putCS, fields.ItemContainerSize ) || fields.MIRows); + if (parseInt(slotData.count)+parseInt(chosen) > bagSize) { + sendParsedMsg( tokenID, messages.miBagFull, senderId, '', putID ); + foundButtons = undefined; + pickRow = -1; + fullMsg = '{{rowhighlight=mistyrose}}{{highlight=There are not enough slots left to store all the selected items}}' }; - - var putNameTable = getTableGroupField( putCS, {}, fieldGroups.MI, 'name' ), - putNameTable = getTableGroupField( putCS, putNameTable, fieldGroups.MI, 'weight' ), - putNameTable = getTableGroupField( putCS, putNameTable, fieldGroups.MI, 'qty' ), - slotData = itemSlotData(putNameTable); - if (putRow >= 0) putRow = indexTableGroup( putNameTable, miTable, putRow ); - if (pickingUp) content += treasure; + [putRow,miTable,pickedMI] = findPutRow( pickID, pickCS, pickItems, pickRow, putCS, putItems, showTypes, buy, slotData.count+chosen ); - content += '{{Section='+putName+' has [['+(attrLookup( putCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots. Total weight [['+slotData.weight+']]lbs'; + if (putRow >= 0) putRow = indexTableGroup( putItems, miTable, putRow ); - let tradeText = (toTrade ? ('\n'+(buy ? pickName : putName)+' can '+(buy ? 'sell' : 'buy')+' these: '+toTrade.replace(/\|/g,', ')+'.') : '') - + (noTrade ? ('\n'+(toTrade ? 'but' : (buy ? pickName : putName))+' cannot '+(buy ? 'sell' : 'buy')+' these: '+noTrade.replace(/\|/g,', ')+'.') : '') - + (((buy || sell) && !shortMenu) ? ('\nItems that can\'t be traded with this trader are grey (try someone else).') : '') - + ((buy || sell) ? ('\nItems of zero value don\'t appear') : ''); + const tradeText = (toTrade ? ('\n'+(buy ? pickName : putName)+' can '+(buy ? 'sell' : 'buy')+' these: '+toTrade.replace(/\|/g,', ')+'.') : '') + + (noTrade ? ('\n'+(toTrade ? 'but' : (buy ? pickName : putName))+' cannot '+(buy ? 'sell' : 'buy')+' these: '+noTrade.replace(/\|/g,', ')+'.') : '') + + (((buy || sell) && !shortMenu) ? ('\nItems that can\'t be traded with this trader are grey (try someone else).') : '') + + ((buy || sell) ? ('\nItems of zero value don\'t appear') : ''); if (shortMenu) { miList = await makeMIlist( pickCS, senderId, false, !sell, showTypes, true, putCS, toTrade || (buy || sell), noTrade || '' ); shortMenu = shortMenu && (miList.split('|').length > 2); } if (shortMenu) { - content += 'Press the **[Select]** button to select the item you want to '+pickOrPut+' from a list of items, ' + content += '{{Section10=Press the **[Select]** button to select the item you want to '+pickOrPut+' from a list of items, ' + 'then press the **[Store]** button to automatically put it away in an empty slot' + (buy ? 'or **[Review]** button to review before buying' : '')+'}}' + '{{Select=[Select Item to '+pickOrPut+'](!magic --button '+pickCmd+'|'+tokenID+'|?{'+pickOrPut+' which Item?'+miList+'}|'+pickID+'|'+putID+'|'+putRow+')}}' - + (tradeText.length ? ('{{Trade Terms='+tradeText+'}}') : '') - + '{{Store='; + + (tradeText.length ? ('{{Trade Terms='+tradeText+'}}') : (pickingUp ? treasure : '')) } else { - magicItems = await makeMIbuttons( tokenID, senderId, 'current', 'current', pickCmd, '|'+pickID+'|'+putID+'|'+putRow, pickRow, !sell, false, showTypes, true, pickID, putID, toTrade || (buy || sell), noTrade || '' ); + magicItems = await makeMIbuttons( tokenID, senderId, 'current', 'current', pickCmd, '|'+pickID+'|'+putID+'|'+putRow, -1, !sell, false, showTypes, true, pickID, putID, toTrade || (buy || sell), noTrade || '', 2 ); if (magicItems && magicItems.length) { - content += 'Select an item you want to '+pickOrPut+(csVer(pickCS) >= 4 ? (' *'+sectType+' sections*') : '')+'\n' + content += '{{Section10=Select an item you want to '+pickOrPut+'\n' + magicItems+'}}' - + (tradeText.length ? ('{{desc1=*Trade Terms: *'+tradeText+'}}') : '') - + '{{desc2=' + + (tradeText.length ? ('{{Section11=*Trade Terms: *'+tradeText+'}}') : (pickingUp ? treasure : '')); } } + content += '{{Section12='+putName+' has [['+(attrLookup( putCS, fields.ItemContainerSize ) - slotData.count)+']] remaining slots and carries a total weight of [['+slotData.weight+']]lbs}}' + + fullMsg + + '{{'; + if (!shortMenu && (!magicItems || !magicItems.length)) { content = messages.header + '{{desc=' + pickCS.get('name') + ' ' + messages.fruitlessSearch + treasure; sendParsedMsg( tokenID, content, senderId ); } else { - content +=((pickRow >= 0 && putRow >= 0) ? '[' : '') - + pickOrPut+' '+((pickRow >= 0) ? pickedMI : 'item') - + ((pickRow >= 0 && putRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) +// content +=((pickRow >= 0 && putRow >= 0) ? ('Highlight='+(shortMenu?'Store ':'')+'[') : ((shortMenu?'Store=':'Section14=')+'')) +// + pickOrPut+' '+((pickRow >= 0) ? pickedMI.dispName() : 'item') +// + ((pickRow >= 0 && putRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) +// + (buy || sell ? ' and store' : '')+' in a free slot'; + content +=(!_.isUndefined(foundButtons) ? ('Highlight=') : (shortMenu?'Store=':'Section14=')) + + (!_.isUndefined(foundButtons) ? ((shortMenu?'Store ':'')+'[') : ('')) + + pickOrPut+' '+( chosen > 1 ? 'selected items' : ((pickRow >= 0) ? pickedMI.dispName() : 'item')) + + ((pickRow >= 0) ? ('](!magic --button '+storeCmd+'|'+tokenID+'|'+pickRow+'|'+pickID+'|'+putID+'|'+putRow+'|-1)') : '' ) + (buy || sell ? ' and store' : '')+' in a free slot'; if (buy) { - miObj = getAbility( fields.MagicItemDB, pickedMI, charCS ); - let renamed = !miObj || !miObj.obj, - changedMI = renamed ? 'Display-'+pickedMI : pickedMI; + let miObj = getAbility( fields.MagicItemDB, pickedMI, charCS ); + const renamed = !miObj || !miObj.obj; + const changedMI = renamed ? 'Display-'+pickedMI : pickedMI; args[0] = pickCmd; - if (miObj.obj) miObj.obj = greyOutButtons( tokenID, charCS, miObj.obj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+(args.join('|'))+')') ); + if (miObj.obj) miObj = greyOutButtons( tokenID, charCS, miObj, (renamed ? changedMI : ''), ('[Return to menu](!magic --button '+(args.join('|'))+')') ); content +='\nor '+(((pickRow >= 0 && putRow >= 0) ? '[' : '')+ 'Review '+((pickRow >= 0) ? pickedMI : 'item') + ((pickRow >= 0 && putRow >= 0) ? ('](! '+sendToWho(charCS,senderId,false,true)+'%{'+miObj.dB+'|'+(changedMI.hyphened())+'})') : '' )); }; - content += '}}{{desc3=[Use '+menuType+' menu](!magic --button '+(pickingUp ? BT.PICKMI_OPTION : BT.PUTMI_OPTION)+'|'+tokenID+'|'+menuType+'|'+pickID+'|'+putID+'|'+(buy || sell)+')}}'; + content += '}}{{desc9=
    ' + + '' + + '
    _Use '+menuType+' menu_(!magic --button '+(pickingUp ? BT.PICKMI_OPTION : BT.PUTMI_OPTION)+'|'+tokenID+'|'+menuType+'|'+pickID+'|'+putID+'|'+(buy || sell)+') _Select Everything_(!magic --button '+pickCmd+'|'+tokenID+'|All|'+pickID+'|'+putID+'|'+putRow+')'+(csVer(pickCS) >= 4 ? (' _'+sectType+' sections_(!magic --button '+BT.SECTIONS_OPTION+'|'+tokenID+'|'+args.join('|')+')') : '')+'
    ' + + '
    }}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); } return; @@ -4567,64 +4575,61 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create the Spells menus */ - var makeMUSpellsMenu = function( args, senderId ) { + const makeMUSpellsMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makeMUSpellsMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Magic User Spells menu}}' - + '{{Section1=[Cast MU spell](!magic --cast-spell MU|'+tokenID+')' - + '[View MU Spellbook](!magic --view-spell MU|'+tokenID+')}}' - + '{{Section2=[Short Rest for L1 MU Spells](!magic --rest '+tokenID+'|short|MU)' - + '[Long Rest and recover MU spells](!magic --rest '+tokenID+'|long|MU|1)' - + '[Memorise MU spells](!magic --mem-spell MU|'+tokenID+')}}' - + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Magic User Spells menu}}' + + '{{Section1=[Cast MU spell](!magic --cast-spell MU|'+tokenID+')' + + '[View MU Spellbook](!magic --view-spell MU|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 MU Spells](!magic --rest '+tokenID+'|short|MU)' + + '[Long Rest and recover MU spells](!magic --rest '+tokenID+'|long|MU|1)' + + '[Memorise MU spells](!magic --mem-spell MU|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; - var makePRSpellsMenu = function( args, senderId ) { + const makePRSpellsMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makePRSpellsMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Clerical Spells menu}}' - + '{{Section1=[Cast Priest spell](!magic --cast-spell PR|'+tokenID+')' - + '[View Priest Spellbook](!magic --view-spell PR|'+tokenID+')}}' - + '{{Section2=[Short Rest for L1 Priest Spells](!magic --rest '+tokenID+'|short|PR)' - + '[Long Rest and recover Priest spells](!magic --rest '+tokenID+'|long|PR|1)' - + '[Memorise Priest spells](!magic --mem-spell PR|'+tokenID+')}}' - + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Clerical Spells menu}}' + + '{{Section1=[Cast Priest spell](!magic --cast-spell PR|'+tokenID+')' + + '[View Priest Spellbook](!magic --view-spell PR|'+tokenID+')}}' + + '{{Section2=[Short Rest for L1 Priest Spells](!magic --rest '+tokenID+'|short|PR)' + + '[Long Rest and recover Priest spells](!magic --rest '+tokenID+'|long|PR|1)' + + '[Memorise Priest spells](!magic --mem-spell PR|'+tokenID+')}}' + + '{{Section4='+((apiCommands.rounds && apiCommands.rounds.exists) ? ('[Show an Area of Effect](!rounds --aoe '+tokenID+')\n') : ('Show an Area of Effect'))+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; - var makePowersMenu = function( args, senderId ) { + const makePowersMenu = function( args, senderId ) { - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('makePowersMenu: invalid tokenID parameter'); sendError('Invalid MagicMaster parameter'); return; } - var content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Powers menu}}' + const content = '&{template:'+fields.menuTemplate+'} {{name='+curToken.get('name')+'\'s Powers menu}}' + '{{Section1=[Use Power](!magic --cast-spell POWER|'+tokenID+') ' + '[View Powers](!magic --view-spell POWER|'+tokenID+')}}' + '{{Section2=[Long Rest](!magic --rest '+tokenID+'|LONG) ' @@ -4639,14 +4644,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * requested level drain (or boost) to be applied to. **/ - var makeLevelDrainMenu = function( args, classes, senderId, msg, totalHP ) { + const makeLevelDrainMenu = function( args, classes, senderId, msg, totalHP ) { - var tokenID = args[0], - charCS = getCharacter(tokenID), - drainLevels = parseInt(args[1]) || -1, - absLevels = Math.abs(drainLevels), - multiLevels = absLevels > 1, - content = '&{template:'+fields.menuTemplate+'}{{title=Level '+(drainLevels > 0 ? 'Boost' : 'Drain')+'}}'+(msg ? '{{Section='+msg+'}}' : '') + const tokenID = args[0], + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, + absLevels = Math.abs(drainLevels), + multiLevels = absLevels > 1; + + let content = '&{template:'+fields.menuTemplate+'}{{title=Level '+(drainLevels > 0 ? 'Boost' : 'Drain')+'}}'+(msg ? '{{Section='+msg+'}}' : '') + '{{desc='+getObj('graphic',tokenID).get('name')+' is being '+(drainLevels > 0 ? 'boosted by' : 'drained of')+' '+absLevels+' level'+(multiLevels ? 's' : '') + '. You will be asked for your Constitution HP adjustment of '+attrLookup( charCS, fields.HPconAdj )+' and the HP dice roll to '+(drainLevels > 0 ? 'add.' : 'deduct - enter the value previously rolled when leveling up') + '. Which class do you want/have to '+(drainLevels > 0 ? 'gain' : 'lose')+' the ' @@ -4685,27 +4691,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function makeSpellsMenu( args, senderId, msg='' ) { try { - var lists = args[0].toUpperCase(), - tokenID = args[1], + let lists = args[0].toUpperCase(); + + const tokenID = args[1], + cmd = args[3].toUpperCase(), + level = parseInt(args[4]) || 1, + retMenu = (args[5] || 'VIEW-ITEM').toUpperCase(), + spellName = args[6].dispName(), + spell = args[6].hyphened(), + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + storeBoth = lists.includes('BOTH'), + storeSpells = lists.includes('SPELLS'), + storePowers = lists.includes('POWERS'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let curSpells = '', item = args[2].hyphened(), - cmd = args[3].toUpperCase(), - level = parseInt(args[4]) || 1, - retMenu = (args[5] || 'VIEW-ITEM').toUpperCase(), - spellName = args[6].dispName(), - spell = args[6].hyphened(), - charCS = getCharacter(tokenID), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isPower = cmd.includes('POWER'), - storeBoth = lists.includes('BOTH'), - storeSpells = lists.includes('SPELLS'), - storePowers = lists.includes('POWERS'), - curSpells = '', storedSelected = false, - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - nextLevel, minLevel, rootDB, listAttr, listType, table, - storedSpellsAttr, storedLevelAttr, choice, itemRow, itemRowID, row, - spellObj, cmdStr, shortCmdStr, desc, question, content; + minLevel, rootDB, listType, table, + storedSpellsAttr, choice, itemRow, itemRowID, row, + spellObj, cmdStr, desc, question; if (/^\d/.test(item)) { row = parseInt(item); @@ -4719,7 +4727,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars row = indexTableGroup( Items, table, itemRow ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('makeSpellsMenu: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -4758,29 +4765,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } args.shift(); - shortCmdStr = [tokenID,row+'/'+item,cmd,level,retMenu].join('|'); + const shortCmdStr = [tokenID,row+'/'+item,cmd,level,retMenu].join('|'); cmdStr = shortCmdStr+'|'+spell; if (charCS) { setAttr( charCS, fields.Casting_name, charCS.get('name')); setAttr( charCS, fields.CastingLevel, minLevel ); curSpells = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr ) || ''; -/* if (_.isUndefined(attrLookup( charCS, pwList ))) setAttr( charCS, pwList, '' ); - if (_.isUndefined(attrLookup( charCS, pwVals ))) setAttr( charCS, pwVals, '' ); - if (_.isUndefined(attrLookup( charCS, muList ))) setAttr( charCS, muList, '' ); - if (_.isUndefined(attrLookup( charCS, muVals ))) setAttr( charCS, muVals, '' ); - if (_.isUndefined(attrLookup( charCS, prList ))) setAttr( charCS, prList, '' ); - if (_.isUndefined(attrLookup( charCS, prVals ))) setAttr( charCS, prVals, '' ); -*/ } - - content = '&{template:'+fields.menuTemplate+'}{{name=Store Spells & Powers}}{{Section='+(msg||'')+'}}' - + '{{Section1=**How to use this menu**\nThe [Choose] button selects a spell of the type indicated. It can then be reviewed or stored. *Powerful* items can store Wizard & Priest spells as Powers.' - + ' *Spell Storing* items only store spells. To *Remove* a stored spell, select its name and the [Remove] button will appear}}' - + '{{'+desc+'='; +// if (_.isUndefined(attrLookup( charCS, pwList ))) setAttr( charCS, pwList, '' ); +// if (_.isUndefined(attrLookup( charCS, pwVals ))) setAttr( charCS, pwVals, '' ); +// if (_.isUndefined(attrLookup( charCS, muList ))) setAttr( charCS, muList, '' ); +// if (_.isUndefined(attrLookup( charCS, muVals ))) setAttr( charCS, muVals, '' ); +// if (_.isUndefined(attrLookup( charCS, prList ))) setAttr( charCS, prList, '' ); +// if (_.isUndefined(attrLookup( charCS, prVals ))) setAttr( charCS, prVals, '' ); + } + + let content = '&{template:'+fields.menuTemplate+'}{{name=Store Spells & Powers}}{{Section='+(msg||'')+'}}' + + '{{Section1=**How to use this menu**\nThe [Choose] button selects a spell of the type indicated. It can then be reviewed or stored. *Powerful* items can store Wizard & Priest spells as Powers.' + + ' *Spell Storing* items only store spells. To *Remove* a stored spell, select its name and the [Remove] button will appear}}' + + '{{'+desc+'=', + selected = false; curSpells = curSpells.split(',').filter(e=>!!e); for (let storedSpell of curSpells) { - let selected = storedSpell.dbName() === spell.dbName(); + selected = storedSpell.dbName() === spell.dbName(); storedSelected = storedSelected || selected; content += (selected ? (''+storedSpell.dispName()+'') : ('['+storedSpell.dispName()+'](!magic --button CHOOSE_'+lists+'|'+shortCmdStr+'|'+storedSpell+')')); } @@ -4843,13 +4851,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * usually used to set short or long menus. */ - var handleOptionButton = function( args, senderId ) { + const handleOptionButton = function( args, senderId ) { - var cmd = args[0].toUpperCase(), - isView = cmd.includes('VIEW'), - tokenID = args[1], - optionValue = args[2].toLowerCase(), - config = getSetPlayerConfig( senderId ) || {}; + const cmd = args[0].toUpperCase(), + isView = cmd.includes('VIEW'), + tokenID = args[1], + optionValue = args[2].toLowerCase(); + + let config = getSetPlayerConfig( senderId ) || {}; if (cmd !== BT.SECTIONS_OPTION && !['short','long','list','alpha','full'].includes(optionValue)) { sendError( 'Invalid MagicMaster menuType option.' ); @@ -4918,13 +4927,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle specification of a different number of Misc spells */ - var handleSetMiscSpell = function( args, senderId ) { + const handleSetMiscSpell = function( args, senderId ) { - var tokenID = args[1], - spellClass = args[2], - level = args[3], - noSpells = args[4] || 0, - charCS = getCharacter(tokenID); + const tokenID = args[1], + spellClass = args[2], + level = args[3], + noSpells = args[4] || 0, + charCS = getCharacter(tokenID); if (spellClass == 'MU') { setAttr( charCS, [fields.MUSpellNo_table[0] + level + fields.MUSpellNo_misc[0],fields.MUSpellNo_misc[1]], noSpells ); @@ -4941,23 +4950,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or a power-selection button **/ - var handleChooseSpell = function( args, senderId ) { + const handleChooseSpell = function( args, senderId ) { if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleChooseSpell: invalid row or column'); sendError('Internal MagicMaster error'); - } - - if (args[0] == BT.MI_SPELL || args[0] == BT.MI_SCROLL || args[0].toUpperCase().includes('POWER')) { - var charCS = getCharacter(args[1]), - storedLevel = attrLookup( charCS, fields.Spells_storedLevel, fields.Spells_table, args[3], args[4] ); + } else if (args[0] == BT.MI_SPELL || args[0] == BT.MI_SCROLL || args[0].toUpperCase().includes('POWER')) { + const charCS = getCharacter(args[1]), + storedLevel = attrLookup( charCS, fields.Spells_storedLevel, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); if (storedLevel && storedLevel > 0) { setAttr( charCS, fields.CastingLevel, storedLevel ); setAttr( charCS, fields.MU_CastingLevel, storedLevel ); setAttr( charCS, fields.PR_CastingLevel, storedLevel ); } } - makeCastSpellMenu( args, senderId ); return; @@ -4967,60 +4972,60 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a selected spell being cast */ - var handleCastSpell = function( args, senderId ) { + const handleCastSpell = function( args, senderId ) { - const setValue = (...a) => libRPGMaster.setAttr(...a); + let db, action; - var tokenID = args[1], - rowIndex = args[3], - colIndex = args[4], - charCS = getCharacter(tokenID), - db, action, - delScrollSpell = function ( charCS, spellName, scrollName, scrollRow, scrollRowID, type, nameField, valueField ) { - spellName = spellName.dbName(); - scrollName = scrollName.replace(/\s/g,'-'); - var muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, nameField ) || '').split(','), - nameIndex = _.findIndex( muSpellList, e => e.dbName() == spellName ); - if (nameIndex >= 0) { - var listField = [nameField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),nameField[1]], - valField = [valueField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),valueField[1]], - rowField = [fields.MIspellRows[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellRows[1]], - colField = [fields.MIspellCols[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellCols[1]]; - - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, listField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, valueField ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, valField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellRows, type ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, rowField, muSpellList.join(',') ); - muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellCols, type ) || '').split(','); - muSpellList.splice( nameIndex, 1 ); - setValue( charCS, colField, muSpellList.join(',') ); - - } - return !muSpellList.filter(t => t.length).length; - }; + const tokenID = args[1], + rowIndex = args[3], + colIndex = args[4], + charCS = getCharacter(tokenID); + + const setValue = (...a) => libRPGMaster.setAttr(...a); + + const delScrollSpell = function ( charCS, spellName, scrollName, scrollRow, scrollRowID, type, nameField, valueField ) { + spellName = spellName.dbName(); + scrollName = scrollName.replace(/\s/g,'-'); + let muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, nameField ) || '').split(','); + const nameIndex = _.findIndex( muSpellList, e => e.dbName() == spellName ); + if (nameIndex >= 0) { + const listField = [nameField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),nameField[1]], + valField = [valueField[0]+scrollName+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),valueField[1]], + rowField = [fields.MIspellRows[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellRows[1]], + colField = [fields.MIspellCols[0]+scrollName+'-'+type+(_.isUndefined(scrollRowID) ? '' : '+'+scrollRowID),fields.MIspellCols[1]]; + + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, listField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, valueField ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, valField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellRows, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, rowField, muSpellList.join(',') ); + muSpellList = (miSpellLookup( charCS, scrollName, scrollRow, scrollRowID, fields.MIspellCols, type ) || '').split(','); + muSpellList.splice( nameIndex, 1 ); + setValue( charCS, colField, muSpellList.join(',') ); + + } + return !muSpellList.filter(t => t.length).length; + }; if (!charCS) { - sendDebug('handleCastSpell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleCastSpell: invalid row or column'); sendError('Internal MagicMaster error'); } - var oldVer = 2.1 > csVer(charCS), - spellTables = getTable( charCS, fieldGroups.SPELLS, colIndex ), - spellName = spellTables.tableLookup( fields.Spells_name, rowIndex ).hyphened(), - spellMsg = spellTables.tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), rowIndex ), - charName = charCS.get('name'), + let spellTables = getTable( charCS, fieldGroups.SPELLS, colIndex ), absorb = false, miName = '', Items; + const oldVer = 2.1 > csVer(charCS), + spellName = spellTables.tableLookup( fields.Spells_name, rowIndex ).hyphened(), + charName = charCS.get('name'); + let spellMsg = spellTables.tableLookup( (oldVer ? fields.Spells_macro : fields.Spells_msg), rowIndex ); switch (args[0].toUpperCase()) { case BT.CAST_MIPOWER: @@ -5054,10 +5059,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; } - var spell = getAbility( db, spellName, charCS ), - spellCost = ((!!spell.obj && !!spell.ct && ((args[0] === BT.CAST_MUSPELL) || (args[0] === BT.CAST_PRSPELL))) ? spell.obj[1].cost : 0), - totalLeft, table, itemRow, itemRowID, - content, + const spell = getAbility( db, spellName, charCS ), + spellCost = ((!!spell.obj && !!spell.ct && ((args[0] === BT.CAST_MUSPELL) || (args[0] === BT.CAST_PRSPELL))) ? spell.obj[1].cost : 0); + let table, itemRow, itemRowID, spellValue = parseInt((spellTables.tableLookup( fields.Spells_castValue, rowIndex )),10); setValue( charCS, fields.SpellToMem, spellName ); @@ -5073,7 +5077,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (absorb) { - let level = (!spell.obj || !spell.obj[1]) ? 1 : (parseInt(spell.obj[1].type.match(/\d+/)) || 0); + const level = (!spell.obj || !spell.obj[1]) ? 1 : (parseInt(spell.obj[1].type.match(/\d+/)) || 0); if (!isNaN(itemRow)) { Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'qty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'qty'], itemRow ) || 0)-level,0) ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueQty'], itemRow, Math.max(parseInt(Items[table].tableLookup( fields[fieldGroups[table].prefix+'trueQty'], itemRow ) || 0)-level,0) ); @@ -5102,10 +5106,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendResponse( charCS, spellMsg, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); } - totalLeft = spendMoney( charCS, spellCost ); - content = charName + ' is '+action+' [' + spellName.dispName() + '](! /w gm %{'+spell.dB+'|'+(spellName.hyphened())+'})' - + (parseInt(spellCost || 0) ? (' at a cost of [[' + spellCost + ']]GP (leaving [[' + totalLeft + ']]GP).') : '') - + ' Select ' + charName + '\'s token before pressing to see effects.'; + const totalLeft = spendMoney( charCS, spellCost ); + const content = charName + ' is '+action+' [' + spellName.dispName() + '](! /w gm %{'+spell.dB+'|'+(spellName.hyphened())+'})' + + (parseInt(spellCost || 0) ? (' at a cost of [[' + spellCost + ']]GP (leaving [[' + totalLeft + ']]GP).') : '') + + ' Select ' + charName + '\'s token before pressing to see effects.'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); return; @@ -5115,19 +5119,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle targeting the effects of a spell * Moved to RoundMaster to allow passing of the PlayerID */ - - var handleSpellTargeting = function( args, isGM ) { - - var tokenID = args[0], - curToken = getObj('graphic',tokenID), - tokenName, - thac0, - strHitBonus, - content, - charCS = getCharacter(tokenID); + + const handleSpellTargeting = function( args, isGM ) { + + const tokenID = args[0], + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSpellTargeting: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } @@ -5138,12 +5137,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } args.shift(); - tokenName = curToken.get('name'); - thac0 = getTokenValue( curToken, fields.Token_thac0, fields.Thac0_base, fields.MonsterThac0, fields.Thac0_base ).val || 20; - strHitBonus = attrLookup( charCS, fields.Strength_hit ) || 0; - content = (isGM ? '/w gm ' : '')+'&{template:'+fields.menuTemplate+'}{{name=Try to Touch Target}}' - + '{{desc=**'+tokenName+' hits AC [[( ([['+thac0+']][Thac0]) - ([['+strHitBonus+']][Strength bonus]) - [[1d20]][Dice Roll] )]] with their spell.**}}' - + '{{desc1=If hit, [Cast on them](!rounds --target SINGLE|'+tokenID+'|@{target|Who to Attack with this spell?|token_id}|'+args.join('|')+')}}'; + const tokenName = curToken.get('name'), + thac0 = getTokenValue( curToken, fields.Token_thac0, fields.Thac0_base, fields.MonsterThac0, fields.Thac0_base ).val || 20, + strHitBonus = attrLookup( charCS, fields.Strength_hit ) || 0, + content = (isGM ? '/w gm ' : '')+'&{template:'+fields.menuTemplate+'}{{name=Try to Touch Target}}' + + '{{desc=**'+tokenName+' hits AC [[( ([['+thac0+']][Thac0]) - ([['+strHitBonus+']][Strength bonus]) - [[1d20]][Dice Roll] )]] with their spell.**}}' + + '{{desc1=If hit, [Cast on them](!rounds --target SINGLE|'+tokenID+'|@{target|Who to Attack with this spell?|token_id}|'+args.join('|')+')}}'; setAbility( charCS, 'To-Hit-Spell', content ); return; @@ -5154,15 +5153,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Used when selecting a spell or slot to memorise, * or when changing level of spell to memorise. */ - - var handleRedisplayManageSpells = function( args, senderId ) { + + const handleRedisplayManageSpells = function( args, senderId ) { - var isPower = args[0].toUpperCase().includes('POWER'), - msg = '', - name = getObj('graphic',args[1]).get('name'); + const isPower = args[0].toUpperCase().includes('POWER'), + name = getObj('graphic',args[1]).get('name'); + + let msg = ''; if (args[3] > 0 && args[4] > 0 && (!args[5] || !args[5].length)) { - args[5] = attrLookup( getCharacter(args[1]), fields.Spells_name, fields.Spells_table, args[3], args[4] ); + args[5] = attrLookup( getCharacter(args[1]), fields.Spells_name, {tableDef:fields.Spells_table, row:args[3], col:args[4]} ); } // Check this is a spell that is of a school that can be memorised @@ -5188,100 +5188,43 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - /* - * Review a chosen spell description - * Stubbed out as greyOutButtons now deals with this - */ - - var handleReviewSpell = function( args, senderId ) { - -/* var cmd = args[0].toUpperCase(), - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isMI = cmd.includes('MI'), - isPower = cmd.includes('POWER'), - isSpell = cmd.includes('SPELL'), - isScroll = cmd.includes('SCROLL'), - isView = !cmd.includes('REVIEW'), - isGM = args[0].includes('GM'), - tokenID = args[1], - followOn, - msg, - charCS = getCharacter(tokenID); - - if (!charCS) { - sendDebug('handleReviewSpell: invalid tokenID parameter'); - sendError('Internal MagicMaster error'); - return; - } - - if (isMI) { - if (isGM) { - followOn = 'GM-MImenu'; - } else if (isPower) { - followOn = (isView ? BT.VIEWMEM_MI_POWERS : BT.EDIT_MIPOWERS); - } else if (isMU) { - followOn = (isView ? BT.VIEWMEM_MI_MUSPELLS : BT.EDIT_MIMUSPELLS); - } else if (isPR) { - followOn = (isView ? BT.VIEWMEM_MI_PRSPELLS : BT.EDIT_MIPRSPELLS); - } else if (isSpell) { - followOn = (isView ? BT.VIEWMEM_MI_SPELLS : BT.EDIT_MISPELLS); - } else if (isScroll) { - followOn = (isView ? BT.VIEWMEM_MI_SCROLL : BT.EDIT_MISPELLS); - } else { - followOn = (isView ? BT.VIEW_MI : (args[0].includes('MARTIAL') ? BT.CHOOSE_MARTIAL_MI : (args[0].includes('ALLITEMS') ? BT.CHOOSE_ALLITEMS_MI : BT.CHOOSE_MI))); - } - } else if (isPower) { - followOn = (isView ? BT.VIEWMEM_POWERS : BT.EDIT_POWERS); - } else if (isMU) { - followOn = (isView ? BT.VIEWMEM_MUSPELLS : BT.EDIT_MUSPELLS); - } else { - followOn = (isView ? BT.VIEWMEM_PRSPELLS : BT.EDIT_PRSPELLS); - } - - args[0] = followOn; -// msg = '[Return to menu](!magic --button '+args.join('|')+')'; -// setTimeout(() => sendResponse( charCS, msg, senderId, flags.feedbackName, flags.feedbackImg, tokenID ),500); -*/ - return; - } - /* * Handle learning a spell from a spellbook or scroll */ - - var handleLearnSpell = function( args, senderId ) { + + const handleLearnSpell = function( args, senderId ) { - var cmd = (args[0] || ''), - tokenID = args[1], - spell = (args[2] || ''), - learnt = cmd.toUpperCase().includes('LEARNT'), - charCS = getCharacter(tokenID), - spellObj,spellData,level; + const cmd = (args[0] || ''), + tokenID = args[1], + spell = (args[2] || ''), + learnt = cmd.toUpperCase().includes('LEARNT'), + charCS = getCharacter(tokenID), + spellObj = abilityLookup( fields.MU_SpellsDB, spell, charCS ); - spellObj = abilityLookup( fields.MU_SpellsDB, spell, charCS ); if (!spellObj.obj) { sendError('The spell '+spell+' has not been found in any database.',msg_orig[senderId]); return; } - spellData = parseData((spellObj.data()[0][0] || {}),reSpellSpecs); - level = spellData.level; + const spellData = parseData((spellObj.data()[0][0] || {}),reSpellSpecs), + level = spellData.level; + if (!level || level < 1 || level > 9) { sendError('The spell '+spell+' is of an unrecognised level '+level,msg_orig[senderId]); return; } - var content = '&{template:RPGMdefault}{{name=Add spell to '+charCS.get('name')+'\'s spellbook}}{{desc=', - name = getObj('graphic',tokenID).get('name'), - spellbook = [fields.Spellbook[0]+spellLevels.mu[level].book,fields.Spellbook[1]], - curList = (attrLookup(charCS,spellbook) || ''), - saveObj = saveFormat.Checks.Learn_Spell, - save = parseInt(attrLookup( charCS, saveObj.save ) || 0), - saveMod = parseInt(attrLookup( charCS, saveObj.mod ) || 0), - saveAdj = parseInt(attrLookup( charCS, fields.Magic_saveAdj ) || 0), - saveSpec = checkValidSpell( ['MU',tokenID,'','','',spell] ), - specMod = saveSpec > 2 ? 15 : (saveSpec > 1 ? -15 : 0), - learnChance = Math.max(5,Math.min((save-saveMod-saveAdj+specMod),99)); + let content = '&{template:RPGMdefault}{{name=Add spell to '+charCS.get('name')+'\'s spellbook}}{{desc='; + + const name = getObj('graphic',tokenID).get('name'), + spellbook = [fields.Spellbook[0]+spellLevels.mu[level].book,fields.Spellbook[1]], + curList = (attrLookup(charCS,spellbook) || ''), + saveObj = saveFormat.Checks.Learn_Spell, + save = parseInt(attrLookup( charCS, saveObj.save ) || 0), + saveMod = parseInt(attrLookup( charCS, saveObj.mod ) || 0), + saveAdj = parseInt(attrLookup( charCS, fields.MagicSaveAdj ) || 0), + saveSpec = checkValidSpell( ['MU',tokenID,'','','',spell] ), + specMod = saveSpec > 2 ? 15 : (saveSpec > 1 ? -15 : 0), + learnChance = Math.max(5,Math.min((save-saveMod-saveAdj+specMod),99)); if (!saveSpec) { content += 'The spell '+spell+' is of a school and/or level that '+name+' cannot learn!'; @@ -5289,7 +5232,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content += 'The spell '+spell+' is already in '+charCS.get('name')+'\'s spellbook'; } else if (!learnt) { args.shift(); - let checkMacro = '&{template:RPGMdefault}{{name='+name+' Check vs Learn Spell}}{{Check Throw=Rolling [[?{Learn Spell roll|'+saveObj.roll+'}cf<'+(learnChance-1)+'cs>'+learnChance+']] vs. [[0+'+learnChance+']] target}}{{Result=Check Throw<='+learnChance+'}}{{desc=**'+name+'\'s target**[[0+'+save+']] base save vs. Learn_Spell with [[0+'+specMod+']] change from specialism, [[0+'+saveMod+']] improvement from race, class & Magic Items, and [[0+'+saveAdj+']] improvement from current magic effects}}{{successcmd=!magic --button '+BT.LEARNT_MUSPELL+'|'+args.join('|')+'}}'; + const checkMacro = '&{template:RPGMdefault}{{name='+name+' Check vs Learn Spell}}{{Check Throw=Rolling [[?{Learn Spell roll|'+saveObj.roll+'}cf<'+(learnChance-1)+'cs>'+learnChance+']] vs. [[0+'+learnChance+']] target}}{{Result=Check Throw<='+learnChance+'}}{{desc=**'+name+'\'s target**[[0+'+save+']] to Learn Spell with [[0+'+specMod+']] change from specialism, [[0+'+saveMod+']] improvement from race, class & Magic Items, and [[0+'+saveAdj+']] improvement from current magic effects}}{{successcmd=!magic --button '+BT.LEARNT_MUSPELL+'|'+args.join('|')+'}}'; setAbility(charCS,'Do-not-use-Learn_Spell-save',checkMacro); content += 'Can you learn the spell "'+spell+'"? [Assess your chance](~'+charCS.get('name')+'|Do-not-use-Learn_Spell-save)'; } else { @@ -5301,14 +5244,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - - /* * Return to the spell storing menu after a review */ - - var handleRevStore = function( args, senderId ) { - let cmd = args.shift().toUpperCase(); + + const handleRevStore = function( args, senderId ) { + const cmd = args.shift().toUpperCase(); setTimeout( () => sendFeedback( ('[Return to menu](!magic --button '+cmd.replace('REVIEW','CHOOSE')+'|'+args.join('|')+')'), flags.feedbackName ), 500); } @@ -5316,31 +5257,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle memorising a selected spell in a selected slot */ - var handleMemoriseSpell = function( args, senderId ) { - - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isPower = args[0].toUpperCase().includes('POWER'), - isAll = args[0].toUpperCase().includes('ALL'), - tokenID = args[1], - level = args[2], - row = args[3], - col = args[4], - spellName = args[5], - noToMemorise = parseInt((args[6]),10), - castAsLvl = parseInt((args[7]),10), - dbCS, - charCS = getCharacter(tokenID); + const handleMemoriseSpell = function( args, senderId ) { + + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + isPower = args[0].toUpperCase().includes('POWER'), + isAll = args[0].toUpperCase().includes('ALL'), + tokenID = args[1], + level = args[2], + row = args[3], + col = args[4], + spellName = args[5], + noToMemorise = parseInt((args[6]),10), + castAsLvl = parseInt((args[7]),10), + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleMemoriseSpell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } if (args[3].length == 0 || isNaN(args[3]) || args[4].length == 0 || isNaN(args[4])) { - sendDebug('handleMemoriseSpell: invalid row or column'); - sendError('Internal MagicMaster error'); + row = undefined; + if (isPower && !!spellName && !!spellName.length) { + [row,col] = powerRowCol( charCS, spellName ); + } + if (!isPower || _.isUndefined(row)) { + sendError('Internal MagicMaster error'); + return; + } } if (isNaN(noToMemorise)) { @@ -5348,9 +5293,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var rootDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), - spellTables = getTable( charCS, (isPower ? fieldGroups.POWERS : fieldGroups.SPELLS), col ), - base = spellLevels[(isPower ? (isMI ? 'pm' : 'pw') : (isMI ? 'mi' : (isMU ? 'mu' : 'pr')))][level].base, + const rootDB = isPower ? fields.PowersDB : (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), + base = spellLevels[(isPower ? (isMI ? 'pm' : 'pw') : (isMI ? 'mi' : (isMU ? 'mu' : 'pr')))][level].base; + + let spellTables = getTable( charCS, (isPower ? fieldGroups.POWERS : fieldGroups.SPELLS), col ), altSpellTable; if (!isPower) { @@ -5366,7 +5312,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, ['power-'+spellName, 'max'], col ); } - var hand = spellTables.tableLookup( fields.Spells_equip, row ); + const hand = spellTables.tableLookup( fields.Spells_equip, row ); if (spellTables.tableLookup( fields.Spells_weapon, row ) === '1' && (hand)) { sendAPI(fields.attackMaster+' --button '+(hand==='2'?BT.BOTH:(hand==='1'?BT.LEFT:(hand==='0'?BT.RIGHT:BT.HAND)))+'|'+tokenID+'|'+row+':'+col+'|'+hand); @@ -5385,24 +5331,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle memorising all currently valid powers at once */ - + async function handleMemAllPowers( args, senderId, silent=false ) { - var cmd = args[0], - isMU = cmd.toUpperCase().includes('MU'), - isPower = cmd.toUpperCase().includes('POWER'), - tokenID = args[1], - charCS = getCharacter( tokenID ), - spellTables = [], - db, type, txt, name, levelSpells; + const cmd = args[0], + isMU = cmd.toUpperCase().includes('MU'), + isPower = cmd.toUpperCase().includes('POWER'), + tokenID = args[1], + charCS = getCharacter( tokenID ); + + let spellTables = [], + db, type, txt, name; - var memSpell = function(args,charCS,db,isPower,list,i,r,c,senderId) { + const memSpell = function(args,charCS,db,isPower,list,i,r,c,senderId) { return new Promise(resolve => { - var spellDef, clv = false; + let spellDef, clv = false; try { + let k; for (let j=list.length; j > 0 && !clv; j--) { - let k = (randomInteger(list.length)-1); + k = (randomInteger(list.length)-1); spellDef = isPower ? findPower( charCS, list.shift() ) : abilityLookup( db, list[k] ); if (spellDef.obj) { args[5] = spellDef.obj[1].name; @@ -5411,12 +5359,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; }; if (clv) { - let newArgs = [args[0],args[1],i,r,c,spellDef.obj[1].name,(isPower ? getUsesPerDay(charCS,spellDef.obj[1].name,senderId) : 1),clv]; + const newArgs = [args[0],args[1],i,r,c,spellDef.obj[1].name,(isPower ? getUsesPerDay(charCS,spellDef.obj[1].name,senderId) : 1),clv]; handleMemoriseSpell( newArgs, senderId ); }; } catch (e) { log('MagicMaster memSpell: JavaScript '+e.name+': '+e.message+' while processing sheet '+charCS.get('name')); - sendDebug('MagicMaster memSpell: JavaScript '+e.name+': '+e.message+' while processing sheet '+charCS.get('name')); sendCatchError('MagicMaster',msg_orig[senderId],e); } finally { setTimeout(() => { @@ -5441,23 +5388,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars db = fields.PR_SpellsDB; txt = 'priest spells'; } - levelSpells = shapeSpellbook( charCS, type ); + const levelSpells = shapeSpellbook( charCS, type ); + let r = 0, storeList = false, newList = [], list = [], s = 0, c, cellExists = false, castAsLevel = false; for (let i = 1; i < levelSpells.length; i++) { - let r = 0; - let storeList = false; - let newList = []; - let list = (attrLookup(charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ]) || '').split('|').filter(t=>!!t); - let s = (isPower) ? list.length : levelSpells[i].spells; + r = 0; + storeList = false; + newList = []; + list = (attrLookup(charCS, [fields.Spellbook[0]+levelSpells[i].book, fields.Spellbook[1] ]) || '').split('|').filter(t=>!!t); + s = (isPower) ? list.length : levelSpells[i].spells; if (s > 0 && (!list || !list.join('').length || list.join('') == '-')) { list = _.uniq(getMagicList( db, spTypeLists, (isPower ? 'power' : (isMU ? 'muspelll'+i : 'prspelll'+i)), senderId ).toLowerCase().split(/\,|\|/)); storeList = true; }; - let c = levelSpells[i].base; - let cellExists = true; + c = levelSpells[i].base; + cellExists = true; while (s > 0 || cellExists) { c = levelSpells[i].base; for (let w = 1; (w <= fields.SpellsCols); w++) { - let castAsLevel = false; + castAsLevel = false; if (!spellTables[w]) { spellTables[w] = getTable( charCS, fieldGroups.SPELLS, c ); } @@ -5477,7 +5425,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables = []; }; if (silent) { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleMemAllPowers'); return; } @@ -5494,21 +5442,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a level change request */ - var handleLevelDrain = function( args, senderId, msg = '' ) { + const handleLevelDrain = function( args, senderId, msg = '' ) { - var tokenID = args[0], // tokenID - charCS = getCharacter(tokenID), - drainLevels = parseInt(args[1]) || -1, // +1 - fixedClass = args[6] || '', // ranger - classChosen = args[2] || fixedClass, // ranger - totalLevels = parseInt(args[3]) || drainLevels, // +1 + const tokenID = args[0], // tokenID + charCS = getCharacter(tokenID), + drainLevels = parseInt(args[1]) || -1, // +1 + fixedClass = args[6] || '', // ranger + totalLevels = parseInt(args[3]) || drainLevels, // +1 + classes = classObjects( charCS, senderId ); + + let classChosen = args[2] || fixedClass, // ranger hitPoints = Math.abs(parseInt(evalAttr(args[4],charCS)) || 0), // [[1d10]] totalHP = parseInt(args[5]) || 0, // always called = 0 loopCount = Math.abs(drainLevels), // 1 increment = drainLevels > 0 ? 1 : -1, //1 levelHP = hitPoints * increment, - classes = classObjects( charCS, senderId ), - levelField, hd, baseClass; + levelField, baseClass; const warriors = ['warrior','fighter'], wizards = ['wizard','mage','magicuser'], @@ -5527,7 +5476,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (psions.includes(fixedClass.dbName())) baseClass = classes.length === 1 ? (psions.includes(classes[0].name) ? classes[0].base : '') : (classes.find(c => psions.includes(c.name)) || {base:''}).base; }; hitPoints = parseInt(hitPoints || evalAttr((classes[0].classData.hd.replace(/(\d+)(d.+)/i,'(('+String(drainLevels)+'*$1)$2)')),charCS)) || 0; - levelHP = hitPoints * increment; + levelHP = hitPoints; loopCount = 1; increment = increment * Math.abs(drainLevels); } else if (!classChosen) { @@ -5561,24 +5510,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } - let hpConBonus = parseInt(attrLookup( charCS, fields.HPconAdj )) || 0; +// let hpConBonus = parseInt(attrLookup( charCS, fields.HPconAdj )) || 0; setAttr( charCS, levelField, Math.max(0,((parseInt(attrLookup( charCS, levelField ) || 1) || 1) + increment)) ); setAttr( charCS, fields.HP,((parseInt(attrLookup( charCS, fields.HP ) || 0) || 0) + levelHP) ); setAttr( charCS, fields.MaxHP, Math.max(0,((parseInt(attrLookup( charCS, fields.MaxHP ) || 0) || 0) + levelHP)) ); totalHP += hitPoints; if (--loopCount > 0) { - let content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen - + ' class by one level, which in total makes '+(Math.abs(totalLevels) - loopCount)+' across all classes.' - + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by one level, which in total makes '+(Math.abs(totalLevels) - loopCount)+' across all classes.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; sendResponse( charCS, content ); handleLevelDrain( [tokenID,(drainLevels-increment),'',totalLevels,0,totalHP,fixedClass], senderId, 'Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen+' class by 1 level' ); } else { setAttr( charCS, fields.Thac0_base, handleGetBaseThac0( charCS ) ); - let content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen - + ' class by '+((fixedClass || Math.abs(increment) > 1) ? (totalLevels+' levels') : ('one level, which in total makes '+totalLevels+' across all classes')) - + ', and recalculated all saves, reassessed all weapon use and reset usable powers.' - + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Change in Level}}{{desc=Successfully '+(increment > 0 ? 'boosted' : 'drained')+' '+classChosen + + ' class by '+((fixedClass || Math.abs(increment) > 1) ? (totalLevels+' levels') : ('one level, which in total makes '+totalLevels+' across all classes')) + + ', and recalculated all saves, reassessed all weapon use and reset usable powers.' + + ' A total of '+totalHP+'HP have been '+(increment > 0 ? 'gained' : 'lost')+'}}'; sendResponse( charCS, content ); setTimeout( () => handleMemAllPowers( [BT.MEMALL_POWERS,tokenID,1,-1,-1,'',''], senderId, true ), 100); setTimeout( () => handleCheckWeapons( tokenID, charCS ), 200); @@ -5589,40 +5538,39 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle undertaking a short rest to recover 1st level spells */ - - var handleRest = function( args, senderId ) { + + const handleRest = function( args, senderId ) { - var tokenID = args[0], - isShort = args[1].toLowerCase().includes('short'), - casterType = (args[2] || 'MU+PR').toUpperCase(), - spellName = (args[3] || '').dbName(), - r, c, w, - col, rep; + const tokenID = args[0], + charCS = getCharacter(tokenID), + isShort = args[1].toLowerCase().includes('short'), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let spellName = (args[3] || '').dbName(), + r, c, w; if (casterType.includes('MI') && casterType.includes('POWER')) { return; } + if (!charCS) { + sendError('Internal MagicMaster error'); + return; + } + if (!isNaN(spellName)) spellName = ''; - var isMU = casterType.includes('MU'), + let isMU = casterType.includes('MU'), isPR = casterType.includes('PR'), isMI = !isShort, isPower = !isShort, - isMIPower = !isShort, - charCS = getCharacter(tokenID); + isMIPower = !isShort; - if (!charCS) { - sendDebug('handleRest: invalid tokenID parameter'); - sendError('Internal MagicMaster error'); - return; - } - - var levelSpells, + let levelSpells, level, levelLimit, restType, - powerQty, valueObj, + spell, spellTables = []; while (isMU || isPR || isPower || isMIPower) { @@ -5644,7 +5592,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars spellTables[w] = getTableField( charCS, spellTables[w], fields.Spells_table, fields.Spells_castValue, c ); } valueObj = spellTables[w].tableLookup( fields.Spells_castValue, r, true, true ); - let spell = spellTables[w].tableLookup( fields.Spells_name, r ) || '-'; + spell = spellTables[w].tableLookup( fields.Spells_name, r ) || '-'; if (!valueObj) { levelSpells[level].spells = 0; break; @@ -5684,18 +5632,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (isMI) { - let miBase = 0, - MagicItems = getTableGroup( charCS, fieldGroups.MI ); + let MagicItems = getTableGroup( charCS, fieldGroups.MI ), + prefix, miSpeedObj, miQtyObj, miTrueName, miType, miReveal, ItemSpecs; for (const table in MagicItems) { - for (r = miBase; r < (MagicItems[table].sortKeys.length+miBase); r++) { - let prefix = fieldGroups[table].prefix; - let miSpeedObj = MagicItems[table].tableLookup( fields[prefix+'speed'], r, true, true ), - miQtyObj = MagicItems[table].tableLookup( fields[prefix+'qty'], r, true, true ), - miTrueName = MagicItems[table].tableLookup( fields[prefix+'trueName'], r ), - miType = MagicItems[table].tableLookup( fields[prefix+'type'], r ), - miReveal = MagicItems[table].tableLookup( fields[prefix+'reveal'], r ).toLowerCase(), - ItemSpecs = abilityLookup( fields.MagicItemDB, miTrueName, charCS ); + for (r = 0; r < (MagicItems[table].sortKeys.length); r++) { + prefix = fieldGroups[table].prefix; + miSpeedObj = MagicItems[table].tableLookup( fields[prefix+'speed'], r, true, true ); + miQtyObj = MagicItems[table].tableLookup( fields[prefix+'qty'], r, true, true ); + miTrueName = MagicItems[table].tableLookup( fields[prefix+'trueName'], r ); + miType = MagicItems[table].tableLookup( fields[prefix+'type'], r ); + miReveal = MagicItems[table].tableLookup( fields[prefix+'reveal'], r ).toLowerCase(); + ItemSpecs = abilityLookup( fields.MagicItemDB, miTrueName, charCS ); if (_.isUndefined(miSpeedObj) || _.isUndefined(miQtyObj)) {break;} if (miTrueName && miTrueName != '-') { if (miReveal == 'rest') { @@ -5713,7 +5661,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } } -// log('handleRest: while resting, triggering a version test of '+charCS.get('name')+'\'s character sheet'); updateCharSheets( args, senderId ); return; } @@ -5723,69 +5670,59 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * this character, and the global date if it is behind the * character date */ - - var handleTimePassing = function( charCS, timeSpent ) { + + const handleTimePassing = function( charCS, timeSpent ) { timeSpent = Math.ceil(timeSpent); - var charDay = parseInt((attrLookup( charCS, fields.CharDay ) || 0),10) + timeSpent, - today = parseInt((state.moneyMaster.inGameDay || 0),10), - globalDay = Math.max( today, charDay ); + const charDay = parseInt((attrLookup( charCS, fields.CharDay ) || 0),10) + timeSpent, + today = parseInt((state.moneyMaster.inGameDay || 0),10), + globalDay = Math.max( today, charDay ); setAttr( charCS, fields.CharDay, globalDay ); return globalDay; } - /* - * Handle the selection of a magic item - * to use or view - */ - - var handleChooseMI = function( args, senderId ) { - - makeViewUseMI( args, senderId ); - return; - } - /* * Handle viewing or using a magic item. * The calling of the MI macro from the MI-DB is performed * in the [Submit] button of the menu. */ - async function handleViewUseMI( args, isSilent, senderId, charges, chargeOverride='' ) { // get + async function handleViewUseMI( args, isSilent, senderId, charges, chargeOverride='' ) { // miData - var action = args[0].toUpperCase(), - tokenID = args[1], - MIrowref = parseInt(args[2],10), - charCS = getCharacter(tokenID), - msVersion = csVer(charCS), - inHand, inHandRow, content, miData, - index, rowID, table; - + if (isSilent) sendWait(senderId,0,'Magic handleViewUseMI'); + + const action = args[0].toUpperCase(), + tokenID = args[1], + MIrowref = parseInt(args[2],10), + charCS = getCharacter(tokenID); + +// msVersion = csVer(charCS), + if (!charCS) { - sendDebug('handleViewUseMI: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroup( charCS, fieldGroups.MI ); + const MItables = getTableGroup( charCS, fieldGroups.MI ); - [index,table,rowID] = tableGroupIndex( MItables, MIrowref ); + let [index,table,rowID] = tableGroupIndex( MItables, MIrowref ); if (isNaN(MIrowref) || MIrowref < 0 || _.isUndefined(index)) { - sendDebug('handleViewUseMI: invalid MIrowref parameter is '+MIrowref); sendError('Internal MagicMaster error'); return; } - var prefix = MItables[table].fieldGroup, - MInameObj = MItables[table].tableLookup( fields[prefix+'name'], index, false, true ), - MItypeObj = MItables[table].tableLookup( fields[prefix+'type'], index, false, true ), - MIrevealObj = MItables[table].tableLookup( fields[prefix+'reveal'], index, false, true ), - MIname = MInameObj.get(fields.Items_name[1]), - MItrueName = MItables[table].tableLookup( fields[prefix+'trueName'], index ) || MIname, - MIreveal = !MIrevealObj ? '' : MIrevealObj.get(fields.Items_reveal[1]).toLowerCase(); + const prefix = MItables[table].fieldGroup, + MInameObj = MItables[table].tableLookup( fields[prefix+'name'], index, false, true ), + MItypeObj = MItables[table].tableLookup( fields[prefix+'type'], index, false, true ), + MIrevealObj = MItables[table].tableLookup( fields[prefix+'reveal'], index, false, true ); + + let MIname = MInameObj.get(fields.Items_name[1]); + + const MItrueName = MItables[table].tableLookup( fields[prefix+'trueName'], index ) || MIname, + MIreveal = !MIrevealObj ? '' : MIrevealObj.get(fields.Items_reveal[1]).toLowerCase(); setAttr( charCS, fields.ItemChosen, MIname ); setAttr( charCS, fields.ItemRowRef, MIrowref ); @@ -5797,39 +5734,37 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MItypeObj.set(fields.Items_type[1], MItables[table].tableLookup( fields[prefix+'trueType'], index)); MIrevealObj.set(fields.Items_reveal[1], ''); } -// content = '[Return to menu](!magic --button '+BT.CHOOSE_VIEW_MI+'|'+args[1]+'|'+(msVersion < 4 ? '' : args[2])+')'; -// setTimeout(() => sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ),500); checkForBag( charCS, MItrueName, MIrowref ); -// if (msVersion < 4) { -// setTimeout( () => sendAPI('!cmd --button '+BT.SORT_ITEMS+'|'+tokenID), 1000 ); -// }; - return; - } - var charName = charCS.get('name'), - MIqtyObj = MItables[table].tableLookup( fields[prefix+'qty'], index, false, true ), - MIqty = MIqtyObj.get(fields.Items_qty[1]), - MImaxQty = MIqtyObj.get(fields.Items_trueQty[1]), - MItype = (chargeOverride || MItables[table].tableLookup( fields[prefix+'trueType'], index, 'uncharged' ) - || MItables[table].tableLookup( fields[prefix+'type'], index, 'uncharged' )).toLowerCase(), - MIdb = getAbility( fields.MagicItemDB, MIname, charCS, null, null, null, index, rowID ), - MIdbName = MIdb, + return; + } + const MIqtyObj = MItables[table].tableLookup( fields[prefix+'qty'], index, false, true ), + MIqty = MIqtyObj.get(fields.Items_qty[1]), + MImaxQty = MIqtyObj.get(fields.Items_trueQty[1]), + MItype = (chargeOverride || MItables[table].tableLookup( fields[prefix+'trueType'], index, 'uncharged' ) + || MItables[table].tableLookup( fields[prefix+'type'], index, 'uncharged' )).toLowerCase(); + + let MIdb = getAbility( fields.MagicItemDB, MIname, charCS, null, null, null, index, rowID ), MIchangeTo = '', - MIcVal = 1; + MIcVal = 1, + recalcWeight = false, + miData; + + const MIdbName = MIdb; if (MItrueName !== MIname) MIdb = getAbility( fields.MagicItemDB, MItrueName, charCS, null, null, null, index, rowID ); - var displayChangedMI = (row, table, mi) => { + const displayChangedMI = (row, table, mi) => { setAttr( charCS, fields.ItemRowRef, row ); setAttr( charCS, fields.ItemTableRef, table ); setAttr( charCS, fields.ItemChosen, mi ); - let miObj = abilityLookup( fields.MagicItemDB, mi, charCS ); + const miObj = abilityLookup( fields.MagicItemDB, mi, charCS ); if (String(((miObj.obj ? miObj.specs() : undefined) || [['','','','','']])[0][2]).toLowerCase().includes('hide')) { doDisplayAbility( ['c',tokenID,fields.MagicItemDB,mi], null, senderId ); }; }; if (MIdb.obj) { - miData = resolveData( MItrueName, fields.MagicItemDB, reItemData, charCS, {charges:reSpellSpecs.charges,changeTo:reSpellSpecs.changeTo,zero:reSpellSpecs.zero}, index, rowID ).parsed; + miData = resolveData( MItrueName, fields.MagicItemDB, reItemData, charCS, {charges:reSpellSpecs.charges,changeTo:reSpellSpecs.changeTo,zero:reSpellSpecs.zero,on:reSpellSpecs.on}, {row:index, rowID:rowID} ).parsed; MIcVal = miData.charges; MIchangeTo = miData.changeTo; } @@ -5841,23 +5776,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars charges = 1; } if (MIqty < charges) { - content = '&{template:'+fields.menuTemplate+'}{{name=Using '+MIname+'}}{{desc='+MIname+' does not have enough charges left to do this}}' - +'{{desc1=[Show '+MIname+' again](\~'+MIdbName.dB+'|'+MIname+') or do something else}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name=Using '+MIname+'}}{{desc='+MIname+' does not have enough charges left to do this}}' + +'{{desc1=[Show '+MIname+' again](\~'+MIdbName.dB+'|'+MIname+') or do something else}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return false; } - let item = MIname.replace(/\s/g,'-'); +// let item = MIname.replace(/\s/g,'-'); switch (MItype) { case 'change-each': case 'cursed+change-each': if (MIchangeTo && MIchangeTo.length && charges > 0) { - let changeRow,trueTable,chgRowID; - [changeRow,trueTable,chgRowID] = tableGroupFind( MItables, 'trueName', MIchangeTo ); - let toType = resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},changeRow,chgRowID).parsed.type; - if (isNaN(changeRow) || !stackable.includes(resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},changeRow,chgRowID).parsed.type.toLowerCase())) { + let [changeRow,trueTable,chgRowID] = tableGroupFind( MItables, 'trueName', MIchangeTo ); + if (isNaN(changeRow) || !stackable.includes(resolveData(MIchangeTo,fields.MagicItemDB,reItemData,charCS,{recharge:reSpellSpecs.recharge},{row:changeRow,rowID:chgRowID}).parsed.type.toLowerCase())) { [changeRow,trueTable] = await handleStoreMI( ['', tokenID, '', MIchangeTo, charges, 'silent' ], false, senderId ); } else { MItables[trueTable].tableSet( fields[MItables[trueTable].fieldGroup+'qty'], changeRow, (parseInt(MItables[trueTable].tableLookup( fields[MItables[trueTable].fieldGroup+'qty'], changeRow ) || 0)+charges) ); @@ -5890,6 +5823,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MIqtyObj.set('max',(MImaxQty-charges)); // addMIspells( charCS, MIdb.obj[1], rowID ); } + recalcWeight = true; break; case 'selfchargeable': @@ -5922,7 +5856,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (MIqty > charges) checkForBag( charCS, MItrueName, MIrowref ); if ((MIqty - charges == 0) && miData.zero && miData.zero.length) { sendAPI( parseStr(miData.zero).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) - .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); + .replace(/{\s*selected\s*\|/ig,'{'+charCS.get('name')+'|'), null, 'magic use-mi'); } if (miData.on && miData.on.length) { sendAPI( parseStr(miData.on).replace(/@{\s*selected\s*\|\s*token_id\s*}/ig,tokenID) @@ -5937,16 +5871,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); - if (isSilent) { - sendWait(senderId,0); - } else { - content = '&{template:'+fields.menuTemplate+'}{{name='+charName+' is using '+MItrueName+(MIname !== MItrueName ? (' hidden as '+MIname) : '')+'}}' - + '{{desc=To see the effects, select '+charName+'\'s token and press ['+MItrueName+'](! /w gm %{'+MIdb.dB+'|'+(MItrueName.hyphened())+'})}}'; + if (!isSilent) { + const charName = charCS.get('name'); + const content = '&{template:'+fields.menuTemplate+'}{{name='+charName+' is using '+MItrueName+(MIname !== MItrueName ? (' hidden as '+MIname) : '')+'}}' + + '{{desc=To see the effects, select '+charName+'\'s token and press ['+MItrueName+'](! /w gm %{'+MIdb.dB+'|'+(MItrueName.hyphened())+'})}}'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); }; // if (msVersion < 4) { // setTimeout( () => sendAPI('!cmd --button '+BT.SORT_ITEMS+'|'+tokenID), 1000 ); // }; + if (recalcWeight) await itemSlotData( tokenID, MItables, senderId ); return true; } @@ -5955,37 +5889,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a Magic Item, and the slot in the MI spellbook * to store it in. */ - - var handleSelectMIspell = function( args, senderId ) { + + const handleSelectMIspell = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMIspell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - spellButton = args[(isMI ? 5 : 2)], - spellRow = args[(isMI ? 6 : 3)], - spellCol = args[(isMI ? 7 : 4)], - MIbutton = args[(isMI ? 2 : 5)], - MIrow = args[(isMI ? 3 : 6)], - MIcol = args[(isMI ? 4 : 7)], - spellName = '', - col, - content = ''; + const isMU = args[0].toUpperCase().includes('MU'), + isMI = args[0].toUpperCase().includes('MI'), + spellButton = args[(isMI ? 5 : 2)], + spellRow = args[(isMI ? 6 : 3)], + spellCol = args[(isMI ? 7 : 4)], + MIbutton = args[(isMI ? 2 : 5)], + MIrow = args[(isMI ? 3 : 6)], + MIcol = args[(isMI ? 4 : 7)]; + + let content = ''; if (spellButton >= 0) { - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, spellRow, spellCol ) || '-'; + const spellName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:spellRow, col:spellCol} ) || '-'; content += 'Selected '+spellName+' to store'; } if (MIbutton >= 0) { - col = (fields.SpellsFirstColNum || MIcol != 1) ? MIcol : ''; - spellName = attrLookup( charCS, fields.Spells_name, fields.Spells_table, MIrow, MIcol ) || '-'; - content += (spellButton >= 0 ? '' : 'Selected to store') + ' in the slot for '+spellName; +// const col = (fields.SpellsFirstColNum || MIcol != 1) ? MIcol : ''; + const miName = attrLookup( charCS, fields.Spells_name, {tableDef:fields.Spells_table, row:MIrow, col:MIcol} ) || '-'; + content += (spellButton >= 0 ? '' : 'Selected to store') + ' in the slot for '+miName; } makeStoreMIspell( args, senderId, content ); return; @@ -5995,31 +5927,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle selecting a magic item power */ - var handleSelectMIpower = function( args, isUse, senderId ) { // table + const handleSelectMIpower = function( args, isUse, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMIpower: invalid token_id'); sendError('Incorrect MagicMaster syntax'); return; } - const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]]; + const dbList = [['PW-',fields.PowersDB],['MU-',fields.MU_SpellsDB],['PR-',fields.PR_SpellsDB],['MI-',fields.MagicItemDB]], + itemName = (args[3] || '').split('/'), + charges = parseInt(args[5] || '1'), + maxChange = parseInt(args[6] || '0'), + miChargeUsed = parseInt(args[7] || '0'), + MIlibrary = charCS; - var powerName = args[2] || '', - itemName = (args[3] || '').split('/'), + let powerName = args[2] || '', castLevel = args[4], - charges = parseInt(args[5] || '1'), - maxChange = parseInt(args[6] || '0'), - miChargeUsed = parseInt(args[7] || '0'), - tokenName = getObj('graphic',tokenID).get('name'), - MIlibrary = charCS, powerType = powerName.substring(0,3), - powerHyphen = powerName.hyphened(), Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), item, powerObj, table, itemRow, itemRowID; + const powerHyphen = powerName.hyphened(); + if (_.some(dbList,dB=>dB[0]===powerType.toUpperCase())) { powerName = powerName.slice(powerType.length); if (!castLevel) castLevel = casterLevel( charCS, powerType.substring(0,2) ); @@ -6041,7 +5972,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('handleSelectMIpower: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -6049,23 +5979,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars powerObj = miSpellLookup( MIlibrary, item, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); }; if (!powerObj) { - sendDebug('handleSelectMIpower: not found item power index attribute for '+item+'-'+powerHyphen); sendError('Invalid item/power combination'); return; }; - var powerRow = powerObj.get('current'), - powerCol = powerObj.get('max'), - magicItem = getAbility( fields.MagicItemDB, item, charCS ), - Powers = getTable( MIlibrary, fieldGroups.POWERS, powerCol ), - power = Powers.tableLookup( fields.Powers_name, powerRow, '-' ), - powerDB = Powers.tableLookup( fields.Powers_db, powerRow, '-' ), + const powerRow = powerObj.get('current'), + powerCol = powerObj.get('max'), + magicItem = getAbility( fields.MagicItemDB, item, charCS ); + + let Powers = getTable( MIlibrary, fieldGroups.POWERS, powerCol ), powerCount = Powers.tableLookup( fields.Powers_castValue, powerRow, 0 ), - toWho = sendToWho(charCS,senderId,false,true), - content = '', powerLib; + + const power = Powers.tableLookup( fields.Powers_name, powerRow, '-' ), + powerDB = Powers.tableLookup( fields.Powers_db, powerRow, '-' ); - if (powerDB != '-' && !powerType) { + if (powerDB !== '-' && !powerType) { powerLib = abilityLookup( powerDB, power, null, true ); } if (!powerLib || !powerLib.obj) { @@ -6073,14 +6002,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (!powerLib.obj) { - sendDebug('handleSelectMIpower: power ability macro not found'); sendError('Invalid Power definition'); return; } powerLib = getAbility( powerLib.dB, power, charCS ); const itemDesc = item.dispName(), - powerDesc = powerName.dispName(); + powerDesc = powerName.dispName(); if (isUse) { if (powerCount > 0) { @@ -6091,15 +6019,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } Powers = Powers.tableSet( fields.Powers_castValue, powerRow, powerCount-charges ); } - content = charCS.get('name') + ' is using [' + power + '](! /w gm %{'+powerLib.dB+'|'+(power.hyphened())+'}). ' - + 'Select ' + charCS.get('name') + '\'s token before pressing to see effects.'; + const content = charCS.get('name') + ' is using [' + power + '](! /w gm %{'+powerLib.dB+'|'+(power.hyphened())+'}). ' + + 'Select ' + charCS.get('name') + '\'s token before pressing to see effects.'; sendFeedback( content, flags.feedbackName, flags.feedbackImg, tokenID, charCS ); } else if (powerCount == 0) { - content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' - + '{{desc=You have already used all **'+itemDesc+'\'s** *'+powerDesc+'* charges for today. ' - + 'You need to allow '+itemDesc+' to have a long rest so it can regain all its powers}}' - + '{{desc1=[Redisplay '+itemDesc+'](~'+magicItem.dB+'|'+item+') or just do something else}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc=You have already used all **'+itemDesc+'\'s** *'+powerDesc+'* charges for today. ' + + 'You need to allow '+itemDesc+' to have a long rest so it can regain all its powers}}' + + '{{desc1=[Redisplay '+itemDesc+'](~'+magicItem.dB+'|'+item+') or just do something else}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); if (!!miChargeUsed) { Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); @@ -6119,8 +6047,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, fields.SpellCharges, (powerCount < 0 ? powerCount : powerCount-charges) ); args.shift(); - content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' - + '{{desc='+tokenName+' is about to use **'+itemDesc+'\'s** '+powerDesc+' power. Is this correct?}}' + const tokenName = getObj('graphic',tokenID).get('name'), + toWho = sendToWho(charCS,senderId,false,true), + content = '&{template:'+fields.menuTemplate+'}{{name='+itemDesc+'\'s '+powerDesc+' power}}' + + '{{desc='+tokenName+' is about to use **'+itemDesc+'\'s** '+powerDesc+' power. Is this correct?}}' + '{{desc1=[Use '+powerDesc+'](! '+(powerLib.api ? '' : toWho)+'%{'+powerLib.dB +'|'+ (power.hyphened()) +'} !magic --button '+ BT.MI_POWER_USED +'|'+ args.join('|')+ ')' + ' or [Return to '+itemDesc+'](! '+(magicItem.api ? '' : toWho)+'%{'+magicItem.dB+'|'+item+'})\nOr just do something else}}'; sendResponse(charCS,content,senderId, flags.feedbackName, flags.feedbackImg, tokenID); @@ -6131,21 +6061,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Restore the uses per day of a single power of a magic item */ - - var handleRestoreMIpowers = function( args, senderId ) { + + const handleRestoreMIpowers = function( args, senderId ) { - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleRestoreMIpower: invalid token_id'); sendError('Incorrect MagicMaster syntax'); return; } - var itemName = args[1] || '', - change = '+-'.includes(args[2][0]), - charges = parseInt(args[2]), - powerName = args[3] || '', + const change = '+-'.includes(args[2][0]), + charges = parseInt(args[2]), + powerName = args[3] || ''; + + let itemName = args[1] || '', Powers = [], row, itemRow, itemRowID, table; @@ -6161,14 +6091,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars row = indexTableGroup( Items, table, itemRow ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('makeSpellsMenu: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var itemHyphen = itemName.replace(/\s/g,'-'), - powersList = (miSpellLookup( charCS, itemHyphen, itemRow, itemRowID, fields.ItemPowersList ) || '').split(','), - action = ((isNaN(charges) || charges > 0) ? 'regained' : 'used'); + const itemHyphen = itemName.replace(/\s/g,'-'); + let powersList = (miSpellLookup( charCS, itemHyphen, itemRow, itemRowID, fields.ItemPowersList ) || '').split(','), + action = ((isNaN(charges) || charges > 0) ? 'regained' : 'used'), + powerHyphen, powerObj, powerRow, powerCol, + maxCharges, curCharges; if (powerName && powersList.includes(powerName)) { powersList = [powerName]; @@ -6179,25 +6110,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars _.each(powersList, powerName => { - let powerHyphen = powerName.replace(/\s/g,'-'), - powerObj = miSpellLookup( charCS, powerHyphen, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); + powerHyphen = powerName.replace(/\s/g,'-'); + powerObj = miSpellLookup( charCS, powerHyphen, itemRow, itemRowID, [fields.MIpowerPrefix[0],null], '', powerHyphen ); // powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+itemHyphen+'+'+itemRow+'-'+powerHyphen, null] ); // if (!powerObj) powerObj = attrLookup( charCS, [fields.MIpowerPrefix[0]+powerHyphen, null] ); if (!powerObj) { - sendDebug('handleRestoreMIpower: not found item power index attribute for '+itemHyphen+'-'+powerHyphen); sendError('Invalid item/power combination'); return; }; - let powerRow = powerObj.get('current'), - powerCol = powerObj.get('max'); + powerRow = powerObj.get('current'); + powerCol = powerObj.get('max'); if (!Powers[powerCol]) { Powers[powerCol] = getTable( charCS, fieldGroups.POWERS, powerCol ); } - let maxCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castMax, powerRow, 1 ) || '1'), - curCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castValue, powerRow, 1 ) || '1'); + maxCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castMax, powerRow, 1 ) || '1'); + curCharges = parseInt(Powers[powerCol].tableLookup( fields.Powers_castValue, powerRow, 1 ) || '1'); if (change && maxCharges >= 0 && !isNaN(charges)) { Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castMax,powerRow,Math.max(0,(charges + maxCharges))); Powers[powerCol] = Powers[powerCol].tableSet(fields.Powers_castValue,powerRow,Math.min(curCharges,(charges + maxCharges))); @@ -6213,86 +6143,83 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle storing a spell from a characters memorised * spells into a spell-storing magic item. */ - - var handleStoreMIspell = function( args, senderId ) { //split + + const handleStoreMIspell = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleStoreMIspell: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var isMU = args[0].toUpperCase().includes('MU'), - isMI = args[0].toUpperCase().includes('MI'), - isChange = args[0].toUpperCase().includes('ANY') || args[0].toUpperCase().includes('CHANGE'), - MIbutton = args[2], - MIrow = args[3], - MIcol = args[4], - spellButton = args[5], - spellRow = args[6], - spellCol = args[7], - item = attrLookup( charCS, fields.ItemChosen ) || '-', - row = attrLookup( charCS, fields.ItemRowRef ) || '', - itemRow, itemRowID, itemTable; - - [itemRow,itemTable,itemRowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), row ); - - var itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), - itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,itemRowID), - storeSpells = (itemData.store || 'store').toLowerCase(), - csv = csVer(charCS), - msgField = (csv >= 2.1 ? fields.Spells_msg : fields.Spells_macro); + const isMU = args[0].toUpperCase().includes('MU'), + MIbutton = args[2], + MIrow = args[3], + MIcol = args[4], + spellButton = args[5], + spellRow = args[6], + spellCol = args[7], + item = attrLookup( charCS, fields.ItemChosen ) || '-'; + + let isChange = args[0].toUpperCase().includes('ANY') || args[0].toUpperCase().includes('CHANGE'), + [itemRow,itemTable,itemRowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), (attrLookup( charCS, fields.ItemRowRef ) || '') ); + + const itemObj = abilityLookup( fields.MagicItemDB, item, charCS ), + itemData = parseData((itemObj.data()[0][0] || {}),reSpellSpecs,true,charCS,item,itemRow,itemRowID), + storeSpells = (itemData.store || 'store').toLowerCase(), + csv = csVer(charCS), + msgField = (csv >= 2.1 ? fields.Spells_msg : fields.Spells_macro); if (isNaN(MIbutton) || MIbutton<0 || isNaN(MIrow) || isNaN(MIcol) || isNaN(spellButton) || spellButton<0 || isNaN(spellRow) || isNaN(spellCol)) { - sendDebug('handleStoreMIspell: invalid button, row or col parameter'); sendError('Internal MagicMaster error'); return; } isChange = isChange || storeSpells === 'any' || storeSpells === 'change'; + + let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); - var SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ), - MIspellsTable = getTable( charCS, fieldGroups.SPELLS, MIcol ), - spellName = SpellsTable.tableLookup( fields.Spells_name, spellRow ).hyphened(), - MIspellName = MIspellsTable.tableLookup( msgField, MIrow ); - + const MIspellsTable = getTable( charCS, fieldGroups.SPELLS, MIcol ), + spellName = SpellsTable.tableLookup( fields.Spells_name, spellRow ).hyphened(), + MIspellName = MIspellsTable.tableLookup( msgField, MIrow ); + if (!isChange && !stdEqual(spellName, MIspellName )) { sendParsedMsg( tokenID, messages.fixedSpell, senderId, getObj('graphic',tokenID).get('name')+'\'s magic item'); makeStoreMIspell( args, senderId, 'Could not store '+spellName+' in '+getObj('graphic',tokenID).get('name')+'\'s spell storing magic item' ); return; } - var values = MIspellsTable.copyValues(), - level = attrLookup( charCS, fields.CastingLevel ), - spellObj = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spellName, charCS ); - + const level = attrLookup( charCS, fields.CastingLevel ), + spellObj = abilityLookup( (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB), spellName, charCS ); + if (!spellObj.obj) { sendError('Not found spell definition for '+spellName+'. Unable to store this spell'); return; } - values[fields.Spells_name[0]][fields.Spells_name[1]] = spellName; - values[fields.Spells_db[0]][fields.Spells_db[1]] = (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB); - values[fields.Spells_speed[0]][fields.Spells_speed[1]] = SpellsTable.tableLookup( fields.Spells_speed, spellRow );; - values[fields.Spells_castValue[0]][fields.Spells_castValue[1]] = 1; - values[fields.Spells_castMax[0]][fields.Spells_castMax[1]] = 1; - values[fields.Spells_storedLevel[0]][fields.Spells_storedLevel[1]] = level; - values[fields.Spells_spellLevel[0]][fields.Spells_spellLevel[1]] = String((spellObj.obj[1].type.match(/\d+/) || 1)); - values[fields.Spells_cost[0]][fields.Spells_cost[1]] = 0; - values[fields.Spells_msg[0]][fields.Spells_msg[1]] = spellName; - values[msgField[0]][msgField[1]] = spellName; - if (csv >= 2.1) values[fields.Spells_macro[0]][fields.Spells_macro[1]] = '%{'+charCS.get('name')+'|'+spellName+'}'; + let p = MIspellsTable.fieldGroup; + let values = initValues( p ); + + values.valLine( p, 'name', spellName ) + .valLine( p, 'db', (isMU ? fields.MU_SpellsDB : fields.PR_SpellsDB) ) + .valLine( p, 'speed', SpellsTable.tableLookup( fields.Spells_speed, spellRow ) ) + .valLine( p, 'castValue', 1 ) + .valLine( p, 'castMax', 1 ) + .valLine( p, 'storedLevel', level ) + .valLine( p, 'spellLevel', String((spellObj.obj[1].type.match(/\d+/) || 1)) ) + .valLine( p, 'cost', 0 ) + .valLine( p, 'msg', spellName ) + .valLine( p, 'macro', ((csv < 2.1) ? spellName : ('%{'+charCS.get('name')+'|'+spellName+'}')) ); MIspellsTable.addTableRow( MIrow, values ); if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { SpellsTable = SpellsTable.tableSet( fields.Spells_castValue, spellRow, 0 ); } - let muRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, '-mu' ), - prRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, '-pr' ), - muCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, '-mu' ), - prCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, '-pr' ), + let muRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'mu' ), + prRows = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellRows, 'pr' ), + muCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'mu' ), + prCols = miSpellLookup( charCS, item, itemRow, itemRowID, fields.MIspellCols, 'pr' ), muSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellsList ), prSpells = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemPRspellsList ), muLevels = miSpellLookup( charCS, item, itemRow, itemRowID, fields.ItemMUspellValues ), @@ -6309,6 +6236,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars prLevels = (prLevels || '').split(','); let index = muRows.findIndex( (e,i) => e == MIrow && muCols[i] == MIcol ), muSave = false, prSave = false; + if (index > -1 && muCols[index] === MIcol) { if (!isMU) { muRows.splice(index,1); @@ -6349,7 +6277,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars prSave = true; } }; - if (muSave) { setAttr( charCS, [fields.MIspellRows[0]+item+'-mu+'+itemRowID,fields.MIspellRows[1]], muRows.join() ); setAttr( charCS, [fields.MIspellCols[0]+item+'-mu+'+itemRowID,fields.MIspellCols[1]], muCols.join() ); @@ -6372,31 +6299,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Add a selected spell or power to a spell-storing item */ - + async function handleChangeSpellStore( args, senderId ) { - var del = args[0].toUpperCase().includes('DEL'), - pwSpell = args[0].toUpperCase().includes('PWR'), - tokenID = args[1], - item = args[2].hyphened(), - cmd = args[3].toUpperCase(), - level = parseInt(args[4]) || 1, - retMenu = args[5], + const del = args[0].toUpperCase().includes('DEL'), + pwSpell = args[0].toUpperCase().includes('PWR'), + tokenID = args[1], + cmd = args[3].toUpperCase(), + retMenu = args[5], + answer1 = args[7], + answer2 = args[8] || answer1, + repSpell = args[9], + spellRow = args[10], + spellCol = args[11], + rep = !!repSpell, + charCS = getCharacter(tokenID), + isMU = cmd.includes('MU'), + isPR = cmd.includes('PR'), + isPower = cmd.includes('POWER'), + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + let item = args[2].hyphened(), spell = args[6].hyphened(), - answer1 = args[7], - answer2 = args[8] || answer1, - repSpell = args[9], - spellRow = args[10], - spellCol = args[11], - rep = !!repSpell, - charCS = getCharacter(tokenID), - maxVal = 0, - isMU = cmd.includes('MU'), - isPR = cmd.includes('PR'), - isPower = cmd.includes('POWER'), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), itemRow, itemRowID, storedSpellsAttr, storedLevelAttr, table, - currentList, currentValues, spellType = 'ALL'; + spellType = 'ALL'; if (/^\d/.test(item)) { itemRow = parseInt(item); @@ -6409,7 +6335,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [itemRow,table,itemRowID] = tableGroupFind( Items, 'name', item ); }; if (_.isUndefined(table) || _.isUndefined(itemRow)) { - sendDebug('handleChangeSpellStore: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } @@ -6430,13 +6355,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars storedLevelAttr = fields.ItemPRspellValues; }; - await moveMIspells( senderId, charCS, itemRow, itemRowID, null, null, null, item, spellType ); + let currentList = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr, '', '', '' ).split(',').filter(e=>!!e), + currentValues = miSpellLookup( charCS, item, itemRow, itemRowID, storedLevelAttr, '', '', '' ).split(',').filter(e=>!!e), + newList = !currentList[0]; - currentList = miSpellLookup( charCS, item, itemRow, itemRowID, storedSpellsAttr, '', '', '' ).split(',').filter(e=>!!e); - currentValues = miSpellLookup( charCS, item, itemRow, itemRowID, storedLevelAttr, '', '', '' ).split(',').filter(e=>!!e); +// await moveMIspells( senderId, charCS, itemRow, itemRowID, null, null, null, item, spellType ); + +// log('handleChangeSpellStore: after moveMIspells, newList = '+newList+', currentList = '+currentList); if (del || rep) { - let index = currentList.findIndex((s,i) => (s === (rep ? repSpell : spell)) && (!rep || currentValues[i].split('.')[0] == 0)); + const index = currentList.findIndex((s,i) => (s === (rep ? repSpell : spell)) && (!rep || currentValues[i].split('.')[0] == 0)); if (rep) { if (index >= 0) { currentList[index] = spell; @@ -6456,8 +6384,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]], currentList.join(',') ); setAttr( charCS, [storedLevelAttr[0]+item+'+'+itemRowID,storedLevelAttr[1]], currentValues.join(',') ); - await moveMIspells( senderId, null, null, null, charCS, itemRow, itemRowID, item, spellType ); + if (newList) { + await moveMIspells( senderId, null, null, null, charCS, itemRow, itemRowID, item, spellType ); + } else { + await moveMIspells( senderId, charCS, itemRow, itemRowID, charCS, itemRow, itemRowID, item, spellType ); + }; +// log('handleChangeSpellStore: after adding, at '+storedSpellsAttr[0]+item+'+'+itemRowID+', currentList = '+currentList+', and stored currentList = '+attrLookup( charCS, [storedSpellsAttr[0]+item+'+'+itemRowID,storedSpellsAttr[1]])); + if (retMenu === 'STORE-MI-SPELL') { let SpellsTable = getTable( charCS, fieldGroups.SPELLS, spellCol ); if (SpellsTable.tableLookup( fields.Spells_castValue, spellRow ) != 0) { @@ -6476,28 +6410,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * handle where somehow the player has been able to select an empty slot **/ - var handlePickupNothing = function( args, pickMI, putSlot, senderId, buy ) { + const handlePickupNothing = function( args, pickMI, putSlot, senderId, buy ) { - var tokenID = args[1], - fromID = args[3], - toID = args[4], - fromRow = args[2], - toRow = args[5], - fromCS = getCharacter(fromID), - toCS = getCharacter(toID); + const tokenID = args[1], + fromID = args[3], + toID = args[4], + fromRow = args[2], + toRow = args[5], + fromCS = getCharacter(fromID), + toCS = getCharacter(toID); if (!fromCS || !toCS){ - sendDebug('handlePickupNothing: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } - var fromName = fromCS.get('name'), - toName = toCS.get('name'), - targetID = (tokenID == fromID) ? toID : fromID, - content = messages.nothingToPick + '{{desc1=Trying to pick up "'+pickMI+'" from '+fromName+' and putting in '+toName+'\'s "'+putSlot+'"}}' - + '{{desc2=[Other way round](!magic --button '+(buy ? BT.BUY_STORE : BT.POP_STORE)+'|'+tokenID+'|'+toRow+'|'+toID+'|'+fromID+'|'+fromRow+'|-1)' - + ' or [Pick something else](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP) +'|'+tokenID+'|'+targetID+')}}'; + const fromName = fromCS.get('name'), + toName = toCS.get('name'), + targetID = (tokenID == fromID) ? toID : fromID, + content = messages.nothingToPick + '{{desc1=Trying to pick up "'+pickMI+'" from '+fromName+' and putting in '+toName+'\'s "'+putSlot+'"}}' + + '{{desc2=[Other way round](!magic --button '+(buy ? BT.BUY_STORE : BT.POP_STORE)+'|'+tokenID+'|'+toRow+'|'+toID+'|'+fromID+'|'+fromRow+'|-1)' + + ' or [Pick something else](!magic --button '+(buy ? BT.BUY_POP : BT.PICK_POP) +'|'+tokenID+'|'+targetID+')}}'; sendParsedMsg( tokenID, content, senderId ); return; }; @@ -6506,11 +6439,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle switching to a treasure menu **/ - var handleTreasure = function( args, senderId ) { + const handleTreasure = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter( tokenID ), - content = makeLootMenu( senderId, args ); + const tokenID = args[1], + charCS = getCharacter( tokenID ), + content = makeLootMenu( senderId, args ); sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; }; @@ -6519,32 +6452,31 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * handle the failure of an attempt to pick pockets **/ - var handlePPfailed = function( args, senderId ) { + const handlePPfailed = function( args, senderId ) { - var tokenID = args[1], - pickID = args[2], - putID = args[3], - ppRoll = parseInt(args[4],10), - search = putID === tokenID, - targetID = search ? pickID : putID, - charCS = getCharacter( tokenID ), - targetCS = getCharacter( targetID ); + const tokenID = args[1], + pickID = args[2], + putID = args[3], + ppRoll = parseInt(args[4],10), + search = putID === tokenID, + targetID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + targetCS = getCharacter( targetID ); if (!tokenID || !targetID || !charCS || !targetCS) { - sendDebug('handlePPfailure: invalid ID argument passed'); sendError('Invalid MagicMaster parameter'); return; }; if (isNaN(ppRoll)) { - sendDebug('handlePPfailure: invalid ppRoll'); sendError('Invalid MagicMaster parameter'); return; } - var charName = charCS.get('name'), - targetName = targetCS.get('name'), - targetLevel = parseInt(characterLevel( targetCS )), + const charName = charCS.get('name'), + targetName = targetCS.get('name'); + + let targetLevel = parseInt(characterLevel( targetCS )), content = '&{template:'+fields.menuTemplate+'}{{name=Failed pick pocket attempt by '+charName+'}}'; if (isNaN(targetLevel)) { @@ -6563,223 +6495,175 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; /** - * Handle a character picking or putting away an item to/from a store - * args[] is the standard action|charID|fromID|toID|fromRow|toRow|qty|cost - * qty -1 means not yet chosen, cost -1 means not yet agreed or no cost + * Handle toggling the selection of one or more items to pick up or + * put away. Can take a row number or a table name or "All" as the pick + * reference. **/ - async function handlePickOrPut( args, senderId ) { // resolveData - - try { - - var buy = (args[0] || '').toUpperCase().includes('BUY'), - sell = (args[0] || '').toUpperCase().includes('SELL'), - offer = (args[0] || '').toUpperCase().includes('OFFER'), - tokenID = args[1], - fromRowRef = args[2], - fromTokenID = args[3], - toTokenID = args[4], - toRowRef = args[5], - qty = args[6], - expenditure = args[7], - newName = (args[8] || '').hyphened(), - charCS = getCharacter( tokenID ), - fromCS = getCharacter( fromTokenID ), - toCS = getCharacter( toTokenID ), - traderCS = buy ? fromCS : toCS, - parseTable = { - itemType:reSpellSpecs.itemType, - hide:reSpellSpecs.hide, - reveal:reSpellSpecs.reveal, - pick:reSpellSpecs.pick, - put:reSpellSpecs.put, - cost:reSpellSpecs.cost, - weight:reSpellSpecs.weight, + const handleFlagPicks = function ( args, senderId ) { + + const pickRow = args[2] || -1, + pickID = args[3], + charCS = getCharacter(pickID); + + if (!charCS) throw( 'pickID does not represent a valid character' ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + name; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'chosen' ); + + if (isNaN(pickRow)) { + const pickedTable = pickRow.toUpperCase(); + if (pickedTable !== 'ALL' && _.isUndefined(Items[pickedTable])) throw( 'Invalid item table type specified' ); + for (const table in Items) { + if (pickedTable === table || pickedTable === 'ALL') { + for (let row = 0; !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false )); row++) { + if (name !== '-') { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; }; - - if (!charCS || !fromCS || !toCS) { - sendDebug( 'handlePickOrPut: one or more tokenIDs do not represent valid characters' ); - sendError('Invalid MagicMaster button arguments'); - return; - } - if (isNaN(fromRowRef) || fromRowRef<0 || isNaN(toRowRef) || toRowRef<0) { - sendDebug('handlePickOrPut: invalid row or column parameter'); - sendError('Internal MagicMaster error'); - return; - } - - var toMIbag = getTableGroup( toCS, fieldGroups.MI ), - fromMIbag = getTableGroup( fromCS, fieldGroups.MI ), - toTable, toIndex, toID, fromTable, fromIndex, fromID; - [toIndex,toTable,toID] = tableGroupIndex( toMIbag, toRowRef ); - [fromIndex,fromTable,fromID] = tableGroupIndex( fromMIbag, fromRowRef ); - if (_.isUndefined(toTable) || _.isUndefined(fromTable)) { - sendDebug('handlePickOrPut: toRowRef extends beyond MIbag'); - sendError('Internal MagicMaster error'); - return; }; - - var toSlotName = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'name'], toIndex, false ), - toMIvalues = initValues( toMIbag[toTable].fieldGroup ), - toSlotTrueName, toSlotType, toSlotQty, toSlotCharges, toSlotTrueType, toSlotCost, - MIname = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'name'], fromIndex ), - MItrueName = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueName'], fromIndex ), - fromTrueName = MItrueName, - fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'type'], fromIndex ) || '').toLowerCase(), - fromSlotTrueType = (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueType'], fromIndex ) || fromSlotType).toLowerCase(), - MItrueObj = getAbility( fields.MagicItemDB, MItrueName, fromCS, null, null, null, fromIndex, fromID ), - MIdata = resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, parseTable, fromIndex, fromID ).parsed, - showType = parseInt(attrLookup( fromCS, fields.ItemContainerHide )), - hide = (MIdata.hide.length && MIdata.hide !== 'nohide' && MIdata.hide !== 'reveal') || (!MIdata.hide.length && (MIname === MItrueName) && state.MagicMaster.autoHide && !!MItrueObj.obj && reLooksLike.test(MItrueObj.obj[1].body)), - rev = hide ? (MIdata.reveal || '') : '', - pickPutText = (tokenID === fromTokenID) ? 'put away' : 'pick up'; - - if (hide) MIname = (!MIdata.hide.length || MIdata.hide === 'hide') ? getShownType( MItrueObj, fromRowRef, MIdata.itemType ) : MIdata.hide; - - if (!_.isUndefined(toSlotName)) { - toSlotType = (toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'type'], toIndex ) || fromSlotType).toLowerCase(); - toSlotTrueName = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueName'], toIndex ); - toSlotTrueType = (toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueType'], toIndex ) || fromSlotTrueType).toLowerCase(); - toSlotQty = parseInt((toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'qty'], toIndex ) || 0),10); - toSlotCharges = parseInt((toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'trueQty'], toIndex ) || 0),10); - toSlotCost = toMIbag[toTable].tableLookup( fields[fieldGroups[toTable].prefix+'cost'], toIndex ); - } else { - toSlotName = '-'; - toSlotTrueName = toMIvalues[fields.Items_trueName[0]][fields.Items_trueName[1]]; - toSlotType = toMIvalues[fields.Items_type[0]][fields.Items_type[1]]; - toSlotTrueType = toSlotType; - } - - var sameMI = (MItrueName.toLowerCase() === toSlotTrueName.toLowerCase()) && (toSlotType === fromSlotType || !toSlotType.dbName()) && (toSlotTrueType === fromSlotTrueType || !toSlotTrueType.dbName()), - toSlotEmpty = toSlotName === '-'; - - if (((toSlotType && toSlotType.includes('cursed')) || (toSlotTrueType && toSlotTrueType.includes('cursed'))) && !sameMI && !toSlotEmpty) { - sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Select another slot](!magic --button '+BT.POP_PICK+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}', senderId ); - return; - } - - if (((fromSlotType && fromSlotType.includes('cursed')) || (fromSlotTrueType && fromSlotTrueType.includes('cursed'))) && fromTokenID == tokenID) { - sendParsedMsg( tokenID, messages.cursedItem + '{{desc1=[Select another item](!magic --button '+BT.POP_PICK+'|'+tokenID+'|-1|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+')}}', senderId ); - return; - } - - var MIqty = parseInt( (fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex ) || 0), 10) || 0, - MItrueQty = parseInt((fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex) || 0),10), - MIspeed = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'speed'], fromIndex ), - MItrueSpeed = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueSpeed'], fromIndex ), - MItype = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'type'], fromIndex ), - MIcost = evalAttr( fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'cost'], fromIndex ) || 0, charCS ), - MIcost = MIcost != 0 ? MIcost : (!sell ? 0 : resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, {cost:reSpellSpecs.cost} ).parsed.cost || 0), - MIbaseCost = sell ? toSlotCost : MIcost, - MIreveal = rev || fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'reveal'], fromIndex ), - MItrueType = fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'trueType'], fromIndex ), - MItext = MIname, - MIobj = abilityLookup( fields.MagicItemDB, MIname, fromCS ), - MIsuperTypes = MIdata.itemType ? [MIdata.itemType.dbName()] : (MIobj.specs() || [['','','','','']]).reduce((a,b) => a.concat([b[4].dbName()]), []), - slotInc = 1, - isStackable = (stackable.includes(fromSlotType) && stdEqual( toSlotName.replace(/\-v\d+$/, ''), MIname ) && stdEqual( toSlotType, MItype ) && stdEqual( toSlotTrueName, MItrueName )), - finalQty, finalCharges, pickQty, charges, content; - - if (showType) { - MItext = !MIobj.obj ? MItext : getShownType( MIobj, fromRowRef, MIdata.itemType ); - } - -// MIqty = isNaN(MIqty) ? 0 : MIqty; -// MIcost = isNaN(MIcost) ? 0 : MIcost; - toSlotQty = isNaN(toSlotQty) ? 0 : toSlotQty; - toSlotCharges = isNaN(toSlotCharges) ? 0 : toSlotCharges; - -// log('handlePickOrPut: item '+MIname+', table cost = '+fromMIbag[fromTable].tableLookup( fields[fieldGroups[fromTable].prefix+'cost'], fromIndex )+', dB cost = '+resolveData( MItrueName, fields.MagicItemDB, reItemData, fromCS, {cost:reSpellSpecs.cost} ).parsed.cost+', MIcost = '+MIcost); + } else if (pickRow >=0) { + let [row,table] = tableGroupIndex( Items, pickRow ); +// log('handleFlagPicks: row = '+row+', table = '+table+', chosen = '+Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row )); + if (!_.isUndefined(row) && !_.isUndefined( name = Items[table].tableLookup( fields[fieldGroups[table].prefix+'name'], row, false ))) { + Items[table].tableSet( fields[fieldGroups[table].prefix+'chosen'], row, (Items[table].tableLookup( fields[fieldGroups[table].prefix+'chosen'], row ) == 1 ? 0 : 1 )); + }; + }; + }; + + /** + * Handle a character picking or putting away an item to/from a store + * args[] is the standard action|charID|fromID|toID|fromRow|toRow|qty|cost + * qty -1 means not yet chosen, cost -1 means not yet agreed or no cost + **/ -// log('handlePickOrPut: singular = '+singular+', MIsuperTypes = '+MIsuperTypes+', intersection = '+_.intersection(singular,MIsuperTypes)+', specs = '+MIobj.specs()); + async function handlePickOrPut( args, senderId ) { + + try { + + const buy = (args[0] || '').toUpperCase().includes('BUY'), + sell = (args[0] || '').toUpperCase().includes('SELL'), + offer = (args[0] || '').toUpperCase().includes('OFFER'), + tokenID = args[1], + fromRowRef = args[2], + fromTokenID = args[3], + toTokenID = args[4], + toRowRef = args[5], + newName = (args[8] || '').hyphened(), + charCS = getCharacter( tokenID ), + fromCS = getCharacter( fromTokenID ), + toCS = getCharacter( toTokenID ), + traderCS = buy ? fromCS : toCS, + parseTable = { + itemType:reSpellSpecs.itemType, + hide:reSpellSpecs.hide, + reveal:reSpellSpecs.reveal, + pick:reSpellSpecs.pick, + put:reSpellSpecs.put, + cost:reSpellSpecs.cost, + weight:reSpellSpecs.weight, + }; + + let qty = args[6], + expenditure = args[7]; - switch (MIqty) { - case 0: - if (!splitable.includes(fromSlotType)) { - qty = pickQty = 0; - charges = MItrueQty; - } else { - handlePickupNothing( args, MItext, toSlotName, senderId, buy ); - return; - }; - break; - - case 1: - qty = 1; - pickQty = charges = MItrueQty; - MIqty = 0; - break; + if (isNaN(parseInt(qty))) qty = -1; - default: - if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { - qty = 1; - charges = pickQty = (qty >= MIqty ? MItrueQty : 1); - if (qty >= MIqty) MIqty = 0; - } else if (!splitable.includes(fromSlotType)) { - qty = MIqty; - pickQty = (recharging.includes(fromSlotType)) ? MIqty : MItrueQty; - charges = MItrueQty; - MIqty = 0; - } else if (qty < 0) { - howMany( args, MItext, fromSlotType, MIqty, senderId ); - return; - } else if (qty >= MIqty) { - qty = MIqty; - pickQty = charges = MItrueQty; - MIqty = 0; - } else if (qty == 0) { - return; - } else { - pickQty = charges = qty * Math.ceil(MItrueQty/MIqty); - } - break; + if (!_.isUndefined(expenditure) && expenditure.length) { + expenditure = parseFloat(expenditure); } - finalQty = pickQty; - finalCharges = charges; - if (isStackable) { - finalQty = (parseInt(finalQty)||0) + (parseInt(toSlotQty)||0); - finalCharges = (parseInt(finalCharges)||0) + (parseInt(toSlotCharges)||0); - slotInc = 0; - } else if (toSlotType !== '' && (toSlotName !== '-')) { - content = messages.slotFull; - content += '{{[Choose another slot](!magic --pickorput|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}'; - sendParsedMsg( tokenID, content, senderId ); + if (!charCS || !fromCS || !toCS) { + sendError('Invalid MagicMaster button arguments'); return; } - - if (!_.isUndefined(expenditure)) { - expenditure = parseFloat(expenditure); + if (isNaN(fromRowRef) || fromRowRef<0 || isNaN(toRowRef) || toRowRef<0) { + sendError('Internal MagicMaster error'); + return; } - var pickPocket = (attrLookup( charCS, fields.PickPocket ) || 'false') == 'true'; + + const toMIbag = getTableGroup( toCS, fieldGroups.MI ), + fromMIbag = getTableGroup( fromCS, fieldGroups.MI ); + + let fromIndexes, fromTables, fromIDs, prefix; + + [fromIndexes,fromTables,fromIDs] = tableGroupFind( fromMIbag, 'chosen', 1, true, true ); + + let single = (!_.isUndefined(fromIndexes) && fromIndexes.length <= 1); + let miNames = []; + let miQtys = []; + const pickPocket = (attrLookup( charCS, fields.PickPocket ) || 'false') == 'true', + showType = parseInt(attrLookup( fromCS, fields.ItemContainerHide )); -// log('handlePickOrPut: pickPocket = '+pickPocket+', (buy || sell) = '+(buy || sell)+', expenditure = '+expenditure); + if (!pickPocket && (buy || sell) && (_.isUndefined(expenditure) || !expenditure.length) && (_.isUndefined(expenditure) || isNaN(expenditure) || offer)) { + + let MIname = single ? tableGroupLookup( fromMIbag, 'name', fromRowRef ) : 'items'; + let MIcost, MIdata, fromSlotType, fromSlotTrueType, totalQty = 0, + fromTable, fromIndex, fromPrefix, MIqty, MItrueName, MIobj, MIsuperTypes; - if (!pickPocket && (buy || sell) && (_.isUndefined(expenditure) || isNaN(expenditure) || offer)) { if (!offer) { - MIcost = !buy ? MIcost : (!MIdata.cost.includes('^^') ? MIcost : MIdata.cost); + expenditure = 0; let notes = attrLookup( traderCS, fields.AttrNotes ), match = (notes.match(/n?pcdata=(\[.+?\])/i) || ['',''])[1], reTrade = {buy:reClassSpecs.buy, sell:reClassSpecs.sell}, tradingRace = resolveData( (attrLookup( traderCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, traderCS, reTrade ).parsed, trade = buy?'sell':'buy', - buyFormula = parseData(match, reTrade)[trade] || tradingRace[trade] || classObjects( traderCS, senderId, reTrade)[0].classData[trade] || (buy?'(cost*(1+((4+2d6)/100)))':'(cost*(1-((4+2d6)/100)))'), - replaced = buyFormula.replace(/cost/g,MIcost); - MIcost = evalAttr(replaced,charCS); - expenditure = (Math.round(100 * MIcost * ((!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType)) ? 1 : qty))/100); -// log('handlePickOrPut: notes = '+notes+', match = '+match+', parsed = '+parseData(match, reTrade)[trade]+', race = '+tradingRace[trade]+', formula = '+buyFormula+', replaced = '+replaced+', MIcost = '+MIcost+', expenditure = '+expenditure); + buyFormula = parseData(match, reTrade)[trade] || tradingRace[trade] || classObjects( traderCS, senderId, reTrade)[0].classData[trade] || (buy?'(cost*(1+((4+2d6)/100)))':'(cost*(1-((4+2d6)/100)))'); + + for (let k=0; k a.concat([b[4].dbName()]), []); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(); + if (MIqty <= 1) { + qty = MIqty; + } else if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + } else if (qty < 0) { + let MItext = (!showType ? MIname : (!MIobj.obj ? MIname : getShownType( MIobj, fromRowRef, MIdata.itemType ))); + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + }; + MIcost = parseFloat(evalAttr((fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0), fromCS)); +// log('handlePickOrPut: cost from table = '+MIcost); + if (!single) qty = parseInt( fromMIbag[fromTables[k]].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 1); + totalQty += parseInt(qty) || 0; + MIcost = MIcost !== 0 ? MIcost : (!sell ? 0 : MIdata.cost || 0); +// log('handlePickOrPut: MIcost (if zero) now '+MIcost); + MIcost = !buy ? MIcost : (!MIdata.cost.includes('^^') ? MIcost : MIdata.cost); +// log('handlePickOrPut: buy = '+buy+', MIdata.cost = '+MIdata.cost+', MIcost = '+MIcost); + buyFormula = buyFormula.replace(/cost/g,MIcost); +// log('handlePickOrPut: buyFormula = '+buyFormula); + MIcost = parseFloat(evalAttr(buyFormula,charCS)) || 0; +// log('handlePickOrPut: buyFormula = '+buyFormula+', replacced = '+buyFormula.replace(/cost/g,MIcost)+', evaluated = '+MIcost); + fromSlotType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'type'], fromIndex ) || '').toLowerCase(), + fromSlotTrueType = (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'trueType'], fromIndex ) || fromSlotType).toLowerCase(), + expenditure += (Math.round(100 * MIcost * ((!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType)) ? 1 : qty))/100); +// log('handlePickOrPut: MIcost = '+MIcost+', not splitable = '+(!splitable.includes(fromSlotType) || !splitable.includes(fromSlotTrueType))+', qty = '+qty+', expenditure = '+expenditure); + }; + } else { + totalQty = qty; }; if (expenditure) { - setAttr( charCS, ['expenditure', 'current'], expenditure ); + setAttr( charCS, fields.Expenditure, expenditure ); if (args[0].toUpperCase() === BT.BUY_OFFER || args[0].toUpperCase() === BT.SELL_OFFER) { - content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Accept Offer' : 'Pay for Goods')+'}}' - + '{{desc='+traderCS.get('name')+' offers '+(sell ? 'to buy the goods from you' : 'to sell you the goods')+' for '+showCost(Math.abs(expenditure))+'. Are you happy to '+(sell ? 'accept' : 'pay')+' this? You currently have '+(attrLookup(charCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(charCS,fields.Money_gold) || 0)+'GP, '+(attrLookup(charCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(charCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(charCS,fields.Money_copper) || 0)+'CP.}}' - + '{{desc1=['+(sell ? 'Sell' : 'Buy')+' goods](!magic --button '+(sell ? BT.SELL_ITEM : (buy ? BT.BUY_ITEM : BT.PICK_ITEM))+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|'+expenditure+') or' - + '[Choose something else](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Accept Offer' : 'Pay for Goods')+'}}' + + '{{desc='+traderCS.get('name')+' offers '+(sell ? 'to buy the goods from you' : 'to sell you the goods')+' for '+showCost(Math.abs(expenditure))+'. Are you happy to '+(sell ? 'accept' : 'pay')+' this? You currently have '+(attrLookup(charCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(charCS,fields.Money_gold) || 0)+'GP, '+(attrLookup(charCS,fields.Money_electrum) || 0)+'EP, '+(attrLookup(charCS,fields.Money_silver) || 0)+'SP, and '+(attrLookup(charCS,fields.Money_copper) || 0)+'CP.}}' + + '{{desc1=['+(sell ? 'Sell' : 'Buy')+' goods](!magic --button '+(sell ? BT.SELL_ITEM : (buy ? BT.BUY_ITEM : BT.PICK_ITEM))+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+') or' + + '[Choose something else](!magic --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); } else if (sell && expenditure > spendMoney( traderCS, 0 )) { - content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, this trader cannot afford to buy the '+MIname+'. Perhaps you have something else more affordable?' - + ' Or you could buy some items from them first.}}{{desc1=[Return to inventory]('+fields.magicMaster+' --button '+BT.SELL_POP+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, this trader cannot afford to buy the '+MIname+'. Perhaps you have something else more affordable?' + + ' Or you could buy some items from them first.}}{{desc1=[Return to inventory]('+fields.magicMaster+' --button '+BT.SELL_POP+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( charCS, content, null, flags.feedbackName, flags.feedbackImg, tokenID ); content = '&{template:'+fields.warningTemplate+'}{{name=Can\'t Afford That Item}}{{desc=Unfortunately, the trader can\'t afford to buy the '+MIname+'. They could buy it for ' + showCost(Math.abs(expenditure))+' but they only have '+(attrLookup(traderCS,fields.Money_platinum) || 0)+'PP, '+(attrLookup(traderCS,fields.Money_gold) || 0)+'GP, ' @@ -6787,114 +6671,221 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars +'CP (which is equivalent to '+showCost(spendMoney(traderCS,0))+'). They\'ll need to sell some stuff first to make money.}}'; sendResponse( traderCS, content ); } else { - content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Make Offer' : 'Set Cost')+'}}' - + '{{desc=You are thinking of making an offer '+(buy ? ('to sell '+qty+' '+MIname+' to ') : ('to buy '+qty+' '+MIname+' from '))+charCS.get('name')+' for a total of '+showCost(Math.abs(expenditure))+'. Are you happy with this offer?}}' - + '{{desc1=[Make the offer](!magic --button '+(sell ? BT.SELL_OFFER : BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|'+expenditure+')' - + ' or [Haggle a price](!magic --button '+(sell ? BT.SELL_OFFER: BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+qty+'|?{What offer do you want to make? GP|'+expenditure+'})' - + ' or [Refuse to trade](!magic --message '+tokenID+'|Trade Refused|The person you are attempting to trade with has refused to '+(sell ? 'buy' : 'sell')+' you '+qty+' '+MIname+' but feel free to try a different trade --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; + let content = '&{template:'+fields.menuTemplate+'}{{name='+(sell ? 'Make Offer' : 'Set Cost')+'}}' + + '{{desc=You are thinking of making an offer '+(buy ? ('to sell '+totalQty+' '+MIname+' to ') : ('to buy '+totalQty+' '+MIname+' from '))+charCS.get('name')+' for a total of '+showCost(Math.abs(expenditure))+'. Are you happy with this offer?}}' + + '{{desc1=[Make the offer](!magic --button '+(sell ? BT.SELL_OFFER : BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|'+expenditure+')' + + ' or [Haggle a price](!magic --button '+(sell ? BT.SELL_OFFER: BT.BUY_OFFER)+'|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|'+toRowRef+'|'+totalQty+'|?{What offer do you want to make? GP|'+expenditure+'})' + + ' or [Refuse to trade](!magic --message '+tokenID+'|Trade Refused|The person you are attempting to trade with has refused to '+(sell ? 'buy' : 'sell')+' you '+totalQty+' '+MIname+' but feel free to try a different trade --button '+(sell ? BT.SELL_POP : (buy ? BT.BUY_POP : BT.PICK_POP))+'|'+tokenID+'|'+fromTokenID+'|'+toTokenID+')}}'; sendResponse( traderCS, content ); } return; } } - if (!isNaN(expenditure) && expenditure != 0 && (buy || sell) ) { - log('handlePickOrPut: expenditure = '+expenditure); - spendMoney( toCS, Math.abs(expenditure), fromCS ); - } + for (let i=0; i a.concat([b[4].dbName()]), []), + MIqty = parseInt( (fromMIbag[fromTable].tableLookup( fields[fromPrefix+'qty'], fromIndex ) || 0), 10) || 0, + MIcost = evalAttr( fromMIbag[fromTable].tableLookup( fields[fromPrefix+'cost'], fromIndex ) || 0, charCS ), + MItext = MIname, + slotInc = 1, + pickQty, charges; + + if (showType) { + MItext = !MIobj.obj ? MItext : getShownType( MIobj, fromRowRef, MIdata.itemType ); + } + + toSlotQty = isNaN(toSlotQty) ? 0 : toSlotQty; + toSlotCharges = isNaN(toSlotCharges) ? 0 : toSlotCharges; + + switch (MIqty) { + case 0: + if (!splitable.includes(fromSlotType)) { + qty = pickQty = 0; + charges = MItrueQty; + } else if (single) { + handlePickupNothing( args, MItext, toSlotName, senderId, buy ); + return; + } else { + continue; + } + break; + + case 1: + qty = 1; + pickQty = charges = MItrueQty; + MIqty = 0; + break; + + default: + if (_.intersection(singular,MIsuperTypes).length || fromSlotType === 'single') { + qty = 1; + charges = pickQty = (qty >= MIqty ? MItrueQty : 1); + if (qty >= MIqty) MIqty = 0; + } else if (!splitable.includes(fromSlotType)) { + qty = MIqty; + pickQty = (recharging.includes(fromSlotType)) ? MIqty : MItrueQty; + charges = MItrueQty; + MIqty = 0; + } else if (single && qty < 0) { + howMany( args, MItext, fromSlotType, MIqty, senderId ); + return; + } else if (qty < 0 || qty >= MIqty) { + qty = MIqty; + pickQty = charges = MItrueQty; + MIqty = 0; + } else if (qty == 0) { + continue; + } else { + pickQty = charges = qty * Math.ceil(MItrueQty/MIqty); + } + break; + } + let finalQty = pickQty, + finalCharges = charges; + + if (isStackable) { + finalQty = (parseInt(finalQty)||0) + (parseInt(toSlotQty)||0); + finalCharges = (parseInt(finalCharges)||0) + (parseInt(toSlotCharges)||0); + slotInc = 0; + } else if (toSlotType !== '' && (toSlotName !== '-')) { + let content = messages.slotFull; + content += '{{desc9=[Choose another slot](!magic --pickorput|'+tokenID+'|'+fromRowRef+'|'+fromTokenID+'|'+toTokenID+'|-1)}}'; + sendParsedMsg( tokenID, content, senderId ); + return; + } + + if (!isNaN(expenditure) && expenditure != 0 && (buy || sell) ) { + spendMoney( toCS, Math.abs(expenditure), fromCS ); } - if (newName !== MIname) { - if (MIname === MItrueName) MItrueName = newName; - if (MIobj.obj && MIobj.obj[0] && MIobj.obj[1]) { - MIobj.obj[0].set('name',newName); - let key = 'ababzzqqrst', - oldDispName = MIname.replace(/-/g,' '), - action = MIobj.obj[1].body.replace(new RegExp(MIname,'img'),key).replace(new RegExp(oldDispName,'img'),args[8]).replace(new RegExp(key,'img'),newName); - setAbility( toCS, newName, action ); + + const MIbaseCost = sell ? toSlotCost : MIcost; + let p = fieldGroups[toTable].prefix; + + toMIvalues.valLine(p,'name',MIname) + .valLine(p,'trueName',MItrueName) + .valLine(p,'qty',finalQty) + .valLine(p,'trueQty',finalCharges) + .valLine(p,'speed',MIspeed) + .valLine(p,'trueSpeed',MItrueSpeed) + .valLine(p,'cost',(sell ? MIbaseCost : MIcost )) + .valLine(p,'type',MItype) + .valLine(p,'reveal',MIreveal) + .valLine(p,'weight',(MIdata.weight || 1)) + .valLine(p,'trueType',MItrueType); + + toMIbag[toTable].addTableRow( toIndex, toMIvalues ); + + if (!newName || !newName.length || MItrueName !== MIname) { + if (MItrueObj.obj) { + setAbility( toCS, MItrueName, MItrueObj.obj[1].body ); + } else { + log('handlePickOrPut: storing '+MItrueName+' to '+toCS.get('name')+', ability not found in any database or '+fromCS.get('name')); } - MIname = newName; + } + + let containerType = (parseInt(attrLookup(toCS, fields.ItemContainerType) || 0) || 0); + containerType = (containerType == 0 ? 1 : (containerType == 2 ? 3 : containerType)); + setAttr( toCS, fields.ItemContainerType, containerType ); + setAttr(charCS, fields.ItemOldContainerType, containerType); + + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MIname ); + if (!stdEqual(MIname,MItrueName)) { + await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MItrueName ); + } + checkForBag( toCS, MItrueName, toRowRef ); + if (!!MIdata.pick && !!MIdata.pick.length) { + pickPutCmd( MIdata.pick, toTokenID, toCS, 'magic handlePickOrPut' ); }; - }; -*/ - let p = fieldGroups[toTable].prefix; - let valLine = (p,t,v) => {toMIvalues[fields[p+t][0]][fields[p+t][1]] = v}; - - valLine(p,'name',MIname); - valLine(p,'trueName',MItrueName); - valLine(p,'qty',finalQty); - valLine(p,'trueQty',finalCharges); - valLine(p,'speed',MIspeed); - valLine(p,'trueSpeed',MItrueSpeed); - valLine(p,'cost',(sell ? MIbaseCost : MIcost )); - valLine(p,'type',MItype); - valLine(p,'reveal',MIreveal); - valLine(p,'weight',(MIdata.weight || 1)); - valLine(p,'trueType',MItrueType); - - toMIbag[toTable].addTableRow( toIndex, toMIvalues ); - - if (!newName || !newName.length || MItrueName !== MIname) { - MIobj = abilityLookup( fields.MagicItemDB, fromTrueName, fromCS ); - if (MIobj.obj) { - setAbility( toCS, MItrueName, MIobj.obj[1].body ); + if (MIqty == 0) { + if (!!MIdata.put && !!MIdata.put.length) { + pickPutCmd( MIdata.put, fromTokenID, fromCS, 'magic handlePickOrPut' ); + }; + fromMIbag[fromTable].addTableRow( fromIndex ); // Blanks this row of the table + setTimeout(() => removeMIability( fromCS, MIname, fromMIbag[fromTable], fromTable ), 100); // Only removes ability if does not exist elsewhere in the equipment list + setTimeout(() => removeMIability( fromCS, MItrueName, fromMIbag[fromTable], fromTable ), 100); } else { - log('handlePickOrPut: storing '+MItrueName+' to '+toCS.get('name')+', ability not found in any database or '+fromCS.get('name')); - } - } - - let containerType = (parseInt(attrLookup(toCS, fields.ItemContainerType) || 0) || 0); - containerType = (containerType == 0 ? 1 : (containerType == 2 ? 3 : containerType)); - setAttr( toCS, fields.ItemContainerType, containerType ); - setAttr(charCS, fields.ItemOldContainerType, containerType); - - await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MIname ); - if (!stdEqual(MIname,MItrueName)) { - await moveMIspells( senderId, fromCS, fromIndex, fromID, toCS, toIndex, toID, MItrueName ); - } - checkForBag( toCS, MItrueName, toRowRef ); - if (!!MIdata.pick && !!MIdata.pick.length) { - pickPutCmd( MIdata.pick, toTokenID, toCS, 'magic handlePickOrPut' ); - }; - if (MIqty == 0) { - if (!!MIdata.put && !!MIdata.put.length) { - pickPutCmd( MIdata.put, fromTokenID, fromCS, 'magic handlePickOrPut' ); + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex, (MItrueQty - charges) ); + fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex, (MIqty - qty) ); }; - fromMIbag[fromTable].addTableRow( fromIndex ); // Blanks this row of the table - setTimeout(() => removeMIability( fromCS, MIname, fromMIbag[fromTable], fromTable ), 100); // Only removes ability if does not exist elsewhere in the equipment list - setTimeout(() => removeMIability( fromCS, MItrueName, fromMIbag[fromTable], fromTable ), 100); - } else { - fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'trueQty'], fromIndex, (MItrueQty - charges) ); - fromMIbag[fromTable].tableSet( fields[fieldGroups[fromTable].prefix+'qty'], fromIndex, (MIqty - qty) ); + if (single) pickupMessage( args, MIname, MItype, qty, (MItrueQty - qty), finalCharges, senderId ); + miNames.push(MIname); + miQtys.push(qty); + qty = -1; }; - - content = fields.attackMaster + ' --checkac ' + fromTokenID + '|silent||' + senderId + let content = fields.attackMaster + ' --checkac ' + fromTokenID + '|silent||' + senderId + ' --checkac ' + toTokenID + '|silent||' + senderId; sendAPI( content, senderId ); content = fields.initMaster + ' --checkinit ' + fromTokenID + '|silent' + ' --checkinit ' + toTokenID + '|silent'; sendAPI( content, senderId ); setTimeout( updateCoins, 10, charCS ); + + if (!single) pickupMessage( args, miNames, null, miQtys, null, null, senderId ); + await itemSlotData( toTokenID, toMIbag, senderId ); + await itemSlotData( fromTokenID, fromMIbag, senderId ); - pickupMessage( args, MIname, MItype, qty, (MItrueQty - qty), finalCharges, senderId ); return; } catch (e) { sendDebug('MagicMaster handlePickOrPut: JavaScript '+e.name+': '+e.message+' while searching, looting, storing, buying or selling items'); @@ -6908,29 +6899,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * displayed magic item bag. */ - var handleSelectMI = function( args, GMonly, senderId ) { + const handleSelectMI = function( args, GMonly, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MItoStore = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MItoStore = args[3], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSelectMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (!MItoStore || MItoStore.length == 0) { - sendDebug('handleSelectMI: invalid Magic Item passed'); sendError('Internal MagicMaster error'); return; } if (MItoStore.toLowerCase() != 'remove') { - let index,rowID,table; - [index,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), MIrowref ); -// let itemObj = abilityLookup( fields.MagicItemDB, MItoStore, charCS ); - let itemSpeed = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {speed:reSpellSpecs.speed}, index, rowID ).parsed.speed; + let [index,table,rowID] = tableGroupIndex( getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), MIrowref ); + let itemSpeed = resolveData( MItoStore, fields.MagicItemDB, reItemData, charCS, {speed:reSpellSpecs.speed}, {row:index, rowID:rowID} ).parsed.speed; setAttr( charCS, fields.ItemCastingTime, itemSpeed ); setAttr( charCS, fields.ItemSelected, 1 ); }; @@ -6947,25 +6934,23 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle selecting a slot in the displayed MI bag */ - var handleSelectSlot = function( args, GMonly, senderId ) { + const handleSelectSlot = function( args, GMonly, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); + + let MIrowref = args[2]; if (!charCS) { - sendDebug('handleSelectSlot: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (!MIrowref || isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleSelectSlot: invalid MI parameter passed'); sendError('Internal MagicMaster error'); return; } - var table, index, - MagicItems = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + let MagicItems = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), [index,table] = tableGroupIndex( MagicItems, MIrowref ); if (_.isUndefined(index)) { @@ -6974,15 +6959,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MagicItems[table] = MagicItems[table].addTableRow(); index = MagicItems[table].sortKeys.length-1; args[2] = MIrowref = indexTableGroup( MagicItems, table, index ); -// log('handleSelectSlot: table = '+table+', index = '+index+', rowref = '+MIrowref+', name of new row = '+tableGroupLookup( MagicItems, MIrowref )); }; - var slotItem = MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'name'], index ); + const slotItem = MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'name'], index ); -// if (MIrowref >= MagicItems.sortKeys.length) { -// MagicItems.addTableRow( MIrowref ); -// } - setAttr( charCS, fields.ItemChosen, slotItem.hyphened() ); setAttr( charCS, fields.ItemRowRef, MIrowref ); setAttr( charCS, fields.Expenditure, (MagicItems[table].tableLookup( fields[fieldGroups[table].prefix+'cost'], index ) || 0 ) ); @@ -7002,38 +6982,35 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * A flag parameter determines if this is a GM-only action */ - async function handleStoreMI( args, GMonly, senderId ) { //resolveData + async function handleStoreMI( args, GMonly, senderId ) { - var tokenID = args[1], + const cmd = (args[0].toUpperCase().includes('MARTIAL') ? BT.EDIT_MARTIAL : (args[0].toUpperCase().includes('ALLITEMS') ? BT.EDIT_ALLITEMS : BT.EDIT_MI)); + + let tokenID = args[1], MIrowref = String(args[2] || ''), - MIchosen = args[3], + replace = (args[3] || '').split('/'), MIqty = args[4] || '1', - silent = (args[5] || '').toUpperCase() === 'SILENT', - cmd = (args[0].toUpperCase().includes('MARTIAL') ? BT.EDIT_MARTIAL : (args[0].toUpperCase().includes('ALLITEMS') ? BT.EDIT_ALLITEMS : BT.EDIT_MI)), - charCS = getCharacter( tokenID ), - queries = args.slice(6); + silent = (args[5] || '').toUpperCase() === 'SILENT'; - if (!getObj( 'graphic', tokenID )) { + const queries = args.slice(6), + charCS = getCharacter( tokenID ); + + if (!getObj( 'graphic', tokenID )) { // i.e. if args[1] is actually a characterID tokenID = undefined; silent = true; } if (!charCS) { - sendDebug('handleStoreMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroup( charCS, fieldGroups.MI ), - inHand = MIrowref.dbName().startsWith('inhand'), - hand = inHand ? parseInt(MIrowref.split('/')[1] || '0') : 0, - replace = (MIchosen || '').split('/'), - MIchosen = replace[0], - MIreplace = replace[1], - isRing = MIrowref === '=', - repQty = '0', - qtyOp = isNaN(parseInt(MIqty[0])) && MIqty[0] !== '=', - reMIspecs = { + const inHand = MIrowref.dbName().startsWith('inhand'), + MIchosen = replace[0], + MIreplace = replace[1], + isRing = MIrowref === '=', + qtyOp = isNaN(parseInt(MIqty[0])) && MIqty[0] !== '=', + reMIspecs = { qty:reSpellSpecs.qty, max:reSpellSpecs.maxQty, speed:reSpellSpecs.speed, @@ -7044,14 +7021,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars pick:reSpellSpecs.pick, cost:reSpellSpecs.cost, weight:reSpellSpecs.weight, - }, + }; + + let MItables = getTableGroup( charCS, fieldGroups.MI ), + repQty = '0', // magicItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ), - typeTable='', typeIndex, selTable, selIndex, selRowID; + typeTable='', + typeIndex; - [selIndex,selTable,selRowID] = tableGroupIndex( MItables, parseInt(MIrowref) ); + let [selIndex,selTable,selRowID] = tableGroupIndex( MItables, parseInt(MIrowref) ); - var magicItem = getAbility( fields.MagicItemDB, MIchosen, charCS, null, null, null, (isNaN(MIrowref) ? '' : selIndex), (isNaN(MIrowref) ? '' : selRowID) ), - MImaxQty = 0; + const magicItem = getAbility( fields.MagicItemDB, MIchosen, charCS, null, null, null, (isNaN(MIrowref) ? '' : selIndex), (isNaN(MIrowref) ? '' : selRowID) ); if (!!magicItem.obj) { typeTable = getItemTable( magicItem.obj[1].type ); @@ -7066,22 +7046,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if (inHand && isNaN(parseInt(MIrowref))) [selIndex,selTable,selRowID] = tableGroupFind( MItables, 'trueName', MIchosen ); if (isNaN(parseInt(selIndex)) || selIndex<0) { - let miObj = abilityLookup( fields.MagicItemDB, MIchosen ); + const miObj = abilityLookup( fields.MagicItemDB, MIchosen ); selTable = getItemTable( miObj.obj[1].type ); selIndex = MItables[selTable].tableFind( fields[fieldGroups[selTable].prefix+'name'], '-' ); selRowID = MItables[selTable].rowID(selIndex); }; if (queries && queries.length && queries[0].length) _.each( queries, q => setAttr( charCS, [fields.ItemVar[0]+MIchosen.hyphened()+'+'+selRowID+'-'+q.split('=')[0],fields.ItemVar[1]], (q.split('=') || ['',''])[1] )); - var miData = resolveData( MIchosen, fields.MagicItemDB, reItemData, charCS, reMIspecs, (isNaN(MIrowref) ? '' : selIndex ), (isNaN(MIrowref) ? '' : selRowID) ).parsed; + const miData = resolveData( MIchosen, fields.MagicItemDB, reItemData, charCS, reMIspecs, {row:(isNaN(MIrowref) ? '' : selIndex ), rowID:(isNaN(MIrowref) ? '' : selRowID)} ).parsed; -// log('handleStoreMI: item '+MIchosen+' has a cost of '+miData.cost+', MIrowref = '+MIrowref+', selIndex = '+selIndex+', selTable = '+selTable+', selRowID = '+selRowID); - MIqty = Math.floor(evalAttr((qtyOp ? repQty+MIqty : (!MIqty.length ? repQty : MIqty)),charCS) || 0); if (!qtyOp && MIqty == 0) { MIqty = (parseInt(evalAttr(miData.qty,charCS)) || 0); }; - MImaxQty = qtyOp ? MIqty : (parseInt(evalAttr(miData.maxQty,charCS)) || MIqty); + const MImaxQty = qtyOp ? MIqty : (parseInt(evalAttr(miData.maxQty,charCS)) || MIqty); MIqty = Math.min( MIqty, MImaxQty ); if (selTable !== typeTable) { @@ -7097,20 +7075,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; MIrowref = indexTableGroup(MItables,selTable,selIndex); - var prefix = MItables[selTable].fieldGroup, - slotName = MItables[selTable].tableLookup( fields[prefix+'name'], selIndex ), - slotTrueName = MItables[selTable].tableLookup( fields[prefix+'trueName'], selIndex ), - slotType = MItables[selTable].tableLookup( fields[prefix+'type'], selIndex ), - containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0, - values = MItables[selTable].copyValues(); - -// if (!magicItem.ct) { -// sendDebug('handleStoreMI: selected magic item speed/type not defined'); -// sendError('Selected Magic Item not fully defined'); -// return; -// } - - var midbCS, MIdisplayName; + const p = MItables[selTable].fieldGroup, + slotName = MItables[selTable].tableLookup( fields[p+'name'], selIndex ), + slotTrueName = MItables[selTable].tableLookup( fields[p+'trueName'], selIndex ), + slotType = MItables[selTable].tableLookup( fields[p+'type'], selIndex ), + containerNo = parseInt(attrLookup( charCS, fields.ItemContainerType )) || 0; + + let values = initValues( p ), + MIdisplayName; if (!GMonly && slotType.toLowerCase().includes('cursed')) { if (!silent) sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); @@ -7130,28 +7102,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars MIdisplayName = MIchosen; } - let p = MItables[selTable].fieldGroup; - let valLine = (p,t,v) => {values[fields[p+t][0]][fields[p+t][1]] = v}; - - valLine(p,'name',MIdisplayName); - valLine(p,'trueName',MIchosen); - valLine(p,'qty',MIqty); - valLine(p,'trueQty',MImaxQty); - valLine(p,'speed',miData.speed); - valLine(p,'trueSpeed',miData.speed); - valLine(p,'cost',miData.cost); - valLine(p,'type',miData.type); - valLine(p,'trueType',miData.type); - valLine(p,'reveal',(miData.reveal.toLowerCase() !== 'manual' ? miData.reveal : '')); - valLine(p,'weight',(miData.weight || 1)); + values.valLine(p,'name',MIdisplayName) + .valLine(p,'trueName',MIchosen) + .valLine(p,'qty',MIqty) + .valLine(p,'trueQty',MImaxQty) + .valLine(p,'speed',miData.speed) + .valLine(p,'trueSpeed',miData.speed) + .valLine(p,'cost',miData.cost) + .valLine(p,'type',miData.type) + .valLine(p,'trueType',miData.type) + .valLine(p,'reveal',(miData.reveal.toLowerCase() !== 'manual' ? miData.reveal : '')) + .valLine(p,'weight',(miData.weight || 1)); MItables[selTable].addTableRow( selIndex, values ); if (isRing) { - let ringHand = ((attrLookup( charCS, fields.Equip_leftTrueRing ) === MIreplace) ? BT.LEFTRING : ((attrLookup( charCS, fields.Equip_rightTrueRing ) === MIreplace) ? BT.RIGHTRING : undefined)); + const ringHand = ((attrLookup( charCS, fields.Equip_leftTrueRing ) === MIreplace) ? BT.LEFTRING : ((attrLookup( charCS, fields.Equip_rightTrueRing ) === MIreplace) ? BT.RIGHTRING : undefined)); if (!_.isUndefined(ringHand)) { - let cmdStr = (fields.attackMaster + ' --button ' + ringHand + (GMonly ? '-NOCURSE' : '') + '|' + tokenID + '|' + MIrowref + '|SILENT'); - sendAPI( cmdStr, senderId ); + sendAPI((fields.attackMaster + ' --button ' + ringHand + (GMonly ? '-NOCURSE' : '') + '|' + tokenID + '|' + MIrowref + '|SILENT'), senderId); } }; @@ -7166,7 +7134,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars await moveMIspells( senderId, null, null, null, charCS, selIndex, selRowID, MIchosen ); checkForBag( charCS, MIchosen, MIrowref ); - if (!!tokenID) { sendAPI( (fields.attackMaster + ' --checkac ' + tokenID + '|Silent||' + senderId), senderId ); if (!!miData.pick && !!miData.pick.length) { @@ -7174,12 +7141,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; }; - sendAPI( (fields.initMaster+' --checkinit '+tokenID+'|silent'), senderId ); + sendAPI( (fields.initMaster+' --checkinit '+(tokenID || charCS.id)+'|silent'), senderId ); setTimeout( updateCoins, 10, charCS ); if (silent) { + const hand = inHand ? parseInt(MIrowref.split('/')[1] || '0') : 0; if (tokenID && inHand && !isRing) sendAPI( (fields.attackMaster + ' --button ' + (['PRIMARY','OFFHAND','BOTH','HAND'][Math.min(hand,3)]) + '-NOCURSE|' + tokenID + '|' + MIchosen + '|' + hand + '||Silent'), senderId ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleStoreMI'); return [selIndex,selTable]; } args = [cmd,tokenID,-1,'']; @@ -7189,28 +7157,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { makeEditBagMenu( args, senderId, MIchosen+' has overwritten '+slotName ); } + await itemSlotData( tokenID, MItables, senderId ); return [selIndex,selTable]; } /** * Handle renaming an item. Make sure that the new name is unique **/ - - var handleRenameItem = function( args, senderId ) { + + const handleRenameItem = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MInewName = (args[4] || '').hyphened(), - override = String(args[5] || '').toLowerCase() === 'true', - charCS = getCharacter( tokenID ), - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index,rowID, + const tokenID = args[1], + MIrowref = args[2], + MInewName = (args[4] || '').hyphened(), + override = String(args[5] || '').toLowerCase() === 'true', + charCS = getCharacter( tokenID ); + + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), [index,table,rowID] = tableGroupIndex( Items, MIrowref ), - MIoldName = tableGroupLookup( Items, 'name', MIrowref ), - MIhyphenOld = MIoldName.hyphened(), item = getAbility( fields.MagicItemDB, MInewName, charCS, true ); - var miStoredSpell = function( charCS, oldName, newName, rowID, spell, field ) { + const MIoldName = tableGroupLookup( Items, 'name', MIrowref ), + MIhyphenOld = MIoldName.hyphened(); + + const miStoredSpell = function( charCS, oldName, newName, rowID, spell, field ) { let o = attrLookup( charCS, [field[0]+oldName+'+'+rowID+'-'+spell,null] ); if (!o) { o = attrLookup( charCS, [field[0]+oldName+'-'+spell,null] ); @@ -7231,42 +7201,44 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars item = getAbility( fields.MagicItemDB, MIoldName, charCS, null, null, null, index, rowID ); // Check if this should actually be an abilityLookup() if (!item.obj) return; item.obj[0].set('name',MInewName); - let key = 'ababzzqqrst', - oldDispName = MIoldName.replace(/-/g,' '), - action = item.obj[1].body.replace(new RegExp(MIoldName,'img'),key).replace(new RegExp(oldDispName,'img'),args[4]).replace(new RegExp(key,'img'),MInewName); + const key = 'ababzzqqrst', + oldDispName = MIoldName.replace(/-/g,' '), + action = item.obj[1].body.replace(new RegExp(MIoldName,'img'),key).replace(new RegExp(oldDispName,'img'),args[4]).replace(new RegExp(key,'img'),MInewName); setAbility( charCS, MInewName, action ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'name'], index, MInewName ); Items[table] = getTableField( charCS, Items[table], fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); Items[table] = Items[table].tableSet( fields[fieldGroups[table].prefix+'trueName'], index, MInewName ); - let MUspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemMUspellsList[0], null] ), - PRspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPRspellsList[0], null] ), - powerObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPowersList[0], null] ); + const MUspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemMUspellsList[0], null] ), + PRspellObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPRspellsList[0], null] ), + powerObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.ItemPowersList[0], null] ); + if (MUspellObj) { MUspellObj.set('name',fields.ItemMUspellsList[0]+MInewName+'+'+rowID); - let spellList = MUspellObj.get('current').split(','); + const spellList = MUspellObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'mu' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'mu' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-mu+'+rowID ); } if (PRspellObj) { PRspellObj.set('name',fields.ItemPRspellsList[0]+MInewName+'+'+rowID); - let spellList = PRspellObj.get('current').split(','); + const spellList = PRspellObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIspellPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pr' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pr' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pr+'+rowID ); } if (powerObj) { powerObj.set('name',fields.ItemPowersList[0]+MInewName+'+'+rowID); - let spellList = powerObj.get('current').split(','); + const spellList = powerObj.get('current').split(','); _.each(spellList,s => miStoredSpell( charCS, MIhyphenOld, MInewName, rowID, s, fields.MIpowerPrefix )); - let spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pw' ); + const spellIndexObj = miSpellLookup( charCS, MIhyphenOld, index, rowID, [fields.MIspellPrefix[0],null], 'pw' ); if (spellIndexObj) spellIndexObj.set( 'name', fields.MIspellPrefix[0]+MInewName+'-pw+'+rowID ); } + let objName; filterObjs( obj => { if (obj.get('_type') !== 'attribute' || obj.get('_characterid') !== charCS.id) return false; - let objName = obj.get('name'); + objName = obj.get('name'); if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+index+'-')) { obj.set('name',objName.replace( MIhyphenOld, MInewName ).replace('+'+index+'-','+'+rowID+'-')); } else if (objName.startsWith(fields.ItemVar[0]+MIhyphenOld+'+'+rowID)) { @@ -7288,27 +7260,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * without changing what it actually is. Only available to GM */ - var handleHideMI = function( args, senderId ) { + const handleHideMI = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MIchosen = args[3], - charCS = getCharacter(tokenID), - Items, newItem, reveal, table, index, rowID; - + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); + if (!charCS) { - sendDebug('handleHideMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleHideMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); @@ -7318,10 +7287,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars Items = Items.tableSet( fields[fieldGroups[table].prefix+'name'], index, MIchosen ); Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) ); - reveal = resolveData( Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), fields.MagicItemDB, reItemData, charCS, {reveal:reSpellSpecs.reveal}, index, rowID ).parsed.reveal; + const reveal = resolveData( Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), fields.MagicItemDB, reItemData, charCS, {reveal:reSpellSpecs.reveal}, {row:index, rowID:rowID} ).parsed.reveal; Items = Items.tableSet( fields[fieldGroups[table].prefix+'reveal'], index, (reveal.toLowerCase() !== 'manual' ? reveal : '')); - newItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ); + const newItem = abilityLookup( fields.MagicItemDB, MIchosen, charCS ); if (newItem.obj) Items = Items.tableSet( fields[fieldGroups[table].prefix+'type'], index, newItem.obj[1].charge ); getAbility( fields.MagicItemDB, MIchosen, charCS, true, playerIsGM(senderId), Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ), index, rowID ); @@ -7337,39 +7306,34 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function handleRemoveMI( args, GMonly, senderId, silent=false, delAbility=true ) { - var tokenID = args[1], - MIrowref = args[2], - MIchosen = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MIchosen = args[3], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleRemoveMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleRemoveMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index,rowID; - - [index,table,rowID] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table,rowID] = tableGroupIndex( Items, MIrowref ); Items = getTable( charCS, fieldGroups[table] ); - var slotType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) || '', - slotTrueType = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], index ) || '', - slotTrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ) || ''; + const slotType = Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ) || '', + slotTrueType = Items.tableLookup( fields[fieldGroups[table].prefix+'trueType'], index ) || '', + slotTrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ) || ''; + if (!GMonly && (slotType.toLowerCase().includes('cursed') || slotTrueType.toLowerCase().includes('cursed'))) { sendParsedMsg( tokenID, messages.cursedSlot + '{{desc1=[Return to menu](!magic --edit-mi '+tokenID+')}}', senderId ); return; } - var putCmd = resolveData( slotTrueName, fields.MagicItemDB, reItemData, charCS, {put:reSpellSpecs.put}, index, rowID ).parsed.put; - if (!!putCmd && !!putCmd.length) { - pickPutCmd( putCmd, tokenID, charCS, 'magic handleRemoveMI' ); - }; + const putCmd = resolveData( slotTrueName, fields.MagicItemDB, reItemData, charCS, {put:reSpellSpecs.put}, {row:index, rowID:rowID} ).parsed.put; + if (!!putCmd && !!putCmd.length) pickPutCmd( putCmd, tokenID, charCS, 'magic handleRemoveMI' ); Items.addTableRow( index ); await moveMIspells( senderId, charCS, index, rowID, null, null, null, slotTrueName, 'ALL', true ); @@ -7386,7 +7350,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); if (silent) { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleRemoveMI'); return; } @@ -7395,6 +7359,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else { makeEditBagMenu( args, senderId, 'Slot '+MIrowref+' has been removed' ); } + await itemSlotData( tokenID, null, senderId ); return; }; @@ -7402,35 +7367,33 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle changing the type of a Magic Item. Only available to the GM. */ - var handleChangeMItype = function( args, senderId ) { + const handleChangeMItype = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - newType = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + charCS = getCharacter(tokenID); + + let newType = args[4]; if (!charCS) { - sendDebug('handleChangeMItype: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleChangeMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - table,index; - - [index,table] = tableGroupIndex( Items, MIrowref ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + [index,table] = tableGroupIndex( Items, MIrowref ); + Items = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'name'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueName'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'type'] ); Items = getTableField( charCS, Items, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'trueType'] ); - var MIname = Items.tableLookup( fields[fieldGroups[table].prefix+'name'], index ), - MItrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ); + const MIname = Items.tableLookup( fields[fieldGroups[table].prefix+'name'], index ), + MItrueName = Items.tableLookup( fields[fieldGroups[table].prefix+'trueName'], index ); if (newType === 'removeCurse') { Items = Items.tableSet( fields[fieldGroups[table].prefix+'trueType'], index, Items.tableLookup( fields[fieldGroups[table].prefix+'type'], index ).replace(/cursed\+/i,'').replace(/cursed/i,'uncharged') ); @@ -7454,31 +7417,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the displayed charges, the actual charges or both are set. */ - var handleChangeMIcharges = function( args, changeType, senderId ) { + async function handleChangeMIcharges( args, changeType, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - MInewQty = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + MInewQty = args[4], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleChangeMIcharges: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleChangeMIcharges: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - MIname = tableGroupLookup( MItables, 'name', MIrowref ) || '-', - index, table; - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'trueQty' ); + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + + const MIname = tableGroupLookup( MItables, 'name', MIrowref ) || '-'; + + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'qty' ); + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'trueQty' ); - [index,table] = tableGroupIndex( MItables, MIrowref ); + let [index,table] = tableGroupIndex( MItables, MIrowref ); if (changeType == 'Displayed' || changeType == 'Both') { MItables[table] = MItables[table].tableSet( fields[fieldGroups[table].prefix+'qty'], index, MInewQty ); @@ -7489,6 +7451,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setTimeout( updateCoins, 10, charCS ); makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+'\'s '+changeType+' quantity has been changed to '+MInewQty ); + await itemSlotData( tokenID, null, senderId ); return; } @@ -7496,34 +7459,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle change the cost of an MI, to support shops and Inns */ - var handleSetMIcost = function( args, senderId ) { + const handleSetMIcost = function( args, senderId ) { - var tokenID = args[1], - MIrowref = args[2], - newMIcost = args[4], - charCS = getCharacter(tokenID); + const tokenID = args[1], + MIrowref = args[2], + newMIcost = args[4], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleSetMIcost: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } if (isNaN(MIrowref) || MIrowref<0) { - sendDebug('handleSetMIcost: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } - var MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), - index, table; - MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'cost' ); - - [index,table] = tableGroupIndex( MItables, MIrowref ); + let MItables = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); - var MIname = MItables[table].tableLookup( fields.Items_trueName, MIrowref ) || '-'; + MItables = getTableGroupField( charCS, MItables, fieldGroups.MI, 'cost' ); + + let [index,table] = tableGroupIndex( MItables, MIrowref ); + const MIname = MItables[table].tableLookup( fields.Items_trueName, MIrowref ) || '-'; MItables[table].tableSet( fields.Items_cost, MIrowref, newMIcost ); - makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MIname+' now costs '+newMIcost+'GP' ); return; } @@ -7534,14 +7493,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * meaning a shift() creates the follow-on command call to doButton() */ - var handleAddMIrow = function( args, senderID ) { + const handleAddMIrow = function( args, senderID ) { args.shift(); - var tokenID = args[1], - index = args[2], - table = args[3], - charCS = getCharacter(tokenID); + const tokenID = args[1], + table = args[3], + charCS = getCharacter(tokenID); getTable(charCS, fieldGroups[table]).addTableRow(); @@ -7554,20 +7512,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle blanking the selected Magic Item bag. */ - var handleBlankMIBag = function( args ) { + const handleBlankMIBag = function( args ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleDeleteTreasure: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var content = '&{template:'+fields.menuTemplate+'}{{name=TOTALLY BLANK THE MI BAG}}' - + '{{desc=Are you REALLY sure you want to delete the complete MI Bag with all its contents?}}' - + '{{desc1=[Yes](!magic --button GM-ConfirmedBlank|'+tokenID+'|-1|) or [No](!magic --button GM-NoBlank|'+tokenID+'|-1|)}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name=TOTALLY BLANK THE MI BAG}}' + + '{{desc=Are you REALLY sure you want to delete the complete MI Bag with all its contents?}}' + + '{{desc1=[Yes](!magic --button GM-ConfirmedBlank|'+tokenID+'|-1|) or [No](!magic --button GM-NoBlank|'+tokenID+'|-1|)}}'; sendFeedback(content,flags.feedbackName,flags.feedbackImg,tokenID,charCS); return; @@ -7577,18 +7534,17 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * The GM confirmed they want to Blank the MI Bag */ - var handleConfirmedBlank = function( args, senderId ) { + const handleConfirmedBlank = function( args, senderId ) { - var tokenID = args[1], - charCS = getCharacter(tokenID); + const tokenID = args[1], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('handleConfirmedBlank: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroup( charCS, fieldGroups.MI ); + let Items = getTableGroup( charCS, fieldGroups.MI ); for (const table in Items) { if (table.dbName() === 'coins') continue; for (let i=0; i { try { - var Items, i, itemName, charCS, itemList, - errFlag = false, + let itemName, spellsList = ''; - charCS = getCharacter(token.id); + const charCS = getCharacter(token.id); if (!(!charCS || !_.isUndefined(namesList[charCS.id]) || charCS.get('name').toLowerCase().includes('-db'))) { - Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + itemList = [], + i = -1, + itemRow, itemRowID, table; Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'trueName' ); - itemList = []; - - i = -1; while (!_.isUndefined(itemName = tableGroupLookup( Items, 'name', ++i, false ))) { itemList.push(itemName,tableGroupLookup( Items, 'trueName', i )); - let itemRow, itemRowID, table; [itemRow,table,itemRowID] = tableGroupIndex( Items, i ); itemName = itemName.replace(/\s/g,'-'); itemList = itemList.concat(miSpellLookup( charCS, itemName, itemRow, itemRowID, fields.ItemMUspellsList, '', '', '' ).split(','), @@ -7844,7 +7793,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } catch (e) { log('MagicMaster getNamesList: JavaScript '+e.name+': '+e.message+' while doing a tidy'); - sendDebug('MagicMaster getNamesList: JavaScript '+e.name+': '+e.message+' while doing a tidy'); sendCatchError('MagicMaster',null,e,'MagicMaster error in handleCStidy()'); namesList = undefined; } finally { @@ -7856,26 +7804,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars }; if ((!tokenList || !tokenList.length) && silent) { - tokenList = filterObjs( obj => { - if (obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token') return false; - return (!(!obj.get('represents') || !obj.get('represents').length)); - }); - } + tokenList = filterObjs( obj => (obj.get('type') === 'graphic' && obj.get('subtype') === 'token' && (!(!obj.get('represents') || !obj.get('represents').length)))); + }; tokenList = tokenList.filter( n => !!n ); for (const token of tokenList) { namesList = await getNamesList( token, namesList ); if (_.isUndefined(namesList)) return; } + let charID, objName, objCurrent, objMax, foundName, + dbItem, attack, menuCmd, owned; objList = filterObjs( obj => { if (obj.get('type') != 'attribute' && obj.get('type') != 'ability') return false; - let charID = obj.get('characterid'); + charID = obj.get('characterid'); if (_.isUndefined(namesList[charID])) return false; - let objName = obj.get('name'), - objCurrent = String(obj.get('current') || ''), - objMax = String(obj.get('max') || ''); + objName = obj.get('name'); + objCurrent = String(obj.get('current') || ''); + objMax = String(obj.get('max') || ''); if (obj.get('type') !== 'ability') { if (objName.startsWith('repeating_')) return false; - let foundName = undefined; + foundName = undefined; if (objName.startsWith(fields.CastingTimePrefix[0])) foundName = objName.substring(fields.CastingTimePrefix[0].length) else if (objName.startsWith(fields.ItemMUspellsList[0])) foundName = objName.substring(fields.ItemMUspellsList[0].length) else if (objName.startsWith(fields.ItemPRspellsList[0])) foundName = objName.substring(fields.ItemPRspellsList[0].length) @@ -7884,16 +7831,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars else if (objName.startsWith(fields.MIpowerPrefix[0])) foundName = objName.substring(fields.MIpowerPrefix[0].length) else if (objName.startsWith(fields.Prev_round[0])) foundName = objName else if (objName.startsWith(fields.ItemVar[0])) foundName = objName.substring(fields.ItemVar[0].length,objName.lastIndexOf('+')); - let testVal = (!!foundName && ((!namesList[charID].some(elem => (!!elem.dbName() && foundName.dbName().includes(elem.dbName())))) || !(objCurrent+objMax).length)); - testVal = testVal || ((objName.startsWith(fields.Magical_hitAdj[0]) || objName.startsWith(fields.Magical_dmgAdj[0])) && !parseInt(objCurrent || 0) && !parseInt(objMax || 0)); - return testVal; + return (!!foundName && ((!namesList[charID].some(elem => (!!elem.dbName() && foundName.dbName().includes(elem.dbName())))) || !(objCurrent+objMax).length)) + || ((objName.startsWith(fields.Magical_hitAdj[0]) || objName.startsWith(fields.Magical_dmgAdj[0])) && !parseInt(objCurrent || 0) && !parseInt(objMax || 0)); } else { - let dbItem = false; - let attack = objName.startsWith('Do-not-use'); - let menuCmd = obj.get('istokenaction'); - let owned = namesList[charID].includes(objName); - objName = (objName || '').dbName(); + dbItem = false; + attack = objName.startsWith('Do-not-use'); + menuCmd = obj.get('istokenaction'); + owned = namesList[charID].includes(objName); if (!menuCmd && !owned && !attack) { + objName = (objName || '').dbName(); dbItem = _.some(DBindex, (d) => !_.isUndefined(d[objName])); } return (attack || (!menuCmd && !owned && dbItem)); @@ -7903,7 +7849,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendFeedback( '&{template:'+fields.messageTemplate+'}{{desc='+objList.length+' objects have been removed from '+_.size(namesList)+' characters.}}' ); } else { log(objList.length+' objects have been removed from '+_.size(namesList)+' characters.'); - sendWait(findTheGM(),0); + sendWait(findTheGM(),0,'Magic handleCStidy'); } for (const obj of objList) { @@ -7918,15 +7864,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Copy a character to a new character sheet e.g. to dump corrupted attributes */ - - var handleCleanCS = function( charCS, silent=false ) { + + const handleCleanCS = function( charCS, silent=false ) { - var newCS = createObj( 'character', { + const newCS = createObj( 'character', { name: (charCS.get('name')), avatar: charCS.get('avatar'), inplayerjournals: charCS.get('inplayerjournals'), controlledby: charCS.get('controlledby') - }); + }); charCS.get('bio', function(bio) { newCS.set('bio',bio); }); @@ -7934,35 +7880,36 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars newCS.set('gmnotes',gmnotes); }); - var objList = filterObjs( obj => { - let type = obj.get('type'); - if (type === 'graphic' && obj.get('subtype') === 'token') { - if (obj.get('represents') !== charCS.id) return false; - obj.set('represents',newCS.id); - return false; - } - if (type !== 'attribute' && type !== 'ability') return false; - if (obj.get('characterid') !== charCS.id) return false; - if (obj.get('name').length && obj.get('name') != 'Untitled') { - if (type !== 'ability') { - createObj( 'attribute', { - characterid: newCS.id, - name: obj.get('name'), - current: obj.get('current'), - max: obj.get('max') - }); - } else { - createObj( 'ability', { - characterid: newCS.id, - name: obj.get('name'), - description: obj.get('description'), - action: obj.get('action'), - istokenaction: obj.get('istokenaction') - }); - }; + let type; + const objList = filterObjs( obj => { + type = obj.get('type'); + if (type === 'graphic' && obj.get('subtype') === 'token') { + if (obj.get('represents') !== charCS.id) return false; + obj.set('represents',newCS.id); + return false; + } + if (type !== 'attribute' && type !== 'ability') return false; + if (obj.get('characterid') !== charCS.id) return false; + if (obj.get('name').length && obj.get('name') != 'Untitled') { + if (type !== 'ability') { + createObj( 'attribute', { + characterid: newCS.id, + name: obj.get('name'), + current: obj.get('current'), + max: obj.get('max') + }); + } else { + createObj( 'ability', { + characterid: newCS.id, + name: obj.get('name'), + description: obj.get('description'), + action: obj.get('action'), + istokenaction: obj.get('istokenaction') + }); }; - return true; - }); + }; + return true; + }); // Remove all objects on objList // then remove charCS @@ -7984,44 +7931,48 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * a linear progression due to Exceptional Strength */ - var handleStrengthChange = function( charCS, field, increment, senderId, silent=true ) { + async function handleStrengthChange( tokenID, field, increment, senderId, silent=true ) { // tokenID - var curStrength, maxStrength, - originalData, strData, - newStr, newExp, + let newStr, newExp, original = '', changeBy = 0, change = (isNaN(increment[0]) ? increment[0] : '+'); - curStrength = attrLookup( charCS, [field,'current'] ); + const charCS = getCharacter( tokenID ); + if (!charCS || !field) { sendError('Invalid token or field name when handling an attribute change.'); return; } + let curStrength = attrLookup( charCS, [field+'-real','current']); + if (!curStrength || isNaN(parseInt(curStrength))) curStrength = attrLookup( charCS, [field,'current'] ); if (!curStrength || isNaN(parseInt(curStrength))) { sendError('Invalid '+field+' value on character sheet when handling an attribute change.'); return; } - increment = parseInt(evalAttr(((change !== '-') ? increment.slice(1) : increment),charCS)) || 0; + increment = parseInt(evalAttr(((change !== '-' && isNaN(increment[0])) ? increment.slice(1) : increment),charCS)) || 0; - maxStrength = attrLookup( charCS, [field,'max'] ); - if (!maxStrength || increment == 0) { - setAttr( charCS, [field,'max'], (maxStrength = curStrength) ); - } - strData = curStrength.match(/(\d+)(?:\((\d+)\))?/); + let strData = curStrength.match(/(\-?\d+)(?:\((\d+)\))?/); strData[1] = parseInt(strData[1]); strData[2] = !_.isUndefined(strData[2]) ? (parseInt(strData[2]) || 100) : strData[2]; - originalData = maxStrength.match(/(\d+)(?:\((\d+)\))?/); + + let maxStrength = attrLookup( charCS, [field,'max'] ); + if ((!maxStrength || increment == 0) && strData[1] > 0 && strData[1] < 26) { + setAttr( charCS, [field,'max'], (maxStrength = curStrength) ); + } + let originalData = maxStrength.match(/(\d+)(?:\((\d+)\))?/); originalData[1] = parseInt( originalData[1] ); originalData[2] = (!_.isUndefined(originalData[2])) ? (originalData[2] = parseInt(originalData[2]) || 100) : strData[2]; if (change === '=') increment = increment - strData[1]; if (increment != 0) { - + newStr = (change === '*' ? (strData[1] * increment) : ((change === '/') ? (strData[1] / increment) : (strData[1] + increment))); + newStr = ((change === '*' && increment < 1) || (change === '/' && increment > 1) || increment < 0) ? Math.ceil(newStr) : Math.floor(newStr); + if (strData[2]) { if (strData[1] == originalData[1] && ((increment < 0 && strData[2] > originalData[2]) || (increment > 0 && strData[2] < originalData[2]))) { newStr = originalData[1]; @@ -8041,15 +7992,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars changeBy = newStr - strData[1]; if (strData[2] && ((change == '*' && increment < 1) || (change == '/' && increment > 1) || increment < 0)) changeBy--; if (newExp && ((change == '*' && increment > 1) || (change == '/' && increment < 1) || increment > 0)) changeBy++; - setAttr( charCS, [field,'current',,true], newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + + setAttr( charCS, [field+'-real','current'], newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); + setAttr( charCS, [field,'current',,true], (Math.max(1,Math.min(newStr,25)))+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '') ); } if (!silent) { - let content = '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s '+field+'}}{{desc='+charCS.get('name')+'\'s '+field + const content = '&{template:'+fields.warningTemplate+'}{{name='+charCS.get('name')+'\'s '+field+'}}{{desc='+charCS.get('name')+'\'s '+field + (increment != 0 ? (' has changed by '+changeBy+', to be '+original+newStr+(!_.isUndefined(newExp) ? '('+(newExp%100?newExp:'00')+')' : '')) : (' has been memorised as an original roll')) +'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg ); } else { - sendWait(senderId,0); + sendWait(senderId,0,'Magic handleStrengthChange'); } + await itemSlotData( tokenID, null, senderId, false ); } /* @@ -8058,8 +8012,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * passed back by the Library output parser * to recall the message text */ - - var handleShowMore = function( args, senderId ) { + + const handleShowMore = function( args, senderId ) { // log('handleShowMore: called, showMoreObj[args[1]] = '+showMoreObj[args[1]]); sendAPI( showMoreObj[args[1]], senderId, '', true ); @@ -8071,11 +8025,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /** * Show help message */ + + const showHelp = function() { - var showHelp = function() { - - var handoutIDs = getHandoutIDs(); - var content = '&{template:'+fields.menuTemplate+'}{{title=MagicMaster Help}}{{MagicMaster Help=For help on using MagicMaster, and the !magic commands, [**Click Here**]('+fields.journalURL+handoutIDs.MagicMasterHelp+')}}{{Spells & Magic Items Help=For help on the Spells, Powers and Magic Items databases, [**Click Here**]('+fields.journalURL+handoutIDs.MagicDatabaseHelp+')}}{{Effects Database=For help on using and adding Effects and the Effects Database, [**Click Here**]('+fields.journalURL+handoutIDs.EffectsDatabaseHelp+')}}{{Class Database=For help on using and adding to the Class Database, [**Click Here**]('+fields.journalURL+handoutIDs.ClassRaceDatabaseHelp+')}}{{Character Sheet Setup=For help on setting up character sheets for use with RPGMaster APIs, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterCharSheetSetup+')}}{{RPGMaster Templates=For help using RPGMaster Roll Templates, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterLibraryHelp+')}}'; + const handoutIDs = getHandoutIDs(); + const content = '&{template:'+fields.menuTemplate+'}{{title=MagicMaster Help}}{{MagicMaster Help=For help on using MagicMaster, and the !magic commands, [**Click Here**]('+fields.journalURL+handoutIDs.MagicMasterHelp+')}}{{Spells & Magic Items Help=For help on the Spells, Powers and Magic Items databases, [**Click Here**]('+fields.journalURL+handoutIDs.MagicDatabaseHelp+')}}{{Effects Database=For help on using and adding Effects and the Effects Database, [**Click Here**]('+fields.journalURL+handoutIDs.EffectsDatabaseHelp+')}}{{Class Database=For help on using and adding to the Class Database, [**Click Here**]('+fields.journalURL+handoutIDs.ClassRaceDatabaseHelp+')}}{{Character Sheet Setup=For help on setting up character sheets for use with RPGMaster APIs, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterCharSheetSetup+')}}{{RPGMaster Templates=For help using RPGMaster Roll Templates, [**Click Here**]('+fields.journalURL+handoutIDs.RPGMasterLibraryHelp+')}}'; sendFeedback(content,flags.feedbackName,flags.feedbackImg); }; @@ -8084,7 +8038,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle casting a spell */ - var doCastSpell = function( args, selected, senderId ) { + const doCastSpell = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8095,7 +8049,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'); + const chargedItem = (!!args[4] && args[4].toLowerCase()=='charged'); args = setCaster( args, messages.castSpellClass, senderId ); if (!args) { @@ -8114,7 +8068,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if there are any charges left */ - var doCastAgain = function( args, senderId ) { + const doCastAgain = function( args, senderId ) { if (!args) return; @@ -8123,11 +8077,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendResponseError(senderId,'Missing caster type or token ID'); return; } - var isPower = args[0].toUpperCase().includes('POWER'), - isMU = args[0].toUpperCase().includes('MU'), - tokenID = args[1], - charCS = getCharacter(tokenID), - spellName = args[2]; + const isPower = args[0].toUpperCase().includes('POWER'), + isMU = args[0].toUpperCase().includes('MU'), + tokenID = args[1], + charCS = getCharacter(tokenID); + + let spellName = args[2]; if (!charCS) { sendDebug('doCastAgain: invalid token_id'); @@ -8135,14 +8090,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var castingName = attrLookup( charCS, fields.Casting_name ), - castingLevel = attrLookup( charCS, fields.CastingLevel ), - spellRow = attrLookup( charCS, fields.SpellRowRef ), - spellCol = attrLookup( charCS, fields.SpellColIndex ), - firstColNum = isPower ? fields.PowersFirstColNum : fields.SpellsFirstColNum, - col = (firstColNum || spellCol != 1) ? spellCol : '', - rep = (isPower ? fields.Powers_table[0] : fields.Spells_table[0]) + col + '_$' + spellRow + '_', - spellCharges = parseInt((attrLookup( charCS, fields.Spells_castValue, (isPower ? fields.Powers_table[0] : fields.Spells_table[0]), spellRow, spellCol ) || 0),10); + const spellRow = attrLookup( charCS, fields.SpellRowRef ), + spellCol = attrLookup( charCS, fields.SpellColIndex ), + firstColNum = isPower ? fields.PowersFirstColNum : fields.SpellsFirstColNum, + col = (firstColNum || spellCol != 1) ? spellCol : '', + spellCharges = parseInt((attrLookup( charCS, fields.Spells_castValue, {tableDef:(isPower ? fields.Powers_table[0] : fields.Spells_table[0]), row:spellRow, col:spellCol} ) || 0),10); if (spellCharges <= 0) { sendParsedMsg( tokenID, messages.noMoreCharges, senderId ); @@ -8166,21 +8118,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Target a spell that requires a "to-hit" roll at a token */ - var doTouch = function( args, isGM ) { + const doTouch = function( args, isGM ) { if (!args) return; if (args.length < 4) { - sendDebug('doTouch: invalid number of arguments'); sendError('Too few targeting arguments'); return; } - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('doTouch: invalid tokenID parameter'); sendError('Internal MagicMaster error'); return; } @@ -8192,7 +8142,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Create a menu to change the memorised spells for the day */ - var doMemoriseSpells = function( args, selected, senderId ) { + const doMemoriseSpells = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8208,15 +8158,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var isMU = args[0].toUpperCase().includes('MU'), - isPR = args[0].toUpperCase().includes('PR'), - isPower = args[0].toUpperCase().includes('POWER'), - isMI = args[0].toUpperCase().includes('MI'), - tokenID = args[1], - charCS = getCharacter(tokenID), - classObjs = classObjects( charCS, senderId ), - isWiz = classObjs.some( c => c.base === 'wizard' ), - isPriest = classObjs.some( c => c.base === 'priest' ); + const isMU = args[0].toUpperCase().includes('MU'), + isPR = args[0].toUpperCase().includes('PR'), + isMI = args[0].toUpperCase().includes('MI'), + tokenID = args[1], + charCS = getCharacter(tokenID), + classObjs = classObjects( charCS, senderId ), + isWiz = classObjs.some( c => c.base === 'wizard' ), + isPriest = classObjs.some( c => c.base === 'priest' ); if ((isMU && !isWiz) || (isPR && !isPriest) || (isMU && isPR && !(isWiz || isPriest))) { sendParsedMsg( tokenID, messages.wrongSpellCaster, senderId ); @@ -8231,12 +8180,55 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } + /* + * Change the number of power uses per day + */ + + const doChangePerDay = function( args, selected, senderId ) { + + if (!args) return; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (args.length < 3) { + sendError('Missing token ID or power name when trying to set power uses per day'); + return; + } + const tokenID = args[0], + power = args[1], + change = args[2], + charCS = getCharacter(tokenID); + if (!charCS) { + sendError('Invalid character trying to set power uses per day',msg_orig[senderId]); + return; + } + let [row,col] = powerRowCol( charCS, power ); + if (_.isUndefined(row)) { + sendError('Invalid power name when trying to set uses per day',msg_orig[senderId]); + return; + }; + let upd = String(attrLookup( charCS, fields.Powers_castMax, {tableDef:fields.Powers_table,row:row,col:col} )); + if (_.isUndefined(upd)) { + sendError('Invalid power object when trying to set uses per day',msg_orig[senderId]); + return; + }; + if (change[0] === '=') { + upd = evalAttr(change.slice(1)); + } else if (isNaN(parseInt(change[0]))) { + upd = evalAttr(upd + change); + } else { + upd = evalAttr(upd + '+' + change); + }; + + handleMemoriseSpell([BT.MEMALL_POWERS,tokenID,1,row,col,power,upd],senderId); + return; + } + /* * Create a menu to see what spells the character has memorised for the day, * and allow selection to see the description of each spell. */ - var doViewMemorisedSpells = function( args, selected, senderId ) { + const doViewMemorisedSpells = function( args, selected, senderId ) { if (!args) return; if (args[0] && !args[1] && selected && selected.length) { @@ -8262,17 +8254,16 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * magic item that has stored spells */ - var doLearnSpell = function( args, selected, senderId ) { + const doLearnSpell = function( args, selected, senderId ) { if (!args) return; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (args.length < 2) { - sendDebug('doLearnSpell: invalid arguments, missing token_id or spell name'); sendError('Missing token ID or spell name when trying to learn a spell',msg_orig[senderId]); return; } - var charCS = getCharacter(args[0]); + const charCS = getCharacter(args[0]); if (!charCS) { sendError('Invalid character trying to learn a spell',msg_orig[senderId]); return; @@ -8287,7 +8278,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * possible actions are BT.VIEW_MI or BT.USE_MI */ - var doViewUseMI = function( args, action, senderId, selected ) { + const doViewUseMI = function( args, action, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8298,11 +8289,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - charCS = getCharacter(tokenID); + const tokenID = args[0], + charCS = getCharacter(tokenID); if (!charCS) { - sendDebug('doViewUseMI: invalid token_id'); sendResponseError(senderId,'Invalid token selected'); return; } @@ -8320,7 +8310,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or actually use the Magic Item power (isUse = true) */ - var doSelectMIpower = function( args, isUse, senderId ) { + const doSelectMIpower = function( args, isUse, senderId ) { if (!args) return; @@ -8339,7 +8329,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Restore uses per day of a specific power of a specific magic item */ - var doRestoreMIpowers = function( args, senderId ) { + const doRestoreMIpowers = function( args, senderId ) { if (!args) return; @@ -8359,7 +8349,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * long rest if the DM has enabled it. */ - var doRest = function( args, selected, senderId ) { + const doRest = function( args, selected, senderId ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8370,18 +8360,19 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - restType = (args[1] || 'SELECT').toUpperCase(), - casterType = (args[2] || 'MU+PR').toUpperCase(), - timeSpent = args[3]; + const tokenID = args[0], + restType = (args[1] || 'SELECT').toUpperCase(), + casterType = (args[2] || 'MU+PR').toUpperCase(); + + let timeSpent = args[3]; if (casterType.includes('MI') && casterType.includes('POWER')) { handleRest( args, senderId ); return; } - var curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doRest: invalid token_id'); @@ -8394,7 +8385,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isNaN(timeSpent)) timeSpent = 1; if (restType.toUpperCase() !== 'SELECT') { - var charRetail = parseData('['+((attrLookup( charCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {name:reClassSpecs.name,buy:reClassSpecs.buy,sell:reClassSpecs.sell}); + const charRetail = parseData('['+((attrLookup( charCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {name:reClassSpecs.name,buy:reClassSpecs.buy,sell:reClassSpecs.sell}); if (charRetail.buy || charRetail.sell) { sendAPI( fields.commandMaster+' --restock '+tokenID, senderId ); }; @@ -8434,27 +8425,26 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * actual name and speed are displayed. */ - var doResetSingleMI = function( args, senderId, selected ) { + const doResetSingleMI = function( args, senderId, selected ) { - var tokenID = args[0], - MIrowref = args[1], - reveal = (args[2] || '').toLowerCase(), - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID), + const tokenID = args[0], + reveal = (args[2] || '').toLowerCase(), + curToken = getObj('graphic',tokenID), + charCS = getCharacter(tokenID); + + let MIrowref = args[1], index = MIrowref, - MIname, MItrueName, item, inHandRow, - table, index; + MIname, inHandRow, table; if (!charCS) { charCS = getObj('character',tokenID); } if (!charCS) { - sendDebug('doResetSingleMI: invalid tokenID passed'); sendError('Internal MagicMaster error'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ), InHand = getTable( charCS, fieldGroups.INHAND ); if (isNaN(MIrowref)) { @@ -8465,12 +8455,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [MIrowref,table] = tableGroupIndex( Items, MIrowref ); } if (_.isUndefined(table) || _.isUndefined(MIrowref)) { - sendDebug('doResetSingleMI: invalid row reference passed'); sendError('Internal MagicMaster error'); return; } Items = getTable( charCS, fieldGroups[table] ); - MItrueName = Items.tableLookup( fields[Items.fieldGroup+'trueName'], MIrowref, '-' ); + const MItrueName = Items.tableLookup( fields[Items.fieldGroup+'trueName'], MIrowref, '-' ); Items = Items.tableSet( fields[Items.fieldGroup+'name'], MIrowref, MItrueName ); Items = Items.tableSet( fields[Items.fieldGroup+'speed'], MIrowref, Items.tableLookup( fields.Items_speed, MIrowref )); Items = Items.tableSet( fields[Items.fieldGroup+'type'], MIrowref, Items.tableLookup( fields.Items_trueType, MIrowref )); @@ -8483,7 +8472,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (MItrueName.trueCompare(attrLookup( charCS, fields.Equip_rightTrueRing ))) setAttr( charCS, fields.Equip_rightRing, MItrueName ); if (reveal.toLowerCase() !== 'silent') { if (reveal && reveal.length) { - item = abilityLookup( fields.MagicItemDB, MItrueName, charCS ); + const item = abilityLookup( fields.MagicItemDB, MItrueName, charCS ); doDisplayAbility( [tokenID,item.dB,index+'/'+MItrueName], senderId, selected ); } else if (curToken) { makeGMonlyMImenu( ['',tokenID,-1,''], senderId, MItrueName+' has been reset' ); @@ -8503,60 +8492,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * or more increments current by the value unless the max is reached. */ - var doChangeCharges = function( args, selected, senderId ) { //miRow + const doChangeCharges = function( args, selected, senderId ) { - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic doChangeCharges' ); if (!args) return; if (!args[0] && args[1] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0] || !args[1]) { - sendDebug('doChangeCharges: invalid arguments, missing token_id, item name or recharges'); sendError('Missing item name, recharges or token ID'); return; } - var tokenID = args[0], - command = args[1][0] == '-' ? 'DEDUCT' : (args[1][0] == '+' ? 'ADD' : (args[1][0] == '0' ? 'SELFCHARGE' : 'SET')), - MIname = args[2], - maxCharges = parseInt(args[3]), - chargeOverride = args[4] || '', + const tokenID = args[0], + command = args[1][0] == '-' ? 'DEDUCT' : (args[1][0] == '+' ? 'ADD' : (args[1][0] == '0' ? 'SELFCHARGE' : 'SET')), + MIname = args[2], + chargeOverride = args[4] || '', + fail = args[6] || '', + charCS = getCharacter(tokenID); + + let maxCharges = parseInt(args[3]), success = args[5] || '', - fail = args[6] || '', - r, i, m, charges, table, rowID, MIrow, - charCS = getCharacter(tokenID); + r, i, charges, table, rowID, MIrow, Items; try { - charges = args[1].match(/[\d\/\*\+\-]+/); + charges = args[1]; // .match(/[\d\/\*\+\-]+/); charges = Math.abs(parseFloat(evalAttr(charges,charCS))); } catch { charges = 0; } if (!charCS || isNaN(charges)) { - sendDebug('doNewMaxCharges: invalid token_id or charges'); sendError('Incorrect MagicMaster syntax'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); - if (MIname && MIname.length>0) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); [r,table,rowID] = tableGroupFind( Items, 'trueName', MIname ); MIrow = indexTableGroup( Items, table, r ); - } + if (_.isUndefined(r)) { + Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'name' ); + [r,table,rowID] = tableGroupFind( Items, 'name', MIname ); + MIrow = indexTableGroup( Items, table, r ); + }; + }; if (_.isUndefined(r)) { - MIrow = attrLookup( charCS, ['MIrowref', 'current'] ); + MIrow = attrLookup( charCS, fields.ItemRowRef ); [r,table,rowID] = tableGroupIndex( Items, MIrow ); } if (_.isUndefined(r)) { - sendDebug('doChangeCharges: magic item "'+MIname+'" not found'); sendError('Magic Item "'+MIname+'" not found in '+charCS.get('name')+'\'s items'); return; } Items = getTable( charCS, fieldGroups[table] ); - var MImaxQty = Items.tableLookup( fields[Items.fieldGroup+'trueQty'], r ) || maxCharges || 1, - MItype = (chargeOverride || Items.tableLookup( fields[Items.fieldGroup+'trueType'], r ) || '').toLowerCase(), - absorbing = MItype.includes('absorbing'), - exploding = MItype.includes('exploding'); + const MImaxQty = Items.tableLookup( fields[Items.fieldGroup+'trueQty'], r ) || maxCharges || 1, + MItype = (chargeOverride || Items.tableLookup( fields[Items.fieldGroup+'trueType'], r ) || '').toLowerCase(), + absorbing = MItype.includes('absorbing'), + exploding = MItype.includes('exploding'); switch (command.toUpperCase()) { case 'ADD': @@ -8580,7 +8571,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'SELFCHARGE': i = 1+(parseInt( Items.tableLookup(fields[Items.fieldGroup+'qty'], r) ) || 0); - m = (!isNaN(maxCharges)) ? maxCharges : (parseInt( Items.tableLookup(fields[Items.fieldGroup+'trueQty'], r) ) || 0); + const m = (!isNaN(maxCharges)) ? maxCharges : (parseInt( Items.tableLookup(fields[Items.fieldGroup+'trueQty'], r) ) || 0); if (charges != 0 && i < m) { sendAPI('!rounds --target-nosave caster|'+tokenID+'|'+MIname+'-recharge|'+charges+'|-1|'+MIname+' is recharging|stopwatch'); } else { @@ -8592,10 +8583,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars default: log('doChangeCharges: invalid command'); } -// sendAPI(fields.attackMaster+' --setAmmo '+tokenID+'|'+MIname+'|'+Items.tableLookup( fields.Items_qty, r )+'|'+Items.tableLookup( fields.Items_trueQty, r )+'|silent'); if (success || fail) { - sendResponse( charCS, '&{template:'+(success ? fields.menuTemplate : fields.warningTemplate)+'}{{name='+MIname.replace(/-/g,' ')+'}}{{desc='+(success || fail)+'}}' ); + if (success[0] === '!') { + sendAPI(success,senderId); + } else if (fail[0] === '!') { + sendAPI(fail,senderId); + } else { + sendResponse( charCS, '&{template:'+(success ? fields.menuTemplate : fields.warningTemplate)+'}{{name='+MIname.replace(/-/g,' ')+'}}{{desc='+(success || fail)+'}}' ); + }; } return; } @@ -8609,7 +8605,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * if the character has both types, ask which the player wants to use. */ - var doSpellsMenu = function( args, selected, senderId ) { + const doSpellsMenu = function( args, selected, senderId ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8620,12 +8616,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - isMU = args[1] && args[1].toUpperCase().includes('MU'), - isPR = args[1] && args[1].toUpperCase().includes('PR'), - isPower = args[1] && args[1].toUpperCase().includes('POWER'), - curToken = getObj('graphic',tokenID), - charCS = getCharacter(tokenID); + const tokenID = args[0], + isMU = args[1] && args[1].toUpperCase().includes('MU'), + isPR = args[1] && args[1].toUpperCase().includes('PR'), + isPower = args[1] && args[1].toUpperCase().includes('POWER'), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doSpellsMenu: invalid token_id'); @@ -8670,7 +8665,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * magic item (instead of programming in the database) **/ - var doStoreSpells = function( args, senderId ) { + const doStoreSpells = function( args, senderId ) { if (!args) return; @@ -8680,30 +8675,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - item = (args[1] || '').split('/'), - cmd = (args[2] || '').toUpperCase(), - level = args[3] || 1, - retMenu = args[4] || 'VIEW-ITEM', - charCS = getCharacter(tokenID), - ability, specs, isSpell, isPower; - + const tokenID = args[0], + cmd = (args[2] || '').toUpperCase(), + level = args[3] || 1, + retMenu = args[4] || 'VIEW-ITEM', + charCS = getCharacter(tokenID); + if (!charCS) { sendDebug('doStoreSpells: invalid token_id'); sendResponseError(senderId,'Invalid token specified'); return; }; + let item = (args[1] || '').split('/'); + item = item.length > 1 ? item[1] : item[0]; - ability = getAbility( fields.MagicItemDB, item, charCS ); + const ability = getAbility( fields.MagicItemDB, item, charCS ); if (!ability.obj || !ability.obj.length) { sendDebug('doStoreSpells: invalid item name'); sendResponseError(senderId,'Invalid item specified'); return; }; - - isSpell = reCastMIspellCmd.test(ability.obj[1].body); - isPower = reCastMIpowerCmd.test(ability.obj[1].body); + const isSpell = reCastViewMIspellCmd.test(ability.obj[1].body), + isPower = reCastViewMIpowerCmd.test(ability.obj[1].body); + if (isSpell || isPower) { setCaster( ['MI',tokenID,level,item], '', senderId ); args.unshift((isSpell && isPower) ? 'BOTH' : (isPower ? 'POWERS' : 'SPELLS')); @@ -8728,33 +8723,30 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * otherwise asks the GM if there is a trap. **/ - var doFindTraps = function( args, senderId ) { + const doFindTraps = function( args, senderId ) { if (!args) return; - - var msg = args; if (args.length != 3) { sendDebug('doFindTraps: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - pickToken = getObj('graphic',pickID), - charCS = getCharacter( tokenID ), - putCS = getCharacter( putID ), - pickCS = getCharacter( pickID ), - content; + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickToken = getObj('graphic',pickID), + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickCS = getCharacter( pickID ); if (!charCS || !putCS || !pickToken) { sendDebug('doFindTraps: invalid ID arguments'); sendResponseError(senderId,'One or more invalid tokens specified'); return; }; - var pickName = pickToken.get('name'), - putName = putCS.get('name'); + const pickName = pickToken.get('name'), + putName = putCS.get('name'); setAttr( putCS, ['target-level', 'current'], (pickCS ? characterLevel(pickCS) : 6) ); setAttr( putCS, ['target-token', 'current'], pickName ); @@ -8765,13 +8757,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( pickCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); setAttr( pickCS, fields.Trap_status, (attrLookup( pickCS, fields.Trap_status ) || 'Armed')); setAttr( pickCS, fields.Lock_status, (attrLookup( pickCS, fields.Lock_status ) || 'Locked')); - let findTraps = findObjs({_type:'ability',characterid:pickCS.id,name:'Trap-2'},{caseInsensitive:true}); + const findTraps = findObjs({_type:'ability',characterid:pickCS.id,name:'Trap-2'},{caseInsensitive:true}); if (findTraps && findTraps.length) { sendAPImacro( senderId, putID, pickID, findTraps[0].get('name') ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic doFindTraps'); if (csVer(pickCS) < 3.5 && ((attrLookup( pickCS, fields.Gender ) || '').dbName() === 'container')) { - let lock = (attrLookup( pickCS, fields.Container_lock ) || ''), - trap = (attrLookup( pickCS, fields.Container_trap ) || ''); + const lock = (attrLookup( pickCS, fields.Container_lock ) || ''), + trap = (attrLookup( pickCS, fields.Container_trap ) || ''); sendAPI( fields.commandMaster + ' --button '+BT.LOCKTYPE+'|'+pickID+'|'+lock+'|silent' ); sendAPI( fields.commandMaster + ' --button '+BT.TRAPTYPE+'|'+pickID+'|'+trap+'|silent' ); setAttr( pickCS, fields.msVersion, '3.5' ); @@ -8779,11 +8771,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } } - let chance = Math.max((parseInt(attrLookup( charCS, [fields.Find_Traps[0]+fields.Thief_postfix[0],fields.Find_Traps[1]] )) || 5),5); - content = '&{template:RPGMwarning}{{desc='+putCS.get('name')+' has just attempted to *Find Traps* on '+pickName+' which does not have a *Trap-2* or *Find Traps* macro. ' - + 'Their *Find/Remove Traps* chance is [['+chance+']]%}}'; + const chance = Math.max((parseInt(attrLookup( charCS, [fields.Find_Traps[0]+fields.Thief_postfix[0],fields.Find_Traps[1]] )) || 5),5); + let content = '&{template:RPGMwarning}{{desc='+putCS.get('name')+' has just attempted to *Find Traps* on '+pickName+' which does not have a *Trap-2* or *Find Traps* macro. ' + + 'Their *Find/Remove Traps* chance is [['+chance+']]%}}'; sendFeedback( content ); - let findTrapMacro = (state.MagicMaster.gmRolls ? 'GM-Roll-' : '')+'Magic-FindTrap'; + const findTrapMacro = (state.MagicMaster.gmRolls ? 'GM-Roll-' : '')+'Magic-FindTrap'; getAbility( fields.AbilitiesDB, findTrapMacro, charCS ); getAbility( fields.AbilitiesDB, 'Magic-NoTrap', charCS ); getAbility( fields.AbilitiesDB, 'Magic-NotFoundTrap', charCS ); @@ -8794,7 +8786,62 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars content = '&{template:RPGMdefault}{{title=Find Traps}}{{desc=Do you want to search '+pickName+' for traps? Your chance of success would appear to be [['+chance+']]%, but that might alter with circumstance}}{{desc1=[Yes]('+(state.MagicMaster.gmRolls ? ('!magic --display-ability gm|'+putID+'|'+putCS.id+'|GM-Roll-Magic-FindTrap|gm{Find Traps Roll? Chance is '+chance+'%/1d100,[[1d100]]/Succeed,[[1d'+chance+']]/Fail,[['+chance+'+1d'+(99-chance)+']]}') : ('~'+putName+'|Magic-FindTrap'))+') or [No](!magic --message '+tokenID+'|Not Finding Traps|OK, having thought about your chance of success, you decide to let someone else have a go...)}}'; setAttr( charCS, fields.PlayerID, senderId ); sendResponse( charCS, content, senderId ); + }; + + /* + * Function to display the menu for picking up or putting away Magic Items + * from one Magic Item bag into another Magic Item bag. + */ + + const doPickOrPut = function( args, senderId, buy=false ) { + + if (!args) return; + + if (args.length < 3) { + sendError('Invalid MagicMaster command syntax'); + return; + }; + + const tokenID = args[0], + pickID = args[1], + putID = args[2], + pickPocket = (!buy && !!args[4] ? 'true' : 'false'), + charCS = getCharacter( tokenID ), + pickCS = getCharacter( pickID ); + + let menuType = args[3]; + + if (!tokenID || !putID || !pickID || !charCS || !pickCS) { + sendError('One or more invalid tokens specified'); + return; + }; + setAttr( charCS, fields.PickPocket, pickPocket ); + + let playerConfig = getSetPlayerConfig( senderId ); + + if (menuType && ['short','long'].includes(menuType.toLowerCase())) { + playerConfig.pickOrPutType = menuType.toLowerCase(); + getSetPlayerConfig( senderId, playerConfig ); + } else if (playerConfig && playerConfig.pickOrPutType) { + menuType = playerConfig.pickOrPutType; + } else { + if (!playerConfig) { + playerConfig = {}; + } + playerConfig.pickOrPutType = menuType = 'short'; + getSetPlayerConfig( senderId, playerConfig ); + }; + + setAttr( charCS, fields.ItemRowRef, -1 ); + setAttr( charCS, fields.ItemCastingTime, 0 ); + setAttr( charCS, [fields.Expenditure[0],'current'], 0 ); + setAttr( charCS, [fields.Expenditure[0],'max'], 0 ); + clearItemSelection( pickCS ); + + args = ['POPmenu',tokenID,-1,pickID,putID,-1]; + makeShortPOPmenu( args, senderId, buy ); + return; }; /** @@ -8804,29 +8851,27 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the target might also be trapped. **/ - var doSearchForMIs = function( args, senderId, buy=false ) { + const doSearchForMIs = function( args, senderId, buy=false ) { // get if (!args) return; - var msg = args; + const msg = args; if (args.length != 3) { sendDebug('doSearchForMIs: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - search = (tokenID === putID), - containerID = search ? pickID : putID, - charCS = getCharacter( tokenID ), - putCS = getCharacter( putID ), - pickToken = getObj('graphic',pickID), - pickCS = getCharacter( pickID ), - containerCS = getCharacter( containerID ), - MIBagSecurity, - content; + const tokenID = args[0], + pickID = args[1], + putID = args[2], + search = (tokenID === putID), + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ), + putCS = getCharacter( putID ), + pickToken = getObj('graphic',pickID), + pickCS = getCharacter( pickID ), + containerCS = getCharacter( containerID ); if (!charCS || !putCS) { sendDebug('doSearchForMIs: invalid ID arguments'); @@ -8839,6 +8884,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } + if (!pickCS) { + sendDebug('doSearchForMIs: invalid ID arguments'); + sendResponseError(senderId,'One or more invalid tokens selected'); + return; + }; + + if (csVer(containerCS) < 3.5 && ((attrLookup( containerCS, fields.Gender ) || '').dbName() === 'container')) { let lock = (attrLookup( containerCS, fields.Container_lock ) || ''), trap = (attrLookup( containerCS, fields.Container_trap ) || ''); @@ -8854,27 +8906,25 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars setAttr( containerCS, fields.Container_put, putID ); setAttr( containerCS, fields.GM_Rolls, (state.MagicMaster.gmRolls ? 'GM-Roll-' : '') ); - MIBagSecurity = parseInt(attrLookup( containerCS, fields.ItemContainerType )) || 0; + let MIBagSecurity = parseInt(attrLookup( containerCS, fields.ItemContainerType )) || 0; // buy = buy || retailers.includes(attrLookup( containerCS, fields.Profession )); - let intelligence = Math.max( (parseInt(attrLookup( containerCS, fields.Intelligence )) || 0), (parseInt(attrLookup( containerCS, fields.Monster_int )) || 0)), - hp = parseInt(attrLookup( containerCS, fields.HP )) || 0; + const intelligence = Math.max( (parseInt(attrLookup( containerCS, fields.Intelligence )) || 0), (parseInt(attrLookup( containerCS, fields.Monster_int )) || 0)), + hp = parseInt(attrLookup( containerCS, fields.HP )) || 0; if (buy && ((MIBagSecurity != 2 && MIBagSecurity != 3 && MIBagSecurity != 7) || hp <= 0 || intelligence <= 3)) { - content = '&{template:'+fields.warningTemplate+'}{{title=Not a Sentient Creature}}{{desc=Either this creature has never been sentient, or they are no longer sentient. You cannot trade with non-sentient beings!}}'; + const content = '&{template:'+fields.warningTemplate+'}{{title=Not a Sentient Creature}}{{desc=Either this creature has never been sentient, or they are no longer sentient. You cannot trade with non-sentient beings!}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } else if (buy) { - let charRetail = parseData('['+((attrLookup( containerCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}), - classRetail = classObjects( containerCS, senderId, {buy:reClassSpecs.buy,sell:reClassSpecs.sell})[0].classData, - raceRetail = resolveData( (attrLookup( containerCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, containerCS, {buy:reClassSpecs.buy,sell:reClassSpecs.sell} ).parsed, - sells = !!charRetail.sell || !!classRetail.sell || !!raceRetail.sell, - buys = !!charRetail.buy || !!classRetail.buy || !!raceRetail.buy; + const charRetail = parseData('['+((attrLookup( containerCS, fields.AttrNotes ) || '').match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1]+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}), + classRetail = classObjects( containerCS, senderId, {buy:reClassSpecs.buy,sell:reClassSpecs.sell})[0].classData, + raceRetail = resolveData( (attrLookup( containerCS, fields.Race ) || 'Human'), fields.RaceDB, reRaceData, containerCS, {buy:reClassSpecs.buy,sell:reClassSpecs.sell} ).parsed, + sells = !!charRetail.sell || !!classRetail.sell || !!raceRetail.sell, + buys = !!charRetail.buy || !!classRetail.buy || !!raceRetail.buy; buy = search ? sells : buys; -// log('doSearchForMIs: buying from '+containerCS.get('name')+', string = '+_.pairs(parseData('['+((attrLookup( containerCS, fields.AttrNotes ).match(/n?pcdata=\[(.+?)\]/im) || ['',''])[1])+']', {buy:reClassSpecs.buy,sell:reClassSpecs.sell}))+', charRetail.buy = '+charRetail.buy+' = '+!!charRetail.buy+', buys = '+buys+', sells = '+sells+', thus buy = '+buy); -// log('doSearchForMIs: buys = '+buys+', char = '+charRetail.buy+', race = '+raceRetail.buy+', class = '+classRetail.buy); if (!buy) { - content = '&{template:'+fields.menuTemplate+'}}{{title=Nothing to '+(search ? 'Buy' : 'Sell')+'}}{{desc=I\'m sorry, but I am not someone who '+(search ? 'sells' : 'buys')+' items. Perhaps you\'d do better talking to a retailer in a shop in town?}}'; + const content = '&{template:'+fields.menuTemplate+'}}{{title=Nothing to '+(search ? 'Buy' : 'Sell')+'}}{{desc=I\'m sorry, but I am not someone who '+(search ? 'sells' : 'buys')+' items. Perhaps you\'d do better talking to a retailer in a shop in town?}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } @@ -8884,8 +8934,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars doPickOrPut( msg, senderId, buy ); return; } else if (MIBagSecurity === 4 || MIBagSecurity === 5) { - var trapVersion = (attrLookup( containerCS, ['trap-version', 'current'] ) || 0), - trapName = 'trap-'+trapVersion, + const trapVersion = (attrLookup( containerCS, ['trap-version', 'current'] ) || 0); + let trapName = 'trap-'+trapVersion, trapMacro = findObjs({ _type : 'ability', characterid : containerCS.id, name : trapName }, {caseInsensitive: true}); if (!trapMacro || trapMacro.length === 0) { trapName = 'Check-for-MIBag-'+trapVersion; @@ -8897,7 +8947,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } if (trapMacro && trapMacro.length) { sendAPImacro( senderId, tokenID, containerID, trapName ); - sendWait(senderId,0); + sendWait(senderId,0,'Magic doSearchForMIs'); } else { sendDebug('doSearchForMIs: Not found trapMacro'); MIBagSecurity = 1; @@ -8909,14 +8959,15 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } else if ((MIBagSecurity < 4 || MIBagSecurity == 7) && (!search || MIBagSecurity < 2 || hp <= 0 || intelligence <= 0)) { doPickOrPut( msg, senderId ); } else if (MIBagSecurity < 4 || MIBagSecurity == 7) { + // target is a creature that might detect any snooping. // A pick pockets roll is necessary - content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets}}' - + '{{desc=Are you trying to '+(search ? 'pick ' : 'sneak something into ')+containerCS.get('name')+'\'s pocket?\n' - + '[Yes](!magic --pickpockets '+tokenID+'|'+pickID+'|'+putID+'|[[?{Roll vs Pick Pockets|1d100}]])' - + ' or [No](!magic --message '+tokenID+'|Pick Pocket|OK, not making the attempt)' - + '\nor I\'m trying to [buy items](!magic --buy '+tokenID+'|'+pickID+'|'+putID+') from '+containerCS.get('name')+'}}'; + const content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets}}' + + '{{desc=Are you trying to '+(search ? 'pick ' : 'sneak something into ')+containerCS.get('name')+'\'s pocket?\n' + + '[Yes](!magic --pickpockets '+tokenID+'|'+pickID+'|'+putID+'|[[?{Roll vs Pick Pockets|1d100}]])' + + ' or [No](!magic --message '+tokenID+'|Pick Pocket|OK, not making the attempt)' + + '\nor I\'m trying to [buy items](!magic --buy '+tokenID+'|'+pickID+'|'+putID+') from '+containerCS.get('name')+'}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -8926,8 +8977,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /** * Function to display the Edit MI Bag menu */ - - var doEditMIbag = function( args, senderId, selected ) { + + const doEditMIbag = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -8938,9 +8989,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - cmd = (_.isUndefined(args[1]) || args[1].toUpperCase() == 'MAGICAL') ? BT.EDIT_MI : (args[1].toUpperCase() == 'MARTIAL' ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS), - charCS = getCharacter(tokenID); + const tokenID = args[0], + cmd = (_.isUndefined(args[1]) || args[1].toUpperCase() == 'MAGICAL') ? BT.EDIT_MI : (args[1].toUpperCase() == 'MARTIAL' ? BT.EDIT_MARTIAL : BT.EDIT_ALLITEMS), + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doEditMIbag: invalid ID arguments'); @@ -8958,23 +9009,22 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * options and ability macros set in the target character sheet. **/ - var doPickPockets = function( args, senderId ) { + const doPickPockets = function( args, senderId ) { if (!args) return; - if (args.length != 4) { sendDebug('doPickPockets: invalid number of parameters'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; } - var tokenID = args[0], - pickID = args[1], - putID = args[2], - ppRoll = parseInt(args[3],10), - search = putID === tokenID, - containerID = search ? pickID : putID, - charCS = getCharacter( tokenID ); + const tokenID = args[0], + pickID = args[1], + putID = args[2], + ppRoll = parseInt(args[3],10), + search = putID === tokenID, + containerID = search ? pickID : putID, + charCS = getCharacter( tokenID ); if (!charCS || !containerID) { sendDebug('doPickPockets: invalid ID arguments'); @@ -8988,9 +9038,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var pick_pockets = Math.max(parseInt(attrLookup( charCS, [fields.Pick_Pockets[0]+fields.Thief_postfix[0], fields.Pick_Pockets[1]] ) || 0),state.attackMaster.thieveCrit), - pp_target = (Math.min(Math.ceil(Math.max(pick_pockets,0)),96)), - content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets '+(search ? 'for items' : 'to place items')+'}}' + const pick_pockets = Math.max(parseInt(attrLookup( charCS, [fields.Pick_Pockets[0]+fields.Thief_postfix[0], fields.Pick_Pockets[1]] ) || 0),state.attackMaster.thieveCrit), + pp_target = (Math.min(Math.ceil(Math.max(pick_pockets,0)),96)); + let content = '&{template:'+fields.menuTemplate+'}{{name='+charCS.get('name')+' is Picking Pockets '+(search ? 'for items' : 'to place items')+'}}' + '{{Target=[['+pp_target+']]}}' + '{{Rolled=[[' + ppRoll + ']]}}' + '{{Result=Rolled<=Target}}'; @@ -9006,75 +9056,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - - /* - * Function to display the menu for picking up or putting away Magic Items - * from one Magic Item bag into another Magic Item bag. - */ - - var doPickOrPut = function( args, senderId, buy=false ) { - - if (!args) return; - - if (args.length < 3) { - sendDebug('doPickOrPut: Invalid number of arguments'); - sendError('Invalid MagicMaster command syntax'); - return; - }; - - var tokenID = args[0], - pickID = args[1], - putID = args[2], - menuType = args[3], - pickPocket = (!buy && !!args[4] ? 'true' : 'false'), - charCS = getCharacter( tokenID ), - pickCS = getCharacter( pickID ), - content; - - if (!tokenID || !putID || !pickID || !charCS || !pickCS) { - sendDebug('doPickOrPut: One or more IDs are invalid'); - sendError('One or more invalid tokens specified'); - return; - }; - setAttr( charCS, fields.PickPocket, pickPocket ); - - var menu, - playerConfig = getSetPlayerConfig( senderId ), - pickName = pickCS.get('name'); - - if (menuType && ['short','long'].includes(menuType.toLowerCase())) { - playerConfig.pickOrPutType = menuType.toLowerCase(); - getSetPlayerConfig( senderId, playerConfig ); - } else if (playerConfig && playerConfig.pickOrPutType) { - menuType = playerConfig.pickOrPutType; - } else { - if (!playerConfig) { - playerConfig = {}; - } - playerConfig.pickOrPutType = menuType = 'short'; - getSetPlayerConfig( senderId, playerConfig ); - }; - - setAttr( charCS, fields.ItemRowRef, -1 ); - setAttr( charCS, fields.ItemCastingTime, 0 ); - setAttr( charCS, [fields.Expenditure[0],'current'], 0 ); - setAttr( charCS, [fields.Expenditure[0],'max'], 0 ); - - args = ['POPmenu',tokenID,-1,pickID,putID,-1]; - - makeShortPOPmenu( args, senderId, buy ); - - return; - - }; - /* * Add a magic item directly to a creature or container, with * additional options to replace another item and/or take the * added item in-hand */ - var doAddItem = function( args, senderID, selected ) { + const doAddItem = function( args, senderID, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9085,21 +9073,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var tokenID = args[0], - miRowRef = args[1], - miChosen = args[2], - miQty = args[3] || 0, - miInHand = (args[4] || '='), - isGM = (args[5] || '').toUpperCase() === 'NOCURSE', - hand = '', - charCS = getCharacter(tokenID); - + const tokenID = args[0], + miRowRef = args[1], + miChosen = args[2], + isGM = (args[5] || '').toUpperCase() === 'NOCURSE', + charCS = getCharacter(tokenID); + if (!charCS) { sendDebug('doAddItem: invalid ID argument'); sendResponseError(senderId,'Invalid token specified'); return; }; + let miInHand = (args[4] || '='), + hand = ''; + if (miRowRef.length && isNaN(miRowRef) && miInHand === '=') { hand = getTableField( charCS, {}, fields.InHand_table, fields.InHand_trueName ).tableFind( fields.InHand_trueName, miRowRef ); miInHand = _.isUndefined(hand) ? '' : hand; @@ -9118,24 +9106,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle the Config command, to configure the API */ - var doConfig = function( args ) { + const doConfig = function( args ) { if (!args || args.length < 2) { makeConfigMenu( args ); return; } - var flag = args[0].toLowerCase(), - value = args[1].toLowerCase() === 'true', - msg = ''; + const flag = args[0].toLowerCase(), + value = args[1].toLowerCase() === 'true'; + let msg = ''; switch (flag.toLowerCase()) { -/* case 'fancy-menus': - state.MagicMaster.fancy = value; - if (!_.isUndefined(state.attackMaster.fancy)) state.attackMaster.fancy = value; - msg = value ? 'Fancy menus will be used' : 'Plain menus will be used'; - break; -*/ case 'specialist-rules': state.MagicMaster.spellRules.specMU = value; msg = value ? 'Only rules-based specialists get extra spell' : 'Any specialist gets extra spell'; @@ -9188,6 +9170,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars msg = value ? 'GM rolls skill-based chances' : 'Player rolls skill-based chances'; break; + case 'encumbrance': + state.MagicMaster.encumbrance = value; + msg = value ? 'Encumbrance penalties applied' : 'Encumbrance ignored'; + break; + default: sendError('Invalid Config Command syntax'); return; @@ -9196,93 +9183,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - /** - * Set options for a particular player - **/ - - var doSetOptions = function( args, senderId ) { - - if (!args) return; - - if (args.length != 2) { - sendDebug('doSetOptions: invalid argument pair. Must be [option|value]'); - sendError('Invalid MagicMaster command syntax'); - } - - var option = args[0], - value = args[1], - player = getObj('player',senderId), - playerName, content, - config = getSetPlayerConfig( senderId ) || {}; - - if (player) { - playerName = player.get('_displayname'); - } else { - playerName = 'GM'; - } - content = '&{template:'+fields.menuTemplate+'}{{name='+playerName+'\'s MagicMaster options}}'; - - switch (option.toLowerCase()) { - - case 'menutype': - value = value.toLowerCase(); - if (!['short','long'].includes(value)) { - sendResponseError( senderId, 'Invalid menuType option. Use short or long' ); - return; - } - config.pickOrPutType = value; - getSetPlayerConfig( senderId, config ); - content += '{{desc=Menu type set to '+value+'}}'; - sendResponsePlayer(senderId,content); - config = getSetPlayerConfig( senderId ); - break; - - case 'menudisplay': - value = value.toLowerCase(); - if (!['images','plain','dark'].includes(value)) { - sendResponseError( senderId, 'Invalid menuDisplay option. Use images, plain, or dark.' ); - return; - } - config.menuImages = (value === 'images'); - config.menuPlain = (value === 'plain'); - config.menuDark = (value === 'dark'); - config = getSetPlayerConfig(senderId,config); - doDispConfig(senderId); - redisplayOutput(senderId); - break; - - default: - sendResponseError( senderId, 'Invalid MagicMaster option. [Show Help](!magic --help)'); - break; - }; - return config; - }; - - /** - * Present a menu to select player-specific chat display options - **/ - - var doDispConfig = function( senderId ) { - - let config = getSetPlayerConfig( senderId ) || {}; - if (!config) config = {menuImages:state.MagicMaster.fancy, menuPlain:!state.MagicMaster.fancy, menuDark:false}; - let player = getObj('player',senderId); - let content = '/w "' + player.get('_displayname') + '" ' + design.info_msg - + '' - + '' - + '' - + '' - + '
    Menu images'+(config.menuImages ? '\u2705' : '\u2B1C')+'
    Menu plain'+(config.menuPlain ? '\u2705' : '\u2B1C')+'
    Menu dark'+(config.menuDark ? '\u2705' : '\u2B1C')+'
    '; - sendAPI( content, senderId, '', true ); - return; - } - /** * Add or subtract an increment to the Strength value, * taking into account any Exceptional Strength set **/ - var doStrengthChange = function( args, senderId, selected ) { + const doStrengthChange = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9293,18 +9199,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - increment = args[1], - field = args[2] || fields.Strength[0], - silent = (args[3] || 'SILENT').toUpperCase() == 'SILENT', - charCS = getCharacter(tokenID); + const tokenID = args[0], + increment = args[1], + field = args[2] || fields.Strength[0], + silent = (args[3] || 'SILENT').toUpperCase() == 'SILENT', + charCS = getCharacter(tokenID); if (!charCS) { sendDebug('doStrengthChange: invalid ID argument'); sendResponseError(senderId,'One or more invalid tokens specified'); return; }; - handleStrengthChange( charCS, field, increment, senderId, silent ); + handleStrengthChange( tokenID, field, increment, senderId, silent ); return; } @@ -9314,7 +9220,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the class to change is not in the argument list **/ - var doLevelChange = function( args, senderId, selected ) { + const doLevelChange = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9325,8 +9231,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var change = (parseInt(args[1]) || -1), - charCS = getCharacter(args[0]); + const change = (parseInt(args[1]) || -1), + charCS = getCharacter(args[0]); if (!charCS) { sendDebug('doLevelChange: invalid ID argument'); @@ -9345,7 +9251,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Present the Magic Item Bag menu for the tokenID passed, if it has one **/ - var doMIBagMenu = function( args, senderId, selected ) { + const doMIBagMenu = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; @@ -9355,8 +9261,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - curToken = getObj( 'graphic', tokenID ); + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ); if (!curToken){ sendDebug('doMIBagMenu: Invalid tokenID: ' + tokenID); @@ -9364,28 +9270,20 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; } - var charID = curToken.get('represents'), - tokenName = curToken.get('name'), - ppt, ppTarget, ppTargetMax, - content, menuType, - charCS = getObj( 'character', charID ), - charName = charCS.get('name'); - - ppt = (attrLookup( charCS, ['ppt', 'current'] ) || 5); - ppTarget = Math.min(Math.ceil(1.5*Math.max(ppt,0)),96); - ppTargetMax = Math.min(Math.ceil(Math.max(ppt,0)),96); - - content = '&{template:'+fields.menuTemplate+'} {{name=' + tokenName + '\'s\n' - + 'Items & Equipment Menu}}' - + '{{Section1=[Use a Magic Item](!magic --use-mi '+tokenID+')' - + '[View your Item bag](!magic --view-mi '+tokenID+')}}' - + '{{Section2=[Find Traps](!magic --find-traps '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' - + '[Search for Items & Treasure](!magic --search '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' - + '[Store Items](!magic --search '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})}}' - + '{{Section3=[Buy Items from someone](!magic --buy '+tokenID+'|@{target|Buy from whom?|token_id}|'+tokenID+')' - + '[Sell Items to someone](!magic --sell '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})' - + '[Pick someone\'s Pocket](!magic --search '+tokenID+'|@{target|Pick who\'s pocket?|token_id}|'+tokenID+')}}' - + '{{Section4=[Change Your Items](!magic --edit-mi '+tokenID+')}}'; + const tokenName = curToken.get('name'), + charCS = getCharacter(tokenID); + + const content = '&{template:'+fields.menuTemplate+'} {{name=' + tokenName + '\'s\n' + + 'Items & Equipment Menu}}' + + '{{Section1=[Use a Magic Item](!magic --use-mi '+tokenID+')' + + '[View your Item bag](!magic --view-mi '+tokenID+')}}' + + '{{Section2=[Find Traps](!magic --find-traps '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Search for Items & Treasure](!magic --search '+tokenID+'|@{target|Search Where?|token_id}|'+tokenID+')' + + '[Store Items](!magic --search '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})}}' + + '{{Section3=[Buy Items from someone](!magic --buy '+tokenID+'|@{target|Buy from whom?|token_id}|'+tokenID+')' + + '[Sell Items to someone](!magic --sell '+tokenID+'|'+tokenID+'|@{target|Store Where?|token_id})' + + '[Pick someone\'s Pocket](!magic --search '+tokenID+'|@{target|Pick who\'s pocket?|token_id}|'+tokenID+')}}' + + '{{Section4=[Change Your Items](!magic --edit-mi '+tokenID+')}}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); }; @@ -9402,16 +9300,21 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0]) { - sendDebug('doGMonlyMImenu: Invalid number of arguments'); sendError('Invalid MagicMaster syntax'); return; }; - var tokenID = args[0]; + const tokenID = args[0], + charCS = getCharacter(tokenID); args = ['GM-MIMENU', tokenID, -1, '' ]; - makeGMonlyMImenu( args, senderId ); + if (!!charCS) { + clearItemSelection( charCS ); + makeGMonlyMImenu( args, senderId ); + } else { + sendParsedMsg( tokenID, messages.noChar, senderId ); + }; return; } @@ -9421,39 +9324,38 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * rest, or only manually by the GM using the GM-edit-MI Reset Single * function. */ - - var doSetReveal = function( args, senderId, selected ) { + + const doSetReveal = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { args[0] = selected[0]._id; } else if (!args[0]) { - sendDebug('doGMonlyMImenu: Invalid number of arguments'); sendError('Invalid MagicMaster syntax'); return; }; - var tokenID = args[0], - hiddenItem = args[1] || '', - revealType = (args[2] || '').toLowerCase(), - MIrowref = parseInt(args[3]), - dispMenu = (args[4] || '').toUpperCase() === 'MENU', - charCS = getCharacter(tokenID); + const tokenID = args[0], + hiddenItem = args[1] || '', + revealType = (args[2] || '').toLowerCase(), + dispMenu = (args[4] || '').toUpperCase() === 'MENU', + charCS = getCharacter(tokenID); + + let MIrowref = parseInt(args[3]); if (!charCS) { - sendDebug('doSetReveal: Invalid tokenID: ' + tokenID); sendError('Invalid token specified'); return; } if (revealType && !['view','use','rest'].includes(revealType)) { - sendDebug('doSetReveal: Invalid reveal type: ' + revealType); sendError('Invalid reveal type specified'); return; } - var Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ), + let Items = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ), table; + Items = getTableGroupField( charCS, Items, fieldGroups.MI, 'name' ); if (isNaN(MIrowref)) { @@ -9462,7 +9364,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars [MIrowref,table] = tableGroupIndex( Items, MIrowref ); } if (_.isUndefined(MIrowref) || isNaN(MIrowref)) { - sendDebug('doSetReveal: Item not found: ' + hiddenItem); sendError('Invalid Item specified'); return; } @@ -9476,11 +9377,41 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; + /* + * Display the dialog explaining the encumbrance and + * move of a character/NPC. + */ + + async function doCheckMove( args, senderId, selected ) { + + if (!args) args=[]; + if (!args[0] && selected && selected.length) { + args[0] = selected[0]._id; + } else if (!args[0]) { + sendDebug('doCheckMove: Invalid number of arguments'); + sendResponseError(senderId,'Valid token not specified'); + return; + }; + + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendResponseError(senderId,'Invalid token specified'); + return; + } + + await itemSlotData( tokenID, null, senderId ); + if (!silent) sendAPI( fields.attackMaster+' --button '+BT.CHECK_MOVE+'|'+tokenID ); + return; + }; + /* * RED: v1.012 A menu to allow players to choose light sources */ - var doLightSourcesMenu = function( args, senderId, selected ) { + const doLightSourcesMenu = function( args, senderId, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9491,156 +9422,189 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - curToken = getObj( 'graphic', tokenID ); + const tokenID = args[0], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let lightSource = 'None'; - if (!curToken){ - sendDebug('doLightSourcesMenu: Invalid tokenID: ' + tokenID); - sendResponseError(senderId,'Invalid token specified'); - return; - } - - var charCS = getCharacter( tokenID ); if (!charCS) { sendDebug('doLightSourcesMenu: Invalid tokenID: ' + tokenID); sendResponseError(senderId,'Invalid token specified'); return; } - - var lightSource = attrLookup( charCS, fields.LightSource ) || 'None', - weaponSwitch = (lightSource == 'Weapon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Weapon)Off'), - torchSwitch = (lightSource == 'Torch') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Torch)Off'), - hoodedSwitch = (lightSource == 'Hooded') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Hooded)Off'), - bullseyeSwitch = (lightSource == 'Bullseye') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Bullseye)Off'), - contLightSwitch = (lightSource == 'ContLight') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|ContLight)Off'), - beaconSwitch = (lightSource == 'Beacon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') - : ('[On](!magic --changelight '+tokenID+'|Beacon)Off'), - - content = '&{template:'+fields.menuTemplate+'}{{name=Manage '+curToken.get('name')+'\'s Light Sources}}' - + '{{desc=Current state indicated by a green button like On. ' - + 'Select a red button to turn the current source off and choose a different one.}}' - + '{{desc1=In order of illumination' - + ''+weaponSwitch+'' - + ''+torchSwitch+'' - + ''+hoodedSwitch+'' - + ''+bullseyeSwitch+'' - + ''+contLightSwitch+'' - + ''+beaconSwitch+'' - + '
    Magic Weapon5ft
    Torch15ft
    Hooded Lantern30ft
    Bullseye Lantern60ft beam
    Cont-Light gem60ft
    Beacon Lantern240ft beam
    }}'; + if (!curToken) { + curToken = charCS; + lightSource = attrLookup( charCS, fields.LightSource ) || 'None'; + } else { + const lowLight = curToken.get('emits_low_light'), + lightDist = parseInt(curToken.get('low_light_distance')); + lightSource = (!lightDist ? 'None' : (lightDist <= 5 ? 'Weapon' : (lightDist <= 15 ? 'Torch' : (lightDist <= 30 ? 'Hooded' : (lightDist <= 60 ? (!lowLight ? 'Bullseye' : 'ContLight') : 'Beacon'))))); + }; + + const weaponSwitch = (lightSource === 'Weapon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Weapon)Off'), + torchSwitch = (lightSource === 'Torch') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Torch)Off'), + hoodedSwitch = (lightSource === 'Hooded') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Hooded)Off'), + bullseyeSwitch = (lightSource === 'Bullseye') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Bullseye)Off'), + contLightSwitch = (lightSource === 'ContLight') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|ContLight)Off'), + beaconSwitch = (lightSource === 'Beacon') ? ('On[Off](!magic --changelight '+tokenID+'|None)') + : ('[On](!magic --changelight '+tokenID+'|Beacon)Off'), + + content = '&{template:'+fields.menuTemplate+'}{{name=Manage '+(curToken.get('name'))+'\'s Light Sources}}' + + '{{desc=Current state indicated by a green button like On. ' + + 'Select a red button to turn the current source off and choose a different one.}}' + + '{{desc1=In order of illumination' + + ''+weaponSwitch+'' + + ''+torchSwitch+'' + + ''+hoodedSwitch+'' + + ''+bullseyeSwitch+'' + + ''+contLightSwitch+'' + + ''+beaconSwitch+'' + + '
    Magic Weapon5ft
    Torch15ft
    Hooded Lantern30ft
    Bullseye Lantern60ft beam
    Cont-Light gem60ft
    Beacon Lantern240ft beam
    }}'; sendResponse( charCS, content, senderId, flags.feedbackName, flags.feedbackImg, tokenID ); return; } - var doLightSource = function( args, dispMenu, senderId ) { + async function doLightSource( args, dispMenu, senderId ) { + const changeTokenLight = function( token, newSource ) { + + return new Promise(resolve => { + let errFlag = false; + try { +// log('changeTokenLight: called to set token '+token.get('name')+' on page '+getObj('page',token.get('_pageid')).get('name')+' to have '+newSource+' light'); + switch (newSource.toLowerCase()) { + case 'weapon': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 5, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'torch': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 1, low_light_distance: 15, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'hooded': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 15, low_light_distance: 30, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'contlight': + token.set({emits_bright_light: true, emits_low_light: true, + bright_light_distance: 50, low_light_distance: 60, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + + case 'bullseye': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 60, low_light_distance: 60, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 19 + }); + break; + + case 'beacon': + token.set({emits_bright_light: true, emits_low_light: false, + bright_light_distance: 240, low_light_distance: 240, + has_directional_bright_light: true, has_directional_dim_light: false, + directional_bright_light_centre: 180, directional_bright_light_total: 21 + }); + break; + + case 'none': + default: + token.set({emits_bright_light: false, emits_low_light: false, + bright_light_distance: 0, low_light_distance: 0, + has_directional_bright_light: false, has_directional_dim_light: false, + directional_dim_light_centre: 180, directional_dim_light_total: 360, + directional_bright_light_centre: 180, directional_bright_light_total: 360 + }); + break; + }; + } catch (e) { + sendCatchError('MagicMaster',msg_orig[senderId],e); + errFlag = true; + } finally { + setTimeout(() => { + resolve(errFlag); + }, 10); + } + }); + }; + if (!args) return; - if (args.length != 2) { sendDebug('doLightSource: Invalid number of arguments'); sendResponseError(senderId,'Invalid MagicMaster command syntax'); return; }; - var tokenID = args[0], - newSource = args[1], - curToken = getObj( 'graphic', tokenID ); - - if (!curToken){ - sendDebug('doLightSource: Invalid tokenID: ' + tokenID); - sendResponseError(senderId,'Invalid token specified'); - return; - } - - var charCS = getCharacter( tokenID ); + const tokenID = args[0], + newSource = args[1], + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); + let tokenList = [], + errFlag = false; + if (!charCS) { sendDebug('doLightSource: Invalid tokenID: ' + tokenID); sendResponseError(senderId,'Invalid token specified'); return; } +// log('doLightSource: calling for '+(!curToken ? ('character '+charCS.get('name')) : ('token'+curToken.get('name')))+', lightSource '+newSource); - switch (newSource.toLowerCase()) { - case 'none': - curToken.set({emits_bright_light: false, emits_low_light: false, - bright_light_distance: 0, low_light_distance: 0, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_dim_light_centre: 180, directional_dim_light_total: 360, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'weapon': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 1, low_light_distance: 5, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'torch': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 1, low_light_distance: 15, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'hooded': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 15, low_light_distance: 30, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'contlight': - curToken.set({emits_bright_light: true, emits_low_light: true, - bright_light_distance: 50, low_light_distance: 60, - has_directional_bright_light: false, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 360}); - break; - - case 'bullseye': - curToken.set({emits_bright_light: true, emits_low_light: false, - bright_light_distance: 60, low_light_distance: 60, - has_directional_bright_light: true, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 19}); - break; - - case 'beacon': - curToken.set({emits_bright_light: true, emits_low_light: false, - bright_light_distance: 240, low_light_distance: 240, - has_directional_bright_light: true, has_directional_dim_light: false, - directional_bright_light_centre: 180, directional_bright_light_total: 21}); - break; - - default: - sendDebug( 'doLightSource: Invalid light source type '+newSource ); - sendResponseError(senderId,'Invalid light source specified'); - break; - } + if (!curToken){ + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== tokenID ))); + } else { + let name = curToken.get('name'), + represents = curToken.get('represents'); + tokenList = filterObjs( obj => (!(obj.get('type') !== 'graphic' || obj.get('subtype') !== 'token' || obj.get('represents') !== represents || obj.get('name') !== name))); +// log('doLightSource: specific token name = '+name+', tokenList has '+tokenList.length+' entries'); + }; + for (const token of tokenList) { + errFlag = await changeTokenLight( token, newSource ); + if (errFlag) break; + }; + setAttr( charCS, fields.LightSource, newSource ); + if (tokenList && tokenList.length) setDefaultTokenForCharacter( charCS, curToken || tokenList[0] ); if (dispMenu) { doLightSourcesMenu( args, senderId ); } else { - sendWait(senderId,0); + sendWait(senderId,0,'Magic doLightSource'); } return; - } + }; /* * Display a simple message to the specified range of players */ - var doMessage = function( args, selected, senderId ) { + const doMessage = function( args, selected, senderId ) { + sendWait(senderId,0,'Magic doMessage'); + if (!args) args = []; - - var sel = ''; + let sel = ''; if (selected && selected.length) { sel = selected[0]._id; } @@ -9651,7 +9615,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var cmd = (args[0] || '-').toLowerCase(), + let cmd = (args[0] || '-').toLowerCase(), tokenID = args[1] || sel, charCS = getCharacter(tokenID), isCmd = ['gm','whisper','w','character','c','standard','s','public','p'].includes(cmd); @@ -9664,12 +9628,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } cmd = cmd.toLowerCase(); if (!charCS && cmd !== 'gm') { - sendDebug( 'doMessage: tokenID is invalid' ); sendError( 'No token selected' ); return; } - var msg = '&{template:'+fields.messageTemplate+'}{{name=' + (args[2] || '') + '}}{{desc=' + parseStr(args[3] || '',msgReplacers) + '}}'; + let msg = '&{template:'+fields.messageTemplate+'}{{name=' + (args[2] || '') + '}}{{desc=' + parseStr(args[3] || '',msgReplacers) + '}}'; const reVals = /\^\^(\d+)\^\^/; const valRes = ( a, v ) => args[v] || ''; const reAttrs = /\^\^([^\|\^]+)\|?(max|current)?\|?([^\|\^]+)?\^\^/i; @@ -9681,7 +9644,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars switch (cmd.toLowerCase()) { case 'gm': sendFeedback(msg); - sendWait(senderId,0); break; case 'whisper': case 'w': @@ -9713,13 +9675,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * for attacks. */ - var doTidyCS = function( args, selected ) { + const doTidyCS = function( args, selected ) { - var tokenList = []; + let tokenList = []; if (args && args[0]) { let token = getObj('graphic',args[0]); if (!token) { - sendDebug('doTidyCS: Invalid tokenID argument'); sendError('Valid token not specified'); return; } @@ -9741,7 +9702,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * for attacks. */ - var doCleanCS = function( args, selected ) { + const doCleanCS = function( args, selected ) { if (!args) args=[]; if (!args[0] && selected && selected.length) { @@ -9752,10 +9713,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - silent = (args[1] || '').toUpperCase() === 'SILENT', - curToken = getObj( 'graphic', tokenID ), - charCS = getCharacter( tokenID ); + const tokenID = args[0], + silent = (args[1] || '').toUpperCase() === 'SILENT', + curToken = getObj( 'graphic', tokenID ), + charCS = getCharacter( tokenID ); if (!curToken || !charCS) { sendDebug('doCopyCS: Invalid tokenID: ' + tokenID); @@ -9775,12 +9736,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * to a handout in object format to be cut&pasted to an API */ - var doWriteDB = function(args) { + const doWriteDB = function(args) { - var dbName = args[0], - dbVersion = args[1], - filter = args[2] || '', - dbHandout; + const dbName = args[0], + dbVersion = args[1], + filter = args[2] || ''; + + let dbHandout; if (dbVersion && dbVersion.length && (dbVersion !== '=') && isNaN(parseFloat(dbVersion))) { sendError( 'Invalid database version number' ); @@ -9809,12 +9771,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars async function doUpdateDB(args, senderId, silent) { try { - var dbName = args[0], - forceIndexUpdate = false; + const dbName = args[0]; + let forceIndexUpdate = false; if (dbName && dbName.length) { - let dbLabel = dbName.replace(/-/g,'_'); - let dbList = Object.keys(dbNames).filter(k => k.startsWith(dbLabel)); + const dbLabel = dbName.replace(/-/g,'_'), + dbList = Object.keys(dbNames).filter(k => k.startsWith(dbLabel)); if (dbList && dbList.length > 1) { sendFeedback('&{template:'+fields.messageTemplate+'}{{title=Extract Database}}{{desc=Multiple databases start with '+dbName+'. [Select the one you want](!magic --extract-db ?{Choose which to extract|'+dbList.join('|')+'}) }}',senderId); return; @@ -9831,23 +9793,24 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendFeedback(design.info_msg+'Updating all MagicMaster databases
    ',flags.feedbackName,flags.feedbackImg); _.each( dbNames, (db,dbName) => { if (db.api.includes('magic')) { - let dbCS = findObjs({ type:'character', name:dbName.replace(/_/g,'-') },{caseInsensitive:true}); + const dbCS = findObjs({ type:'character', name:dbName.replace(/_/g,'-') },{caseInsensitive:true}); if (dbCS && dbCS.length) { setAttr( dbCS[0], fields.dbVersion, 0 ); } } }); + let result; for (const name in dbNames) { if (dbNames[name].api.includes('magic')) { - let result = await buildDB( name, dbNames[name], senderId, silent ); + result = await buildDB( name, dbNames[name], senderId, silent ); } } forceIndexUpdate = true; }; apiDBs.magic = true; - sendAPI('!attk --index-db magic'); - sendAPI('!cmd --index-db magic'); + sendAPI('!attk --nowaitmsg --index-db magic'); + sendAPI('!cmd --nowaitmsg --index-db magic'); updateDBindex(forceIndexUpdate); return; } catch (e) { @@ -9861,15 +9824,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * GMs / game creators to change markers easily */ - var doExtractMarkers = function (args) { + const doExtractMarkers = function (args) { - var APIdbName = args[0], - UserDbName = args[1], - itemClass = args[2] || 'specs', - result, dbLabel, rootDB; + const APIdbName = args[0], + UserDbName = args[1], + itemClass = args[2] || 'specs'; if (APIdbName && APIdbName.length && UserDbName && UserDbName.length) { - dbLabel = UserDbName.replace(/-/g,'_'); + const dbLabel = UserDbName.replace(/-/g,'_'); if (dbNames[dbLabel]) { sendError(UserDbName+' is an API dataabse and cannot be overwritten'); return; @@ -9888,7 +9850,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * the number of charges left on the specified spell, power or item */ - var doSetCharges = function( args, selected, senderId ) { + const doSetCharges = function( args, selected, senderId ) { if (!args) args=[]; if ((!args[0] || !args[0].length) && selected && selected.length) { @@ -9899,12 +9861,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; - var tokenID = args[0], - type = (args[1] || 'MI').toUpperCase(), - item = args[2] || '-', - silent = ((args[3] || '').toLowerCase() === 'silent'), - charCS = getCharacter(tokenID), - qty, Tables, index; + const tokenID = args[0], + type = (args[1] || 'MI').toUpperCase(), + item = args[2] || '-', + silent = ((args[3] || '').toLowerCase() === 'silent'), + charCS = getCharacter(tokenID); + + let qty = 0; if (!charCS) { sendDebug('doSetCharges: invalid ID argument'); @@ -9912,29 +9875,29 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars return; }; if (!['MU','PR','POWER','MI','MIPOWER'].includes(type)) { - sendDebug('doSetCharges: invalid item type '+type+'. Should be one of MU, PR, POWER, or MI'); sendError('Invalid item type specified'); return; }; if (type === 'MI') { - Tables = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); - [table,index] = tableGroupFind( Tables, 'trueName', item ); + let Tables = getTableGroupField( charCS, {}, fieldGroups.MI, 'trueName' ); + let [table,index] = tableGroupFind( Tables, 'trueName', item ); if (!_.isUndefined(index)) { Tables = getTableField( charCS, {}, fieldGroups[table].tableDef, fields[fieldGroups[table].prefix+'qty'] ); qty = Tables.tableLookup( fields[fieldGroups[table].prefix+'qty'], index, false ); }; } else { var levelSpells = shapeSpellbook( charCS, type ); + let Tables, index, c, w; for (let lv=1; lv < levelSpells.length && _.isUndefined(qty); lv++) { - let c = levelSpells[lv].base; - let w = 1; + c = levelSpells[lv].base; + w = 1; do { - tables = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); - index = tables.tableFind( fields.Spells_name, item ); + Tables = getTableField( charCS, {}, fields.Spells_table, fields.Spells_name, c ); + index = Tables.tableFind( fields.Spells_name, item ); if (!_.isUndefined(index)) { - tables = getTableField( charCS, tables, fields.Spells_table, fields.Spells_castValue, c ); - qty = tables.tableLookup( fields.Spells_castValue, index, false ); + Tables = getTableField( charCS, Tables, fields.Spells_table, fields.Spells_castValue, c ); + qty = Tables.tableLookup( fields.Spells_castValue, index, false ); }; c++; } while ((w <= fields.SpellsCols) && _.isUndefined(qty)); @@ -9951,13 +9914,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars /* * Handle a button press, and redirect to the correct handler + * Note: keep as "var" to allow direct calls from code */ var doButton = function( args, senderId, selected ) { if (!args) return; - var handler = args[0].toUpperCase(); + const handler = args[0].toUpperCase(); switch (handler) { @@ -10024,7 +9988,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.REVIEW_MIPOWER : case 'GM-REVIEWMI' : - handleReviewSpell( args, senderId ); +// handleReviewSpell( args, senderId ); break; case BT.MEM_MUSPELL : @@ -10167,12 +10131,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.POP_PICK : + handleFlagPicks( args, senderId ); makeShortPOPmenu( args, senderId, false ); break; case BT.BUY_PICK : case BT.SELL_PICK : + handleFlagPicks( args, senderId ); makeShortPOPmenu( args, senderId, true ); break; @@ -10191,7 +10157,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case BT.BUY_OFFER : case BT.SELL_OFFER : - sendWait( senderId, 1 ); + sendWait( senderId, 1, 'Magic doButton sell/buy/store' ); setTimeout( handlePickOrPut, 10, args, senderId ); break; @@ -10366,7 +10332,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars default: - sendDebug( 'doButton: invalid button type specified' ); sendError( 'Invalid MagicMaster button call' ); return; }; @@ -10379,7 +10344,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a database indexing handshake **/ - var doIndexDB = function( args ) { + const doIndexDB = function( args ) { apiDBs[args[0]] = true; updateDBindex(); @@ -10391,13 +10356,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle handshake request **/ - var doHsQueryResponse = function(args) { + const doHsQueryResponse = function(args) { if (!args) return; - var from = args[0] || '', - func = args[1] || '', - funcTrue = ['spellmenu','mem-spell','view-spell','cast-spell','cast-again','mimenu','edit-mi','view-mi','use-mi','mi-charges','mi-power','touch','rest','gm-edit-mi','search','pickorput','lightsources', + const from = args[0] || '', + func = args[1] || '', + funcTrue = ['spellmenu','mem-spell','view-spell','cast-spell','cast-again','mimenu','edit-mi','view-mi','use-mi','mi-charges','mi-power','touch','rest','gm-edit-mi','search','pickorput','lightsources', 'light','changelight','help','check-db','debug'].includes(func.toLowerCase()), - cmd = '!'+from+' --noWaitMsg --hsr magic'+((func && func.length) ? ('|'+func+'|'+funcTrue) : ''); + cmd = '!'+from+' --noWaitMsg --hsr magic'+((func && func.length) ? ('|'+func+'|'+funcTrue) : ''); sendAPI(cmd); return; @@ -10407,14 +10372,14 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle the response to a handshake query **/ - var doHandleHsResponse = function(args) { + const doHandleHsResponse = function(args) { if (!args) { sendError('Invalid handshake response received'); return; } - var from = args[0] || '', - func = args[1] || '', - funcExists = (!!args[2]) || false; + const from = args[0] || '', + func = args[1] || '', + funcExists = (!!args[2]) || false; if (!apiCommands[from]) { apiCommands[from] = {}; @@ -10430,10 +10395,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle Pending Requests */ - var doRelay = function(args,senderId) { + const doRelay = function(args,senderId) { if (!args) return; - var carry, + let carry, hash; args = args.split(' %% '); if (!args) { log(args); return; } @@ -10445,7 +10410,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars carry = args[1]; if (carry) {carry = carry.trim();} - var pr = findPending(hash); + let pr = findPending(hash); if (pr) { pr.doOps(carry); clearPending(hash); @@ -10455,6 +10420,45 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } }; + + /** + * Debugging routine to get table info of an item + **/ + + const doGetRowInfo = function(args) { // rowID + const tokenID = args[0], + table = args[1] || '', + row = parseInt(args[2]), + miName = args[3] || '', + charCS = getCharacter(tokenID); + + if (!charCS) { + sendError('Invalid token selected'); + return; + }; + + let Items = getTableGroup( charCS, fieldGroups.MI ); + if (!Items) { + sendError('Invalid table group'); + return; + }; + if (miName.length) { +// log('miName defined as '+miName); + let [miRow,miTable,miRowID] = tableGroupFind( Items, 'name', miName ); + sendFeedback('Item '+miName+' is at row '+miRow+' of table '+miTable+', with the rowID = '+miRowID); + }; + if (table.length && !isNaN(row)) { +// log('table is '+table+' and row is '+row); + sendFeedback('Table '+table+' row '+row+' has a rowID = '+Items[table].rowID(row)); + }; + if (!table.length && !isNaN(row)) { +// log('table should be empty but is '+table.length+' long as '+table+', row is '+row); + let [miRow,miTable,miRowID] = tableGroupIndex(Items,row); + sendFeedback('Group row '+row+' is in table '+miTable+' row '+miRow+', with ID '+miRowID); + }; + return; + }; + // -------------------------------------------------------- Event Handlers -------------------------------------------------- @@ -10466,13 +10470,13 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars */ - var handleChatMessage = function(msg) { - var args = processInlinerolls(msg), + const handleChatMessage = function(msg) { + let args = processInlinerolls(msg), senderId = findThePlayer(msg.who), selected = msg.selected, t = 2; - var doMagicCmd = function( e, selected, senderId, isGM ) { + const doMagicCmd = function( e, selected, senderId, isGM ) { var arg = e, i=arg.indexOf(' '), cmd, argString; sendDebug('Processing arg: '+arg); @@ -10504,6 +10508,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case 'learn-spell': doLearnSpell(arg,selected,senderId); break; + case 'power-per-day': + doChangePerDay(arg,selected,senderId); + break; case 'mem-all-powers': handleMemAllPowers([BT.MEMALL_POWERS,arg[0],1,-1,-1,'',''], senderId, true ); break; @@ -10512,7 +10519,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars handleMemAllPowers(arg, senderId, true ); break; case 'touch': - sendWait(senderId,0); + sendWait(senderId,0,'Magic --touch'); doTouch(arg,senderId); break; case 'target': @@ -10587,7 +10594,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'level-change': doLevelChange(arg,senderId,selected); - break + break; + case 'check-move': + doCheckMove(arg,senderId,selected); + break; case 'lightsources': doLightSourcesMenu(arg,senderId,selected); break; @@ -10606,18 +10616,18 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars case 'message': doMessage(arg,selected,senderId); break; - case 'options': - doSetOptions(arg,senderId); - break; case 'disp-config': - doDispConfig(senderId); + sendAPI('!rpgm '+senderId+' --disp-config', senderId); + break; + case 'options': + sendAPI('!rpgm '+senderId+' --options '+arg.join('|'), senderId); break; case 'write-db': if (isGM) doWriteDB(arg,senderId); break; case 'extract-db': case 'update-db': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --extract-db' ); if (isGM) doUpdateDB(arg,senderId,false); break; case 'check-db': @@ -10633,7 +10643,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (isGM) doConfig(arg,senderId); break; case 'update-cs': - log('magicMaster handleChatMessage: something issued a --update-cs command'); +// log('magicMaster handleChatMessage: something issued a --update-cs command'); if (isGM) updateCharSheets(arg,senderId); break; case 'handout': @@ -10642,11 +10652,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars break; case 'hsq': case 'handshake': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --hsq' ); doHsQueryResponse(arg); break; case 'hsr': - sendWait( senderId, 0 ); + sendWait( senderId, 0, 'Magic --hsr' ); doHandleHsResponse(arg); break; case 'button': @@ -10662,10 +10672,12 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars // RED: v1.207 allow anyone to set debug and who to send debug messages to doSetDebug(argString,senderId); break; + case 'nowaitmsg': case 'skip': // RED: v4.1 added to allow viewed abilities to not execute certain live commands break; - case 'nowaitmsg': + case 'get-rowid': + doGetRowInfo(arg); break; default: sendFeedback('Invalid command " '+msg.content+' "',flags.feedbackName); @@ -10675,7 +10687,6 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars } } catch (err) { log('MagicMaster handleChatMsg: JavaScript '+err.name+': '+err.message+' while processing command '+cmd+' '+argString); - sendDebug('MagicMaster handleChatMsg: JavaScript '+err.name+': '+err.message+' while processing command '+cmd+' '+argString); sendCatchError('MagicMaster',msg_orig[senderId],err); } } @@ -10704,7 +10715,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars time = Date.now(); args = args.split(' --'); - let senderMod = args.shift().split(' '); + const senderMod = args.shift().split(' '); if (senderMod.length > 1) senderId = fixSenderId( [senderMod[1]], selected, senderId ); if (_.isUndefined(senderId) || _.isUndefined(getObj('player',senderId))) { @@ -10719,9 +10730,9 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars sendDebug('senderId is defined as ' + getObj('player',senderId).get('_displayname')); }; - var isGM = (playerIsGM(senderId) || state.MagicMaster.debug === senderId); + const isGM = (playerIsGM(senderId) || state.MagicMaster.debug === senderId); - if (!flags.noWaitMsg && args[0] && !args[0].toLowerCase().startsWith('nowaitmsg')) sendWait(senderId,1,'magicMaster'); + if (!flags.noWaitMsg && args[0] && !args[0].toLowerCase().startsWith('nowaitmsg')) sendWait(senderId,2,'Magic cmd '+args[0].split(' ')[0]); _.each(args, function(e) { setTimeout( doMagicCmd, (1*t++), e, selected, senderId, isGM ); @@ -10736,8 +10747,8 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars */ var cmdMasterRegister = function() { - var cmd = fields.commandMaster - + ' --noWaitMsg' + const cmd = fields.commandMaster + + ' --nowaitmsg' + ' --register Cast_MU_spell|Cast a Wizard spell|magic|~~cast-spell|MU%%`{selected|token_id}' + ' --register Cast_PR_spell|Cast a Priest spell|magic|~~cast-spell|PR%%`{selected|token_id}' + ' --register Cast_spell|Ask for which type of spell to cast|magic|~~cast-spell|MU-PR%%`{selected|token_id}' @@ -10755,11 +10766,11 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Handle a change to the page the Player ribbon is on **/ - var handleChangePlayerPage = function(obj,prev) { + const handleChangePlayerPage = function(obj,prev) { try { - var page = Campaign().get('playerpageid'), - tokens = filterObjs( obj => { + const page = Campaign().get('playerpageid'), + tokens = filterObjs( obj => { if (obj.get('type') != 'graphic' || obj.get('subtype') != 'token') return false; if (obj.get('pageid') != page) return false; return (!!obj.get('represents') && !!obj.get('represents').length); @@ -10778,7 +10789,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * current Player page and, if so, tidy it's character sheet. */ - var handleChangeToken = function(obj,prev) { + const handleChangeToken = function(obj,prev) { try { if (!obj) @@ -10786,7 +10797,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars if (obj.get('name') == prev['name']) {return;} - + if (obj.get('_pageid') == Campaign().get('playerpageid') && obj.get('represents') && obj.get('represents').length) { handleCStidy( [obj], true ); } @@ -10800,7 +10811,7 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Set the magicMaster version of a new character sheet */ - var handleAddCharacter = function(obj) { + const handleAddCharacter = function(obj) { try { if (!obj) return; @@ -10814,10 +10825,10 @@ var MagicMaster = (function() { // eslint-disable-line no-unused-vars * Set the charType of a dead creature to 6 (dead) */ - var handleTokenDeath = function(obj,prev) { + const handleTokenDeath = function(obj,prev) { try { if (!obj) return; - let charCS = getCharacter( obj.id ); + const charCS = getCharacter( obj.id ); if (!charCS) return; if (obj.get("status_dead")) { // If the token dies and is marked as "dead" by the GM diff --git a/MagicMaster/script.json b/MagicMaster/script.json index 98b0d47ee..d54725d89 100644 --- a/MagicMaster/script.json +++ b/MagicMaster/script.json @@ -2,8 +2,8 @@ "$schema": "https://github.com/DameryDad/roll20-api-scripts/blob/MagicMaster/MagicMaster/Script.json", "name": "MagicMaster", "script": "MagicMaster.js", - "version": "5.0.3", - "previousversions": ["2.044","2.045","2.046","2.048","3.051","1.3.00","1.3.01","1.3.02","1.3.03","1.4.01","1.4.02","1.4.04","1.4.05","1.4.06","1.4.07","1.5.01","1.5.02","1.5.03","2.1.0","2.1.1","2.2.0","2.2.1","2.3.0","2.3.1","2.3.2","2.3.3","2.3.4","3.0.0","3.1.2","3.2.0","3.2.1","3.3.0","3.4.0","3.5.0","3.5.1","4.0.1","4.0.2","4.0.3","4.0.4","4.0.5","4.0.6","5.0.0","5.0.1","5.0.2"], + "version": "5.3.0", + "previousversions": ["2.044","2.045","2.046","2.048","3.051","1.3.00","1.3.01","1.3.02","1.3.03","1.4.01","1.4.02","1.4.04","1.4.05","1.4.06","1.4.07","1.5.01","1.5.02","1.5.03","2.1.0","2.1.1","2.2.0","2.2.1","2.3.0","2.3.1","2.3.2","2.3.3","2.3.4","3.0.0","3.1.2","3.2.0","3.2.1","3.3.0","3.4.0","3.5.0","3.5.1","4.0.1","4.0.2","4.0.3","4.0.4","4.0.5","4.0.6","5.0.0","5.0.1","5.0.2","5.0.3"], "description": "The MagicMaster API provides functions to manage all types of magic, including:\n* Wizard & Priest spell use and effects;\n* Character, NPC & Monster Powers; \n* discovery, looting, use and cursing of Magic Items;\n\n[MagicMaster Documentation](https://wiki.roll20.net/Script:MagicMaster) \n### Installation\nLoading MagicMaster via One-Click also loads the rest of the RPGMaster series of APIs \n[RPGMaster Documentation](https://wiki.roll20.net/RPGMaster) \n### Getting Started\n1. Ensure the CommandMaster API is also installed\n2. Run the CommandMaster `!cmd --initialise` command and add the player macros created to the Macro Bar, then\n3. Select tokens and use the `Token Setup` macro bar button just created to add all relevant Action Buttons to the token(s) (plus set the tokens/Characters up in any other way provided in the menu displayed)\n\n### Use In Play\nOnce the Getting Started steps have been done, the players and DM can then use the buttons displayed at the top of the screen when their character's token is selected to perform all actions needed in normal play.", "authors": "Richard E.", "roll20userid": "6497708",