void main()
{
ActionWait (3.0); // le ActionWait ici est nécessaire car sinon on ne peut plus parler au personnage !
if (GetLocalInt(OBJECT_SELF, "porte_ouverte") != 1)
    {
    int iRandom = Random(12); // Là on tire au sort un nombre entre 1 et 12 pour choisir le sort à lancer
        if (iRandom == 1)
            {
            ActionCastSpellAtObject(SPELL_MAGIC_MISSILE, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF)); // En virant le DelayCommand (pour ne garder que le ActionWait du début), le script en se réexécute pas...
            }

        if (iRandom == 2)
            {
            ActionCastSpellAtObject(SPELL_FIREBALL, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 3)
            {
            ActionCastSpellAtObject(SPELL_BURNING_HANDS, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 4)
            {
            ActionCastSpellAtObject(SPELL_CHAIN_LIGHTNING, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 5)
            {
            ActionCastSpellAtObject(SPELL_CONE_OF_COLD, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

         if (iRandom == 6)
            {
            ActionCastSpellAtObject(SPELL_FLAME_ARROW, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 7)
            {
            ActionCastSpellAtObject(SPELL_COLOR_SPRAY, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 8)
            {
            ActionCastSpellAtObject(SPELL_LIGHTNING_BOLT, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 9)
            {
            ActionCastSpellAtObject(SPELL_MELFS_ACID_ARROW, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 10)
            {
            ActionCastSpellAtObject(SPELL_RAY_OF_ENFEEBLEMENT, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 11)
            {
            ActionCastSpellAtObject(SPELL_NEGATIVE_ENERGY_RAY, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

        if (iRandom == 12)
            {
            ActionCastSpellAtObject(SPELL_RAY_OF_FROST, GetObjectByTag("PortesBiblio"), TRUE, 20);
            DelayCommand (3.0, ExecuteScript("os_ashareth", OBJECT_SELF));
            }

    }
}

// Get an integer between 0 and nMaxInteger-1.
// Return value on error: 0
int Random(int nMaxInteger)

// Get the total from rolling (nNumDice x d12 dice).
// - nNumDice: If this is less than 1, the value 1 will be used.
int d12(int nNumDice=1)