Added Puppetmaster

scripts/commands/addallattachments.lua

@@ -0,0 +1,41 @@
+---------------------------------------------------------------------------------------------------
+-- func: addallattachments
+-- desc: Unlocks all attachments
+---------------------------------------------------------------------------------------------------
+
+cmdprops =
+{
+    permission = 1,
+    parameters = "s"
+};
+
+local ValidAttachments = {
+  8193, 8194, 8195, 8196, 8197, 8198, 8224, 8225, 8226, 8227,
+  8449, 8450, 8451, 8452, 8453, 8454, 8455, 8456, 8457, 8458,
+  8481, 8482, 8483, 8484, 8485, 8486, 8487, 8488, 8489, 8490,
+  8513, 8514, 8515, 8516, 8517, 8518, 8519, 8520, 8521, 8522,
+  8523, 8545, 8546, 8547, 8548, 8549, 8550, 8551, 8552, 8553,
+  8554, 8577, 8578, 8579, 8580, 8581, 8582, 8583, 8584, 8585,
+  8586, 8609, 8610, 8611, 8612, 8613, 8614, 8615, 8616, 8617,
+  8618, 8641, 8642, 8643, 8644, 8645, 8646, 8648, 8649, 8650,
+  8673, 8674, 8675, 8676, 8677, 8678, 8680, 8681
+};
+
+local function AddAllAttachments(player)
+    for i = 1, #ValidAttachments do
+        player:unlockAttachment(ValidAttachments[i]);
+    end
+end;
+
+function onTrigger(player, target)
+    if (target == nil) then
+        AddAllAttachments(player);
+    else
+        local targ = GetPlayerByName(target);
+        if (targ == nil) then
+            player:PrintToPlayer(string.format( "Player named '%s' not found!", target ));
+        else
+            AddAllAttachments(targ);
+        end
+    end
+end

scripts/commands/petgodmode.lua

@@ -0,0 +1,75 @@
+---------------------------------------------------------------------------------------------------
+-- func: petgodmode
+-- desc: Toggles god mode on the player's pet, granting them several special abilities.
+---------------------------------------------------------------------------------------------------
+
+cmdprops =
+{
+    permission = 1,
+    parameters = ""
+};
+
+function onTrigger(player)
+    local pet = player:getPet()
+    if (pet and pet:getLocalVar("GodMode") == 0) then
+        -- Toggle GodMode on..
+        pet:setLocalVar("GodMode", 1);
+
+        -- Add bonus effects to the pet..
+        pet:addStatusEffect(EFFECT_MAX_HP_BOOST,1000,0,0);
+        pet:addStatusEffect(EFFECT_MAX_MP_BOOST,1000,0,0);
+        pet:addStatusEffect(EFFECT_SENTINEL,100,0,0);
+        pet:addStatusEffect(EFFECT_MIGHTY_STRIKES,1,0,0);
+        pet:addStatusEffect(EFFECT_HUNDRED_FISTS,1,0,0);
+        pet:addStatusEffect(EFFECT_CHAINSPELL,1,0,0);
+        pet:addStatusEffect(EFFECT_PERFECT_DODGE,1,0,0);
+        pet:addStatusEffect(EFFECT_INVINCIBLE,1,0,0);
+        pet:addStatusEffect(EFFECT_MANAFONT,1,0,0);
+        pet:addStatusEffect(EFFECT_REGAIN,150,1,0);
+        pet:addStatusEffect(EFFECT_REFRESH,99,0,0);
+        pet:addStatusEffect(EFFECT_REGEN,99,0,0);
+
+        -- Add bonus mods to the pet..
+        pet:addMod(MOD_RACC,2500);
+        pet:addMod(MOD_RATT,2500);
+        pet:addMod(MOD_ACC,2500);
+        pet:addMod(MOD_ATT,2500);
+        pet:addMod(MOD_MATT,2500);
+        pet:addMod(MOD_MACC,2500);
+        pet:addMod(MOD_RDEF,2500);
+        pet:addMod(MOD_DEF,2500);
+        pet:addMod(MOD_MDEF,2500);
+
+        -- Heal the pet from the new buffs..
+        pet:addHP( 50000 );
+        pet:setMP( 50000 );
+    else
+        -- Toggle GodMode off..
+        pet:setLocalVar("GodMode", 0);
+
+        -- Remove bonus effects..
+        pet:delStatusEffect(EFFECT_MAX_HP_BOOST);
+        pet:delStatusEffect(EFFECT_MAX_MP_BOOST);
+        pet:delStatusEffect(EFFECT_SENTINEL);
+        pet:delStatusEffect(EFFECT_MIGHTY_STRIKES);
+        pet:delStatusEffect(EFFECT_HUNDRED_FISTS);
+        pet:delStatusEffect(EFFECT_CHAINSPELL);
+        pet:delStatusEffect(EFFECT_PERFECT_DODGE);
+        pet:delStatusEffect(EFFECT_INVINCIBLE);
+        pet:delStatusEffect(EFFECT_MANAFONT);
+        pet:delStatusEffect(EFFECT_REGAIN);
+        pet:delStatusEffect(EFFECT_REFRESH);
+        pet:delStatusEffect(EFFECT_REGEN);
+
+        -- Remove bonus mods..
+        pet:delMod(MOD_RACC,2500);
+        pet:delMod(MOD_RATT,2500);
+        pet:delMod(MOD_ACC,2500);
+        pet:delMod(MOD_ATT,2500);
+        pet:delMod(MOD_MATT,2500);
+        pet:delMod(MOD_MACC,2500);
+        pet:delMod(MOD_RDEF,2500);
+        pet:delMod(MOD_DEF,2500);
+        pet:delMod(MOD_MDEF,2500);
+    end
+end

scripts/globals/abilities/dark_maneuver.lua

@@ -15,7 +15,8 @@ require("scripts/globals/magic");
 
 function onAbilityCheck(player,target,ability)
     if (player:getWeaponSubSkillType(SLOT_RANGED) == 10 and
-        not player:hasStatusEffect(EFFECT_OVERLOAD)) then
+        not player:hasStatusEffect(EFFECT_OVERLOAD) and
+        player:getPet()) then
         return 0,0;
     else
         return 71,0;
@@ -35,6 +36,12 @@ function onUseAbility(player,target,ability)
 
     local overload = target:addBurden(ELE_DARK-1, burden);
 
+    if (overload ~= 0 and
+        (player:getMod(MOD_PREVENT_OVERLOAD) > 0 or player:getPet():getMod(MOD_PREVENT_OVERLOAD) > 0) and
+        player:delStatusEffectSilent(EFFECT_WATER_MANEUVER)) then
+        overload = 0;
+    end
+
     if (overload ~= 0) then
         target:removeAllManeuvers();
         target:addStatusEffect(EFFECT_OVERLOAD, 0, 0, overload);

scripts/globals/abilities/deus_ex_automata.lua

@@ -0,0 +1,39 @@
+-----------------------------------
+-- Ability: Deus Ex Automata
+-- Calls forth your automaton in an unsound state.
+-- Obtained: Puppetmaster Level 5
+-- Recast Time: 1:00
+-- Duration: Instant
+-----------------------------------
+
+require("scripts/globals/settings")
+require("scripts/globals/status")
+require("scripts/globals/pets")
+
+-----------------------------------
+-- onAbilityCheck
+-----------------------------------
+
+function onAbilityCheck(player,target,ability)
+    if player:getPet() ~= nil then
+        return MSGBASIC_ALREADY_HAS_A_PET, 0
+    elseif not player:canUsePet() then
+        return MSGBASIC_CANT_BE_USED_IN_AREA, 0
+    else
+        return 0, 0
+    end
+end
+
+-----------------------------------
+-- onUseAbility
+-----------------------------------
+
+function onUseAbility(player,target,ability)
+    player:spawnPet(PET_AUTOMATON)
+    local pet = player:getPet()
+    if pet then
+        local percent = math.floor((player:getMainLvl()/3))/100
+        pet:setHP(math.max(pet:getHP() * percent, 1))
+        pet:setMP(pet:getMP() * percent)
+    end
+end

scripts/globals/abilities/earth_maneuver.lua

@@ -15,7 +15,8 @@ require("scripts/globals/magic");
 
 function onAbilityCheck(player,target,ability)
     if (player:getWeaponSubSkillType(SLOT_RANGED) == 10 and
-        not player:hasStatusEffect(EFFECT_OVERLOAD)) then
+        not player:hasStatusEffect(EFFECT_OVERLOAD) and
+        player:getPet()) then
         return 0,0;
     else
         return 71,0;
@@ -35,6 +36,12 @@ function onUseAbility(player,target,ability)
 
     local overload = target:addBurden(ELE_EARTH-1, burden);
 
+    if (overload ~= 0 and
+        (player:getMod(MOD_PREVENT_OVERLOAD) > 0 or player:getPet():getMod(MOD_PREVENT_OVERLOAD) > 0) and
+        player:delStatusEffectSilent(EFFECT_WATER_MANEUVER)) then
+        overload = 0;
+    end
+
     if (overload ~= 0) then
         target:removeAllManeuvers();
         target:addStatusEffect(EFFECT_OVERLOAD, 0, 0, overload);

scripts/globals/abilities/familiar.lua

@@ -14,11 +14,14 @@ require("scripts/globals/status");
 -----------------------------------
 
 function onAbilityCheck(player,target,ability)
-    if (player:getPet() == nil) then
+    local pet = player:getPet();
+    if not pet then
         return MSGBASIC_REQUIRES_A_PET,0;
+    elseif not player:isJugPet() and pet:getObjType() ~= TYPE_MOB then
+        return MSGBASIC_NO_EFFECT_ON_PET,0;
+    else
+        return 0,0;
     end
-
-   return 0,0;
 end;
 
 -----------------------------------

scripts/globals/abilities/fire_maneuver.lua

@@ -15,7 +15,8 @@ require("scripts/globals/magic");
 
 function onAbilityCheck(player,target,ability)
     if (player:getWeaponSubSkillType(SLOT_RANGED) == 10 and
-        not player:hasStatusEffect(EFFECT_OVERLOAD)) then
+        not player:hasStatusEffect(EFFECT_OVERLOAD) and
+        player:getPet()) then
         return 0,0;
     else
         return 71,0;
@@ -35,6 +36,12 @@ function onUseAbility(player,target,ability)
 
     local overload = target:addBurden(ELE_FIRE-1, burden);
 
+    if (overload ~= 0 and
+        (player:getMod(MOD_PREVENT_OVERLOAD) > 0 or player:getPet():getMod(MOD_PREVENT_OVERLOAD) > 0) and
+        player:delStatusEffectSilent(EFFECT_WATER_MANEUVER)) then
+        overload = 0;
+    end
+
     if (overload ~= 0) then
         target:removeAllManeuvers();
         target:addStatusEffect(EFFECT_OVERLOAD, 0, 0, overload);

scripts/globals/abilities/ice_maneuver.lua

@@ -15,7 +15,8 @@ require("scripts/globals/magic");
 
 function onAbilityCheck(player,target,ability)
     if (player:getWeaponSubSkillType(SLOT_RANGED) == 10 and
-        not player:hasStatusEffect(EFFECT_OVERLOAD)) then
+        not player:hasStatusEffect(EFFECT_OVERLOAD) and
+        player:getPet()) then
         return 0,0;
     else
         return 71,0;
@@ -35,6 +36,12 @@ function onUseAbility(player,target,ability)
 
     local overload = target:addBurden(ELE_ICE-1, burden);
 
+    if (overload ~= 0 and
+        (player:getMod(MOD_PREVENT_OVERLOAD) > 0 or player:getPet():getMod(MOD_PREVENT_OVERLOAD) > 0) and
+        player:delStatusEffectSilent(EFFECT_WATER_MANEUVER)) then
+        overload = 0;
+    end
+
     if (overload ~= 0) then
         target:removeAllManeuvers();
         target:addStatusEffect(EFFECT_OVERLOAD, 0, 0, overload);

scripts/globals/abilities/light_maneuver.lua

@@ -15,7 +15,8 @@ require("scripts/globals/magic");
 
 function onAbilityCheck(player,target,ability)
     if (player:getWeaponSubSkillType(SLOT_RANGED) == 10 and
-        not player:hasStatusEffect(EFFECT_OVERLOAD)) then
+        not player:hasStatusEffect(EFFECT_OVERLOAD) and
+        player:getPet()) then
         return 0,0;
     else
         return 71,0;
@@ -35,6 +36,12 @@ function onUseAbility(player,target,ability)
 
     local overload = target:addBurden(ELE_LIGHT-1, burden);
 
+    if (overload ~= 0 and
+        (player:getMod(MOD_PREVENT_OVERLOAD) > 0 or player:getPet():getMod(MOD_PREVENT_OVERLOAD) > 0) and
+        player:delStatusEffectSilent(EFFECT_WATER_MANEUVER)) then
+        overload = 0;
+    end
+
     if (overload ~= 0) then
         target:removeAllManeuvers();
         target:addStatusEffect(EFFECT_OVERLOAD, 0, 0, overload);

scripts/globals/abilities/maintenance.lua

@@ -0,0 +1,78 @@
+-----------------------------------
+-- Ability: Maintenance
+-- Cures your automaton of status ailments. Special items required
+-- Obtained: Puppetmaster Level 30
+-- Recast Time: 1:30
+-- Duration: Instant
+-----------------------------------
+
+require("scripts/globals/settings")
+require("scripts/globals/status")
+require("scripts/globals/pets")
+
+local idStrengths = {
+    [18731] = 1, -- Automaton Oil
+    [18732] = 2, -- Automaton Oil + 1
+    [18733] = 3, -- Automaton Oil + 2
+    [19185] = 4  -- Automaton Oil + 3
+}
+
+-----------------------------------
+-- onAbilityCheck
+-----------------------------------
+
+function onAbilityCheck(player,target,ability)
+    if not player:getPet() then
+        return MSGBASIC_REQUIRES_A_PET, 0
+    elseif not player:getPetID() or not (player:getPetID() >= 69 and player:getPetID() <= 72) then
+        return MSGBASIC_NO_EFFECT_ON_PET, 0
+    else
+        local id = player:getEquipID(SLOT_AMMO)
+        if idStrengths[id] then
+            return 0, 0
+        else
+            return MSGBASIC_UNABLE_TO_USE_JA, 0
+        end
+    end
+end
+
+-----------------------------------
+-- onUseAbility
+-----------------------------------
+
+function onUseAbility(player,target,ability)
+    local id = player:getEquipID(SLOT_AMMO)
+    local pet = player:getPet()
+
+    local function removeStatus()
+        --if pet:delStatusEffect(EFFECT_DOOM) then return true end
+        if pet:delStatusEffect(EFFECT_PETRIFICATION) then return true end
+        --if pet:delStatusEffect(EFFECT_LULLABY) then return true end
+        --if pet:delStatusEffect(EFFECT_SLEEP_II) then return true end
+        --if pet:delStatusEffect(EFFECT_SLEEP) then return true end
+        if pet:delStatusEffect(EFFECT_SILENCE) then return true end
+        if pet:delStatusEffect(EFFECT_BANE) then return true end
+        if pet:delStatusEffect(EFFECT_CURSE_II) then return true end
+        if pet:delStatusEffect(EFFECT_CURSE) then return true end
+        if pet:delStatusEffect(EFFECT_PARALYSIS) then return true end
+        if pet:delStatusEffect(EFFECT_PLAGUE) then return true end
+        if pet:delStatusEffect(EFFECT_POISON) then return true end
+        if pet:delStatusEffect(EFFECT_DISEASE) then return true end
+        if pet:delStatusEffect(EFFECT_BLINDNESS) then return true end
+        if pet:eraseStatusEffect() ~= 255 then return true end
+        return false
+    end
+
+    local toremove = idStrengths[id] or 1
+    local removed = 0
+
+    repeat
+        if not removeStatus() then break end
+        toremove = toremove - 1
+        removed = removed + 1
+    until (toremove <= 0)
+
+    player:removeAmmo()
+
+    return removed
+end