Gold Pile Sizes

From LSWiki

   if(amount == 1) {
       alter_identity(Identity_Adjunct_Nouns, 0);
       alter_identity(Identity_Nouns, ({ "coin" }));
   } else {
       alter_identity(Identity_Nouns, ({ "coins" }));
   }
   switch(amount) {
   case 1                  :
       break;
   case 2                  :
       alter_identity(Identity_Adjunct_Nouns, ({ "couple" }));
       break;
   case 3 .. 10            :
       alter_identity(Identity_Adjunct_Adjectives, ({ "small" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "stack" }));
       break;
   case 11 .. 30           :
       alter_identity(Identity_Adjunct_Adjectives, ({ "large" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "stack" }));
       break;
   case 31 .. 80           :
       alter_identity(Identity_Adjunct_Adjectives, ({ "small" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       break;
   case 81 .. 300          :
       alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       break;
   case 301 .. 900         :
       alter_identity(Identity_Adjunct_Adjectives, ({ "large" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       break;
   case 901 .. 1500        :
       alter_identity(Identity_Adjunct_Adjectives, ({ "huge" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       break;
   case 1501 .. 3000       :
       alter_identity(Identity_Adjunct_Adjectives, ({ "gigantic" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       break;
   case 3001 .. 6000       :
       alter_identity(Identity_Adjunct_Adjectives, ({ "small" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   case 6001 .. 15000      :
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   case 15001 .. 25000     :
       alter_identity(Identity_Adjunct_Adjectives, ({ "great", "big" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   case 25001 .. 50000     :
       alter_identity(Identity_Adjunct_Adjectives, ({ "humongous" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   case 50001 .. 300000    :
       alter_identity(Identity_Adjunct_Adjectives, ({ "stupendous" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   case 300001 .. 10000000 :
       alter_identity(Identity_Adjunct_Adjectives, ({ "amazing" }));
       alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       break;
   default                 :
       if(intp(amount) && amount > 0) {
           alter_identity(Identity_Adjunct_Adjectives, ({ "colossal" }));
           alter_identity(Identity_Adjunct_Nouns, ({ "mountain" }));
       } else {
           alter_identity(Identity_Adjunct_Adjectives, ({ "buggy" }));
           alter_identity(Identity_Adjunct_Nouns, ({ "pile" }));
       }
       break;
   }