home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / games / volume1 / rogue / patch2 / Patches02 < prev   
Text File  |  1987-06-12  |  19KB  |  845 lines
  1. *** hit.c.orig    Fri May 29 14:20:03 1987
  2. --- hit.c    Fri Jun 12 13:39:57 1987
  3. ***************
  4. *** 13,19 ****
  5.   #include "rogue.h"
  6.   
  7.   object *fight_monster = 0;
  8. - boolean detect_monster;
  9.   char hit_message[80] = "";
  10.   
  11.   extern short halluc, blind, cur_level;
  12. --- 13,18 ----
  13. *** inventory.c.orig    Fri May 29 14:20:35 1987
  14. --- inventory.c    Fri Jun 12 13:12:14 1987
  15. ***************
  16. *** 184,190 ****
  17.       short i, j, n;
  18.       short sylls, s;
  19.   
  20. !     for (i = 0; i < SCROLLS; i++) {
  21.           sylls = get_rand(2, 5);
  22.           (void) strcpy(id_scrolls[i].title, "'");
  23.   
  24. --- 184,190 ----
  25.       short i, j, n;
  26.       short sylls, s;
  27.   
  28. !     for (i = 0; i < SCROLS; i++) {
  29.           sylls = get_rand(2, 5);
  30.           (void) strcpy(id_scrolls[i].title, "'");
  31.   
  32. ***************
  33. *** 250,256 ****
  34.       case UNIDENTIFIED:
  35.   CHECK:
  36.           switch(obj->what_is) {
  37. !         case SCROLL:
  38.               (void) strcat(desc, item_name);
  39.               (void) strcat(desc, "entitled: ");
  40.               (void) strcat(desc, id_table[obj->which_kind].title);
  41. --- 250,256 ----
  42.       case UNIDENTIFIED:
  43.   CHECK:
  44.           switch(obj->what_is) {
  45. !         case SCROL:
  46.               (void) strcat(desc, item_name);
  47.               (void) strcat(desc, "entitled: ");
  48.               (void) strcat(desc, id_table[obj->which_kind].title);
  49. ***************
  50. *** 287,293 ****
  51.           break;
  52.       case CALLED:
  53.   CALL:    switch(obj->what_is) {
  54. !         case SCROLL:
  55.           case POTION:
  56.           case WAND:
  57.           case RING:
  58. --- 287,293 ----
  59.           break;
  60.       case CALLED:
  61.   CALL:    switch(obj->what_is) {
  62. !         case SCROL:
  63.           case POTION:
  64.           case WAND:
  65.           case RING:
  66. ***************
  67. *** 299,305 ****
  68.           break;
  69.       case IDENTIFIED:
  70.   ID:        switch(obj->what_is) {
  71. !         case SCROLL:
  72.           case POTION:
  73.               (void) strcat(desc, item_name);
  74.               (void) strcat(desc, id_table[obj->which_kind].real);
  75. --- 299,305 ----
  76.           break;
  77.       case IDENTIFIED:
  78.   ID:        switch(obj->what_is) {
  79. !         case SCROL:
  80.           case POTION:
  81.               (void) strcat(desc, item_name);
  82.               (void) strcat(desc, id_table[obj->which_kind].real);
  83. ***************
  84. *** 419,425 ****
  85.   object *obj;
  86.   {
  87.       switch(obj->what_is) {
  88. !     case SCROLL:
  89.           return(id_scrolls);
  90.       case POTION:
  91.           return(id_potions);
  92. --- 419,425 ----
  93.   object *obj;
  94.   {
  95.       switch(obj->what_is) {
  96. !     case SCROL:
  97.           return(id_scrolls);
  98.       case POTION:
  99.           return(id_potions);
  100. *** level.c.orig    Fri May 29 14:20:48 1987
  101. --- level.c    Fri Jun 12 13:13:22 1987
  102. ***************
  103. *** 275,287 ****
  104.           dir = RIGHT;
  105.       } else if (same_col(room1, room2) &&
  106.           (rooms[room1].top_row > rooms[room2].bottom_row)) {
  107. !         put_door(&rooms[room1], UP, &row1, &col1);
  108.           put_door(&rooms[room2], DOWN, &row2, &col2);
  109. !         dir = UP;
  110.       } else if (same_col(room1, room2) &&
  111.           (rooms[room2].top_row > rooms[room1].bottom_row)) {
  112.           put_door(&rooms[room1], DOWN, &row1, &col1);
  113. !         put_door(&rooms[room2], UP, &row2, &col2);
  114.           dir = DOWN;
  115.       } else {
  116.           return(0);
  117. --- 275,287 ----
  118.           dir = RIGHT;
  119.       } else if (same_col(room1, room2) &&
  120.           (rooms[room1].top_row > rooms[room2].bottom_row)) {
  121. !         put_door(&rooms[room1], UPWARD, &row1, &col1);
  122.           put_door(&rooms[room2], DOWN, &row2, &col2);
  123. !         dir = UPWARD;
  124.       } else if (same_col(room1, room2) &&
  125.           (rooms[room2].top_row > rooms[room1].bottom_row)) {
  126.           put_door(&rooms[room1], DOWN, &row1, &col1);
  127. !         put_door(&rooms[room2], UPWARD, &row2, &col2);
  128.           dir = DOWN;
  129.       } else {
  130.           return(0);
  131. ***************
  132. *** 337,345 ****
  133.       wall_width = (rm->is_room & R_MAZE) ? 0 : 1;
  134.   
  135.       switch(dir) {
  136. !     case UP:
  137.       case DOWN:
  138. !         *row = ((dir == UP) ? rm->top_row : rm->bottom_row);
  139.           do {
  140.               *col = get_rand(rm->left_col+wall_width,
  141.                   rm->right_col-wall_width);
  142. --- 337,345 ----
  143.       wall_width = (rm->is_room & R_MAZE) ? 0 : 1;
  144.   
  145.       switch(dir) {
  146. !     case UPWARD:
  147.       case DOWN:
  148. !         *row = ((dir == UPWARD) ? rm->top_row : rm->bottom_row);
  149.           do {
  150.               *col = get_rand(rm->left_col+wall_width,
  151.                   rm->right_col-wall_width);
  152. ***************
  153. *** 497,503 ****
  154.                   RIGHT : LEFT;
  155.           } else {
  156.               tunnel_dir = (rooms[rn].top_row < rooms[target_room].top_row) ?
  157. !                 DOWN : UP;
  158.           }
  159.           door_dir = ((tunnel_dir + 4) % DIRS);
  160.           if (rooms[target_room].doors[door_dir/2].oth_room != NO_ROOM) {
  161. --- 497,503 ----
  162.                   RIGHT : LEFT;
  163.           } else {
  164.               tunnel_dir = (rooms[rn].top_row < rooms[target_room].top_row) ?
  165. !                 DOWN : UPWARD;
  166.           }
  167.           door_dir = ((tunnel_dir + 4) % DIRS);
  168.           if (rooms[target_room].doors[door_dir/2].oth_room != NO_ROOM) {
  169. ***************
  170. *** 554,560 ****
  171.                   RIGHT : LEFT;
  172.           } else {
  173.               tunnel_dir = (rooms[rn].top_row < rooms[de].top_row) ?
  174. !                 DOWN : UP;
  175.           }
  176.           draw_simple_passage(srow, scol, drow, dcol, tunnel_dir);
  177.           r_de = de;
  178. --- 554,560 ----
  179.                   RIGHT : LEFT;
  180.           } else {
  181.               tunnel_dir = (rooms[rn].top_row < rooms[de].top_row) ?
  182. !                 DOWN : UPWARD;
  183.           }
  184.           draw_simple_passage(srow, scol, drow, dcol, tunnel_dir);
  185.           r_de = de;
  186. ***************
  187. *** 588,594 ****
  188.       char dirs[4];
  189.       short i, t;
  190.   
  191. !     dirs[0] = UP;
  192.       dirs[1] = DOWN;
  193.       dirs[2] = LEFT;
  194.       dirs[3] = RIGHT;
  195. --- 588,594 ----
  196.       char dirs[4];
  197.       short i, t;
  198.   
  199. !     dirs[0] = UPWARD;
  200.       dirs[1] = DOWN;
  201.       dirs[2] = LEFT;
  202.       dirs[3] = RIGHT;
  203. ***************
  204. *** 607,613 ****
  205.       }
  206.       for (i = 0; i < 4; i++) {
  207.           switch(dirs[i]) {
  208. !         case UP:
  209.               if (((r-1) >= tr) &&
  210.                   (dungeon[r-1][c] != TUNNEL) &&
  211.                   (dungeon[r-1][c-1] != TUNNEL) &&
  212. --- 607,613 ----
  213.       }
  214.       for (i = 0; i < 4; i++) {
  215.           switch(dirs[i]) {
  216. !         case UPWARD:
  217.               if (((r-1) >= tr) &&
  218.                   (dungeon[r-1][c] != TUNNEL) &&
  219.                   (dungeon[r-1][c-1] != TUNNEL) &&
  220. *** machdep.c.orig    Fri Jun 12 13:30:16 1987
  221. --- machdep.c    Fri Jun 12 13:19:48 1987
  222. ***************
  223. *** 39,45 ****
  224.    *      #else
  225.    *         code;
  226.    *      #endif /* UNIX_SYSV */
  227. !  *      }
  228.    *
  229.    * Appropriate variations of this are of course acceptible.
  230.    * The use of "#elseif" is discouraged because of non-portability.
  231. --- 39,45 ----
  232.    *      #else
  233.    *         code;
  234.    *      #endif /* UNIX_SYSV */
  235. ! /*      }
  236.    *
  237.    * Appropriate variations of this are of course acceptible.
  238.    * The use of "#elseif" is discouraged because of non-portability.
  239. ***************
  240. *** 82,97 ****
  241.   
  242.   md_slurp()
  243.   {
  244. !     long ln;
  245.   
  246.   #ifdef UNIX_BSD4_2
  247. !     ioctl(0, TIOCFLUSH, &ln);
  248.   #endif /* UNIX_BSD4_2 */
  249.   #ifdef UNIX_SYSV
  250.       ioctl(0, TCFLSH, &ln);
  251.   #endif /* UNIX_SYSV */
  252.   
  253. !     for (ln = stdin->_cnt; ln > 0; ln--) {
  254.           (void) getchar();
  255.       }
  256.   }
  257. --- 82,100 ----
  258.   
  259.   md_slurp()
  260.   {
  261. !     long ln = 0;
  262.   
  263.   #ifdef UNIX_BSD4_2
  264. !     ioctl(0, FIONREAD, &ln);
  265.   #endif /* UNIX_BSD4_2 */
  266.   #ifdef UNIX_SYSV
  267.       ioctl(0, TCFLSH, &ln);
  268. +     ln = 0;
  269.   #endif /* UNIX_SYSV */
  270.   
  271. !     ln += stdin->_cnt;
  272. ! 
  273. !     for (; ln > 0; ln--) {
  274.           (void) getchar();
  275.       }
  276.   }
  277. *** message.c.orig    Fri May 29 14:21:38 1987
  278. --- message.c    Fri Jun 12 13:21:44 1987
  279. ***************
  280. *** 48,57 ****
  281.       msg_cleared = 0;
  282.       msg_col = strlen(msg);
  283.   
  284.       if (did_int) {
  285.           onintr();
  286.       }
  287. -     cant_int = 0;
  288.   }
  289.   
  290.   remessage()
  291. --- 48,58 ----
  292.       msg_cleared = 0;
  293.       msg_col = strlen(msg);
  294.   
  295. +     cant_int = 0;
  296.       if (did_int) {
  297. +         did_int = 0;
  298.           onintr();
  299.       }
  300.   }
  301.   
  302.   remessage()
  303. ***************
  304. *** 256,268 ****
  305.   save_screen()
  306.   {
  307.       FILE *fp;
  308. !     short i, j, row, col;
  309.       char buf[DCOLS+2];
  310.       boolean found_non_blank;
  311.   
  312. -     row = curscr->_cury;
  313. -     col = curscr->_curx;
  314. - 
  315.       if ((fp = fopen("rogue.screen", "w")) != NULL) {
  316.           for (i = 0; i < DROWS; i++) {
  317.               found_non_blank = 0;
  318. --- 257,266 ----
  319.   save_screen()
  320.   {
  321.       FILE *fp;
  322. !     short i, j;
  323.       char buf[DCOLS+2];
  324.       boolean found_non_blank;
  325.   
  326.       if ((fp = fopen("rogue.screen", "w")) != NULL) {
  327.           for (i = 0; i < DROWS; i++) {
  328.               found_non_blank = 0;
  329. ***************
  330. *** 282,289 ****
  331.       } else {
  332.           sound_bell();
  333.       }
  334. -     move(row, col);
  335. -     refresh();
  336.   }
  337.   
  338.   sound_bell()
  339. --- 280,285 ----
  340. *** monster.c.orig    Fri May 29 14:21:49 1987
  341. --- monster.c    Fri Jun 12 13:23:13 1987
  342. ***************
  343. *** 16,22 ****
  344.   boolean mon_disappeared;
  345.   
  346.   char *m_names[] = {
  347. !     "aquatar",
  348.       "bat",
  349.       "centaur",
  350.       "dragon",
  351. --- 16,22 ----
  352.   boolean mon_disappeared;
  353.   
  354.   char *m_names[] = {
  355. !     "aquator",
  356.       "bat",
  357.       "centaur",
  358.       "dragon",
  359. ***************
  360. *** 32,38 ****
  361.       "nymph",
  362.       "orc",
  363.       "phantom",
  364. !     "quasit",
  365.       "rattlesnake",
  366.       "snake",
  367.       "troll",
  368. --- 32,38 ----
  369.       "nymph",
  370.       "orc",
  371.       "phantom",
  372. !     "quagga",
  373.       "rattlesnake",
  374.       "snake",
  375.       "troll",
  376. ***************
  377. *** 479,485 ****
  378.       }
  379.       if (dungeon[row][col] & OBJECT) {
  380.           obj = object_at(&level_objects, row, col);
  381. !         if ((obj->what_is == SCROLL) && (obj->which_kind == SCARE_MONSTER)) {
  382.               return(0);
  383.           }
  384.       }
  385. --- 479,485 ----
  386.       }
  387.       if (dungeon[row][col] & OBJECT) {
  388.           obj = object_at(&level_objects, row, col);
  389. !         if ((obj->what_is == SCROL) && (obj->which_kind == SCARE_MONSTER)) {
  390.               return(0);
  391.           }
  392.       }
  393. *** object.c.orig    Fri May 29 14:22:10 1987
  394. --- object.c    Fri Jun 12 13:24:01 1987
  395. ***************
  396. *** 50,56 ****
  397.   {145, "beige \0                          ", "of see invisible ", 0}
  398.   };
  399.   
  400. ! struct id id_scrolls[SCROLLS] = {
  401.   {505, "                                   ", "of protect armor ", 0},
  402.   {200, "                                   ", "of hold monster ", 0},
  403.   {235, "                                   ", "of enchant weapon ", 0},
  404. --- 50,56 ----
  405.   {145, "beige \0                          ", "of see invisible ", 0}
  406.   };
  407.   
  408. ! struct id id_scrolls[SCROLS] = {
  409.   {505, "                                   ", "of protect armor ", 0},
  410.   {200, "                                   ", "of hold monster ", 0},
  411.   {235, "                                   ", "of enchant weapon ", 0},
  412. ***************
  413. *** 244,250 ****
  414.       char *retstring;
  415.   
  416.       switch(obj->what_is) {
  417. !     case SCROLL:
  418.           retstring = obj->quantity > 1 ? "scrolls " : "scroll ";
  419.           break;
  420.       case POTION:
  421. --- 244,250 ----
  422.       char *retstring;
  423.   
  424.       switch(obj->what_is) {
  425. !     case SCROL:
  426.           retstring = obj->quantity > 1 ? "scrolls " : "scroll ";
  427.           break;
  428.       case POTION:
  429. ***************
  430. *** 308,314 ****
  431.           obj->what_is = gr_what_is();
  432.       }
  433.       switch(obj->what_is) {
  434. !     case SCROLL:
  435.           gr_scroll(obj);
  436.           break;
  437.       case POTION:
  438. --- 308,314 ----
  439.           obj->what_is = gr_what_is();
  440.       }
  441.       switch(obj->what_is) {
  442. !     case SCROL:
  443.           gr_scroll(obj);
  444.           break;
  445.       case POTION:
  446. ***************
  447. *** 342,348 ****
  448.       percent = get_rand(1, 91);
  449.   
  450.       if (percent <= 30) {
  451. !         what_is = SCROLL;
  452.       } else if (percent <= 60) {
  453.           what_is = POTION;
  454.       } else if (percent <= 64) {
  455. --- 342,348 ----
  456.       percent = get_rand(1, 91);
  457.   
  458.       if (percent <= 30) {
  459. !         what_is = SCROL;
  460.       } else if (percent <= 60) {
  461.           what_is = POTION;
  462.       } else if (percent <= 64) {
  463. ***************
  464. *** 366,372 ****
  465.   
  466.       percent = get_rand(0, 85);
  467.   
  468. !     obj->what_is = SCROLL;
  469.   
  470.       if (percent <= 5) {
  471.           obj->which_kind = PROTECT_ARMOR;
  472. --- 366,372 ----
  473.   
  474.       percent = get_rand(0, 85);
  475.   
  476. !     obj->what_is = SCROL;
  477.   
  478.       if (percent <= 5) {
  479.           obj->which_kind = PROTECT_ARMOR;
  480. ***************
  481. *** 694,701 ****
  482.           max = POTIONS - 1;
  483.           break;
  484.       case '?':
  485. !         obj->what_is = SCROLL;
  486. !         max = SCROLLS - 1;
  487.           break;
  488.       case ',':
  489.           obj->what_is = AMULET;
  490. --- 694,701 ----
  491.           max = POTIONS - 1;
  492.           break;
  493.       case '?':
  494. !         obj->what_is = SCROL;
  495. !         max = SCROLS - 1;
  496.           break;
  497.       case ',':
  498.           obj->what_is = AMULET;
  499. *** pack.c.orig    Fri May 29 14:22:20 1987
  500. --- pack.c    Fri Jun 12 13:24:32 1987
  501. ***************
  502. *** 60,66 ****
  503.       obj = object_at(&level_objects, row, col);
  504.       *status = 1;
  505.   
  506. !     if ((obj->what_is == SCROLL) && (obj->which_kind == SCARE_MONSTER) &&
  507.           obj->picked_up) {
  508.           message("the scroll turns to dust as you pick it up", 0);
  509.           dungeon[row][col] &= (~OBJECT);
  510. --- 60,66 ----
  511.       obj = object_at(&level_objects, row, col);
  512.       *status = 1;
  513.   
  514. !     if ((obj->what_is == SCROL) && (obj->which_kind == SCARE_MONSTER) &&
  515.           obj->picked_up) {
  516.           message("the scroll turns to dust as you pick it up", 0);
  517.           dungeon[row][col] &= (~OBJECT);
  518. ***************
  519. *** 157,163 ****
  520.   {
  521.       object *op;
  522.   
  523. !     if (!(obj->what_is & (WEAPON | FOOD | SCROLL | POTION))) {
  524.           return(0);
  525.       }
  526.       if ((obj->what_is == FOOD) && (obj->which_kind == FRUIT)) {
  527. --- 157,163 ----
  528.   {
  529.       object *op;
  530.   
  531. !     if (!(obj->what_is & (WEAPON | FOOD | SCROL | POTION))) {
  532.           return(0);
  533.       }
  534.       if ((obj->what_is == FOOD) && (obj->which_kind == FRUIT)) {
  535. ***************
  536. *** 380,386 ****
  537.       struct id *id_table;
  538.       char buf[MAX_TITLE_LENGTH+2];
  539.   
  540. !     ch = pack_letter("call what?", (SCROLL | POTION | WAND | RING));
  541.   
  542.       if (ch == CANCEL) {
  543.           return;
  544. --- 380,386 ----
  545.       struct id *id_table;
  546.       char buf[MAX_TITLE_LENGTH+2];
  547.   
  548. !     ch = pack_letter("call what?", (SCROL | POTION | WAND | RING));
  549.   
  550.       if (ch == CANCEL) {
  551.           return;
  552. ***************
  553. *** 389,395 ****
  554.           message("no such item.", 0);
  555.           return;
  556.       }
  557. !     if (!(obj->what_is & (SCROLL | POTION | WAND | RING))) {
  558.           message("surely you already know what that's called", 0);
  559.           return;
  560.       }
  561. --- 389,395 ----
  562.           message("no such item.", 0);
  563.           return;
  564.       }
  565. !     if (!(obj->what_is & (SCROL | POTION | WAND | RING))) {
  566.           message("surely you already know what that's called", 0);
  567.           return;
  568.       }
  569. ***************
  570. *** 450,456 ****
  571.           (*c == ')') || (*c == ']') || (*c == '/') || (*c == ','))) {
  572.           switch(*c) {
  573.           case '?':
  574. !             *mask = SCROLL;
  575.               break;
  576.           case '!':
  577.               *mask = POTION;
  578. --- 450,456 ----
  579.           (*c == ')') || (*c == ']') || (*c == '/') || (*c == ','))) {
  580.           switch(*c) {
  581.           case '?':
  582. !             *mask = SCROL;
  583.               break;
  584.           case '!':
  585.               *mask = POTION;
  586. *** patchlevel.h.orig    Thu May 28 15:06:56 1987
  587. --- patchlevel.h    Fri Jun 12 13:24:41 1987
  588. ***************
  589. *** 1 ****
  590. ! #define PATCHLEVEL 1
  591. --- 1 ----
  592. ! #define PATCHLEVEL 2
  593. *** rogue.h.orig    Fri May 29 14:18:42 1987
  594. --- rogue.h    Fri Jun 12 13:25:27 1987
  595. ***************
  596. *** 26,32 ****
  597.   
  598.   #define ARMOR        ((unsigned short)   01)
  599.   #define WEAPON        ((unsigned short)   02)
  600. ! #define SCROLL        ((unsigned short)   04)
  601.   #define POTION        ((unsigned short)  010)
  602.   #define GOLD        ((unsigned short)  020)
  603.   #define FOOD        ((unsigned short)  040)
  604. --- 26,32 ----
  605.   
  606.   #define ARMOR        ((unsigned short)   01)
  607.   #define WEAPON        ((unsigned short)   02)
  608. ! #define SCROL        ((unsigned short)   04)
  609.   #define POTION        ((unsigned short)  010)
  610.   #define GOLD        ((unsigned short)  020)
  611.   #define FOOD        ((unsigned short)  040)
  612. ***************
  613. *** 68,74 ****
  614.   #define CREATE_MONSTER 9
  615.   #define AGGRAVATE_MONSTER 10
  616.   #define MAGIC_MAPPING 11
  617. ! #define SCROLLS 12
  618.   
  619.   #define INCREASE_STRENGTH 0
  620.   #define RESTORE_STRENGTH 1
  621. --- 68,74 ----
  622.   #define CREATE_MONSTER 9
  623.   #define AGGRAVATE_MONSTER 10
  624.   #define MAGIC_MAPPING 11
  625. ! #define SCROLS 12
  626.   
  627.   #define INCREASE_STRENGTH 0
  628.   #define RESTORE_STRENGTH 1
  629. ***************
  630. *** 345,351 ****
  631.   #define QUIT 4
  632.   #define WIN 5
  633.   
  634. ! #define UP 0
  635.   #define UPRIGHT 1
  636.   #define RIGHT 2
  637.   #define RIGHTDOWN 3
  638. --- 345,351 ----
  639.   #define QUIT 4
  640.   #define WIN 5
  641.   
  642. ! #define UPWARD 0
  643.   #define UPRIGHT 1
  644.   #define RIGHT 2
  645.   #define RIGHTDOWN 3
  646. *** room.c.orig    Fri May 29 14:22:54 1987
  647. --- room.c    Fri Jun 12 13:25:59 1987
  648. ***************
  649. *** 140,146 ****
  650.   register unsigned short mask;
  651.   {
  652.           switch(mask) {
  653. !         case SCROLL:
  654.               return('?');
  655.           case POTION:
  656.               return('!');
  657. --- 140,146 ----
  658.   register unsigned short mask;
  659.   {
  660.           switch(mask) {
  661. !         case SCROL:
  662.               return('?');
  663.           case POTION:
  664.               return('!');
  665. ***************
  666. *** 404,410 ****
  667.       short d = -1;
  668.   
  669.       if (*row == rooms[rn].top_row) {
  670. !         d = UP/2;
  671.       } else if (*row == rooms[rn].bottom_row) {
  672.           d = DOWN/2;
  673.       } else if (*col == rooms[rn].left_col) {
  674. --- 404,410 ----
  675.       short d = -1;
  676.   
  677.       if (*row == rooms[rn].top_row) {
  678. !         d = UPWARD/2;
  679.       } else if (*row == rooms[rn].bottom_row) {
  680.           d = DOWN/2;
  681.       } else if (*col == rooms[rn].left_col) {
  682. *** save.c.orig    Fri May 29 14:24:31 1987
  683. --- save.c    Fri Jun 12 13:26:27 1987
  684. ***************
  685. *** 92,98 ****
  686.       r_write(fp, (char *) &rogue, sizeof(fighter));
  687.       write_pack(&rogue.pack, fp);
  688.       rw_id(id_potions, fp, POTIONS, 1);
  689. !     rw_id(id_scrolls, fp, SCROLLS, 1);
  690.       rw_id(id_wands, fp, WANDS, 1);
  691.       rw_id(id_rings, fp, RINGS, 1);
  692.       r_write(fp, (char *) traps, (MAX_TRAPS * sizeof(trap)));
  693. --- 92,98 ----
  694.       r_write(fp, (char *) &rogue, sizeof(fighter));
  695.       write_pack(&rogue.pack, fp);
  696.       rw_id(id_potions, fp, POTIONS, 1);
  697. !     rw_id(id_scrolls, fp, SCROLS, 1);
  698.       rw_id(id_wands, fp, WANDS, 1);
  699.       rw_id(id_rings, fp, RINGS, 1);
  700.       r_write(fp, (char *) traps, (MAX_TRAPS * sizeof(trap)));
  701. ***************
  702. *** 164,170 ****
  703.       r_read(fp, (char *) &rogue, sizeof(fighter));
  704.       read_pack(&rogue.pack, fp, 1);
  705.       rw_id(id_potions, fp, POTIONS, 0);
  706. !     rw_id(id_scrolls, fp, SCROLLS, 0);
  707.       rw_id(id_wands, fp, WANDS, 0);
  708.       rw_id(id_rings, fp, RINGS, 0);
  709.       r_read(fp, (char *) traps, (MAX_TRAPS * sizeof(trap)));
  710. --- 164,170 ----
  711.       r_read(fp, (char *) &rogue, sizeof(fighter));
  712.       read_pack(&rogue.pack, fp, 1);
  713.       rw_id(id_potions, fp, POTIONS, 0);
  714. !     rw_id(id_scrolls, fp, SCROLS, 0);
  715.       rw_id(id_wands, fp, WANDS, 0);
  716.       rw_id(id_rings, fp, RINGS, 0);
  717.       r_read(fp, (char *) traps, (MAX_TRAPS * sizeof(trap)));
  718. *** score.c.orig    Fri May 29 14:25:01 1987
  719. --- score.c    Fri Jun 12 13:27:40 1987
  720. ***************
  721. *** 120,127 ****
  722.   
  723.       if (from_intrpt) {
  724.   
  725. !         orow = curscr->_cury;
  726. !         ocol = curscr->_curx;
  727.           mc = msg_cleared;
  728.   
  729.           for (i = 0; i < DCOLS; i++) {
  730. --- 120,127 ----
  731.   
  732.       if (from_intrpt) {
  733.   
  734. !         orow = rogue.row;
  735. !         ocol = rogue.col;
  736.           mc = msg_cleared;
  737.   
  738.           for (i = 0; i < DCOLS; i++) {
  739. ***************
  740. *** 403,409 ****
  741.       case WAND:
  742.           val = id_wands[wc].value * (obj->class + 1);
  743.           break;
  744. !     case SCROLL:
  745.           val = id_scrolls[wc].value * obj->quantity;
  746.           break;
  747.       case POTION:
  748. --- 403,409 ----
  749.       case WAND:
  750.           val = id_wands[wc].value * (obj->class + 1);
  751.           break;
  752. !     case SCROL:
  753.           val = id_scrolls[wc].value * obj->quantity;
  754.           break;
  755.       case POTION:
  756. ***************
  757. *** 426,432 ****
  758.   {
  759.       short i;
  760.   
  761. !     for (i = 0; i < SCROLLS; i++) {
  762.           id_scrolls[i].id_status = IDENTIFIED;
  763.       }
  764.       for (i = 0; i < WEAPONS; i++) {
  765. --- 426,432 ----
  766.   {
  767.       short i;
  768.   
  769. !     for (i = 0; i < SCROLS; i++) {
  770.           id_scrolls[i].id_status = IDENTIFIED;
  771.       }
  772.       for (i = 0; i < WEAPONS; i++) {
  773. *** use.c.orig    Fri May 29 14:25:52 1987
  774. --- use.c    Fri Jun 12 13:28:05 1987
  775. ***************
  776. *** 148,154 ****
  777.       object *obj;
  778.       char msg[DCOLS];
  779.   
  780. !     ch = pack_letter("read what?", SCROLL);
  781.   
  782.       if (ch == CANCEL) {
  783.           return;
  784. --- 148,154 ----
  785.       object *obj;
  786.       char msg[DCOLS];
  787.   
  788. !     ch = pack_letter("read what?", SCROL);
  789.   
  790.       if (ch == CANCEL) {
  791.           return;
  792. ***************
  793. *** 157,163 ****
  794.           message("no such item.", 0);
  795.           return;
  796.       }
  797. !     if (obj->what_is != SCROLL) {
  798.           message("you can't read that", 0);
  799.           return;
  800.       }
  801. --- 157,163 ----
  802.           message("no such item.", 0);
  803.           return;
  804.       }
  805. !     if (obj->what_is != SCROL) {
  806.           message("you can't read that", 0);
  807.           return;
  808.       }
  809. ***************
  810. *** 336,342 ****
  811.           goto AGAIN;
  812.       }
  813.       obj->identified = 1;
  814. !     if (obj->what_is & (SCROLL | POTION | WEAPON | ARMOR | WAND | RING)) {
  815.           id_table = get_id_table(obj);
  816.           id_table[obj->which_kind].id_status = IDENTIFIED;
  817.       }
  818. --- 336,342 ----
  819.           goto AGAIN;
  820.       }
  821.       obj->identified = 1;
  822. !     if (obj->what_is & (SCROL | POTION | WEAPON | ARMOR | WAND | RING)) {
  823.           id_table = get_id_table(obj);
  824.           id_table[obj->which_kind].id_status = IDENTIFIED;
  825.       }
  826. *** zap.c.orig    Fri May 29 14:26:04 1987
  827. --- zap.c    Fri Jun 12 13:29:07 1987
  828. ***************
  829. *** 14,20 ****
  830.   
  831.   boolean wizard = 0;
  832.   
  833. ! extern boolean being_held, score_only;
  834.   
  835.   zapp()
  836.   {
  837. --- 14,20 ----
  838.   
  839.   boolean wizard = 0;
  840.   
  841. ! extern boolean being_held, score_only, detect_monster;
  842.   
  843.   zapp()
  844.   {
  845.