home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / EDIT04.ZIP / EDIT04.MOD next >
Encoding:
Text File  |  1995-06-30  |  3.1 KB  |  88 lines
  1. Apollo #1 @11138
  2. Sun Jun 25 22:39:07 1995
  3. ┌──────────────────────────────────────────────────────Filo─Header─(c)────┐
  4. │ Mod Name: Edit04.424    Mod Authors: Editor 149                         │
  5. │ Difficulty: ██▒▒▒▒▒▒▒▒(1.5/10)       @11138.WWIVNet                     │
  6. │ WWIV Version: v4.24                  @2939 TERRANet, IceNet, SierraLink │
  7. │ Date: 06/23/95                       @2938 CyberNet                     │
  8. │ Files Affected: READMAIL.C                                              │
  9. │ Go from MailRead to Boardedit with B.                                   │
  10. └─────────────────────────────────────────────────────────────────────────┘
  11.  
  12. Special Thanks to the writer of LDANICA5.MOD
  13. That mod worked fine in 4.22, I really only upgraded it for v4.23 so most
  14. of the credit goes to Lady Danica 1@15286.  Now upgraded for v4.24.
  15.  
  16. Copyright Disclaimer:
  17. (c) 1995 Editor a.k.a #149@Retreat of the Gods  (209) 537-2808
  18. This mod is written for use by REGISTERED WWIV SysOps, as they are the only
  19. ones who should have the source code.  SysOps may freely upload this mod to
  20. any BBS or online service provided it is not edited in any way except to
  21. remove messge headers and/or taglines.  Shareware CDROM vendors are prohibited
  22. from distributing this mod without EXPRESS WRITTEN CONSENT from the author &
  23. Wayne Bell, Author of WWIV BBS Software.
  24. Parts of the code shown in this mod are:
  25.                 Copyright (C) 1988-1993 by Wayne Bell.
  26.  
  27. BACKUP your source
  28.  
  29. LEGEND:
  30. =   Old code, Search for this
  31. +   New code, Add this
  32. -   Remove or comment out this
  33. ... Go down several lines in the same function
  34.  
  35.  
  36. Load up: READMAIL.C
  37. Find: void readmail(void)
  38. =       prt(2,get_string(711));
  39. =     helpl=34;
  40. =     if (so()) {
  41. =       if (sysinfo.flags & OP_FLAGS_MAIL_PROMPT)
  42. -/*       npr(get_string(1365));      Removed for Edit04.424 */
  43. +         npr("2Mail 7{1QSRIDAF?-+GEZPVUOLCNB7} 2:");
  44. +                                     /* Edit04.424 */
  45. -/*     ch=onek("QSRIDAMF?-+GEZPVUOLCN");
  46. -                                     Removed for Edit04.424 */
  47. +       ch=onek("QSRIDAMF?-+GEZPVUOLCNB");
  48. +                                     /* Edit04.424 */
  49. =     } else {
  50. =       if (cs()) {
  51. =         if (sysinfo.flags & OP_FLAGS_MAIL_PROMPT)
  52. .
  53. .
  54. .
  55. =       case 'L':
  56. =         if (!so())
  57. =           break;
  58. =         nl();
  59. =         prt(2,get_string(7));
  60. =         input(s,50);
  61. =         if (s[0]) {
  62. =           nl();
  63. =           prt(5,get_string(17));
  64. =           if (yn()) {
  65. =             nl();
  66. =             load_workspace(s,0);
  67. =           } else {
  68. =             nl();
  69. =             load_workspace(s,1);
  70. =           }
  71. =         }
  72. =         break;
  73. +       case 'B':                     /* Edit04.424 */
  74. +         sysoplog(get_stringx(1,2)); /* Edit04.424 */
  75. +         boardedit();                /* Edit04.424 */
  76. +         break;                      /* Edit04.424 */
  77. =     }
  78. =   } while ((!i2) && (!hangup));
  79. =  } while ((!hangup) && (!done));
  80.  
  81.  
  82. done.
  83.  
  84. Save, Recompile and run.
  85. As you can see, It's Not so Hard, just a long compile!
  86.  
  87. Editor
  88.