Negozi random

« Older   Newer »
 
  Share  
.
  1.     Top   Top
     
    .
    Avatar

    Signore dei criceti

    Group
    Administrator
    Posts
    12,967
    Location
    Isole del Dragone

    Status
    RANDOM STORES

    OIG3-C-Sa3-Le-Dk-NXMNt

    Nel sistema ci sono 4 negozi: Emporio generico, Erborista, Tempio, Magia.
    Questi negozi cambiano gli oggetti in vendita giornalmente, in modo casuale ed in base al livello del PG.
    Lo stesso negozio, pertanto può essere usato ovunque, replicato uguale e sarà adatto per PG di ogni livell

    Gli step di livello nei quali gli oggetti migliorano sono: 1/6 - 7/12 - 13/18 - 19+

    NOTA BENE:
    Il range di crescita è perfettibile e gli oggetti potrebbero risultare squilibrati in certe ambientazioni.
    Va sa sé che il prezzo degli oggetti più potenti dovrebbe, già di per sé evitare gli eccessi, per cui settate per bene il prezzo in vendita di questi negozi, in base alle vostre esigenze.
    Non escludo comunque di patchare questo sistema, in futuro, inserendo un maggior numero di step di livello ed eventualmente un max level più alto.
    Stay tuned

    Il sistema richiede almeno cep 1.68; non sono certo che funzioni con cep2, ma dovrebbe.
    E' adatto ai moduli single player

    Gli oggetti in vendita sono quelli della tavolozza standard, più alcune serie di armi ed armature custom, per classi specifiche.

    Le armature sono quelle della tavolozza, standard o custom, ma la loro AC viene modificata in base al livello.
    Pertanto proteste trovare, per es. un'armatura di Balduran, ma magari con AC+8

    CONTENUTO DELL' ERF

    4 mercanti con relativi dialoghi
    4 attivatori
    4 negozi
    32 oggetti custom

    Trovate tutto in tavolozza custom.
    Mercanti, attivatori e negozi in speciale/personalizzato 1
    Oggetti custom in speciale/personalizzato 2/3/4


    ISTRUZIONI

    Importate l'erf
    Mettete il mercante nell'area vicino al proprio negozio
    Circondatelo con il relativo attivatore

    Per il posizionamento dell'attivatore in esterni vedete il modulo test per un esempio
    In negozi interni potete anche coprire l'intera area con l'attivatore


    BONUS

    Negli script, che sono sugli attivatori, c'è anche questa riga

    if(GetLocalInt(OBJECT_SELF,"market")){HD=1;}

    Per fare funzionare la riga in un negozio specifico, quindi, dovrete aggiungere, nelle variabili dell'attivatore

    market - int - 1

    Cosi il negozio terrà conto di un livello fisso (di default 1) e non più del livello del pg
    Per variare quel livello dovrete cambiare il numero in {HD=1;}
    Il nuovo livello impostato, quindi, sarà valido per tutti i negozi con la int "market", mentre tutti gli altri continueranno a calcolare il livello del PG.

    Questo può essere utile in caso desideriate avere negozi di alto livello solo in determinati posti.
    Per esempio, in una città, le bancarelle del mercato all'aperto potrebbero avere oggetti random di valore limitato, mentre il negozio di lusso avrebbe quelle migliori, che salgono anche di livello con il PG.


    SCREENSHOT
    Come possono apparire i negozi.

    generico
    negozi-random-0000 negozi-random-0001

    Wizard
    negozi-random-0012 negozi-random-0013
    negozi-random-0014 negozi-random-0015

    Tempio (poche armi perchè sono solo vendicatori sacri e compaiono raramente)
    negozi-random-0007 negozi-random-0008
    negozi-random-0009 negozi-random-0010

    Pozioni
    negozi-random-0002 negozi-random-0003


    DOWNLOAD
    In fondo al post

    Nel pack c'è l'erf, da importare nel modulo (come sempre, fate prima un backup) ed un modulino test dove vedere il funzionamento.
    Il meccanismo al centro fa trascorrere 12 ore, cliccatelo 2 volte per resettare i negozi.
    Provate con pg di diversi livelli
    Il modulo test richiede cep 1,68

    GLI SCRIPT

    Per farvi un'idea di cosa si può trovare nei negozi potete dare un'occhiata agli script.


    Emporio
    CODICE
    ///////////////////
       // Random Store ///
      // by magobargle //
     ///////////////////
    ///// GENERIC /////
    ///////////////////

    void randomize(object oStore, object oPC)
    {
    string RR;
    int a,b,c,d,e,f,g,itm,trp,arm,glv,blt,clk,bts,acb,
       D1=d4()+4,D2=d6()+8,D3=d4()+3,D4=d4()+4,D5=d3()+2,D6=d3()+3,D7=d6()+2,
       HD=GetHitDice(oPC);

    if(GetLocalInt(OBJECT_SELF,"market")){HD=1;}// i mercati all'aperto sono sforniti rispetto ai negozi

         if (HD<=6)           {itm=6;  trp=22; glv=22; arm=32; blt=10; clk=17; bts=18;}
    else if((HD>6)&&(HD<=12)) {itm=10; trp=33; glv=33; arm=44; blt=17; clk=21; bts=22;}
    else if((HD>12)&&(HD<=18)){itm=12; trp=44; glv=44; arm=53; blt=24; clk=29; bts=30;}
    else                      {itm=15; trp=47; glv=55; arm=64; blt=31; clk=36; bts=36;}


       //////////////////////
      // OGGETTI GENERICI //
     //////////////////////

    for(a=0; a<D1; a++)  // valore degli items in base al livello
     {
      switch(Random(itm)+1)                       // OGGETTO - VALORE MO
       {
       case 1:   RR="nw_it_torch001"; break;    //Torcia  6
       case 2:   RR="nw_it_picks001"; break;    //Arnesi da Scasso +1  15
       case 3:   RR="nw_it_contain001"; break;  //Scatola Grande  15
       case 4:   RR="nw_it_picks002"; break;    //Arnesi da Scasso +3  140
       case 5:   RR="nw_it_contain002"; break;  //Borsa magica (20)  265
       case 6:   RR="nw_it_picks003"; break;    //Arnesi da Scasso +6  562
       case 7:   RR="nw_it_contain003"; break;  //Borsa magica minore (40)  577
       case 8:   RR="x2_it_picks001"; break;    //Attrezzi da ladro +8  1000
       case 9:   RR="nw_it_picks004"; break;    //Arnesi da Scasso +10  1562
       case 10:  RR="nw_it_contain004"; break;  //Borsa Magica (60)  1015
       case 11:  RR="nw_it_contain005"; break;  //Borsa magica maggiore (80)  1577
       case 12:  RR="x2_it_picks002"; break;    //Attrezzi da ladro +12  2250
       case 13:  RR="nw_it_contain006"; break;  //Borsa Conservante  2265
       case 14:  RR="x0_it_mthnmisc20"; break;  //Strumento dei venti  20001
       case 15:  RR="nw_it_novel002"; break;    //Strumento dei venti  51637
       }
     if(!GetLocalInt(oStore,RR))
       {
       CreateItemOnObject(RR,oStore,1);
       SetLocalInt(oStore,RR,1);
       DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       /////////////////////////
      // ARNESI PER TRAPPOLE //
     /////////////////////////

    for(b=0; b<D2; b++)   // valore degli items in base al livello
     {
      switch(Random(trp)+1)
       {
       case 1:   RR="nw_it_trap013"; break;    //Chiazza d'Acido Minori
       case 2:   RR="nw_it_trap025"; break;    //Gas Minori
       case 3:   RR="nw_it_trap033"; break;    //Spruzzo d'Acido Minori
       case 4:   RR="nw_it_trap001"; break;    //Trappole Chiodate Minori
       case 5:   RR="nw_it_trap029"; break;    //Gelo Minori
       case 6:   RR="nw_it_trap009"; break;    //Impedimento Minori
       case 7:   RR="nw_it_trap017"; break;    //Fuoco Minori
       case 8:   RR="nw_it_trap021"; break;    //Elettriche Minori
       case 9:   RR="nw_it_trap041"; break;    //Negative Minori
       case 10:  RR="nw_it_trap005"; break;    //Sacre Minori
       case 11:  RR="nw_it_trap037"; break;    //Sonore Minori
       case 12:  RR="nw_it_trap026"; break;    //Gas Medie
       case 13:  RR="nw_it_trap034"; break;    //Spruzzo d'Acido Medie
       case 14:  RR="nw_it_trap002"; break;    //Chiodate Medie
       case 15:  RR="nw_it_trap030"; break;    //Gelo Medie
       case 16:  RR="nw_it_trap010"; break;    //Impedimento Medie
       case 17:  RR="nw_it_trap018"; break;    //Fuoco Medie
       case 18:  RR="nw_it_trap022"; break;    //Elettriche Medie
       case 19:  RR="nw_it_trap014"; break;    //Chiazza d'Acido Medie
       case 20:  RR="nw_it_trap042"; break;    //Negative Medie
       case 21:  RR="nw_it_trap006"; break;    //Sacre Medie
       case 22:  RR="nw_it_trap038"; break;    //Sonore Medie
       case 23:  RR="nw_it_trap027"; break;    //Gas Forti
       case 24:  RR="nw_it_trap035"; break;    //Spruzzo d'Acido Forti
       case 25:  RR="nw_it_trap015"; break;    //Chiazza d'Acido Forti
       case 26:  RR="nw_it_trap003"; break;    //Chiodate Forti
       case 27:  RR="nw_it_trap031"; break;    //Gelo Forti
       case 28:  RR="nw_it_trap011"; break;    //Impedimento Forti
       case 29:  RR="nw_it_trap019"; break;    //Fuoco Forti
       case 30:  RR="nw_it_trap023"; break;    //Elettriche Forti
       case 31:  RR="nw_it_trap043"; break;    //Negative Forti
       case 32:  RR="nw_it_trap007"; break;    //Sacre Forti
       case 33:  RR="nw_it_trap039"; break;    //Sonore Forti
       case 34:  RR="nw_it_trap044"; break;    //Negative Mortali
       case 35:  RR="nw_it_trap016"; break;    //Chiazza d'Acido Mortali
       case 36:  RR="nw_it_trap028"; break;    //Gas Mortali
       case 37:  RR="nw_it_trap036"; break;    //Spruzzo d'Acido Mortali
       case 38:  RR="nw_it_trap004"; break;    //Chiodate Mortali
       case 39:  RR="nw_it_trap032"; break;    //Gelo Mortali
       case 40:  RR="nw_it_trap012"; break;    //Impedimento Mortali
       case 41:  RR="nw_it_trap020"; break;    //Fuoco Mortali
       case 42:  RR="nw_it_trap024"; break;    //Elettriche Mortali
       case 43:  RR="nw_it_trap008"; break;    //Sacre Mortali
       case 44:  RR="nw_it_trap040"; break;    //Sonore Mortali
       case 45:  RR="x2_it_trap002"; break;    //Amuleto fuoco epica
       case 46:  RR="x2_it_trap001"; break;    //elettrica epica
       case 47:  RR="x2_it_trap004"; break;    //sonica epica
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
      }

       ////////////////
      /// ARMATURE ///
     ////////////////

    for(c=0; c<D3; c++)  // valore degli items in base al livello
     {
      switch(Random(arm)+1)                     // OGGETTO - VALORE MO
       {
       case 1:   RR="x3_it_blackmail"; break; //Armatura nera 215
       case 2:   RR="x2_it_adachain"; break;  //Cotta di maglia adamantina 3074
       case 3:   RR="nw_maarcl060"; break;    //Armatura delle Ossa Bianche +2 3524
       case 4:   RR="x1_maarcl001"; break;    //Pelle della foresta 4629
       case 5:   RR="nw_maarcl059"; break;    //Scaglie della Verità +1 4846
       case 6:   RR="nw_maarcl026"; break;    //Armatura Magnetica Gnomesca 5052
       case 7:   RR="nw_maarcl021"; break;    //Armatura della Comodità 6202
       case 8:   RR="nw_maarcl013"; break;    //Armatura delle Spine 7439
       case 9:   RR="nw_maarcl011"; break;    //Armatura della Lealtà 7911
       case 10:  RR="nw_maarcl058"; break;    //Corazza di Piastre Cromatica +1 8187
       case 11:  RR="nw_maarcl020"; break;    //Armatura Arcobaleno 8237
       case 12:  RR="nw_maarcl029"; break;    //Armatura di Enkidu 8709
       case 13:  RR="x0_maarcl037"; break;    //Armatura delle tempeste dei figli della terra 9537
       case 14:  RR="x0_maarcl036"; break;    //Armatura delle tempeste di Laeral 11328
       case 15:  RR="nw_maarcl006"; break;    //Armatura di Aurumvorax 12862
       case 16:  RR="nw_maarcl007"; break;    //La Grande Quercia 13405
       case 17:  RR="nw_maarcl032"; break;    //Fortuna di Benzo 13769
       case 18:  RR="nw_maarcl036"; break;    //Errore di Doron 13803
       case 19:  RR="nw_maarcl012"; break;    //Armatura di Callurdan Smoothand 14152
       case 20:  RR="nw_maarcl041"; break;    //Corazza a Strisce in Mithral 14716
       case 21:  RR="nw_maarcl022"; break;    //Armatura Cerimoniale Elfica 15116
       case 22:  RR="nw_maarcl016"; break;    //Armatura di Horus-Re 1638
       case 23:  RR="nw_maarcl034"; break;    //Maglie del Ladro 16417
       case 24:  RR="nw_maarcl005"; break;    //Armatura della Legione d'Ombra 16902
       case 25:  RR="nw_maarcl018"; break;    //Armatura del Drago Bianco 17092
       case 26:  RR="nw_maarcl024"; break;    //Armatura dello Scavatore 17287
       case 27:  RR="nw_maarcl042"; break;    //Armatura del Drago di Rame 17781
       case 28:  RR="nw_maarcl040"; break;    //Corazza di Piastre Adamantina 17874
       case 29:  RR="x2_it_mithralsh"; break; //Maglia di mithril 18590
       case 30:  RR="x2_it_mithralch"; break; //Cotta di maglia di mithril 18640
       case 31:  RR="nw_maarcl037"; break;    //Cotta di Maglia Elfica 19022
       case 32:  RR="nw_maarcl062"; break;    //Scaglie della Verità +3 19034
       case 33:  RR="nw_maarcl017"; break;    //Veste della fuga 20071
       case 34:  RR="x0_cloth004"; break;     //Armatura delle Stelle 20116
       case 35:  RR="nw_maarcl002"; break;    //Armatura Riflettente 21257
       case 36:  RR="nw_maarcl061"; break;    //Corazza di Piastre Cromatica +3 21633
       case 37:  RR="nw_maarcl033"; break;    //Armatura delle Tempeste 23151
       case 38:  RR="nw_mcloth005"; break;    //Maglia Elfica di Aslyferund 26117
       case 39:  RR="nw_maarcl033"; break;    //Verdefoglia 25110
       case 40:  RR="nw_maarcl039"; break;    //Cotta di Maglia della Velocità 27294
       case 41:  RR="nw_maarcl063"; break;    //Armatura delle Ossa d'Argento +2 27744
       case 42:  RR="nw_maarcl001"; break;    //Armatura del Lupo 28095
       case 43:  RR="nw_maarcl008"; break;    //Difesa dello Scudiero 28206
       case 44:  RR="nw_maarcl028"; break;    //Armatura del Drago Blu 28384
       case 45:  RR="nw_maarcl010"; break;    //Kumakawa 31487
       case 46:  RR="nw_maarcl014"; break;    //Armatura del Comando 31572
       case 47:  RR="nw_maarcl004"; break;    //Armatura dell'Agilità 37337
       case 48:  RR="nw_maarcl027"; break;    //Armatura del Drago Rosso 40687
       case 49:  RR="nw_maarcl054"; break;    //Armatura della Libertà 45192
       case 50:  RR="nw_maarcl025"; break;    //Armatura di Balduran 51152
       case 51:  RR="x2_armor_001"; break;    //Catena magica 61146
       case 52:  RR="nw_maarcl015"; break;    //Armatura della Fiamma Nera 62583
       case 53:  RR="nw_maarcl002"; break;    //Armatura del Drago 64661
       case 54:  RR="x2_cus_fletchers"; break;//Amico dell'arcaio 113432
       case 55:  RR="x2_c3_maarcl028"; break; //Armatura del Drago Blu 120309
       case 56:  RR="x2_cus_lastwords"; break;//Ultime parole 141543
       case 57:  RR="x2_maarcl050"; break;    //Corazza del golem inferiore 141998
       case 58:  RR="x2_c3_maarcl037"; break; //Armatura delle tempeste dei figli della terra 146401
       case 59:  RR="x2_cus_thegilded"; break;//Difensore dorato 159359
       case 60:  RR="x2_cus_bindingso"; break;//Legami di sangue 188651
       case 61:  RR="x2_cus_dancerssi"; break;//Sagoma del danzatore 189037
       case 62:  RR="x2_maarcl049"; break;    //Corazza di piastre del signore della guerra 220672
       case 63:  RR="x2_cus_theironsk"; break;//Scheletro di ferro 338222
       case 64:  RR="x2_cus_casielsso"; break;//Anima di Casiel 440402
       }
         if (HD<=6)           {acb=d3();}
    else if((HD>6)&&(HD<=12)) {acb=Random(4)+2;}
    else if((HD>12)&&(HD<=18)){acb=Random(4)+4;}
    else                      {acb=Random(HD/4)+Random(HD/4)+1;}

       if(!GetLocalInt(oStore,RR))
         {
         object oArmor = CreateItemOnObject(RR,oStore,1);
         itemproperty ipLoop=GetFirstItemProperty(oArmor);

         while(GetIsItemPropertyValid(ipLoop))
              {
               if(GetItemPropertyType(ipLoop)==ITEM_PROPERTY_AC_BONUS)
                  {
                  RemoveItemProperty(oArmor,ipLoop);
                  }
               ipLoop=GetNextItemProperty(oArmor);
               }

         AddItemProperty(2,ItemPropertyACBonus(acb),oArmor);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }

       ////////////////////////
      // GUANTI E BRACCIALI //
     ////////////////////////

    for(d=0; d<D4; d++)   // valore degli items in base al livello
     {
      switch(Random(glv)+1)
       {
       case 1:   RR="x0_it_mglove003"; break;     //Guanti dell'Addestrare Animali  130
       case 2:   RR="nw_it_mglove009"; break;     //Guanti dello Spadaccino  130
       case 3:   RR="x0_it_mglove001"; break;     //Guanti della valutazione  130
       case 4:   RR="nw_it_mglove007"; break;     //Guanti della Sapienza Magica  130
       case 5:   RR="nw_it_mglove008"; break;     //Guanti della Disciplina  130
       case 6:   RR="nw_it_mglove004"; break;     //Guanti della Concentrazione  130
       case 7:   RR="nw_it_mglove005"; break;     //Guanti del Menestrello  130
       case 8:   RR="x2_nash_glove"; break;       //Guanti della disciplina di Nasher  360
       case 9:   RR="x0_it_mglove002"; break;     //Guanti della valutazione, maggiori  519
       case 10:  RR="x0_it_mglove004"; break;     //Guanti dell'artificiere, maggiori  519
       case 11:  RR="nw_it_mglove012"; break;     //Guanti dell'Addestrare Animali Superiori  519
       case 12:  RR="nw_it_mglove015"; break;     //Guanti dello Spadaccino Superiori  519
       case 13:  RR="nw_it_mglove013"; break;     //Guanti della Sapienza Magica Superiori  519
       case 14:  RR="nw_it_mglove011"; break;     //Guanti del Menestrello Superiori  519
       case 15:  RR="nw_it_mglove010"; break;     //Guanti della Concentrazione Superiori  519
       case 16:  RR="nw_it_mglove014"; break;     //Guanti della Disciplina Superiori  519
       case 17:  RR="nw_it_mbracer002"; break;    //Bracciali dell'Armatura +1  657
       case 18:  RR="nw_it_mglove003"; break;     //Guanti del Ladro  922
       case 19:  RR="nw_it_mbracer001"; break;    //
       case 20:  RR="nw_it_mbracer012"; break;    //Bracciali della Destrezza +1  1441
       case 21:  RR="x0_it_mglove006"; break;     //Guanti d'Arme Minori del Potere dell'Ogre  1441
       case 22:  RR="nw_it_mbracer007"; break;    //Guanti del fulmine  1501
       case 23:  RR="nw_it_mglove001"; break;     //Bracciali dell'Armatura +2  2925
       case 24:  RR="nw_it_mbracer013"; break;    //Guanti delle Meraviglie  4101
       case 25:  RR="nw_it_mbracer003"; break;    //Guanti d'Arme del Potere dell'Ogre  5761
       case 26:  RR="x1_it_mglove001"; break;     //Guanti fiammeggianti +2  6031
       case 27:  RR="nw_it_mbracer011"; break;    //Guanti della presa bloccante  6052
       case 28:  RR="nw_it_mbracer008"; break;    //bracciali dell'Armatura +3  6813
       case 29:  RR="x0_it_mbracer001"; break;    //Bracciali dell'arciere  7291
       case 30:  RR="x0_it_mglove007"; break;     //Guanti delle mani equilibrate  9001
       case 31:  RR="nw_it_mbracer009"; break;    //Bracciali dell'Armatura +4  12321
       case 32:  RR="nw_it_mbracer004"; break;    //Bracciali della Destrezza +3  12961
       case 33:  RR="nw_it_mbracer010"; break;    //Bracciali dell'Armatura +5  19449
       case 34:  RR="nw_it_mbracer005"; break;    //Bracciali della Destrezza +4  23041
       case 35:  RR="x0_it_mglove005"; break;     //Guanto della furia  33075
       case 36:  RR="x2_it_mglove016"; break;     //Guanti del dominio animale epico  36001
       case 37:  RR="nw_it_mbracer006"; break;    //Bracciali della Destrezza +5  36001
       case 38:  RR="x2_it_mglove021"; break;     //Guanti del menestrello epici  36001
       case 39:  RR="x2_it_mglove017"; break;     //Guanti della concentrazione epica  36001
       case 40:  RR="x2_it_mglove018"; break;     //Guanti della disciplina epica  36001
       case 41:  RR="x2_it_mglove019"; break;     //Guanti della sapienza magica epica  36001
       case 42:  RR="x2_it_mglove020"; break;     //Guanti della scherma epica  36001
       case 43:  RR="x0_it_mbracer002"; break;    //Bracciali del colpo accecante  49141
       case 44:  RR="x2_it_mbracer006"; break;    //Bracciali della destrezza +6  51841
       case 45:  RR="x2_it_mglove022"; break;     //Guanti del grande wyrm  52201
       case 46:  RR="x2_it_mbracer001"; break;    //Bracciali dell’armatura +6  58523
       case 47:  RR="x2_it_mbracer007"; break;    //Bracciali della destrezza +7  70561
       case 48:  RR="x2_glove_bal"; break;        //Pugni dell'equilibrio  85326
       case 49:  RR="x2_it_mbracer008"; break;    //Bracciali della destrezza +8  92161
       case 50:  RR="x2_it_mbracer002"; break;    //Bracciali dell’armatura +7  98010
       case 51:  RR="x2_it_mbracer009"; break;    //Bracciali della destrezza +9  116641
       case 52:  RR="x2_it_mbracer003"; break;    //Bracciali dell’armatura +8  158760
       case 53:  RR="x2_it_mbracer004"; break;    //Bracciali dell’armatura +9  207360
       case 54:  RR="x2_it_mbracer010"; break;    //Bracciali della destrezza +10  547560
       case 55:  RR="x2_it_mbracer005"; break;    //Bracciali dell’armatura +10  547560
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
       }

       ///////////////
      /// CINTURE ///
     ///////////////

    for(e=0; e<D5; e++)   // numero degli items in base al livello
     {
      switch(Random(blt)+1)
       {
       case 1:   RR="nw_it_mbelt009"; break;     //Cintura dello Spadaccino 879
       case 2:   RR="nw_it_mbelt011"; break;     //Cintura dell'Arciere 879
       case 3:   RR="nw_it_mbelt010"; break;     //Cintura del Lottatore 879
       case 4:   RR="nw_it_mbelt005"; break;     //Fascia dello Splendore 1690
       case 5:   RR="nw_it_mbelt015"; break;     //Cintura Minore della Luce Guida 2690
       case 6:   RR="nw_it_mbelt006"; break;     //Cintura della Barriera Inerziale 7210
       case 7:   RR="nw_it_mbelt004"; break;     //Circolo di Scaglie 11313
       case 8:   RR="nw_it_mbelt002"; break;     //Cintura della Forza da Gigante delle Colline 12961
       case 9:   RR="nw_it_mbelt016"; break;     //Cintura della Luce Guida 14440
       case 10:  RR="x0_it_mbelt002"; break;     //Cintura dei leoni 15055
       case 11:  RR="nw_it_mbelt012"; break;     //Cintura dello Spadaccino Superiore 19141
       case 12:  RR="nw_it_mbelt014"; break;     //Cintura dell'Arciere Superiore 19141
       case 13:  RR="nw_it_mbelt013"; break;     //Cintura del Lottatore Superiore 19141
       case 14:  RR="nw_it_mbelt018"; break;     //Cintura dell'Agilità +1 27040
       case 15:  RR="nw_it_mbelt001"; break;     //Cinta della Potenza Sacra 27563
       case 16:  RR="nw_it_mbelt007"; break;     //Cintura della Forza da Gigante del Gelo 23041
       case 17:  RR="nw_it_mbelt008"; break;     //Cintura della Forza da Gigante del Fuoco 36001
       case 18:  RR="x2_belt_001"; break;        //Ultima cintura di Lathar 40961
       case 19:  RR="nw_it_mbelt019"; break;     //Cintura dell'Agilità +2 40961
       case 20:  RR="nw_it_mbelt017"; break;     //Cintura Maggiore della Luce Guida 46513
       case 21:  RR="nw_it_mbelt020"; break;     //Cintura dell'Agilità +3 57761
       case 22:  RR="nw_it_mbelt003"; break;     //Cintura Cerimoniale Uthgardt 59060
       case 23:  RR="nw_it_mbelt021"; break;     //Cintura dell'Agilità +4 77441
       case 24:  RR="x2_it_mbelt001"; break;     //Cintura della forza del gigante delle nuvole 92161
       case 25:  RR="x2_it_mbelt003"; break;     //Cintura dell'agilità +5 100001
       case 26:  RR="x2_it_mbelt004"; break;     //Cintura dell'agilità +6 125441
       case 27:  RR="x2_it_mbelt002"; break;     //Cintura della forza del gigante delle tempeste 144001
       case 28:  RR="x2_it_mbelt005"; break;     //Cintura dell'agilità +7 153761
       case 29:  RR="x2_it_mbelt006"; break;     //Cintura dell'agilità +8 184961
       case 30:  RR="x2_it_mbelt007"; break;     //Cintura dell'agilità +9 219041
       case 31:  RR="x2_it_mbelt008"; break;     //Cintura dell'agilità +10 256001
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
       }

       ////////////////
      /// MANTELLI ///
     ////////////////

    for(f=0; f<D6; f++)   // valore degli items in base al livello
     {
      switch(Random(clk)+1)
       {
       case 1:   RR="nw_maarcl055"; break;     //Mantello di Protezione +1 657
       case 2:   RR="x0_maarcl025"; break;     //Mantello della resistenza +1 1266
       case 3:   RR="nw_maarcl057"; break;     //Mantello Elfico 1440
       case 4:   RR="nw_maarcl031"; break;     //Mantello della Ninfa +1 1441
       case 5:   RR="x0_maarcl040"; break;     //Mantello della fiamma nera 2251
       case 6:   RR="nw_maarcl088"; break;     //Mantello di Protezione +2 2925
       case 7:   RR="nw_maarcl104"; break;     //Mantello della Fortificazione +1 3745
       case 8:   RR="nw_maarcl030"; break;     //Mantello della Grande Foresta 5268
       case 9:   RR="x0_maarcl026"; break;     //Mantello della resistenza +2 5641
       case 10:  RR="nw_maarcl092"; break;     //Mantello della Ninfa +2 5761
       case 11:  RR="x0_maarcl030"; break;     //Mantello dell'aracnide 5763
       case 12:  RR="x2_nash_cloak"; break;    //Manto della protezione di Nasher 6813
       case 13:  RR="nw_maarcl089"; break;     //Mantello di Protezione +3 6813
       case 14:  RR="x0_maarcl039"; break;     //Cappa dell'inverno 8851
       case 15:  RR="x0_maarcl038"; break;     //Cappa della pioggia di fuoco 9766
       case 16:  RR="x0_maarcl028"; break;     //Mantello della resistenza +4 12321
       case 17:  RR="nw_maarcl093"; break;     //Mantello della Ninfa +3 12961
       case 18:  RR="x0_maarcl027"; break;     //Mantello della resistenza +3 13141
       case 19:  RR="nw_maarcl056"; break;     //Mantello del Movimento 16001
       case 20:  RR="nw_maarcl105"; break;     //Mantello della Fortificazione +2 16688
       case 21:  RR="x0_maarcl029"; break;     //Mantello della resistenza +5 19449
       case 22:  RR="x0_maarcl031"; break;     //Mantello del pipistrello 22185
       case 23:  RR="nw_maarcl094"; break;     //Mantello della Ninfa +4 23041
       case 24:  RR="x0_maarcl028"; break;     //Mantello della resistenza +4 23766
       case 25:  RR="x0_maarcl032"; break;     //Mantello della distorsione 33751
       case 26:  RR="nw_maarcl095"; break;     //Mantello della Ninfa +5 36001
       case 27:  RR="x0_maarcl029"; break;     //Mantello della resistenza +5 37516
       case 28:  RR="nw_maarcl106"; break;     //Mantello della Fortificazione +3 38876
       case 29:  RR="x2_it_mcloak006"; break;  //Manto di protezione +6 58523
       case 30:  RR="x2_it_mcloak004"; break;  //Manto del rafforzamento +4 70309
       case 31:  RR="x2_it_mcloak009"; break;  //Manto della ninfa +7 70561
       case 32:  RR="x0_maarcl034"; break;     //Mantello della resistenza agli incantesimi maggiore 81001
       case 33:  RR="x2_it_mcloak007"; break;  //Manto di protezione +7 98010
       case 34:  RR="x2_it_mcloak005"; break;  //Manto del rafforzamento +5 110987
       case 35:  RR="x2_it_mcloak003"; break;  //Manto della furtività superiore 144001
       case 36:  RR="x2_it_mcloak002"; break;  //Manto della resistenza agli incantesimi epica 324001
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
       }

       ///////////////
      /// STIVALI ///
     ///////////////

    for(g=0; g<D7; g++)   // valore degli items in base al livello
     {
      switch(Random(bts)+1)
       {
       case 1:   RR="x0_it_mboots001"; break;     //Stivali dell'inverno 91
       case 2:   RR="x0_it_mboots002"; break;     //Stivali dell'acrobazia, minori 231
       case 3:   RR="nw_it_mboots010"; break;     //Stivali dei Riflessi +1 343
       case 4:   RR="x0_it_mboots003"; break;     //Stivali dell'acrobazia 922
       case 5:   RR="nw_it_mboots001"; break;     //Stivali Molleggiati +1 1441
       case 6:   RR="nw_it_mboots011"; break;     //Stivali dei Riflessi +2 1526
       case 7:   RR="x0_it_mboots004"; break;     //Stivali dell'acrobazia, maggiori 2823
       case 8:   RR="nw_it_mboots012"; break;     //Stivali dei Riflessi +3 3554
       case 9:   RR="nw_it_mboots015"; break;     //Stivali della Resistenza +1 4041
       case 10:  RR="nw_it_mboots006"; break;     //Stivali Molleggiati +2 5761
       case 11:  RR="nw_it_mboots013"; break;     //Stivali dei Riflessi +4 6427
       case 12:  RR="nw_it_mboots014"; break;     //Stivali dei Riflessi +5 10145
       case 13:  RR="nw_it_mboots002"; break;     //Stivali Elfici 12960
       case 14:  RR="nw_it_mboots007"; break;     //Stivali Molleggiati +3 12961
       case 15:  RR="nw_it_mboots007"; break;     //Stivali Molleggiati +3 12961
       case 16:  RR="x2_nash_boot"; break;        //Stivali dell'agilità di Nasher 12961
       case 17:  RR="nw_it_mboots016"; break;     //Stivali della Resistenza +2 16893
       case 18:  RR="nw_it_mboots005"; break;     //Stivali della Velocità 20000
       case 19:  RR="nw_it_mboots004"; break;     //Stivali del Gargoyle 22375
       case 20:  RR="nw_it_mboots008"; break;     //Stivali Molleggiati +4 23041
       case 21:  RR="nw_it_mboots003"; break;     //Pantofole del Drago 23523
       case 22:  RR="x2_it_mboots001"; break;     //Stivali dei riflessi +6 30526
       case 23:  RR="nw_it_mboots009"; break;     //Stivali Molleggiati +5 36001
       case 24:  RR="nw_it_mboots017"; break;     //Stivali della Resistenza +3 38565
       case 25:  RR="x2_it_mboots002"; break;     //Stivali dei riflessi +7 51123
       case 26:  RR="x2_it_mboots006"; break;     //Stivali di granpasso +6 51841
       case 27:  RR="x1_it_mboots001"; break;     //Stivali delle sabbie mutevoli 66251
       case 28:  RR="x2_it_mboots007"; break;     //Stivali di granpasso +7 70561
       case 29:  RR="x2_it_mboots003"; break;     //Stivali dei riflessi +8 82810
       case 30:  RR="x2_it_mboots008"; break;     //Stivali di granpasso +8 92161
       case 31:  RR="x2_it_mboots004"; break;     //Stivali dei riflessi +9 108160
       case 32:  RR="x2_it_mboots009"; break;     //Stivali di granpasso +9 116641
       case 33:  RR="x2_it_mboots010"; break;     //Stivali di granpasso +10 144001
       case 34:  RR="x2_it_mboots005"; break;     //Stivali dei riflessi +10 285610
       case 35:  RR="x2_it_mcloak003"; break;     //Manto della furtività superiore 144001
       case 36:  RR="x2_it_mcloak002"; break;     //Manto della resistenza agli incantesimi epica 324001
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
       }
    }

    void main()
    {
    object oPC=GetEnteringObject();
    object oStore=GetNearestObjectByTag("MB_store_generic"),
          oItem=GetFirstItemInInventory(oStore);
      int DAY=GetLocalInt(oStore,"DAY");

    if(!GetIsPC(oPC)) return;

    if(DAY!=GetCalendarDay())     //  (1==1)  test
     {
     SetLocalInt(oStore,"DAY",GetCalendarDay());

     while(oItem != OBJECT_INVALID)
          {
          DestroyObject(oItem);
          oItem=GetNextItemInInventory(oStore);
          }
     DelayCommand(1.5,randomize(oStore,oPC));
     }
    }


    Magia
    CODICE
    ///////////////////
       // Random Store ///
      // by magobargle //
     ///////////////////
    ////// MAGIC //////
    ///////////////////

    void randomize(object oStore, object oPC)
    {
    string RR;
    int a,b,c,d,e,f,itm,wnd,pgm,arm,aml,rng,acb,
       D1=d3()+1, D2=d4()+4, D3=Random(4)+3, D4=d4()+4, D5=d6()+6,
       HD=GetHitDice(oPC);

    if(GetLocalInt(OBJECT_SELF,"market")){HD=1;}// i mercati all'aperto sono sforniti rispetto ai negozi

          if(HD<=6)           {itm=11; wnd=12; pgm=Random(10)+10; arm=11; aml=17; rng=38;}
    else if((HD>6)&&(HD<=12)) {itm=18; wnd=19; pgm=Random(10)+15; arm=16; aml=23; rng=46;}
    else if((HD>12)&&(HD<=18)){itm=23; wnd=23; pgm=Random(10)+20; arm=22; aml=27; rng=56;}
    else                      {itm=27; wnd=27; pgm=Random(10)+25; arm=29; aml=34; rng=74;}


       //////////////////////
      // OGGETTI GENERICI //
     //////////////////////

    for(a=0; a<D1; a++)  // valore degli items in base al livello
     {
      switch(Random(itm)+1)                       // OGGETTO - VALORE MO
       {
       case 1:   RR="x0_it_mthnmisc15"; break;   //Liuto a tre corde di Fochluchan 1126
       case 2:   RR="x0_it_mmedmisc01"; break;   //Fermaglio dello scudo  1725
       case 3:   RR="x0_it_mthnmisc16"; break;   //Liuto ovale di Mac-Fuirmidh 1801
       case 4:   RR="x0_it_mthnmisc08"; break;   //Corno della distruzione  2701
       case 5:   RR="x0_it_mthnmisc04"; break;   //Campana dell'apertura  4501
       case 6:   RR="x0_it_mthnmisc11"; break;   //Arpa di Janthra  6750
       case 7:   RR="x0_it_mthnmisc09"; break;   //Corno del bene/del male  6751
       case 8:   RR="nw_it_mmidmisc03"; break;   //Arpa del Pandemonio 9281
       case 9:   RR="x0_it_mthnmisc17"; break;   //Liuto di Doss  10126
       case 10:  RR="x0_it_mthnmisc18"; break;   //Mandolino di Canaith  12564
       case 11:  RR="nw_it_mmidmisc02"; break;   //Arpa della Persecuzione  14671
       case 12:  RR="x2_is_blue";       break;   //Pietra di Ioun inferiore: blu  15500
       case 13:  RR="x2_is_paleblue";   break;   //Pietra di Ioun inferiore: blu chiaro 15500
       case 14:  RR="x2_is_pink";       break;   //Pietra di Ioun inferiore: rosa 15500
       case 15:  RR="x2_is_pandgreen";  break;   //Pietra di Ioun inferiore: rosa e verde 15500
       case 16:  RR="x2_is_drose";      break;   //Pietra di Ioun inferiore: rosata  15500
       case 17:  RR="x2_is_deepred";    break;   //Pietra di Ioun inferiore: rossa  15500
       case 18:  RR="x2_is_sandblue";   break;   //Pietra di Ioun inferiore: rossa e blu  15500
       case 19:  RR="x0_it_mthnmisc19"; break;   //Lira di Cli  19914
       case 20:  RR="x0_it_msmlmisc04"; break;   //Gemma della visione  20250
       case 21:  RR="x0_it_mmedmisc06"; break;   //Mazzo dei pericoli  21011  
       case 22:  RR="x0_it_msmlmisc03"; break;   //Gemma della luminosità  32419
       case 23:  RR="x0_it_mthnmisc10"; break;   //Lanterna della rivelazione  33751
       case 24:  RR="x0_it_mmedmisc03"; break;   //Arpa di Austruth 43313
       case 25:  RR="x0_it_mmedmisc02"; break;   //Arpa della colomba  45709
       case 26:  RR="nw_it_mmidmisc01"; break;   //Arpa della Seduzione  46734
       case 27:  RR="x0_it_mmedmisc04"; break;   //Arpa di Ollamh  91125
       }
     if(!GetLocalInt(oStore,RR))
       {
       CreateItemOnObject(RR,oStore,1);
       SetLocalInt(oStore,RR,1);
       DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       ///////////////
      // BACCHETTE //
     ///////////////

    for(b=0; b<D2; b++)   // valore degli items in base al livello
     {
      switch(Random(wnd)+1)
       {
       case 1:   RR="nw_wmgmrd006"; break;   //Verga del Gelo  301
       case 2:   RR="nw_wmgwn006"; break;    //Bacchetta dell'Energia Negativa  563
       case 3:   RR="nw_wmgwn013"; break;    //Bacchetta dell'Evocazione Inferiore  601
       case 4:   RR="nw_wmgrd002"; break;    //Verga del Fantasma  2701
       case 5:   RR="nw_wmgmrd002"; break;   //Verga della Resurrezione  4051
       case 6:   RR="nw_wmgwn009"; break;    //Bacchetta Celestiale  9451
       case 7:   RR="nw_wmgwn004"; break;    //Bacchetta dei Dardi  1000
       case 8:   RR="nw_wmgwn012"; break;    //Bacchetta del Sonno 1501
       case 9:   RR="nw_wmgwn007"; break;    //Bacchetta del Fulmine  5063
       case 10:  RR="nw_wmgwn002"; break;    //Bacchetta del Fuoco 5063
       case 11:  RR="nw_wmgst006"; break;    //Bastone del Sacro  5457
       case 12:  RR="nw_wmgwn010"; break;    //Bacchetta della Nube Maleodorante  731
       case 13:  RR="nw_wmgwn003"; break;    //Bacchetta della Paura  7313
       case 14:  RR="nw_wmgmrd003"; break;   //Verga del Terrore  8438
       case 15:  RR="nw_wmgwn011"; break;    //Bacchetta della Disgiunzione Arcana  8438
       case 16:  RR="nw_wmgst004"; break;    //Bastone della Difesa  8878
       case 17:  RR="nw_wmgst005"; break;    //Bastone del Potere  9094
       case 18:  RR="nw_wmgwn005"; break;    //Bacchetta della Paralisi  9451
       case 19:  RR="nw_wmgwn008"; break;    //Bacchetta dell'Evocazione  9451
       case 20:  RR="x0_wmgmrd007"; break;   //Verga delle meraviglie  16126
       case 21:  RR="nw_wmgmrd004"; break;   //Verga dell'Inganno  17297
       case 22:  RR="nw_wmgmrd005"; break;   //Verga dell'Inversione  17297
       case 23:  RR="nw_wmgst002"; break;    //Bastone del Comando  22436
       case 24:  RR="nw_wmgst003"; break;    //Bastone di Valmaxian  58575
       case 25:  RR="x2_wmgst001"; break;    //Verga del tuono e del fulmine  64126
       case 26:  RR="nw_wmgst003"; break;    //Bastone dei Magi  76456
       case 27:  RR="x2_wmgst001"; break;    //Raggelante  111063
       }
     if(!GetLocalInt(oStore,RR))
       {
       CreateItemOnObject(RR,oStore,1);
       SetLocalInt(oStore,RR,1);
       DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       ///////////////
      // PERGAMENE //
     ///////////////

    for(c=0; c<pgm; c++)   // numero degli items in base al livello
     {
      switch(Random(178)+1)
       {
       case 1:   RR="nw_it_sparscr409"; break;    //Allucinazione Mortale
       case 2:   RR="nw_it_sparscr509"; break;    //Animare Morti
       case 3:   RR="nw_it_sparscr104"; break;    //Armatura Magica
       case 4:   RR="nw_it_sparscr220"; break;    //Astuzia della Volpe
       case 5:   RR="nw_it_sparscr415"; break;    //Autometamorfosi
       case 6:   RR="nw_it_sparscr505"; break;    //Blocca Mostri
       case 7:   RR="nw_it_sparscr308"; break;    //Blocca Persone
       case 8:   RR="nw_it_sparscr211"; break;    //Cecità / Sordità
       case 9:   RR="nw_it_sparscr807"; break;    //Cecità / Sordità di Massa
       case 10:  RR="nw_it_sparscr61"; break;     //Cerchio di Morte
       case 11:  RR="nw_it_sparscr302"; break;    //Cerchio Magico contro l'Allineamento
       case 12:  RR="nw_it_sparscr107"; break;    //Charme
       case 13:  RR="nw_it_sparscr806"; break;    //Charme di Massa
       case 14:  RR="nw_it_sparscr405"; break;    //Charme sui Mostri
       case 15:  RR="nw_it_sparscr307"; break;    //Chiarudienza e Chiaroveggenza
       case 16:  RR="nw_it_sparscr406"; break;    //Confusione
       case 17:  RR="nw_it_sparscr501"; break;    //Congedo
       case 18:  RR="nw_it_sparscr507"; break;    //Cono di Freddo
       case 19:  RR="nw_it_sparscr411"; break;    //Contagio
       case 20:  RR="nw_it_sparscr101"; break;    //Contrastare Elementi
       case 21:  RR="nw_it_sparscr707"; break;    //Controllare Non Morti
       case 22:  RR="nw_it_sparscr109"; break;    //Dardo Incantato
       case 23:  RR="nw_it_sparscr412"; break;    //Debilitazione
       case 24:  RR="nw_it_sparscr901"; break;    //Disgiunzione di Mordenkainen
       case 25:  RR="nw_it_sparscr218"; break;    //Dissolvere Inferiore
       case 26:  RR="nw_it_sparscr602"; break;    //Dissolvere Superiore
       case 27:  RR="nw_it_sparscr301"; break;    //Dissolvi Magie
       case 28:  RR="x1_it_sparscr301"; break;    //Distorsione
       case 29:  RR="nw_it_sparscr708"; break;    //Dito della Morte
       case 30:  RR="nw_it_sparscr905"; break;    //IDominare Mostri
       case 31:  RR="nw_it_sparscr503"; break;    //Dominare Persone
       case 32:  RR="nw_it_sparscr315"; break;    //Esplosione di Energia Negativa
       case 33:  RR="nw_it_sparscr105"; break;    //Evoca Creature I
       case 34:  RR="nw_it_sparscr203"; break;    //Evoca Creature II
       case 35:  RR="nw_it_sparscr306"; break;    //Evoca Creature III
       case 36:  RR="nw_it_sparscr404"; break;    //Evoca Creature IV
       case 37:  RR="nw_it_sparscr904"; break;    //Evoca Creature IX
       case 38:  RR="nw_it_sparscr510"; break;    //Evoca Creature V
       case 39:  RR="nw_it_sparscr605"; break;    //Evoca Creature VI
       case 40:  RR="nw_it_sparscr703"; break;    //Evoca Creature VII
       case 41:  RR="nw_it_sparscr805"; break;    //Evoca Creature VIII
       case 42:  RR="nw_it_sparscr907"; break;    //Fatale
       case 43:  RR="nw_it_sparscr911"; break;    //Fermare il Tempo
       case 44:  RR="nw_it_sparscr212"; break;    //Forza Straordinaria
       case 45:  RR="nw_it_sparscr003"; break;    //Frastornare
       case 46:  RR="nw_it_sparscr202"; break;    //Freccia Acida di Melf
       case 47:  RR="nw_it_sparscr304"; break;    //Freccia Infuocata
       case 48:  RR="nw_it_sparscr310"; break;    //Fulmine
       case 49:  RR="nw_it_sparscr601"; break;    //Globo di Invulnerabilità
       case 50:  RR="nw_it_sparscr401"; break;    //Globo Minore di Invulnerabilità
       case 51:  RR="nw_it_sparscr213"; break;    //Grazia Felina
       case 52:  RR="nw_it_sparscr106"; break;    //Identificazione
       case 53:  RR="nw_it_sparscr417"; break;    //Infrangi Incantesimo Inferiore
       case 54:  RR="nw_it_sparscr612"; break;    //Infrangi Incantesimo Superiore
       case 55:  RR="nw_it_sparscr207"; break;    //Invisibilità
       case 56:  RR="nw_it_sparscr408"; break;    //Invisibilità Migliorata
       case 57:  RR="nw_it_sparscr909"; break;    //Lamento della Banshee
       case 58:  RR="nw_it_sparscr604"; break;    //Legame Planare
       case 59:  RR="nw_it_sparscr512"; break;    //Legame Planare Inferiore
       case 60:  RR="nw_it_sparscr803"; break;    //Legame Planare Superiore
       case 61:  RR="nw_it_sparscr313"; break;    //Lentezza
       case 62:  RR="nw_it_sparscr004"; break;    //Luce
       case 63:  RR="nw_it_sparscr112"; break;    //Mani Brucianti
       case 64:  RR="nw_it_sparscr701"; break;    //Manto Incantato
       case 65:  RR="nw_it_sparscr513"; break;    //Manto Incantato Inferiore
       case 66:  RR="nw_it_sparscr912"; break;    //Manto Incantato Superiore
       case 67:  RR="nw_it_sparscr407"; break;    //Muro di Fuoco
       case 68:  RR="nw_it_sparscr603"; break;    //Nebbia Acida
       case 69:  RR="nw_it_sparscr506"; break;    //Nebbia Mentale
       case 70:  RR="nw_it_sparscr804"; break;    //Nube Incendiaria
       case 71:  RR="nw_it_sparscr305"; break;    //Nube Maleodorante
       case 72:  RR="nw_it_sparscr502"; break;    //Nube Mortale
       case 73:  RR="nw_it_sparscr410"; break;    //Ombra di una Evocazione
       case 74:  RR="nw_it_sparscr508"; break;    //Ombra di una Evocazione Superiore
       case 75:  RR="nw_it_sparscr609"; break;    //Ombre
       case 76:  RR="nw_it_sparscr809"; break;    //Orrido Avvizzimento
       case 77:  RR="nw_it_sparscr206"; break;    //Oscurità
       case 78:  RR="nw_it_sparscr309"; break;    //Palla di Fuoco
       case 79:  RR="nw_it_sparscr704"; break;    //Palla di Fuoco Ritardata
       case 80:  RR="nw_it_sparscr702"; break;    //Parola del Potere, Stordire
       case 81:  RR="nw_it_sparscr903"; break;    //Parola del Potere, Uccidere
       case 82:  RR="nw_it_sparscr413"; break;    //Paura
       case 83:  RR="nw_it_sparscr403"; break;    //Pelle di Pietra
       case 84:  RR="nw_it_sparscr613"; break;    //Pelle di Pietra Superiore
       case 85:  RR="nw_it_sparscr902"; break;    //Portale
       case 86:  RR="nw_it_sparscr808"; break;    //Premonizione
       case 87:  RR="nw_it_sparscr303"; break;    //Protezione dagli Elementi
       case 88:  RR="nw_it_sparscr802"; break;    //Protezione dagli Incantesimi
       case 89:  RR="nw_it_sparscr102"; break;    //Protezione dall'Allineamento
       case 90:  RR="nw_it_sparscr217"; break;    //Purezza
       case 91:  RR="nw_it_sparscr113"; break;    //Raggio di Energia Negativa
       case 92:  RR="nw_it_sparscr002"; break;    //Raggio di Gelo
       case 93:  RR="nw_it_sparscr111"; break;    //Raggio di Indebolimento
       case 94:  RR="nw_it_sparscr204"; break;    //Ragnatela
       case 95:  RR="nw_it_sparscr504"; break;    //Regressione Mentale
       case 96:  RR="nw_it_sparscr001"; break;    //Resistenza
       case 97:  RR="nw_it_sparscr201"; break;    //Resistere agli Elementi
       case 98:  RR="nw_it_sparscr402"; break;    //Rimuovi Maledizione
       case 99:  RR="nw_it_sparscr908"; break;    //Risucchio di Energia
       case 100: RR="nw_it_sparscr221"; break;    //Saggezza del Gufo
       case 101: RR="nw_it_sparscr414"; break;    //Scagliare Maledizione
       case 102: RR="nw_it_sparscr216"; break;    //Scassinare
       case 103: RR="nw_it_sparscr906"; break;    //Sciame di Meteore
       case 104: RR="nw_it_sparscr416"; break;    //Scudo Elementale
       case 105: RR="nw_it_sparscr314"; break;    //Sfera di Invisibilità
       case 106: RR="nw_it_sparscr108"; break;    //Sonno
       case 107: RR="nw_it_sparscr705"; break;    //Spada di Mordenkainen
       case 108: RR="nw_it_sparscr210"; break;    //Spaventare
       case 109: RR="nw_it_sparscr219"; break;    //Splendore dell'Aquila
       case 110: RR="nw_it_sparscr110"; break;    //Spruzzo Colorato
       case 111: RR="nw_it_sparscr706"; break;    //Spruzzo Prismatico
       case 112: RR="nw_it_sparscr418"; break;    //Tentacoli neri di Evard
       case 113: RR="nw_it_sparscr209"; break;    //Tocco del Ghoul
       case 114: RR="nw_it_sparscr311"; break;    //Tocco del Vampiro
       case 115: RR="nw_it_sparscr910"; break;    //Trasformazione
       case 116: RR="nw_it_sparscr614"; break;    //Trasformazione di Tenser
       case 117: RR="nw_it_sparscr214"; break;    //Ultravisione
       case 118: RR="nw_it_sparscr103"; break;    //Unto
       case 119: RR="nw_it_sparscr205"; break;    //Vedere Invisibilità
       case 120: RR="nw_it_sparscr312"; break;    //Velocità
       case 121: RR="nw_it_sparscr611"; break;    //Velocità di Massa
       case 122: RR="nw_it_sparscr215"; break;    //DVigore
       case 123: RR="nw_it_sparscr606"; break;    //Visione del Vero
       case 124: RR="nw_it_sparscr608"; break;    //Volto Etereo
       case 125: RR="nw_it_sparscr208"; break;    //Volto Fantasma
       case 126: RR="nw_it_sparscr801"; break;    //Vuoto Mentale
       case 127: RR="nw_it_sparscr511"; break;    //Vuoto Mentale Inferiore
       case 128: RR="x1_it_sparscr102"; break;    //Lampo
       case 129: RR="x1_it_sparscr502"; break;    //Mano interposta di Bigby
       case 130: RR="x1_it_sparscr602"; break;    //Mano possente di Bigby
       case 131: RR="x1_it_sparscr701"; break;    //Mano stringente di Bigby
       case 132: RR="x1_it_sparscr901"; break;    //Mano stritolatrice di Bigby
       case 133: RR="x1_it_sparscr501"; break;    //Marchio di fuoco
       case 134: RR="x1_it_sparscr604"; break;    //Pietra in carne
       case 135: RR="x1_it_sparscr801"; break;    //Pugno serrato di Bigby
       case 136: RR="x1_it_sparscr101"; break;    //Ritirata rapida
       case 137: RR="x1_it_sparscr003"; break;    //Scossa elettrica
       case 138: RR="x1_it_sparscr103"; break;    //Scudo
       case 139: RR="x1_it_sparscr002"; break;    //Spruzzo d'acido
       case 140: RR="nw_it_sparscr703"; break;    //Sussurri mortali
       case 141: RR="x1_it_sparscr401"; break;    //Tempesta di dardi di Isaac inferiore
       case 142: RR="x1_it_sparscr603"; break;    //Tempesta di dardi di Isaac superiore
       case 143: RR="x1_it_sparscr601"; break;    //Canto funebre
       case 144: RR="x1_it_sparscr605"; break;    //Carne in pietra
       case 145: RR="x1_it_sparscr104"; break;    //Colpo accurato
       case 146: RR="x1_it_sparscr201"; break;    //Corno di ferro di Balagarn
       case 147: RR="x1_it_sparscr301"; break;    //Distorsione
       case 148: RR="x1_it_sparscr303"; break;    //Folata di vento
       case 149: RR="x2_it_sparscr205"; break;    //Arma infuocata
       case 150: RR="x2_it_sparscr105"; break;    //Arma magica
       case 151: RR="x2_it_sparscr205"; break;    //Arma infuocata
       case 152: RR="x2_it_sparscr105"; break;    //Arma magica
       case 153: RR="x2_it_sparscr304"; break;    //Arma magica superiore
       case 154: RR="x2_it_sparscr503"; break;    //Assorbitore Energetico
       case 155: RR="x2_it_sparscr801"; break;    //Bastone neroà
       case 156: RR="x2_it_sparscr101"; break;    //Botto di Horizikaul
       case 157: RR="x2_it_sparscrmc"; break;     //Cerchio Magico contro l'Allineamento
       case 158: RR="x2_it_sparscr602"; break;    //Conoscenza delle Leggende
       case 159: RR="x2_it_sparscr102"; break;    //Coraggio
       case 160: RR="x2_it_sparscr202"; break;    //Corazza mortale
       case 161: RR="x2_it_sparscr303"; break;    //Estremità affilata
       case 162: RR="x2_it_sparscr301"; break;    //Fiato acido di Mestil
       case 163: RR="x2_it_sparscr501"; break;    //Fulmine globulare
       case 164: RR="x2_it_sparscr207"; break;    //Grazia Felina
       case 165: RR="x2_it_sparscr104"; break;    //Lama di ghiaccio
       case 166: RR="x2_it_sparscr901"; break;    //Lama nera del disastro
       case 167: RR="x2_it_sparscr103"; break;    //Lama persistente di Shelgarn
       case 168: RR="x2_it_sparscr601"; break;    //Morte ai non morti
       case 169: RR="x2_it_sparscr206"; break;    //Nube della perplessità
       case 170: RR="x2_it_sparscr902"; break;    //Onda di battaglia
       case 171: RR="x2_it_sparscral"; break;     //Protezione dall'Allineamento
       case 172: RR="x2_it_sparscr701"; break;    //Rombo di tuono
       case 173: RR="x2_it_sparscr203"; break;    //Scarica elettrica di Gedlee
       case 174: RR="x2_it_sparscr305"; break;    //Scopri Trappole
       case 175: RR="x2_it_sparscr502"; break;    //Scudo acido di Mestil
       case 176: RR="x2_it_sparscr703"; break;    //Scudo d'Ombra
       case 177: RR="x2_it_sparscr302"; break;    //Sfera scintillante
       case 178: RR="x2_it_sparscr401"; break;    //Tempesta di Ghiaccio
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       ////////////////
      /// ARMATURE ///
     ////////////////

    for(d=0; d<D3; d++)  // valore degli items in base al livello
     {
      switch(Random(arm)+1)                     // OGGETTO - VALORE MO
       {
       case 1:   RR="nw_mcloth006"; break;      //Tunica della Luce  161
       case 2:   RR="nw_mcloth007"; break;      //Tunica della Resistenza all'Acido  621
       case 3:   RR="nw_mcloth008"; break;      //Tunica della Resistenza al Freddo  811
       case 4:   RR="nw_mcloth010"; break;      //Tunica della Resistenza all'Elettricità  1026
       case 5:   RR="nw_mcloth009"; break;      //Tunica della Resistenza al Fuoco  1266
       case 6:   RR="nw_mcloth013"; break;      //Veste da Battaglia del Mago  2191
       case 7:   RR="x2_mduerar010"; break;     //Veste del mago duergar  2925
       case 8:   RR="x1_mcloth001"; break;      //Tunica dell'energia  4940
       case 9:   RR="x0_cloth001"; break;       //Tunica del mimetismo  5760
       case 10:  RR="nw_mcloth011"; break;      //Veste dell'Avventuriero  6251
       case 11:  RR="x0_cloth003"; break;       //Tunica dei colori scintillanti  7685
       case 12:  RR="nw_mcloth014"; break;      //Veste da Battaglia Maggiore  15761
       case 13:  RR="x2_sequencer1"; break;     //Veste della sequenza  22816
       case 14:  RR="nw_mcloth012"; break;      //Veste del Maestro Avventuriero  29161
       case 15:  RR="x0_cloth002"; break;       //Tunica degli occhi, minore  31810
       case 16:  RR="nw_mcloth001"; break;      //Tunica di Vecna  36121
       case 17:  RR="nw_mcloth003"; break;      //Tunica Grigia dell'Arcimago  48791
       case 18:  RR="nw_mcloth002"; break;      //Tunica Bianca dell'Arcimago  48791
       case 19:  RR="nw_mcloth004"; break;      //Tunica Nera dell'Arcimago  48791
       case 20:  RR="x2_sequencer2"; break;     //Veste della sequenza superiore  51452
       case 21:  RR="x0_cloth005"; break;       //Tunica degli occhi, maggiore  72251
       case 22:  RR="x3_it_robeeyes"; break;    //Vesti di occhi  90251
       case 23:  RR="x2_sequencer3"; break;     //Veste della sequenza di Isaac  136013
       case 24:  RR="x2_cus_shiftertu"; break;  //Tunica del mutaforma  208081
       case 25:  RR="mb_wizrobe1"; break;       //Veste del Potere   296185
       case 26:  RR="mb_wizrobe3"; break;       //Veste del Potere   296185
       case 27:  RR="x2_mcloth005"; break;      //Manto della resistenza agli incantesimi epica  424773
       case 28:  RR="mb_wizrobe2"; break;       //Veste del Potere epica  985960
       case 29:  RR="mb_wizrobe4"; break;       //Veste del Potere epica  985960
       }

         if (HD<=6)           {acb=d3();}
    else if((HD>6)&&(HD<=12)) {acb=Random(4)+2;}
    else if((HD>12)&&(HD<=18)){acb=Random(4)+4;}
    else                      {acb=Random(HD/4)+Random(HD/4)+1;}

       if(!GetLocalInt(oStore,RR))
         {
         object oArmor = CreateItemOnObject(RR,oStore,1);
         itemproperty ipLoop=GetFirstItemProperty(oArmor);

         while(GetIsItemPropertyValid(ipLoop))
              {
               if(GetItemPropertyType(ipLoop)==ITEM_PROPERTY_AC_BONUS)
                  {
                  RemoveItemProperty(oArmor,ipLoop);
                  }
               ipLoop=GetNextItemProperty(oArmor);
               }

         AddItemProperty(2,ItemPropertyACBonus(acb),oArmor);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }

       ///////////////
      /// AMULETI ///
     ///////////////

    for(e=0; e<D4; e++)   // valore degli items in base al livello
     {
      switch(Random(aml)+1)
       {
       case 1:   RR="nw_it_mneck023"; break;    //Collana Scintillante  161
       case 2:   RR="nw_it_mneck024"; break;    //Amuleto della Volontà +1  343
       case 3:   RR="nw_it_mneck001"; break;    //Amuleto dell'Armatura Naturale +1  657
       case 4:   RR="nw_it_mneck032"; break;    //Amuleto della Resistenza all'Acido  1501
       case 5:   RR="nw_it_mneck030"; break;    //Amuleto della Resistenza al Freddo  1960
       case 6:   RR="nw_it_mneck025"; break;    //Amuleto della Volontà +2  1526
       case 7:   RR="nw_it_mneck031"; break;    //Amuleto della Resistenza all'Elettricità  2481
       case 8:   RR="nw_it_mneck012"; break;    //Amuleto dell'Armatura Naturale +2  2925
       case 9:   RR="nw_it_mneck029"; break;    //Amuleto della Resistenza al Fuoco  3063
       case 10:  RR="nw_it_mneck026"; break;    //Amuleto della Volontà +3  3554
       case 11:  RR="x0_it_mneck005"; break;    //Amuleto dell'aiuto di Arvoreen  4501
       case 12:  RR="x2_it_mneck001"; break;    //Amuleto di vitalità +2  5761
       case 13:  RR="nw_it_mneck033"; break;    //Amuleto Minore del Padrone  6251
       case 14:  RR="nw_it_mneck027"; break;    //Amuleto della Volontà +4  6427
       case 15:  RR="nw_it_mneck013"; break;    //Amuleto dell'Armatura Naturale +3  6813
       case 16:  RR="x2_it_mneck005"; break;    //Collana delle palle di fuoco  8438
       case 17:  RR="nw_it_mneck028"; break;    //Amuleto della Volontà +5  10145
       case 18:  RR="nw_it_mneck014"; break;    //Amuleto dell'Armatura Naturale +4  12321
       case 19:  RR="x0_it_mneck004"; break;    //Pietrafortuna  14176
       case 20:  RR="nw_it_mneck005"; break;    //Amuleto del Potere  19141
       case 21:  RR="x0_it_mneck002"; break;    //Collana delle palle di fuoco  18845
       case 22:  RR="nw_it_mneck015"; break;    //Amuleto dell'Armatura Naturale +5  19449
       case 23:  RR="x0_it_mneck006"; break;    //Amuleto degli arpisti  19471
       case 24:  RR="x2_it_mneck002"; break;    //Amuleto di vitalità +4  23041
       case 25:  RR="x2_it_mneck016"; break;    //Amuleto della volontà +6  30526
       case 26:  RR="x0_it_mneck007"; break;    //Collana di ghiaccio minore degli Ulutiun  33751
       case 27:  RR="nw_it_mneck034"; break;    //Amuleto del Padrone  43560
       case 28:  RR="x2_it_mneck017"; break;    //Amuleto della volontà +7  51123
       case 29:  RR="x2_it_mneck003"; break;    //Amuleto di vitalità +6  51841
       case 30:  RR="x2_it_mneck021"; break;    //Amuleto dell'armatura naturale +6  58523
       case 31:  RR="x2_it_mneck018"; break;    //Amuleto della volontà +8  82810
       case 32:  RR="x2_it_mneck022"; break;    //Amuleto dell'armatura naturale +7  98010
       case 33:  RR="x2_it_mneck019"; break;    //Amuleto della volontà +9  108160
       case 34:  RR="x2_it_mneck020"; break;    //Amuleto della volontà +10  285610
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }

       //////////////
      /// ANELLI ///
     //////////////

    for(f=0; f<D5; f++)   // valore degli items in base al livello
     {
      switch(Random(rng)+1)
       {
       case 1:   RR="nw_it_mring011"; break;    //Anello di Giada  201
       case 2:   RR="nw_it_mring010"; break;    //Anello di Cremisi  201
       case 3:   RR="nw_it_mring024"; break;    //Anello della Tempra +1  428
       case 4:   RR="nw_it_mring012"; break;    //Anello dell'Intuito  450
       case 5:   RR="x0_it_mring002"; break;    //Anello occultante  648
       case 6:   RR="nw_it_mring001"; break;    //Anello di Protezione +1  821
       case 7:   RR="nw_it_mring013"; break;    //Anello degli Studiosi  1251
       case 8:   RR="nw_it_mring006"; break;    //Anello del Chiaro Pensiero +1  1801
       case 9:   RR="nw_it_mring025"; break;    //Anello della Tempra +2  1907
       case 10:  RR="nw_it_mring031"; break;    //Anello di Resistenza +1  2907
       case 11:  RR="x0_it_mring001"; break;    //Anello di amicizia con gli animali  3528
       case 12:  RR="nw_it_mring008"; break;    //Anello di Protezione +2  3656
       case 13:  RR="x0_it_mring005"; break;    //Anello dello scudo di forza  3656
       case 14:  RR="nw_it_mring026"; break;    //Anello della Tempra +3  4442
       case 15:  RR="x0_it_mring011"; break;    //Anello della potenza  5001
       case 16:  RR="nw_it_mring003"; break;    //Anello di Invisibilità  6470
       case 17:  RR="nw_it_mring014"; break;    //Anello del Chiaro Pensiero +2  7201
       case 18:  RR="x2_it_mring001"; break;    //Anello maggiore della resistenza all'acido  7503
       case 19:  RR="nw_it_mring027"; break;    //Anello della Tempra +4  8033
       case 20:  RR="x0_it_mring013"; break;    //Anello del drago purpureo  8282
       case 21:  RR="nw_it_mring018"; break;    //Anello di Protezione +3  8516
       case 22:  RR="x2_it_mring006"; break;    //Anello dell'ariete  8600
       case 23:  RR="nw_it_mring032"; break;    //Anello di Resistenza +2  9626
       case 24:  RR="x2_it_mring002"; break;    //Anello maggiore della resistenza al freddo  9800
       case 25:  RR="nw_it_mring029"; break;    //Anello Minore del Potere  9888
       case 26:  RR="x0_it_mring004"; break;    //Anello di eludere migliorato  11251
       case 27:  RR="nw_it_novel001"; break;    //Anello degli Elfi Silvani  11251
       case 28:  RR="x2_it_mring003"; break;    //Anello maggiore della resistenza elettrica  12403
       case 29:  RR="nw_it_mring028"; break;    //Anello della Tempra +5  12681
       case 30:  RR="nw_it_mring009"; break;    //Anello Azzurro  14176
       case 31:  RR="nw_it_mring005"; break;    //Anello di Difesa Magica  14710
       case 32:  RR="x2_it_mring004"; break;    //Anello maggiore della resistenza al fuoco  15313
       case 33:  RR="x2_it_mring005"; break;    //Anello maggiore della resistenza sonica  15313
       case 34:  RR="nw_it_mring019"; break;    //Anello di Protezione +4  15401
       case 35:  RR="nw_it_mring015"; break;    //Anello del Chiaro Pensiero +3  16201
       case 36:  RR="x2_nash_ring"; break;      //Anello della forza di Nasher  16201
       case 37:  RR="x1_it_mring001"; break;    //Anello del nomade  16653
       case 38:  RR="nw_it_mring030"; break;    //Anello del viandante  16653
       case 39:  RR="nw_it_mring002"; break;    //Anello di Resistenza agli Elementali  18288
       case 40:  RR="x0_it_mring014"; break;    //Anello della battaglia di incantesimi 18675
       case 41:  RR="x0_it_mring006"; break;    //Anello della libertà di movimento  20001
       case 42:  RR="nw_it_mring033"; break;    //Anello di Resistenza +3  20251
       case 43:  RR="nw_it_mring020"; break;    //Anello di Protezione +5  24311
       case 44:  RR="x0_it_mring009"; break;    //Anello del comandante  28520
       case 45:  RR="nw_it_mring016"; break;    //Anello del Chiaro Pensiero +4  28801
       case 46:  RR="x2_cus_ring"; break;       //Brividanello  28801
       case 47:  RR="x2_ring_pet"; break;       //Anello del mangiapietre  37126
       case 48:  RR="x0_it_mring007"; break;    //Anello di Aribeth  37813
       case 49:  RR="x2_it_mring025"; break;    //Anello della tempra +6  38157
       case 50:  RR="nw_it_mring017"; break;    //Anello del Chiaro Pensiero +5  45001
       case 51:  RR="x2_it_mring017"; break;    //Anello di pelleferro  54451
       case 52:  RR="x2_it_mring026"; break;    //Anello della tempra +7  63903
       case 53:  RR="x2_it_mring020"; break;    //Anello del pensiero profondo +6  64801
       case 54:  RR="x2_it_mring012"; break;    //Anello della protezione +6  73153
       case 55:  RR="x2_it_mring021"; break;    //Anello del pensiero profondo +7  88201
       case 56:  RR="nw_it_mring030"; break;    //Anello del Potere  97627
       case 57:  RR="x2_it_mring027"; break;    //Anello della tempra +8  103512
       case 58:  RR="x2_it_mring022"; break;    //Anello del pensiero profondo +8  115201
       case 59:  RR="x2_it_mring013"; break;    //Anello della protezione +7  122512
       case 60:  RR="x2_it_mring028"; break;    //Anello della tempra +9  135200
       case 61:  RR="x2_it_mring023"; break;    //Anello del pensiero profondo +9  145801
       case 62:  RR="x2_it_mring008"; break;    //Anello dell'immunità elementale al freddo  165313
       case 63:  RR="x2_it_mring009"; break;    //Anello dell'immunità elementale al fulmine  165313
       case 64:  RR="x2_it_mring010"; break;    //Anello dell'immunità elementale al fuoco  165313
       case 65:  RR="x2_it_mring007"; break;    //Anello dell'immunità elementale all'acido  165313
       case 66:  RR="x2_it_mring011"; break;    //Anello dell'immunità elementale sonica  165313
       case 67:  RR="x2_it_mring024"; break;    //Anello del pensiero profondo +10  180001
       case 68:  RR="x2_it_mring014"; break;    //Anello della protezione +8  198450
       case 69:  RR="x2_it_mring015"; break;    //Anello della protezione +9  259200
       case 70:  RR="x2_it_mring019"; break;    //Anello maggiore dell'immunità elementale  296450
       case 71:  RR="x2_it_mring029"; break;    //Anello della tempra +10  357012
       case 72:  RR="x3_it_hornedring"; break;  //Anello cornuto  495012
       case 73:  RR="x2_it_mring016"; break;    //Anello della protezione +10  684450
       case 74:  RR="x2_it_mring018"; break;    //Anello dell'immunità elementale universale  2645001
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
       }
    }

    void main()
    {
    object oPC=GetEnteringObject();
    object oStore=GetNearestObjectByTag("MB_store_wizard"),
          oItem=GetFirstItemInInventory(oStore);
      int DAY=GetLocalInt(oStore,"DAY");

    if(!GetIsPC(oPC)) return;

    if(DAY!=GetCalendarDay())     //  (1==1)  test
     {
     SetLocalInt(oStore,"DAY",GetCalendarDay());

     while(oItem != OBJECT_INVALID)
          {
          DestroyObject(oItem);
          oItem=GetNextItemInInventory(oStore);
          }
     DelayCommand(1.5,randomize(oStore,oPC));
     }
    }


    Tempio
    CODICE
    ///////////////////
       // Random Store ///
      // by magobargle //
     ///////////////////
    ////// TEMPLE /////
    ///////////////////

    void create(object oStore, string RR, int n)
    {
    while(n>0){CreateItemOnObject(RR,oStore,1); n--;}
    }

    void randomize(object oStore, object oPC)
    {
    string RR;
    int a,b,c,d,e,itm,pz,pgm,arm,vs,acb,
       D1=d6()+18, D2=d4()+4, D3=Random(4),
       HD=GetHitDice(oPC);

    if(GetLocalInt(OBJECT_SELF,"market")){HD=1;} // i mercati all'aperto sono sforniti rispetto ai negozi

         if (HD<=6)           {itm=47; pz=Random(6)+6;  pgm=Random(10)+10; arm=14;}
    else if((HD>6)&&(HD<=12)) {itm=59; pz=Random(6)+10; pgm=Random(10)+15; arm=22;}
    else if((HD>12)&&(HD<=18)){itm=65; pz=Random(6)+14; pgm=Random(10)+20; arm=26;}
    else                      {itm=95; pz=Random(6)+18; pgm=Random(10)+25; arm=30;}


       //////////////////////
      // OGGETTI GENERICI //
     //////////////////////

    for(a=0; a<D1; a++)  // valore degli items in base al livello
     {
      switch(Random(itm)+1)                       // OGGETTO - VALORE MO
       {
       case 1:   RR="nw_it_medkit001"; break;    //Borsa da Guaritore +1   51
       case 2:   RR="nw_it_medkit002"; break;    //Borsa da Guaritore +3  61
       case 3:   RR="nw_it_medkit003"; break;    //Borsa da Guaritore +6  94
       case 4:   RR="nw_it_medkit004"; break;    //Borsa da Guaritore +10  172
       case 5:   RR="nw_it_mboots018"; break;    //Stivali dell'Anima del Sole +1  657
       case 6:   RR="nw_maarcl096"; break;       //Mantello della Protezione dal Bene  903
       case 7:   RR="nw_maarcl098"; break;       //Mantello della Protezione dal Caos  903
       case 8:   RR="nw_maarcl097"; break;       //Mantello della Protezione dal Male  903
       case 9:   RR="nw_maarcl099"; break;       //Mantello della Protezione dalla Legge  903
       case 10:  RR="nw_it_mglove016"; break;    //Guanti del Pugno Hin +1  951
       case 11:  RR="nw_it_mglove021"; break;    //Guanti della Lunga Morte +1  951
       case 12:  RR="nw_it_mglove026"; break;    //Guanti della Rosa Gialla +1  951
       case 13:  RR="x0_it_mring010"; break;     //Anello di immunità alle malattie  1251
       case 14:  RR="nw_it_mneck006"; break;     //Scarabeo di Protezione +1    1266
       case 15:  RR="nw_it_mneck007"; break;     //Talismano della Saggezza +1  1441
       case 16:  RR="nw_it_mglove027"; break;    //Guanti della Rosa Gialla +2  2176
       case 17:  RR="x0_it_mring008"; break;     //Anello d'osso  2813
       case 18:  RR="nw_it_mboots019"; break;    //Stivali dell'Anima del Sole +2  2925
       case 19:  RR="x0_it_mneck001"; break;     //Amuleto scaccia non morti   3063
       case 20:  RR="nw_it_mglove017"; break;    //Guanti del Pugno Hin +2  3331
       case 21:  RR="nw_it_mglove022"; break;    //Guanti della Lunga Morte +2  3331
       case 22:  RR="nw_it_mglove028"; break;    //Guanti della Rosa Gialla +3  3901
       case 23:  RR="nw_it_mneck035"; break;     //Amuleto Minore della Salute  4001
       case 24:  RR="x3_it_ringregen"; break;    //Anello della rigenerazione  4050
       case 25:  RR="nw_it_mglove018"; break;    //Guanti del Pugno Hin +3  5406
       case 26:  RR="nw_it_mglove023"; break;    //Guanti della Lunga Morte +3  5406
       case 27:  RR="nw_it_mneck016"; break;     //Scarabeo di Protezione +2    5641
       case 28:  RR="nw_it_mneck008"; break;     //Talismano della Saggezza +2  5761
       case 29:  RR="nw_maarcl100"; break;       //Mantello della Protezione dal Bene Superiore  6003
       case 30:  RR="nw_maarcl102"; break;       //Mantello della Protezione dal Caos Superiore  6003
       case 31:  RR="nw_maarcl101"; break;       //Mantello della Protezione dal Male Superiore  6003
       case 32:  RR="nw_maarcl103"; break;       //Mantello della Protezione dalla Legge Superiore  6003
       case 33:  RR="nw_it_mglove029"; break;    //Guanti della Rosa Gialla +4  6126
       case 34:  RR="nw_it_mmidmisc04"; break;   //Fodero della Benedizione  6469
       case 35:  RR="nw_it_mboots020"; break;    //Stivali dell'Anima del Sole +3  6813
       case 36:  RR="nw_it_mglove019"; break;    //Guanti del Pugno Hin +4  7981
       case 37:  RR="nw_it_mglove024"; break;    //Guanti della Lunga Morte +4  7981
       case 38:  RR="nw_it_mglove030"; break;    //Guanti della Rosa Gialla +5  8851
       case 39:  RR="nw_it_mneck036"; break;     //Amuleto della Salute  12251
       case 40:  RR="nw_it_mneck009"; break;     //Talismano della Saggezza +3  12961
       case 41:  RR="nw_it_mneck017"; break;     //Scarabeo di Protezione +3   13141
       case 42:  RR="nw_it_mring007"; break;     //Anello della Santità  13407
       case 43:  RR="nw_it_mneck003"; break;     //Collana del Rosario  14033
       case 44:  RR="nw_it_mglove020"; break;    //Guanti del Pugno Hin +5  14823
       case 45:  RR="nw_it_mglove025"; break;    //Guanti della Lunga Morte +5  14823
       case 46:  RR="nw_it_msmlmisc05"; break;   //Perla del Sangue di Santo  15439
       case 47:  RR="x0_it_mbelt001"; break;     //Cintura del monaco  17501
       case 48:  RR="nw_it_mneck010"; break;     //Talismano della Saggezza +4  23041
       case 49:  RR="nw_it_mneck018"; break;     //Scarabeo di Protezione +4   23766
       case 50:  RR="x2_it_mglove011"; break;    //Guanti della rosa gialla +6  26266
       case 51:  RR="nw_it_mbelt001"; break;     //Cinta della Potenza Sacra  27563
       case 52:  RR="nw_it_mneck037"; break;     //Amuleto Maggiore della Salute  28091
       case 53:  RR="x0_it_mbelt006"; break;     //Cintura del potere sacerdotale di Kossuth  28197
       case 54:  RR="x0_maarcl035"; break;       //Vesti della fede  30251
       case 55:  RR="x2_it_mglove001"; break;    //Guanti del pugno di Hin +6  31923
       case 56:  RR="x2_it_mglove006"; break;    //Guanti della lunga morte +6  31923
       case 57:  RR="nw_it_mboots021"; break;    //Stivali dell'Anima del Sole +4  34929
       case 58:  RR="nw_it_mneck011"; break;     //Talismano della Saggezza +5  36001
       case 59:  RR="nw_it_mneck019"; break;     //Scarabeo di Protezione +5   37516
       case 60:  RR="x0_it_mthnmisc14"; break;   //Calice dorato di Lathander  37970
       case 61:  RR="x0_maarcl033"; break;       //Mantello del santuario superiore  40951
       case 62:  RR="x2_it_mglove012"; break;    //Guanti della rosa gialla +7  40641
       case 63:  RR="x0_it_mbelt005"; break;     //Cintura del potere sacerdotale di Mystra  42381
       case 64:  RR="x0_it_mbelt003"; break;     //Cintura del potere sacerdotale di Shar  42381
       case 65:  RR="x0_it_mneck003"; break;     //Scarabeo di protezione  49001
       case 66:  RR="x0_it_mbelt004"; break;     //Cintura del potere sacerdotale e di protezione di Kossuth  49131
       case 67:  RR="x0_it_mbelt007"; break;     //Cintura del potere sacerdotale e di protezione di Mystra  49131
       case 68:  RR="x0_it_mbelt008"; break;     //Cintura del potere sacerdotale e di protezione di Shar  49131
       case 69:  RR="x2_it_mneck006"; break;     //Talismano della saggezza +6  51841
       case 70:  RR="x2_it_mglove002"; break;    //Guanti del pugno di Hin +7  60451
       case 71:  RR="x2_it_mglove007"; break;    //Guanti della lunga morte +7  60451
       case 72:  RR="x0_it_mring012"; break;     //Anello delle nove vite  61876
       case 73:  RR="nw_it_mboots022"; break;    //Stivali dell'Anima del Sole +5   64161
       case 74:  RR="x2_it_mneck007"; break;     //Talismano della saggezza +7  70561
       case 75:  RR="nw_it_mneck004"; break;     //Talismano del Bene Puro    72251
       case 76:  RR="nw_it_mneck002"; break;     //Talismano del Male Puro    72251
       case 77:  RR="x2_it_mglove013"; break;    //Guanti della rosa gialla +8  76563
       case 78:  RR="x2_it_mneck004"; break;     //Amuleto del fulgore divino  80103
       case 79:  RR="x2_it_mglove003"; break;    //Guanti del pugno di Hin +8  86026
       case 80:  RR="x2_it_mglove008"; break;    //Guanti della lunga morte +8  86026
       case 81:  RR="nw_it_mring004"; break;     //Anello di Rigenerazione  86051
       case 82:  RR="x2_it_mneck008"; break;     //Talismano della saggezza +8  92161
       case 83:  RR="x2_it_mglove004"; break;    //Guanti del pugno di Hin +9  112891
       case 84:  RR="x2_it_mglove014"; break;    //Guanti della rosa gialla +9  112891
       case 85:  RR="x2_it_mneck011"; break;     //Scarabeo della protezione +6   112891
       case 86:  RR="x2_it_mglove009"; break;    //Guanti della lunga morte +9   112891
       case 87:  RR="x2_it_mneck009"; break;     //Talismano della saggezza +9  116641
       case 88:  RR="x2_it_mneck010"; break;     //Talismano della saggezza +10  144001
       case 89:  RR="x2_it_mneck012"; break;     //Scarabeo della protezione +7   189063
       case 90:  RR="x2_it_mglove005"; break;    //Guanti del pugno di Hin +10  255201
       case 91:  RR="x2_it_mglove010"; break;    //Guanti della lunga morte +10  255201
       case 92:  RR="x2_it_mglove015"; break;    //Guanti della rosa gialla +10   272251
       case 93:  RR="x2_it_mneck013"; break;     //Scarabeo della protezione +8   306251
       case 94:  RR="x2_it_mneck014"; break;     //Scarabeo della protezione +9   400001
       case 95:  RR="x2_it_mneck015"; break;     //Scarabeo della protezione +10   1056251
       }
     if(!GetLocalInt(oStore,RR))
       {
       CreateItemOnObject(RR,oStore,1);
       SetLocalInt(oStore,RR,1);
       DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       //////////////////
      // POZIONI CURA //
     //////////////////

    for(b=0; b<pz; b++)   // numero degli items in base al livello
     {
      switch(Random(10)+1)
       {
       case 1:   RR="x0_it_mthnmisc13"; break;    //Elisir di Horus-Re
       case 2:   RR="nw_it_mpotion006"; break;    //Pozione Antidoto
       case 3:   RR="nw_it_mpotion009"; break;    //Pozione di Benedizione
       case 4:   RR="nw_it_mpotion007"; break;    //Pozione di Purezza
       case 5:   RR="nw_it_mpotion011"; break;    //Pozione di Ristorare Inferiore
       case 6:   RR="nw_it_mpotion001"; break;    //Pozione di Cura Ferite Leggere
       case 7:   RR="nw_it_mpotion020"; break;    //Pozione di Cura Ferite Moderate
       case 8:   RR="nw_it_mpotion002"; break;    //Pozione di Cura Ferite Gravi
       case 9:   RR="nw_it_mpotion003"; break;    //Pozione di Cura Ferite Critiche
       case 10:  RR="nw_it_mpotion012"; break;    //Pozione di Guarigione
       }
       if(!GetLocalInt(oStore,RR))
         {
         create(oStore,RR,d6());
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }

       ///////////////
      // PERGAMENE //
     ///////////////

    for(c=0; c<pgm; c++)   // numero degli items in base al livello
     {
      switch(Random(100)+1)
       {
       case 1:   RR="x1_it_spdvscr603"; break;    //Alleato planare
       case 2:   RR="nw_it_spdvscr702"; break;    //Resurrezione
       case 3:   RR="nw_it_spdvscr202"; break;    //Charme su Persone o Animali
       case 4:   RR="nw_it_spdvscr501"; break;    //Rianimare Morti
       case 5:   RR="nw_it_spdvscr301"; break;    //Rimuovi Cecità / Sordità
       case 6:   RR="nw_it_spdvscr302"; break;    //Rimuovi Malattia
       case 7:   RR="nw_it_spdvscr201"; break;    //Ristorare Inferiore
       case 8:   RR="nw_it_spdvscr701"; break;    //Ristorare Superiore
       case 9:   RR="nw_it_spdvscr204"; break;    //Suono Dirompente
       case 10:  RR="x1_it_spdvscr604"; break;    //Annegare
       case 11:  RR="x1_it_spdvscr101"; break;    //Anatema
       case 12:  RR="x1_it_spdvscr204"; break;    //Aura di gloria
       case 13:  RR="x1_it_spdvscr701"; break;    //Aura di Vitalità
       case 14:  RR="x1_it_spdvscr803"; break;    //Bombardamento
       case 15:  RR="x1_it_spdvscr403"; break;    //Colpo Infuocato
       case 16:  RR="x1_it_spdvscr605"; break;    //Creare Non Morti
       case 17:  RR="x1_it_spdvscr804"; break;    //Creare Non Morti Superiori
       case 18:  RR="x1_it_spdvscr304"; break;    //Crescita di spine
       case 19:  RR="x1_it_spdvscr703"; break;    //Distruzione
       case 20:  RR="x1_it_spdvscr601"; break;    //Esilio
       case 21:  RR="x1_it_spdvscr802"; break;    //Esplosione solare
       case 22:  RR="x1_it_spdvscr102"; break;    //Favore divino
       case 23:  RR="x1_it_spdvscr301"; break;    //Fiamma perenne
       case 24:  RR="x1_it_spdvscr202"; break;    //Frenesia di sangue
       case 25:  RR="x1_it_spdvscr205"; break;    //Frusta Infuocata
       case 26:  RR="x1_it_spdvscr305"; break;    //Fuoco di aculei
       case 27:  RR="x1_it_spdvscr501"; break;    //Inferno
       case 28:  RR="x1_it_spdvscr401"; break;    //Infliggi ferite critiche
       case 29:  RR="x1_it_spdvscr302"; break;    //Infliggi ferite gravi
       case 30:  RR="x1_it_spdvscr104"; break;    //Infliggi ferite leggere
       case 31:  RR="x1_it_spdvscr001"; break;    //Infliggi ferite minori
       case 32:  RR="x1_it_spdvscr201"; break;    //Infliggi ferite moderate
       case 33:  RR="x1_it_spdvscr502"; break;    //Intuizione del gufo
       case 34:  RR="x1_it_spdvscr107"; break;    //Mimetismo
       case 35:  RR="x1_it_spdvscr402"; break;    //Mimetismo di massa
       case 36:  RR="x1_it_spdvscr901"; break;    //Nemico eterno della non morte
       case 37:  RR="x1_it_spdvscr702"; break;    //Piaga Strisciante
       case 38:  RR="x1_it_spdvscr602"; break;    //Santuario superiore
       case 39:  RR="x1_it_spdvscr105"; break;    //Scudo della fede
       case 40:  RR="x1_it_spdvscr103"; break;    //Scudo entropico
       case 41:  RR="x1_it_spdvscr704"; break;    //Tempesta di Fuoco
       case 42:  RR="x1_it_spdvscr801"; break;    //Terremoto
       case 43:  RR="x1_it_spdvscr203"; break;    //Tutt'uno con la terra
       case 44:  RR="x1_it_spdvscr106"; break;    //Zanna magica
       case 45:  RR="x1_it_spdvscr303"; break;    //Zanna magica superiore
       case 46:  RR="x2_it_spdvscr201"; break;    //Aiuto
       case 47:  RR="x2_it_spdvscr804"; break;    //Aura contro l'Allineamento
       case 48:  RR="x2_it_spdvscr803"; break;    //Bagliore Solare
       case 49:  RR="x2_it_spdvscr603"; break;    //Barriera di Lame
       case 50:  RR="x2_it_spdvscr102"; break;    //Benedire arma
       case 51:  RR="x2_it_spdvscr103"; break;    //Benedizione
       case 52:  RR="x2_it_spdvscr504"; break;    //Cerchio di Devastazione
       case 53:  RR="x2_it_spdvscr505"; break;    //Cerchio di Guarigione
       case 54:  RR="x2_it_spdvscr601"; break;    //Crollo
       case 55:  RR="x2_it_spdvscr402"; break;    //Cura Ferite Critiche
       case 56:  RR="x2_it_spdvscr308"; break;    //Cura Ferite Gravi
       case 57:  RR="x2_it_spdvscr104"; break;    //Cura Ferite Leggere
       case 58:  RR="x2_it_spdvscr001"; break;    //Cura Ferite Minori
       case 59:  RR="x2_it_spdvscr203"; break;    //Cura Ferite Moderate
       case 60:  RR="x2_it_spdvscr105"; break;    //Devastazione
       case 61:  RR="x2_it_spdvscr506"; break;    //Distruggere Viventi
       case 62:  RR="x2_it_spdvscr309"; break;    //Dominare Animali
       case 63:  RR="x2_it_spdvscr310"; break;    //Epurare Invisibilità
       case 64:  RR="x2_it_spdvscr802"; break;    //Equilibrio della Natura
       case 65:  RR="x2_it_spdvscr604"; break;    //Ferire
       case 66:  RR="x2_it_spdvscr101"; break;    //Fragore assordante
       case 67:  RR="x2_it_spdvscr306"; break;    //Glifo di interdizione
       case 68:  RR="x2_it_spdvscr605"; break;    //Guarigione
       case 69:  RR="x2_it_spdvscr801"; break;    //Guarigione di Massa
       case 70:  RR="x2_it_spdvscr902"; break;    //Implosione
       case 71:  RR="x2_it_spdvscr509"; break;    //Influsso malefico
       case 72:  RR="x2_it_spdvscr403"; break;    //Interdizione alla Morte
       case 73:  RR="x2_it_spdvscr106"; break;    //Intralciare
       case 74:  RR="x2_it_spdvscr307"; break;    //Invocare il Fulmine
       case 75:  RR="x2_it_spdvscr303"; break;    //Lama assassina
       case 76:  RR="x2_it_spdvscr405"; break;    //Libertà di Movimento
       case 77:  RR="x2_it_spdvscr313"; break;    //Luce Incandescente
       case 78:  RR="x2_it_spdvscr406"; break;    //Martello degli Dei
       case 79:  RR="x2_it_spdvscr501"; break;    //Onda guerriera
       case 80:  RR="x2_it_spdvscr701"; break;    //Parola della Fede
       case 81:  RR="x2_it_spdvscr202"; break;    //Pelle Coriacea
       case 82:  RR="x2_it_spdvscr404"; break;    //Potere Divino
       case 83:  RR="x2_it_spdvscr312"; break;    //Preghiera
       case 84:  RR="x2_it_spdvscr602"; break;    //Presa di pietra
       case 85:  RR="x2_it_spdvscr301"; break;    //Prole di larve
       case 86:  RR="x2_it_spdvscr311"; break;    //Protezione dall'Energia Negativa
       case 87:  RR="x2_it_spdvscr302"; break;    //Pungiglione guaritore
       case 88:  RR="x2_it_spdvscr507"; break;    //Resistenza agli Incantesimi
       case 89:  RR="x2_it_spdvscr205"; break;    //Rimuovi Paralisi
       case 90:  RR="x2_it_spdvscr107"; break;    //Rimuovi Paura
       case 91:  RR="x2_it_spdvscr508"; break;    //Risveglio
       case 92:  RR="x2_it_spdvscr108"; break;    //Santuario
       case 93:  RR="x2_it_spdvscr606"; break;    //Santuario superiore
       case 94:  RR="x2_it_spdvscr901"; break;    //Sciame Elementale
       case 95:  RR="x2_it_spdvscr401"; break;    //Spada sacra
       case 96:  RR="x2_it_spdvscr903"; break;    //Tempesta della Vendetta
       case 97:  RR="x2_it_spdvscr407"; break;    //Veleno
       case 98:  RR="x2_it_spdvscr304"; break;    //Veste magica
       case 99:  RR="x2_it_spdvscr002"; break;    //Virtù
       case 100: RR="x2_it_spdvscr503"; break;    //Viticci
       }
       if(!GetLocalInt(oStore,RR))
         {
         CreateItemOnObject(RR,oStore,1);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
       }
     }

       ////////////////
      /// ARMATURE ///
     ////////////////

    for(d=0; d<D2; d++)  // valore degli items in base al livello
     {
      switch(Random(arm)+1)                     // OGGETTO - VALORE MO
       {
       case 1:   RR="nw_mcloth018"; break;      //Vesti della Mano Splendente +1  657
       case 2:   RR="nw_mcloth019"; break;      //Vesti della Mano Splendente +2  2925
       case 3:   RR="x2_it_adaplate"; break;    //Corazza di piastre completa adamantina 4424
       case 4:   RR="nw_mcloth015"; break;      //Vesti dell'Antico Ordine  6251
       case 5:   RR="nw_mcloth020"; break;      //Vesti della Mano Splendente +3  6813
       case 6:   RR="x0_maarcl041"; break;      //Cotta di pelo di Ilmater  8313
       case 7:   RR="nw_mcloth017"; break;      //Vesti della Luna Nera  12251
       case 8:   RR="nw_mcloth021"; break;      //Vesti della Mano Splendente +4  12321
       case 9:   RR="nw_mcloth016"; break;      //Vesti Migliorate dell'Antico Ordine  17725
       case 10:  RR="nw_mcloth022"; break;      //Vesti della Mano Splendente +5  19449
       case 11:  RR="x2_cus_robe1"; break;      //Veste dell'oscura signora  43693
       case 12:  RR="x2_mcloth001"; break;      //Vesti della mano splendente +6  58523
       case 13:  RR="x2_mcloth002"; break;      //Vesti della mano splendente +7  98010
       case 14:  RR="x2_cus_armoroffa"; break;  //Corazza della fede  130388
       case 15:  RR="mb_arm_clrc_1"; break;     //Bastione protettore minore  144241
       case 16:  RR="mb_arm_mnk_1"; break;      //Veste del maestro minore  144241
       case 17:  RR="mb_arm_druid_1"; break;    //Armatura druidica minore  174654
       case 18:  RR="mb_arm_pld_1"; break;      //Armatura del Santo minore  111435
       case 19:  RR="mb_arm_pld_2"; break;      //Armatura del Santo 262645
       case 20:  RR="mb_arm_clrc_2"; break;     //Bastione protettore  272431
       case 21:  RR="mb_arm_mnk_2"; break;      //Veste del maestro  282577
       case 22:  RR="mb_arm_druid_2"; break;    //Armatura druidica  382743
       case 23:  RR="mb_arm_pld_3"; break;      //Armatura del Santo maggiore  366692
       case 24:  RR="mb_arm_mnk_3"; break;      //Veste del maestro maggiore  404413
       case 25:  RR="mb_arm_clrc_3"; break;     //Bastione protettore maggiore  447132
       case 26:  RR="mb_arm_druid_3"; break;    //Armatura druidica maggiore  548178
       case 27:  RR="mb_arm_clrc_4"; break;     //Bastione protettore epico  886562
       case 28:  RR="mb_arm_druid_4"; break;    //Armatura druidica epica  903152
       case 29:  RR="mb_arm_mnk_4"; break;      //Veste del maestro epica  933303
       case 30:  RR="mb_arm_pld_4"; break;      //Armatura del Santo epica  1015922
       }
         if (HD<=6)           {acb=d3();}
    else if((HD>6)&&(HD<=12)) {acb=Random(4)+2;}
    else if((HD>12)&&(HD<=18)){acb=Random(4)+4;}
    else                      {acb=Random(HD/4)+Random(HD/4)+1;}

       if(!GetLocalInt(oStore,RR))
         {
         object oArmor = CreateItemOnObject(RR,oStore,1);
         itemproperty ipLoop=GetFirstItemProperty(oArmor);

         while(GetIsItemPropertyValid(ipLoop))
              {
               if(GetItemPropertyType(ipLoop)==ITEM_PROPERTY_AC_BONUS)
                  {
                  RemoveItemProperty(oArmor,ipLoop);
                  }
               ipLoop=GetNextItemProperty(oArmor);
               }

         AddItemProperty(2,ItemPropertyACBonus(acb),oArmor);
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }

       /////////////////////////
      /// VENDICATORE SACRO ///
     /////////////////////////

    for(e=0; e<D3; e++)  // numero degli items random (da 0 a 3) e valore in base al livello
     {
          if (HD<=6)           {vs=Random(3)+1;}
     else if((HD>6)&&(HD<=12)) {vs=Random(6)+1;}
     else if((HD>12)&&(HD<=18)){vs=Random(9)+1;}
     else                      {vs=Random(12)+1;}

     if(GetItemPossessedBy(oPC,"mb_vend"+IntToString(vs))==OBJECT_INVALID){CreateItemOnObject("mb_vend"+IntToString(vs),oStore,1);}
     }
    }

    void main()
    {
    object oPC=GetEnteringObject();
    object oStore=GetNearestObjectByTag("MB_store_temple"),
          oItem=GetFirstItemInInventory(oStore);
      int DAY=GetLocalInt(oStore,"DAY");

    if(!GetIsPC(oPC)) return;

    if(DAY!=GetCalendarDay())     //  (1==1)  test
     {
     SetLocalInt(oStore,"DAY",GetCalendarDay());

     while(oItem != OBJECT_INVALID)
          {
          DestroyObject(oItem);
          oItem=GetNextItemInInventory(oStore);
          }
     DelayCommand(1.5,randomize(oStore,oPC));
     }
    }


    Pozioni
    CODICE
    ///////////////////
       // Random Store ///
      // by magobargle //
     ///////////////////
    //// HERBALIST ////
    ///////////////////

    void create(object oStore, string RR, int n)
    {
    while(n>0){CreateItemOnObject(RR,oStore,1); n--;}
    }

    void randomize(object oStore, object oPC)
    {
    string RR;
    int a,itm,HD=GetHitDice(oPC);

    if(GetLocalInt(OBJECT_SELF,"market")){HD=1;}// i mercati all'aperto sono sforniti rispetto ai negozi

         if (HD<=6)           {itm=6;}
    else if((HD>6)&&(HD<=12)) {itm=10;}
    else if((HD>12)&&(HD<=18)){itm=14;}
    else                      {itm=18;}


       //////////////////
      // POZIONI BUFF //
     //////////////////

    for(a=0; a<itm; a++)  // numero degli items in base al livello
     {
      switch(Random(18)+1)
       {
       case 1:   RR="x0_it_mthnmisc06"; break;  //Polvere della sparizione
       case 2:   RR="x0_it_mthnmisc05"; break;  //Polvere dell'apparizione
       case 3:   RR="nw_it_msmlmisc19"; break;  //Polvere delle Fate
       case 4:   RR="nw_it_msmlmisc23"; break;  //Belladonna
       case 5:   RR="nw_it_msmlmisc24"; break;  //aglio
       case 6:   RR="x2_it_mpotion001"; break;  //Pozione del coraggio
       case 7:   RR="x2_it_mpotion002"; break;  //Pozione della corazza mortale
       case 8:   RR="nw_it_mpotion010"; break;  //Pozione dello Splendore dell'Aquila
       case 9:   RR="nw_it_mpotion016"; break;  //Pozione di Aiuto
       case 10:  RR="nw_it_mpotion017"; break;  //Pozione di Astuzia della Volpe
       case 11:  RR="nw_it_mpotion019"; break;  //Pozione di Conoscenza
       case 12:  RR="nw_it_mpotion015"; break;  //Pozione di Forza Straordinaria
       case 13:  RR="nw_it_mpotion014"; break;  //Pozione di Grazia Felina
       case 14:  RR="nw_it_mpotion008"; break;  //Pozione di Invisibilità
       case 15:  RR="nw_it_mpotion005"; break;  //Pozione di Pelle Coriacea
       case 16:  RR="nw_it_mpotion018"; break;  //Pozione di Saggezza del Gufo
       case 17:  RR="nw_it_mpotion004"; break;  //Pozione di Velocità
       case 18:  RR="nw_it_mpotion013"; break;  //Pozione di Vigore
       }
       if(!GetLocalInt(oStore,RR))
         {
         create(oStore,RR,d6());
         SetLocalInt(oStore,RR,1);
         DelayCommand(1.0,DeleteLocalInt(oStore,RR));
         }
     }
    }

    void main()
    {
    object oPC=GetEnteringObject();
    object oStore=GetNearestObjectByTag("MB_store_herbalist"),
          oItem=GetFirstItemInInventory(oStore);
      int DAY=GetLocalInt(oStore,"DAY");

    if(!GetIsPC(oPC)) return;

    if(DAY!=GetCalendarDay())     //  (1==1)  test
     {
     SetLocalInt(oStore,"DAY",GetCalendarDay());

     while(oItem != OBJECT_INVALID)
          {
          DestroyObject(oItem);
          oItem=GetNextItemInInventory(oStore);
          }
     DelayCommand(1.5,randomize(oStore,oPC));
     }
    }


    Edited by magobargle - 19/4/2024, 22:54
    File Allegato
    Random_Stores.rar
    (Number of downloads: 0)

    Web
     
    .
0 replies since 17/4/2024, 18:36   40 views
  Share  
.