-+-+-+-+-+-+-+-+ START OF PART 66 -+-+-+-+-+-+-+-+ X 0, 0, 1, 0, 0, 0, 0, 0, 0, '1d1' , 0); X X X`09`7B Sets for easy testing `09`09`09`09`09`7D X`09floor_set := `5B1,2,4,5,6,7`5D; X`09wall_set := `5B10,11,12`5D; X`09pwall_set := `5B10,11,12,15`5D; X`09corr_set := `5B4,5`5D; X`09trap_set := `5B101,102,109,110`5D; X`09light_set := `5B102,103,104,105,107,108,109,110`5D; X X`09`7B Descriptive phrases`09`09`09`09`09`09`7D X`09colors := ('Amber','Azure','Blue','Blue Speckled','Blue Spotted', X`09`09 'Black','Black Speckled','Black Spotted', X`09`09 'Brown','Brown Speckled','Brown Spotted', X`09`09 'Bubbling', X`09`09 'Chartreuse','Clear','Cloudy', X`09`09 'Copper','Copper Spotted','Crimson','Cyan', X`09`09 'Dark Blue','Dark Green','Dark Red','Ecru', X`09`09 'Gold','Gold Spotted', X`09`09 'Green','Green Speckled','Green Spotted', X`09`09 'Grey','Grey Spotted','Hazy','Indigo', X`09`09 'Light Blue','Light Green','Magenta','Metallic Blue', X`09`09 'Metallic Red','Metallic Green','Metallic Purple', X`09`09 'Misty', X`09`09 'Orange','Orange Speckled','Orange Spotted', X`09`09 'Pink','Pink Speckled', X`09`09 'Plaid','Puce','Purple','Purple Speckled', X`09`09 'Purple Spotted','Red','Red Speckled','Red Spotted', X`09`09 'Silver','Silver Speckled','Silver Spotted','Smokey', X`09`09 'Tan','Tangerine','Topaz','Turquoise', X`09`09 'Violet','Vermilion','White','White Speckled', X`09`09 'White Spotted','Yellow' X`09`09 ); X`09mushrooms:= ('Blue','Black','Brown','Copper','Crimson', X`09`09 'Dark blue','Dark green','Dark red','Gold', X`09`09 'Green','Grey','Light Blue','Light Green', X`09`09 'Orange','Pink','Plaid','Purple','Red','Tan', X`09`09 'Turquoise','Violet','White','Yellow', X`09`09 'Wrinkled','Wooden','Slimey','Speckled', X`09`09 'Spotted','Furry' X`09`09 ); X`09woods := ('Applewood','Ashen','Aspen','Avocado wood', X`09`09 'Balsa','Banyan','Birch','Cedar','Cherrywood', X`09`09 'Cinnibar','Cottonwood','Cypress','Dogwood', X`09`09 'Driftwood','Ebony','Elm wood','Eucalyptus', X`09`09 'Grapevine','Hawthorn','Hemlock','Hickory', X`09`09 'Iron wood','Juniper','Locust','Mahogany', X`09`09 'Magnolia','Manzanita','Maple','Mulberry', X`09`09 'Oak','Pecan','Persimmon','Pine','Redwood', X`09`09 'Rosewood','Spruce','Sumac','Sycamore','Teak', X`09`09 'Walnut','Zebra wood' X`09`09 ); X`09metals := ('Aluminium','Bone','Brass','Bronze','Cast Iron', X`09`09 'Chromium','Copper','Gold','Iron','Lead', X`09`09 'Magnesium','Molybdenum','Nickel', X`09`09 'Pewter','Rusty','Silver','Steel','Tin', X`09`09 'Titanium','Tungsten','Zirconium','Zinc', X`09`09 'Aluminium Plated','Brass Plated','Copper Plated', X`09`09 'Gold Plated','Nickel Plated','Silver Plated', X`09`09 'Steel Plated','Tin Plated','Zinc Plated' X`09`09 ); X`09rocks := ('Amber','Agate','Alexandrite','Amethyst','Antlerite', X`09`09 'Aquamarine','Argentite','Azurite','Beryl','Bloodstone', X`09`09 'Calcite','Carnelian','Coral','Corundum','Cryolite', X`09`09 'Diamond','Diorite','Emerald','Flint','Fluorite', X`09`09 'Gabbro','Garnet','Granite','Gypsum','Hematite','Jade', X`09`09 'Jasper','Kryptonite','Lapus lazuli','Limestone', X`09`09 'Malachite','Manganite','Marble','Moonstone', X`09`09 'Neptunite','Obsidian','Onyx','Opal','Pearl','Pyrite', X`09`09 'Quartz','Quartzite','Rhodonite','Rhyolite','Ruby', X`09`09 'Saphire','Sphalerite','Staurolite','Tiger eye','Topaz', X`09`09 'Turquoise','Zircon' X`09`09 ); X`09amulets := ('Birch','Cedar','Dogwood','Driftwood', X`09`09 'Elm wood','Hemlock','Hickory','Mahogany', X`09`09 'Maple','Oak','Pine','Redwood','Rosewood', X`09`09 'Walnut','Aluminium','Bone','Brass','Bronze', X`09`09 'Copper','Iron','Lead','Nickel','Agate','Amethyst', X`09`09 'Diamond','Emerald','Flint','Garnet', X`09`09 'Jade','Obsidian','Onyx','Opal','Pearl','Quartz', X`09`09 'Ruby','Saphire','Tiger eye','Topaz','Turquoise' X`09`09 ); X`09syllables := ('a','ab','ag','aks','ala','an','ankh','app', X`09`09 'arg','arze','ash','aus','ban','bar','bat','bek', X`09`09 'bie','bin','bit','bjor','blu','bot','bu', X`09`09 'byt','comp','con','cos','cre','dalf','dan', X`09`09 'den','doe','dok','eep','el','eng','er','ere','erk', X`09`09 'esh','evs','fa','fid','for','fri','fu','gan', X`09`09 'gar','glen','gop','gre','ha','he','hyd','i', X`09`09 'ing','ion','ip','ish','it','ite','iv','jo', X`09`09 'kho','kli','klis','la','lech','man','mar', X`09`09 'me','mi','mic','mik','mon','mung','mur','nej', X`09`09 'nelg','nep','ner','nes','nis','nih','nin','o', X`09`09 'od','ood','org','orn','ox','oxy','pay','pet', X`09`09 'ple','plu','po','pot','prok','re','rea','rhov', X`09`09 'ri','ro','rog','rok','rol','sa','san','sat', X`09`09 'see','sef','seh','shu','ski','sna','sne','snik', X`09`09 'sno','so','sol','sri','sta','sun','ta','tab', X`09`09 'tem','ther','ti','tox','trol','tue','turs','u', X`09`09 'ulk','um','un','uni','ur','val','viv','vly', X`09`09 'vom','wah','wed','werg','wex','whon','wun','x', X`09`09 'yerg','yp','zun' X`09`09 ); X X`09`7B Used in DESC.INC for replacing the & in descriptions`09`09`7D X`09vowel_set := `5B'a','e','i','o','u','A','E','I','O','U'`5D; X X`09`7B Creatures must be defined here`09`09`09`09`7D X`09`7B See TYPES.INC under creature_type for a complete list X`09`09of all variables for creatures. Some of the less obvious X`09`09are explained below. X X`09Hit points:`09'#1d#2' where #2 is the range of each roll and X`09`09`09#1 is the number of added up rolls to make. X`09`09`09Example: a creature with 5 eight-sided hit die X`09`09`09is given '5d8'. X X`09`09Attack types: X`09`091 Normal attack X`09`092 Poison Strength X`09`093 Confusion attack X`09`094 Fear attack X`09`095 Fire attack X`09`096 Acid attack X`09`097 Cold attack X`09`098 Lightning attack X`09`099 Corrosion attack X`09`0910 Blindness attack X`09`0911 Paralysis attack X`09`0912 Steal Money X`09`0913 Steal Object X`09`0914 Poison X`09`0915 Lose dexterity X`09`0916 Lose constitution X`09`0917 Lose intelligence X`09`0918 Lose wisdom X`09`0919 Lose experience X`09`0920 Aggravation X`09`0921 Disenchants X`09`0922 Eats food X`09`0923 Eats light X`09`0924 Eats charges X`09`0999 Blank X X`09`09Attack descriptions: X`09`091 hits you. X`09`092 bites you. X`09`093 claws you. X`09`094 stings you. X`09`095 touches you. X`09`096 kicks you. X`09`097 gazes at you. X`09`098 breathes on you. X`09`099 spits on you. X`09`0910 makes a horrible wail. X`09`0911 embraces you. X`09`0912 crawls on you. X`09`0913 releases a cloud of spores. X`09`0914 begs you for money. X`09`0915 You've been slimed. X`09`0916 crushes you. X`09`0917 tramples you. X`09`0918 drools on you. X`09`0919 insults you. X`09`0999 is repelled. X X`09Example: For a creature which bites for 1d6, then stings for X`09`09 2d4 and loss of dex you would use: X`09`09`09'1 2 1d6`7C15 4 2d4' X X`09`09CMOVE flags: XMovement. 00000001 Move only to attack X`09. 00000002 Move, attack normal X`09. 00000008 20% random movement X`09. 00000010 40% random movement X`09. 00000020 75% random movement XSpecial + 00010000 Invisible movement X`09+ 00020000 Move through door X`09+ 00040000 Move through wall X`09+ 00080000 Move through creatures X`09+ 00100000 Picks up objects X`09+ 00200000 Multiply monster XCarries = 01000000 Carries objects. X`09= 02000000 Carries gold. X`09= 04000000 Has 60% of time. X`09= 08000000 Has 90% of time. X`09= 10000000 1d2 objects/gold. X`09= 20000000 2d2 objects/gold. X`09= 40000000 4d2 objects/gold. XSpecial `7E 80000000 Win-the-Game creature. X X`09`09SPELL Flags: XFrequency 000001 1 These add up to x. Then X(1 in x). 000002 2 if RANDINT(X) = 1 the X`09. 000004 4 creature casts a spell. X`09. 000008 8 XSpells = 000010 Teleport short (blink) X`09= 000020 Teleport long X`09= 000040 Teleport player to monster X`09= 000080 Cause light wound X`09= 000100 Cause serious wound X`09= 000200 Hold person (Paralysis) X`09= 000400 Cause blindness X`09= 000800 Cause confusion X`09= 001000 Cause fear X`09= 002000 Summon monster X`09= 004000 Summon undead X`09= 008000 Slow Person X`09= 010000 Drain Mana X`09= 020000 Not Used X`09= 040000 Not Used XBreaths + 080000 Breath Lightning X`09+ 100000 Breath Gas X`09+ 200000 Breath Acid X`09+ 400000 Breath Frost X`09+ 800000 Breath Fire X X`09`09CDEFENSE flags: X`09`090001 Hurt by Slay Dragon. X`09`090002 Hurt by Slay Monster. X`09`090004 Hurt by Slay Evil. X`09`090008 Hurt by Slay Undead. X`09`090010 Hurt by Frost. X`09`090020 Hurt by Fire. X`09`090040 Hurt by Poison. X`09`090080 Hurt by Acid. X`09`090100 Hurt by Light-Wand. X`09`090200 Hurt by Stone-to-Mud. X`09`090400 Not used. X`09`090800 Not used. X`09`091000 Cannot be charmed or slept. X`09`092000 Can be seen with infra-vision. X`09`094000 Max Hit points. X`09`098000 Not used. X X X`09Sleep (sleep)`09:`09A measure in turns of how fast creature X`09`09`09`09will notice player (on the average). X`09Area of affect (aaf) : Max range that creature is able to "notice" X`09`09`09`09the player. X`09`09`09`09`09`09`09`09`09`7D X`09c_list := ( X('Filthy Street Urchin' ,%X'0012000A',%X'00000000',%X'2034', 400, 0, X 4, 1, 1, 'p', '1d4' , '1 14 0d0`7C12 5 0d0' , 0), X('Blubbering Idiot' ,%X'0012000A',%X'00000000',%X'2030', 000, 0, X 6, 1, 1, 'p', '1d2' , '1 18 0d0' , 0), X('Pitiful Looking Beggar' ,%X'0012000A',%X'00000000',%X'2030', 400, 0, X 10, 1, 1, 'p', '1d4' , '1 14 0d0' , 0), X('Mangy Looking Leper' ,%X'0012000A',%X'00000000',%X'2030', 500, 0, X 10, 1, 1, 'p', '1d1' , '1 14 0d0' , 0), X('Squint Eyed Rogue' ,%X'07120002',%X'00000000',%X'2034', 999, 0, X 10, 8, 1, 'p', '2d8' , '1 1 1d6`7C13 5 0d0' , 0), X('Singing, Happy Drunk' ,%X'06120038',%X'00000000',%X'2030', 0, 0, X 10, 1, 1, 'p', '2d3' , '1 14 0d0' , 0), X('Mean Looking Mercenary' ,%X'0B12000A',%X'00000000',%X'2034',25000, 0, X 10, 20, 1, 'p', '5d8' , '1 1 1d10' , 0), X('Battle Scarred Veteran' ,%X'0B12000A',%X'00000000',%X'2030',25000, 0, X 10, 30, 1, 'p', '7d8' , '1 1 2d6' , 0), X('Grey Mushroom patch' ,%X'00000001',%X'00000000',%X'10A0', 0, 1, X 2, 1, 1, ',', '1d2' , '3 13 1d4' , 1), X('Giant Yellow Centipede' ,%X'00000002',%X'00000000',%X'0002', 300, 2, X 8, 12, 1, 'c', '2d6' , '1 2 1d3`7C1 4 1d3' , 1), X('Giant White Centipede' ,%X'0000000A',%X'00000000',%X'0002', 400, 2, X 7, 10, 1, 'c', '3d5' , '1 2 1d2`7C1 4 1d2' , 1), X('White Icky-Thing' ,%X'00000012',%X'00000000',%X'0022', 100, 2, X 12, 7, 1, 'i', '3d5' , '1 5 1d2' , 1), X('Clear Icky-Thing' ,%X'00010002',%X'00000000',%X'0022', 100, 1, X 12, 6, 1, 'i', '2d5' , '1 5 1d2' , 1), X('Giant White Mouse' ,%X'0020000A',%X'00000000',%X'2070', 200, 1, X 8, 4, 1, 'r', '1d3' , '1 2 1d2' , 1), X('Large Brown Snake' ,%X'0000000A',%X'00000000',%X'00B0', 999, 3, X 4, 35, 0, 'R', '4d6' , '1 2 1d3`7C1 16 1d4' , 1), X('Large White Snake' ,%X'00000012',%X'00000000',%X'00B0', 999, 2, X 4, 30, 1, 'R', '3d6' , '1 2 1d1' , 1), X('Kobold' ,%X'07020002',%X'00000000',%X'2032', 100, 5, X 20, 16, 1, 'k', '3d7' , '1 1 1d6' , 1), X('White Worm mass' ,%X'00200022',%X'00000000',%X'01B0', 1, 2, X 6, 1, 0, 'w', '4d4' , '14 12 1d2' , 1), X('Floating Eye' ,%X'00000001',%X'0001000D',%X'2102', 100, 1, X 2, 6, 1, 'e', '3d6' , '11 7 0d0' , 1), X('Shrieker Mushroom patch' ,%X'00000001',%X'00000000',%X'10A0', 0, 1, X 2, 1, 1, ',', '1d1' , '20 10 0d0' , 2), X('Blubbering Icky-Thing' ,%X'0B180012',%X'00000000',%X'0022', 100, 8, X 10, 4, 1, 'i', '5d8' , '14 12 1d4`7C22 12 0d0' , 2), X('Metallic Green Centipedes',%X'00000012',%X'00000000',%X'0000', 100, 3, X 5, 4, 2, 'c', '4d4' , '1 12 1d1' , 2), X('Novice Warrior' ,%X'07020002',%X'00000000',%X'2030', 50, 6, X 20, 16, 1, 'p', '9d4' , '1 1 1d7' , 2), X('Novice Rogue' ,%X'07020002',%X'00000000',%X'2030', 50, 6, X 20, 12, 1, 'p', '8d4' , '1 1 1d6`7C12 5 0d0' , 2), X('Novice Priest' ,%X'07020002',%X'0000108C',%X'2030', 100, 7, X 20, 10, 1, 'p', '7d4' , '1 1 1d5' , 2), X('Novice Mage' ,%X'07020002',%X'0000089C',%X'2030', 50, 7, X 20, 6, 1, 'p', '6d4' , '1 1 1d4' , 2), X('Yellow Mushroom patch' ,%X'00000001',%X'00000000',%X'10A0', 0, 2, X 2, 1, 1, ',', '1d1' , '4 13 1d6' , 2), X('White Jelly' ,%X'0B000001',%X'00000000',%X'01A0', 999, 10, X 2, 1, 2, 'J', '8d8' , '14 5 1d2' , 2), X('Giant Green Frog' ,%X'0000000A',%X'00000000',%X'0082', 300, 6, X 14, 8, 1, 'f', '2d8' , '1 2 1d3' , 2), X('Giant Black Ant' ,%X'0000000A',%X'00000000',%X'0002', 400, 8, +-+-+-+-+-+-+-+- END OF PART 66 +-+-+-+-+-+-+-+-