IF
    See(NearestEnemyOf(Myself))
    HaveSpell(WIZARD_STONE_SKIN)
    Global("Prep","LOCALS",0)
THEN
    RESPONSE #100
        ApplySpell(Myself,WIZARD_STONE_SKIN)
        Spell(Myself,WIZARD_MIRROR_IMAGE)
        SetGlobal("Prep","LOCALS",1)
END

IF
    See(NearestEnemyOf(Myself))
    HaveSpell(WIZARD_STONE_SKIN)
    TookDamage()
    CheckStatLT(Myself,1,STONESKINS)
THEN
    RESPONSE #100
        Spell(Myself,WIZARD_STONE_SKIN)
        ApplySpell(Myself,WIZARD_BLUR)
        DisplayStringHead(Myself,@0) // Your powers are WEAK young man !
        DisplayString(Myself,@0) // Your powers are WEAK young man !
END

IF
    See(NearestEnemyOf(Myself))
    HaveSpell(WIZARD_LIGHTNING_BOLT)
THEN
    RESPONSE #100
        Spell(NearestEnemyOf(Myself),WIZARD_LIGHTNING_BOLT)
END

IF
    See(NearestEnemyOf(Myself))
    HaveSpell(WIZARD_MONSTER_SUMMONING_1)
THEN
    RESPONSE #100
        Spell(NearestEnemyOf(Myself),WIZARD_MONSTER_SUMMONING_1)
END

IF
    See(NearestEnemyOf(Myself))
    Global("Prep","LOCALS",1)
THEN
    RESPONSE #100
        EquipMostDamagingMelee()
        PlaySound("lhLRD3")
        SetGlobal("Prep","LOCALS",2)
        AttackReevaluate(NearestEnemyOf(Myself),5)
END

IF
    See(NearestEnemyOf(Myself))
THEN
    RESPONSE #100
        AttackReevaluate(NearestEnemyOf(Myself),20)
END


