-+-+-+-+-+-+-+-+ START OF PART 100 -+-+-+-+-+-+-+-+ X('& Flask`7E of oil'`09`09`09`09 , flask_of_oil, '!',%X'00000000',%X'0004 V0000', X 7500,`09 3, 257, 10, 5,`090, 0,`09 0, 0, '2d6'`09 , 1), `7B105` V7D X('Lodging for one day'`09`09`09`09 , 95, '.',%X'00000000',Nothing_flag, X 1,`09 50, 300,3000, 14,`090, 0,`09 0, 0, '0d0'`09 , 0),`09 `7B1 V06`7D X('& Pipes of Peace `5BBeginners Instruments`5D'`09`09 , 92, '%',%X'000000 V00',%X'000003FF', X 0,`09 30, 258, 40, 1,-100, 0,`09 0, 0, '1d1'`09 , 40), `7B107` V7D X('& Lyre of Nature `5BInstrument I`5D',`09`0992, '%',%X'00000000',%X'0007F VC00', X 0,`09 105, 259, 40, 1,-100, 0,`09 0, 0, '0d0'`09 , 40),`7B108`7 VD X('& Lute of the Woods `5BInstrument II`5D',`09`09 92, '%',%X'00000000',%X' V7FF80000', X 0,`09 320, 260, 40, 1,-100, 0,`09 0, 0, '0d0'`09 , 40),`7B109`7 VD X('& Harp of the Druids `5BGreater Instrument`5D'`09`09 ,`0992, '%',%X'00 V0001FF',%X'00000000', X 0,`09 850, 261, 40, 1,-100, 0,`09 0, 0, '2d1'`09 ,40), `7B110`7 VD X('& Book of Bard Lyrics `5BBeginners Song book`5D',`09 93,`09'%',%X'0000000 V0',%X'000007FF', X 0,`09 30, 262, 50, 1,-100, 0,`09 0, 0, '0d0'`09 , 40),`7B111`7 VD X('& Songs of Charming `5BSong Book I`5D'`09`09`09, 93, '%',%X'00000000',%X' V000FF800', X 0,`09 105, 263, 60, 1,-100, 0,`09 0, 0, '1d1'`09 ,40), `7B112`7 VD X('& Ballads of Knowledge `5BSong Book II`5D'`09`09 ,`0993, '%',%X'000000 V00',%X'7FF00000', X 0,`09 305, 264, 60, 1,-100, 0,`09 0, 0, '1d1'`09 ,40), `7B113`7 VD X('& Epics of the Bards `5BGreater Song Book`5D',93,`09 '%',%X'000001FF',%X' V00000000', X 0,`09 950, 265, 60, 1,-100, 0,`09 0, 0, '0d0'`09 , 40), `7B114` V7D X('Lodging for the week'`09`09`09`09 , 95, '.',0,0, X 7,`09 200, 301,3000, 1,`090, 0,`09 0, 0, '0d0', 0), `7B115`7D X('Lodging for three days'`09`09`09 , 95, '.',0,0, X 30,`09 120, 302,3000, 1,`090, 0,`09 0, 0, '0d0', 0),`09 `7B116 V`7D X('Chime of Light (%P1 charges)'`09`09`09 , 85, '%',%X'00000000',%X'000000 V01', X 0,`09 275,`09 1, 1, 1,`090, 0,`09 0, 0, '0d0', 10), `7B117`7 VD X('Chime of Detect Doors/Stairs (%P1 charges)', 85, '%', %X'00000000',%X'0000 V0002', X 0,`09 375,`09 2, 1, 1,`090, 0,`09 0, 0, '0d0', 15), `7B118`7 VD X('Chime of Remove Curse (%P1 charges)', 85, '%',%X'00000000',%X'00001000', X 0,`09 675,`0913, 1, 1,`090, 0,`09 0, 0, '0d0', 47), `7B119`7 VD X('Horn of Soft Sounds (%P1 charges)', 86, '%',%X'00000000',%X'00040000', X 0,`09 600,`09 3, 20, 1,`090, 0,`09 0, 0, '0d0', 8), `7B120`7 VD X('Horn of Tritons (%P1 charges)', 86, '%',%X'00000000',%X'08000000', X 0,`09 200,`0912, 20, 1,`090, 0,`09 0, 0, '0d0', 15), `7B121`7 VD X('& Finely cut Agate`7E', 5, '*',%X'00000000',%X'00000000', X 0, 50, 257, 5, 1, 0, 0, 0, 0, '0d0', 5), `7B122`7D X('& Finely cut Diamond`7E', 5, '*',%X'00000000',%X'00000000', X 0, 500, 258, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B123`7D X('& Rough cut Diamond`7E', 5, '*',%X'00000000',%X'00000000', X 0, 100, 259, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B124`7D X('& Rough cut Sapphire`7E', 5, '*',%X'00000000',%X'00000000', X 0, 40, 260, 5, 1, 0, 0, 0, 0, '0d0', 5), `7B125`7D X('& Finely cut Sapphire`7E', 5, '*',%X'00000000',%X'00000000', X 0, 250, 261, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B126`7D X('& Small pouch of Diamonds`7E', 5, '*',%X'00000000',%X'00000000', X 0, 1000, 262, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B127`7D X('& Finely wrought gold necklace`7E', 4, '*',%X'00000000',%X'00000000', X 0, 100, 263, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B128`7D X('& Small silver bracelet`7E', bracers, '*',%X'00000000',%X'00000000', X 0, 80, 264, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B129`7D X('& Large mithril garter-belt`7E', 4, '*',%X'00000000',%X'00000000', X 0, 1500, 265, 5, 1, 0, 0, 0, 0, '0d0', 20), `7B130`7D X('& Small silver pendant`7E', 4, '*',%X'00000000',%X'00000000', X 0, 60, 266, 5, 1, 0, 0, 0, 0, '0d0', 5), `7B131`7D X('& Small gold pendant`7E', 4, '*',%X'00000000',%X'00000000', X 0, 90, 267, 5, 1, 0, 0, 0, 0, '0d0', 10), `7B132`7D X('& Small mithril pendant`7E', 4, '*',%X'00000000',%X'00000000', X 0, 450, 268, 5, 1, 0, 0, 0, 0, '0d0', 15), `7B133`7D X('& Finely cut Gem of Detect Monsters (%P1 charges)', 5, '*',nothing_flag,%X V'00040000', X 0,`09 350, 1, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B134 V`7D X('& Finely cut Gem of Dispell Evil (%P1 charges)', 5, '*',nothing_flag,%X'00 V080000', X 0,`09 1200, 2, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B135 V`7D X('& Finely cut Gem of Acid Balls (%P1 charges)', 5, '*',nothing_flag,%X'0020 V0000', X 0,`09 1000, 4, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B13 V6`7D X('& Finely cut Gem of Detect Invisible (%P1 charges)', 5, '*',nothing_flag,% VX'00400000', X 0,`09 200, 5, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B137 V`7D X('& Finely cut Gem of Identify (%P1 charges)', 5, '*',nothing_flag,%X'008000 V00', X 0,`09 600, 6, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B138 V`7D X('& Finely cut Gem of Light (%P1 charges)', 5, '*',nothing_flag,%X'01000000' V, X 0,`09 100, 7, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B139 V`7D X('& Finely cut Gem of Remove Curse (%P1 charges)', 5, '*',nothing_flag,%X'04 V000000', X 0,`09 250, 8, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B140 V`7D X('& Finely cut Gem of Annihilation (%P1 charges)', 5, '*',nothing_flag,%X'08 V000000', X 0,`09 350, 7, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B141 V`7D X('& Finely cut Gem of Recall (%P1 charges)', 5, '*',nothing_flag,%X'10000000 V', X 0,`09 1200, 7, 5, 1,`090, 0,`09 0, 0, '0d0'`09 , 10), `7B142 V`7D X('& Box`7E of Piranha Crackers' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 1500,4, 257, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B143` V7D X('& Can`7E of Orca-Cola' `09 ,junk_food, ',',%X'000000 V02', X%X'40000000', 500,4, 258, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B144` V7D X('& Twelve-Pound Troll Burger`7E' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 7500,15, 259, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B145 V`7D X('& Bag`7E of Brontosaurus Chips' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 3000,12, 260, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B146 V`7D X('& Slice`7E of Purple Mushroom Pizza' ,junk_food, ',',%X'0000 V0001', X%X'40000400', 1500,8, 261, 2, 1, 0, 0, 0, 0, '2d6' , 0),`7B147` V7D`20 X`09`09 `7B This ought to surprise them, Pizza = Oil now `7D X('& Peanut Butter and Grape Jelly Sandwich`7E' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 1000,5, 262, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B148` V7D X('& Dragon Steak`7E' ,junk_food, ',',%X'0000 V0001', X%X'50000000', 5000,15, 263, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B149 V`7D X('& Vorpal Bunny Throat Lozenge`7E' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 50,2, 264, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B150` V7D X('& Deep-Fried Giant Centipede`7E' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 750,5, 265, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B151` V7D X('& Pint`7E of Beetle Juice' ,junk_food, ',',%X'0000 V0002', X%X'40000000', 1000,4, 266, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B152` V7D X('& Bowl`7E of Bat Stew' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 2000,6, 267, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B153` V7D X('& Jar`7E of Pickled Leeches' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 1500,5, 268, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B154` V7D X('& Pack`7E of Kitten McNuggets' ,junk_food, ',',%X'0000 V0001', X%X'40000000', 1500,8, 269, 2, 1, 0, 0, 0, 0, '0d0' , 0),`7B155` V7D X('& Iron Shod Quarterstaff`5E (%P2,%P3)'`09`09 , maul, '\',%X'00000000',N Vothing_flag, X 0,`09 25, 13, 100, 1, 0, 0, 0, 0, '1d5' , 0), `7B156`7D X('Room and board for one day'`09`09`09`09 , 95, '.',%X'00000000',Nothing_ Vflag, X 1,`09 70, 303,3000, 14,`090, 0,`09 0, 0, '0d0'`09 , 0)`09 `7B15 V7`7D X`09`09 `09); X `09`09`09 X`7B Note : Raised from 26 to 50 possible choices`09`09`09-DMF-`09`7D X`20 X`09store_choice`09:=`09( X`09`7B General Store `7D X(105,104,103,102,105,104, 42,105, 27, 26, 5, 4, 3, 3, 2,102,103,104,105 V, X 1, 1, 1, 2, 2, 3, 3, 1, 1, 1, 1, 4, 1, 1, 1, 1, 1, 1, 1 V, X 1, 1, 1, 1, 1, 1, 27, 26, 4,103,104,105), X`09`7B Armory`09`7D X( 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 43, 44, 45, 46, 47, 30, 33 V, X 34, 43, 44, 28, 29, 30, 31, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41 V, X 43, 44, 45, 46, 47, 28, 29, 30, 31, 30, 32, 35), X`09`7B Weaponsmith`09`7D X( 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24 V, X 25, 6, 7, 23, 25, 23, 25, 6, 7, 8, 9 , 10, 11, 12, 13, 14, 15, 16, 17 V, X 18, 19, 20, 21, 22, 23, 24, 25, 6, 7, 156, 156), X`09`7B Temple`09`7D X( 59, 59, 77, 79, 80, 81, 84, 85, 13, 14, 15, 96, 97, 98,100, 79, 79, 80, 80 V, X 81, 98, 59, 77, 80, 81, 84, 59, 59, 77, 79, 80, 81, 84, 85, 13, 14, 15, 96 V, X 97, 98, 59, 77, 80, 81, 84, 85, 13, 156, 156, 96), X`09`7B Alchemy shop`09`7D X( 55, 56, 57, 58, 58, 60, 61, 62, 63, 64, 65, 66, 75, 76, 78, 82, 83, 60, 61 V, X 62, 63, 64, 98, 99, 98, 98, 62, 63, 64, 65, 66, 75, 76, 78, 82, 83, 60, 61 V, X 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66), X`09`7B Magic shop`09`7D X( 49, 50, 51, 52, 53, 54, 48, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 86,101 V, X 88, 49, 50, 51, 52, 53, 54, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 86,101 V, X 49, 50, 51, 52, 53, 54, 48, 86, 87, 88, 89, 90), X`09`7B Inn`09`09`7D X(106,106,106,106,106,106,106,106,106,106,106,106,106,106,106,106,106,106,106 V, X 106,106,106,106,106,106,115,115,115,115,115,115,115,115,116,116,116,116,116 V, X 116,116,116,157,157,157,157,157,157,157,157,157), X`09`7B Library`09`7D X( 67, 68, 69, 70, 71, 72, 73, 74, 67, 68, 69, 70, 71, 72, 58, 62, 63, 64, 65 V, X 68, 67, 71, 68, 72, 67, 68, 69, 70, 71, 72, 73, 74, 68, 58, 62, 63, 64, 65 V, X 73, 68, 69, 70, 67, 68, 71, 58, 62, 63, 64, 65), X`09`7B Music Shop`09`7D X(107,108,109,110,111,112,113,114,114,107,108,109,110,111,112,113,113,114,107 V, X 108,109,110,111,112,113,114,112,107,107,107,108,108,108,109,109,109,110,110 V, X 111,112,117,118,119,120,121,117,118,119,120,121), X`09`7B Gem Shop`09`7D X(122,137,142,123,124,125,126,127,128,129,130,131,132,133,122,124,125,126,126 V, X 127,127,134,129,130,133,131,135,133,122,134,122,122,130,136,140,124,122,125 V, X 123,137,124,125,126,141,138,129,130,131,132,139), X`09`7B All-Nite Deli `7D X(144,145,146,147,148,149,150,151,152,153,154,155,143,144,145,146,147,148,149 V, X 150,151,152,153,154,155,143,144,145,146,147,148,149,150,151,152,153,154,155 V, X 143,144,145,146,148,149,151,152,153,154,155,143) X`09`09`09`09); X`20 X`09`7B Each store will buy only certain items, based on TVAL `7D X`09store_buy`09:=`09( X`7BGeneral Store`09`7D`09`09`5B1,2,3,13,15,25,30,32,38,77,80,85,86`5D, X`7BArmory`09`09`7D`09`09`5B29,30,31,33,34,35,36,37`5D, X`7BWeaponsmith`09`7D`09`09`5B10,11,12,20,21,22,23,24,26`5D, X`7BTemple`09`09`7D`09`09`5B21,70,71,75,76,91,94`5D, X`7BAlchemy shop`09`7D`09`09`5B70,71,75,76`5D, X`7BMagic Shop`09`7D`09`09`5B1,3,6,40,45,55,60,65,90`5D, X`7BInn`09 `09`7D`09`09`5B106`5D, X`7BLibrary`09`7D`09`09`5B91,90,71,70`5D, X`7BMusic Shop`09`7D`09`09`5B85,86,92,93`5D, X`7BJewelry Shop`09`7D`09`09`5B4,5,7,29,37,38,40,45`5D,`09`09 X`7BAll-Night Deli `7D`09`09`5B81`5D X`09`09); X X`09`7B Hours that a store is open, in two hour increments. X`09`09 = Open X`09`09N = 'Closed for the night' X`09`09W = 'Closed for the weekend' X`09`09D = 'Closed for the day' X`09`09B = Bribeable X`09`09`09`09`09`7D X`09store_hours := ( X`09`09`7B`09Sat`09`09Sun`09`09Mon`09Tue X`09`09`09Wed`09`09Thu`09`09Fri`09`09`7D X`7BGeneral Store`09`7D('NNB BN','NNB BN','NNB BN','NNB V BN', X`09`09 'NNB BN','NNB BN','NNB BN'), X`7BArmory`09`09`7D('NNNB WWW','WWWWWWWWWWWW','WWWB NNN','NNNB NN VN', X`09`09 'NNNB NNN','NNNB NNN','NNNB NNN'), X`7BWeapon Smiths`09`7D('NNNB WWW','WWWWWWWWWWWW','WWWB NNN','NNNB V NNN', X`09`09 'NNNB NNN','NNNB NNN','NNNB NNN'), X`7BTemple`09`09`7D(' ',' ',' ',' V ', X`09`09 ' ',' ',' '), X`7BAlchemy Shop`09`7D('NNNN NNNN','NNNN NNNN','NNNN NNNN','NNNN V NNNN', X`09`09 'NNNN NNNN','NNNN NNNN','NNNN NNNN'), X`7BMagic Shop`09`7D('NNNN NNNN','NNNN NNNN','NNNN NNNN','NNNN NN VNN', X`09`09 'NNNN NNNN','NNNN NNNN','NNNN NNNN'), X`7BInn`09`09`7D(' ',' ',' ',' ', X`09`09 ' ',' ',' '), X`7BTrading Post`09`7D('NNNB BW','WWWWWWWWWWWW','WWWB BN','NNNB V BN', X`09`09 'NNNB BN','NNNB BN','NNNB BN'), X`7BLibrary`09`7D('NNN N','NNN N','NNN N','NNN N' V, X`09`09 'NNN N','NNN N','NNN N'), X`7BMusic Shop `09`7D('NNNB BNNN','NNNB BNNNN','NNNB BNNN','NNNB B VNNN', X`09`09 'NNNB BNNN','NNNB BNNN','NNNB BNNN'), X`7BGem Store`09`7D('NNNB BNN','NNNB BNNNN','NNNB BNN','NNNB BN VN', X`09`09 'NNNB BNN','NNNB BNN','NNNB BNN'), X`7BInsurance Shop`09`7D('BBBB BBB','BBBB BBB','BBBB BBB','BBBB V BBB', X`09`09 'BBBB BBB','BBBB BBB','BBBB BBB'), X`7BBank`09`09`7D('NNNN WWWWW','WWWWWWWWWWWW','WWWW NNN','NNNN NNN' V, X`09`09 'NNNN NNN','NNNN NNN','NNNN WWW'), X`7BMoney Exchange`09`7D('NNNB BWW','WWWWWWWWWWWW','WWWB BNN','NNNB V BNN', X`09`09 'NNNB BNN','NNNB BNN','NNNB BNN'), X`7BCasino`09`09`7D(' ',' ',' DDDDDD ',' DDDDDD V ', X`09`09 ' DDDDDD ',' DDDDDD ',' DDDDDD '), +-+-+-+-+-+-+-+- END OF PART 100 +-+-+-+-+-+-+-+-