/
lib/banish/
lib/d/coronos/
lib/d/coronos/w/alena/
lib/d/coronos/w/angel/
lib/d/coronos/w/angel/caves/
lib/d/coronos/w/angel/caves/monst/
lib/d/coronos/w/angel/city/chambers/
lib/d/coronos/w/angel/city/monst/
lib/d/coronos/w/angel/city/obj/
lib/d/coronos/w/angel/city/streets/
lib/d/coronos/w/angel/farms/plains/
lib/d/coronos/w/angel/monst/
lib/d/tempus/
lib/d/tempus/w/angel/
lib/d/tempus/w/kingbill/
lib/d/tempus/w/mirak/
lib/d/tempus/w/mirak/monst/
lib/d/tempus/w/mirak/obj/
lib/d/tempus/w/relgar/planes/baat/
lib/d/tempus/w/sarak/
lib/d/tempus/w/serepion/mon/
lib/d/tempus/w/valrejn/
lib/doc/
lib/doc/domains/
lib/doc/efun/
lib/include/fn_specs/
lib/info/
lib/inherit/base/
lib/log/
lib/log/mailbox/
lib/log/main/
lib/news/
lib/obj/party/
lib/objects/componen/
lib/open/
lib/open/party/
lib/open/paste/
lib/open/spells/
lib/open/valrejn/
lib/players/
lib/players/alena/
lib/players/alena/obj/
lib/players/alena/open/
lib/players/alena/private/
lib/players/angel/
lib/players/angel/obj/
lib/players/ash/
lib/players/biggs/
lib/players/biggs/food/
lib/players/biggs/gobkeep/
lib/players/biggs/mnstr/
lib/players/biggs/town/caves/
lib/players/biggs/town/tower/
lib/players/biggs/wpns/
lib/players/calris/
lib/players/deathurg/
lib/players/deathurg/open/
lib/players/deathurg/private/thief/
lib/players/dogberry/
lib/players/dogberry/library/
lib/players/dogberry/open/
lib/players/epsilon/
lib/players/epsilon/private/
lib/players/farewell/
lib/players/hippo/
lib/players/hippo/open/
lib/players/hippo/tools/
lib/players/jimpa/
lib/players/josh/
lib/players/josh/room/
lib/players/josh/room/mage/dungeon/
lib/players/josh/room/mage/dungeon/obj/
lib/players/josh/wep/
lib/players/kingbill/
lib/players/metatron/
lib/players/miette/
lib/players/mirak/
lib/players/mirak/open/
lib/players/parsilan/
lib/players/relgar/
lib/players/relgar/private/
lib/players/sarak/
lib/players/sarak/bugs/
lib/players/sarak/feelings/
lib/players/sarak/magical/
lib/players/sarak/minotaur/island/
lib/players/sarak/open/
lib/players/sarak/private/
lib/players/serepion/
lib/players/serepion/open/
lib/players/serepion/private/
lib/players/spike/
lib/players/spike/open/
lib/players/spike/private/
lib/players/spike/seaworld/
lib/players/valrejn/
lib/players/valrejn/open/
lib/players/valrejn/private/
lib/players/virus/
lib/players/wrath/
lib/players/wrath/arm/
lib/players/wrath/mon/
lib/players/wrath/room/
lib/players/wrath/room/entry/
lib/players/wrath/room/zolgath/
lib/players/wrath/weap/
lib/players/zil/
lib/room/
lib/room/city/arena/
lib/room/city/creator/
lib/room/city/garden/monst/
lib/room/city/library/
lib/room/city/library/open/books/
lib/room/city/shop/
lib/room/death/
lib/room/death/open/
lib/room/island/
lib/room/keeps/
lib/room/registry/
lib/room/ships/crew/
lib/room/ships/open/
lib/room/ships/open/types/bounty/
lib/room/ships/open/types/nebula/
lib/room/ships/open/types/phoenix/
lib/secure/udp_cmd_/
lib/skills/
lib/skills/fighter/
lib/skills/psionici/
lib/skills/thief/
lib/usr/
lib/usr/creators/
lib/usr/no_banis/
lib/usr/players/
inherit "inherit/clothing";

reset (arg) {
  if (arg) return;

  set_name("hat");
  set_short("hat of knowledge");
  set_long("This fine silk hat allows you to instantly know the requirements\n"+
     "of monsters of a level of your choise. Or even the weight and vaule\n"+
     "of armour and weapons by classes and power. Enjoy!\n"+
     "Commands: monster, armour, weapon, weapon2.\n");
  set_weight(0);
}

init() {
  ::init();
  add_action("moncheck","monster");
  add_action("armcheck","armour");
  add_action("wepcheck","weapon");
  add_action("wep2check","weapon2");
}

moncheck() {
  write("Level 1:    HP: 50     WC: 5    AC: 3    Money: 30\n");
  write("Level 2:    HP: 55     WC: 6    AC: 3    Money: 60\n");
  write("Level 3:    HP: 60     WC: 7    AC: 4    Money: 100\n");
  write("Level 4:    HP: 70     WC: 8    AC: 4    Money: 150\n");
  write("Level 5:    HP: 80     WC: 9    AC: 5    Money: 200\n");
  write("Level 6:    HP: 95     WC: 10   AC: 5    Money: 250\n");
  write("Level 7:    HP: 110    WC: 11   AC: 6    Money: 300\n");
  write("Level 8:    HP: 130    WC: 12   AC: 7    Money: 350\n");
  write("Level 9:    HP: 150    WC: 13   AC: 7    Money: 400\n");
  write("Level 10:   HP: 175    WC: 14   AC: 8    Money: 700\n");
  write("Level 11:   HP: 200    WC: 15   AC: 9    Money: 900\n");
  write("Level 12:   Hp: 230    WC: 16   AC: 9    Money: 1000\n");
  write("Level 13:   HP: 260    WC: 17   AC: 10   Money: 1200\n");
  write("Level 14:   HP: 300    WC: 18   AC: 11   Money: 1400\n");
  write("Level 15:   HP: 350    WC: 18   AC: 12   Money: 1600\n");
  write("Level 16:   HP: 450    WC: 20   AC: 13   Money: 1800\n");
  write("Level 17:   HP: 600    WC: 24   AC: 14   Money: 2000\n");
  write("Level 18:   HP: 800    WC: 26   AC: 15   Money: 2200\n");
  write("Level 19:   HP: 1100   WC: 27   AC: 16   Money: 2400\n");
  write("Level 20:   HP: 1500   WC: 30   AC: 17   Money: 2600\n");
  write("Level 21+:  HP: 1700   WC: 30   AC: 17   Money: 2800\n");
  return 1;
}

armcheck() {
  write("WGT:     1      2      3      4      5      6      7     8\n");
  write("AC: 1   300    200    130     90     60     -      -     -\n");
  write("AC: 2   900    600    260    175    120     -      -     -\n");
  write("AC: 3    -     2500   1700   1200    800    550     -    -\n");
  write("AC: 4    -      -    5600   3750   2500   1600   1000    -\n");
  write("AC: 5    -      -      -    9000   6000   4000   2600  1700\n");
  write("AC: 6    -      -      -      -   10000   6500   4300  2800\n");
  write("\nShield                           AC: 1-2\n");
  write("Armour\n");
  write("   Leather, Padded               AC: 1\n");
  write("   Studded leather, Ringmail     AC: 2\n");
  write("   Scalemail, Chainmail,\n");
  write("   Splintmail, Elfinchain        AC: 3\n");
  write("   Bandedmail, Platemail         AC: 4\n");
  write("   Fieldplate, Fullplate         AC: 5\n");
  write("   Bracers                       AC: 1-4\n");
  write("Cloak, Gloves, Helm, Boots       AC: 1\n");
  write("Amulet                           AC: 1\n");
  write("   Bracers, Broach, Amulet, (un)Holysymbol\n");
  write("\nMaterial: Bone, Ivory, Ceramic, Cloth, Crystal, Glass, Leather\n"+
     "Metal, Mithril, Meteorite Iron, Iron, Adamantite, Bronze, Silver\n"+
     "Gold, Platinum, Steel\n");
  return 1;
}

wepcheck() {
  write("WGT:    1     2      3      4      5      6       7       8      9\n");
  write("WC: 3   20    16     12     10\n");
  write("WC: 4   40    32     25     20\n");
  write("WC: 5    ?    80     64     50     40\n");
  write("WC: 6    ?   140    110     90     70\n");
  write("WC: 7    ?   200    160    130    100\n");
  write("WC: 8    ?   350    280    275    180\n");
  write("WC: 9         ?     500    400    320    260\n");
  write("WC: 10        ?     800    650    520    420\n");
  write("WC: 11        ?    1200    960    770    620\n");
  write("WC: 12        ?    1700   1300   1100    870\n");
  write("WC: 13               ?    2300   1800   1500    1180\n");
  write("WC: 14               ?    3100   2500   2000    1600\n");
  write("WC: 15               ?    4000   3200   2600    2100\n");
  write("WC: 16               ?    5000   4000   3300    2600\n");
  write("WC: 17                      ?    6200   4400    3800    3000\n");
  write("WC: 18                      ?    7300   5900    5000    4100\n");
  write("WC: 19                      ?    8500   7000    6300    5300\n");
  write("WC: 20                      ?   10000   9000    7700    6600\n");
  write("WC: 21+                           ?    12000    9600    8200    7600\n");
  return 1;
}

wep2check() {
  write("Type/Name                     (length/WC/classes)\n");
  write("Slash\n");
  write("   Sickle (24/9/-), Dagger (15/8/M,T), Knife (12/6/M,T),\n");
  write("   Scimitar (36,10,T), Broadsword (42/12/T), Longsword (45/13/T),\n");
  write("   Shortsword (24/10/T), Falchion (38/12/T), Khopesh (38/11/T),\n");
  write("   Rapier (48/12/T), Sabre (45/10/T), Cutlas (36/11/T)\n");
  write("Pierce\n");
  write("   Halberd (60/13/-), Lance (120-168/10/-), Ranseur (96/11/-),\n");
  write("   Spear (60-156/10/-), Trident (48-96/10/-), Javelin(60-160/10/-)\n");
  write("Crush\n");
  write("   Club (36/9/C), Mace (36/12/C), Flail (48/10/C), Sap (6/8/C,T),\n");
  write("   Hammer (24/11/C), Staff (72-96/12/M,C), Rod (40-75/10/M),\n");
  write("Cleave\n");
  write("   Battle Axe (48/12/-), Hand Axe (24/8/-), 2Handed Sword (72/14/-),\n");
  write("   Bastard Sword(54/13/-), Morning Star (24/9/-), Claymore (72/14/-)\n");
  return 1;
}