///////////////////////////////////////////////////////////////////// // Tougher (not yet Smarter) Melanthium // by Azazello // ..... // CORE (psCore.bcs): // Adds PSM Spells // Most spells cast only once // No Cleric spells cast ///////////////////////////////////////////////////////////////////// // // INSANE (psInsane.bcs): // Adds PSM Spells // WARNING: Uses Original scripting (multiple casting of spells) // HARD (psHard.bcs): // Adds PSM Spells // Most spells cast only once // Normal (psNormal.bcs): // Adds PSM Spells // Most spells cast only once // No Cleric spells cast // No 9th-level or higher spells // EASY (psEasy.bcs): // Adds PSM Spells // Most spells cast only once // No Cleric spells cast // No 8th-level or higher spells // No summoning spells ///////////////////////////////////////////////////////////////////// // SORCERY - Script this only if the player is naughty ///////////////////////////////////////////////////////////////////// // IF // RandomNum(100,1) // Global("psMelCastSORCERY","LOCALS",0) // THEN // RESPONSE #100 // ForceSpellRES("PSQSOR",Myself) // IncrementGlobal("psMelCastSORCERY","LOCALS",1) // END ///////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////// // Begin... ///////////////////////////////////////////////////////////////////// IF HPLT(Myself,10) THEN RESPONSE #100 SetGlobal("psFinalQuestToKillMelCounter","GLOBAL",2) ClearAllActions() Wait(1) StartDialog("psMelEnd",Player1) END ///////////////////////////////////////////////////////////////////// // Buffs ///////////////////////////////////////////////////////////////////// IF HPLT(Myself,400) GlobalLT("psMelHealedCounter","LOCALS",1) THEN RESPONSE #100 IncrementGlobal("psMelHealedCounter","LOCALS",1) ForceSpellRES("SPPSQ8",Myself) // Recemon's Wonderful Rejuvenation - should be used instead of cleric's Heal - Azazello // ReallyForceSpell(Myself,CLERIC_HEAL) ReallyForceSpell(Myself,WIZARD_MIRROR_IMAGE) ReallyForceSpell(Myself,WIZARD_STONE_SKIN) ReallyForceSpell(Myself,WIZARD_GLOBE_OF_INVULNERABILITY) ReallyForceSpell(Myself,WIZARD_SPELL_TRAP) ReallyForceSpell(Myself,WIZARD_FIRE_SHIELD_RED) ReallyForceSpell(Myself,WIZARD_PROTECTION_FROM_MAGIC_WEAPONS) ReallyForceSpell(Myself,WIZARD_TRUE_SIGHT) // ReallyForceSpell(Myself,4665) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",TWO_TURNS) END // Aura of Power - Duration: 12 hours - Level 2 - Azazello IF GlobalLT("psMelCastAuraPower","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSAOP",Myself) IncrementGlobal("psMelCastAuraPower","LOCALS",1) END IF Global("psSpellUp","LOCALS",0) THEN RESPONSE #100 ReallyForceSpell(Myself,WIZARD_MIRROR_IMAGE) ReallyForceSpell(Myself,WIZARD_STONE_SKIN) ReallyForceSpell(Myself,WIZARD_GLOBE_OF_INVULNERABILITY) ReallyForceSpell(Myself,WIZARD_SPELL_TRAP) ReallyForceSpell(Myself,WIZARD_FIRE_SHIELD_RED) ReallyForceSpell(Myself,WIZARD_PROTECTION_FROM_MAGIC_WEAPONS) ReallyForceSpell(Myself,WIZARD_TRUE_SIGHT) // ReallyForceSpell(Myself,4665) SetGlobal("psSpellUp","LOCALS",1) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",TWO_TURNS) END // Blood to Acid - Duration: 20 rounds - Level 6 - Azazello IF TookDamage() GlobalLT("psMelCastBlood2Acid","LOCALS",1) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") THEN RESPONSE #100 IncrementGlobal("psMelCastBlood2Acid","LOCALS",1) ForceSpellRES("SPPSBTA",Myself) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",TWO_TURNS) END IF TookDamage() GlobalLT("psMelInitialContToggle","LOCALS",1) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") THEN RESPONSE #100 IncrementGlobal("psMelInitialContToggle","LOCALS",1) ReallyForceSpell(Myself,WIZARD_MIRROR_IMAGE) ReallyForceSpell(Myself,WIZARD_STONE_SKIN) ReallyForceSpell(Myself,WIZARD_GLOBE_OF_INVULNERABILITY) ReallyForceSpell(Myself,WIZARD_SPELL_TRAP) ReallyForceSpell(Myself,WIZARD_FIRE_SHIELD_RED) ReallyForceSpell(Myself,WIZARD_PROTECTION_FROM_MAGIC_WEAPONS) ReallyForceSpell(Myself,WIZARD_TRUE_SIGHT) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",TWO_TURNS) END IF RandomNum(12,1) GlobalLT("psMelCastMantleCounter","LOCALS",1) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") THEN RESPONSE #100 IncrementGlobal("psMelCastMantleCounter","LOCALS",1) ReallyForceSpell(Myself,WIZARD_ABSOLUTE_IMMUNITY) ReallyForceSpell(Myself,WIZARD_STONE_SKIN) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",TWO_TURNS) END // Tyndal's Temporal Compressor - Duration: 1 Turn - Level 7 - Azazello IF TookDamage() Global("psMelCastTyndalTemporalCompressor","LOCALS",0) Global("psMelInitialContToggle","LOCALS",1) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") THEN RESPONSE #100 SetGlobal("psMelInitialContToggle","LOCALS",2) SetGlobal("psMelCastTyndalTemporalCompressor","LOCALS",1) ForceSpellRES("SPPSTYT",Myself) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",ONE_TURN) END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: Melanthium's Shield of Oblivion ///////////////////////////////////////////////////////////////////// If RandomNum(20, 1) Global("psMelCastOblivionCounter", "LOCALS", 0) Global("psMelInitialContToggle","LOCALS",2) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") Then Response #100 SetGlobal("psMelInitialContToggle","LOCALS",3) SetGlobal("psMelCastOblivionCounter", "LOCALS", 1) ForceSpell(Myself, 4665) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",ONE_TURN) End // Sphere of Dissipation - Duration: 5 rounds - Level 8 - Azazello IF RandomNum(12,1) Global("psMelInitialContToggle","LOCALS",3) GlobalTimerExpired("psTimeToNewSpellProtections","LOCALS") THEN RESPONSE #100 SetGlobal("psMelInitialContToggle","LOCALS",4) ForceSpellRES("SPPSQ14",Myself) SetGlobalTimer("psTimeToNewSpellProtections","LOCALS",FIVE_ROUNDS) END ///////////////////////////////////////////////////////////////////// // Spells ///////////////////////////////////////////////////////////////////// // Level 10 - Azazello IF RandomNum(4,1) GlobalLT("psMelCastMeteorite","LOCALS",10) THEN RESPONSE #100 ForceSpellRES("SPPSAP1",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastMeteorite","LOCALS",1) END IF RandomNum(4,1) GlobalLT("psMelCastPSMImplosion","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSAP2",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastPSMImplosion","LOCALS",1) END // Level 9 - Azazello IF RandomNum(15,1) GlobalLT("psMelCastTimestopCounter","LOCALS",1) GlobalTimerExpired("psMelTimestopTimer","LOCALS") THEN RESPONSE #100 IncrementGlobal("psMelCastTimestopCounter","LOCALS",1) ForceSpell(Myself,WIZARD_TIME_STOP) SetGlobalTimer("psMelTimestopTimer","LOCALS",THREE_ROUNDS) Continue() END IF RandomNum(6,1) GlobalLT("psMelCastDanseMacabre","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSDMA",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastDanseMacabre","LOCALS",1) END // Perhaps this spell belongs exclusively to the Spirit of Evocation? - Azazello IF RandomNum(6,1) GlobalLT("psMelCastWaveObliteration","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ13",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastWaveObliteration","LOCALS",1) END IF RandomNum(6,1) GlobalLT("psMelCastPWBurn","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ4",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastPWBurn","LOCALS",1) END IF RandomNum(6,1) GlobalLT("psMelCastAbyssalFury","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ5",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastAbyssalFury","LOCALS",1) END IF RandomNum(40,1) GlobalLT("psMelCastNagathPolarizedPyrotechnics","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ27",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastNagathPolarizedPyrotechnics","LOCALS",1) END // {WARNING: v2.5 of this spell, seems to be INCREASING target's resistances} PSM - Azuth's Rune of Utter Negativity // IF // RandomNum(6,1) // GlobalLT("psMelCastAzuthRuneUtterNegativity","LOCALS",1) // THEN // RESPONSE #100 // ForceSpellRES("SPPSQ9",NearestEnemyOf(Myself)) // IncrementGlobal("psMelCastAzuthRuneUtterNegativity","LOCALS",1) // END IF RandomNum(40,1) GlobalLT("psMelCastSpellstrikeCounter","LOCALS",1) THEN RESPONSE #100 DisplayStringHead(Myself,@608) // Your pathetic protections shall not save you! ReallyForceSpell(Player1,WIZARD_SPELL_STRIKE) ReallyForceSpell(Player2,WIZARD_SPELL_STRIKE) ReallyForceSpell(Player3,WIZARD_SPELL_STRIKE) ReallyForceSpell(Player4,WIZARD_SPELL_STRIKE) ReallyForceSpell(Player5,WIZARD_SPELL_STRIKE) ReallyForceSpell(Player6,WIZARD_SPELL_STRIKE) IncrementGlobal("psMelCastSpellstrikeCounter","LOCALS",1) END IF RandomNum(15,1) GlobalLT("psMelCastBigbysCounter","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_BIGBYS_CRUSHING_HAND) IncrementGlobal("psMelCastBigbysCounter","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: Melanthium's Rage ///////////////////////////////////////////////////////////////////// IF RandomNum(15,1) GlobalLT("psMelCastRageCounter","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSMRA",NearestEnemyOf(Myself)) // Melanthium's Rage IncrementGlobal("psMelCastRageCounter","LOCALS",1) END // Level 8 - Azazello IF RandomNum(8,1) GlobalLT("psMelCastSoulCage","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ20",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastSoulCage","LOCALS",1) END IF RandomNum(8,1) GlobalLT("psMelCastKarsusCrimsonFlames","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ21",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastKarsusCrimsonFlames","LOCALS",1) END IF RandomNum(8,1) GlobalLT("psMelCastThunderbolt","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ3",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastThunderbolt","LOCALS",1) END IF RandomNum(8,1) GlobalLT("psMelCastEvisceration","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPSQ126",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastEvisceration","LOCALS",1) END IF RandomNum(12,1) GlobalLT("psMelCastWiltingCounter","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_ABI_DALZIMS_HORRID_WILTING) IncrementGlobal("psMelCastWiltingCounter","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: Melanthium's Rain of Terror ///////////////////////////////////////////////////////////////////// IF RandomNum(20,1) GlobalLT("psMelCastRainCounter","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSMELR",NearestEnemyOf(Myself)) // Melanthium's Rain of Terror IncrementGlobal("psMelCastRainCounter","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 10 ///////////////////////////////////////////////////////////////////// IF RandomNum(25,1) GlobalLT("psMelCastPlanatarCounter","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_SUMMON_PLANATAR_EVIL) IncrementGlobal("psMelCastPlanatarCounter","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 9 ///////////////////////////////////////////////////////////////////// // {WARNING: v2.5 of this spell does not summon anything} PSM - Create Minion // IF // RandomNum(20,1) // GlobalLT("psMelCastCreateMinion","LOCALS",1) // THEN // RESPONSE #100 // ForceSpellRES("SPpsq22",NearestEnemyOf(Myself)) // IncrementGlobal("psMelCastCreateMinion","LOCALS",1) // END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 8 ///////////////////////////////////////////////////////////////////// // PSM - Nightmare Syndrome IF RandomNum(12,1) GlobalLT("psMelCastNightmare","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSNMS",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastNightmare","LOCALS",1) END // Level 7 - Azazello // Script this to be used against spellcasters - Azazello // IF // RandomNum(8,1) // GlobalLT("psMelCastKillimerPowerNullification","LOCALS",1) // THEN // RESPONSE #100 // ForceSpellRES("SPPS21",NearestEnemyOf(Myself)) // IncrementGlobal("psMelCastKillimerPowerNullification","LOCALS",1) // END // WARNING! IF RandomNum(8,1) GlobalLT("psMelCastStormForce","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ10",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastStormForce","LOCALS",1) END // WARNING! IF RandomNum(8,1) GlobalLT("psMelCastMiasma","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ11",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastMiasma","LOCALS",1) END // WARNING! IF RandomNum(8,1) GlobalLT("psMelCastTripleFireballBlast","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ19",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastTripleFireballBlast","LOCALS",1) END // WARNING! IF RandomNum(40,1) GlobalLT("psMelCastInfernalCombustionEnigma","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ1",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastInfernalCombustionEnigma","LOCALS",1) END // {WARNING: v2.5 of this spell causes crash-to-desktop} PSM - Melt // IF // RandomNum(8,1) // GlobalLT("psMelCastMelt","LOCALS",1) // THEN // RESPONSE #100 // ForceSpellRES("SPPSQ7",NearestEnemyOf(Myself)) // IncrementGlobal("psMelCastMelt","LOCALS",1) // END IF RandomNum(5,1) GlobalLT("psMelFingerDeath","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_FINGER_OF_DEATH) IncrementGlobal("psMelFingerDeath","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: Melanthium's Hand of Fate - Azazello ///////////////////////////////////////////////////////////////////// IF RandomNum(25,1) GlobalLT("psMelCastHandCounter","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSMELH",NearestEnemyOf(Myself)) // Melanthium's Hand of Fate IncrementGlobal("psMelCastHandCounter","LOCALS",1) END // Level 6 - Azazello IF RandomNum(12,1) GlobalLT("psMelCastUnthinkableLogic","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ17",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastUnthinkableLogic","LOCALS",1) END IF RandomNum(3,1) GlobalLT("psMelCastChainLightning","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_CHAIN_LIGHTNING) IncrementGlobal("psMelCastChainLightning","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: EvilChainCombo ///////////////////////////////////////////////////////////////////// IF RandomNum(15,1) GlobalLT("psMelCastEvilChainComboCounter","LOCALS",1) THEN RESPONSE #100 ReallyForceSpell(NearestEnemyOf(Myself),WIZARD_GREATER_MALISON) // ReallyForceSpell(NearestEnemyOf(Myself),WIZARD_CHAIN_LIGHTNING) ReallyForceSpell(NearestEnemyOf(Myself),WIZARD_CHAOS) IncrementGlobal("psMelCastEvilChainComboCounter","LOCALS",1) END // Level 5 - Azazello IF RandomNum(20,1) GlobalLT("psMelCastVorpalBolt","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPS20",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastVorpalBolt","LOCALS",1) END IF RandomNum(20,1) GlobalLT("psMelCastIridiumSphere","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSIRS",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastIridiumSphere","LOCALS",1) END // WARNING! IF RandomNum(20,1) GlobalLT("psMelCastVestcakeFloatingCurse","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ12",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastVestcakeFloatingCurse","LOCALS",1) END IF RandomNum(10,1) GlobalLT("psMelCastSunfire","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_SUN_FIRE) IncrementGlobal("psMelCastSunfire","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 7 ///////////////////////////////////////////////////////////////////// // IF // RandomNum(3,1) // GlobalLT("psMelCastMordenkainenSword","LOCALS",1) // THEN // RESPONSE #100 // ForceSpell(NearestEnemyOf(Myself),WIZARD_MORDENKAINENS_SWORD) // IncrementGlobal("psMelCastMordenkainenSword","LOCALS",1) // END ///////////////////////////////////////////////////////////////////// // Melanthium's favorites: CantCatchMe ///////////////////////////////////////////////////////////////////// IF RandomNum(10,1) Range(NearestEnemyOf(Myself),5) GlobalLT("psMelCantCatchMeCounter","LOCALS",1) THEN RESPONSE #100 IncrementGlobal("psMelCantCatchMeCounter","LOCALS",1) ReallyForceSpell(Myself,WIZARD_SUN_FIRE) Wait(2) ReallyForceSpell(Myself,WIZARD_MORDENKAINENS_SWORD) // ReallyForceSpell(Myself,WIZARD_MORDENKAINENS_SWORD) ReallyForceSpell(Myself,WIZARD_INVISIBLE_STALKER) // ReallyForceSpell(Myself,WIZARD_INVISIBLE_STALKER) JumpToPoint([817.769]) END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 6 ///////////////////////////////////////////////////////////////////// // IF // RandomNum(3,1) // GlobalLT("psMelCastInvisibleStalker","LOCALS",1) // THEN // RESPONSE #100 // ForceSpell(NearestEnemyOf(Myself),WIZARD_INVISIBLE_STALKER) // IncrementGlobal("psMelCastInvisibleStalker","LOCALS",1) // END // Level 4 - Azazello IF RandomNum(20,1) GlobalLT("psMelCastBlackBarbedCurse","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ16",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastBlackBarbedCurse","LOCALS",1) END IF RandomNum(20,1) GlobalLT("psMelCastAjundurarIceShard","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ6",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastAjundurarIceShard","LOCALS",1) END ///////////////////////////////////////////////////////////////////// // SUMMONINGS, Level 4 ///////////////////////////////////////////////////////////////////// // {v2.5 - modify Knives so that allegiance matches caster} PSM - Kelton's Kinetic Knives // IF // RandomNum(20,1) // GlobalLT("psMelCastKeltonKineticKnives","LOCALS",1) // THEN // RESPONSE #100 // ForceSpellRES("SPPSKKK",NearestEnemyOf(Myself)) // IncrementGlobal("psMelCastKeltonKineticKnives","LOCALS",1) // END // Level 3 - Azazello IF RandomNum(25,1) GlobalLT("psMelCastDispelCounter","LOCALS",1) THEN RESPONSE #100 DisplayStringHead(Myself,@609) // HA! Do you really think that can stop me? ReallyForceSpell(Player1,WIZARD_TRUE_DISPEL_MAGIC) ReallyForceSpell(Player2,WIZARD_TRUE_DISPEL_MAGIC) ReallyForceSpell(Player3,WIZARD_TRUE_DISPEL_MAGIC) ReallyForceSpell(Player4,WIZARD_TRUE_DISPEL_MAGIC) ReallyForceSpell(Player5,WIZARD_TRUE_DISPEL_MAGIC) ReallyForceSpell(Player6,WIZARD_TRUE_DISPEL_MAGIC) IncrementGlobal("psMelCastDispelCounter","LOCALS",1) END IF RandomNum(5,1) GlobalLT("psMelCastFireball","LOCALS",1) THEN RESPONSE #100 ForceSpell(NearestEnemyOf(Myself),WIZARD_FIREBALL) IncrementGlobal("psMelCastFireball","LOCALS",1) END // Level 2 - Azazello IF RandomNum(20,1) GlobalLT("psMelCastShadrickShatteringArrow","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSQ15",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastShadrickShatteringArrow","LOCALS",1) END IF RandomNum(20,1) GlobalLT("psMelCastTyndalSpacialCompressor","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPPSTYS",Myself) IncrementGlobal("psMelCastTyndalSpacialCompressor","LOCALS",1) END // Level 1(?) - Azazello IF RandomNum(2,1) GlobalLT("psMelCastPSMMagicMissile","LOCALS",1) THEN RESPONSE #100 ForceSpellRES("SPWI998",NearestEnemyOf(Myself)) IncrementGlobal("psMelCastPSMMagicMissile","LOCALS",1) END IF RandomNum(2,1) THEN RESPONSE #100 MoveToObject(Player1) Continue() END // IF // ActionListEmpty() // THEN // RESPONSE #100 // RandomWalk() // Continue() // END