home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / SYSOP / MODS1.ZIP / APOLLO11.423 < prev    next >
Text File  |  1993-12-23  |  4KB  |  88 lines
  1. Apollo11.423
  2. ``/┤PΘ££Θ`` WWIVnet #1 AT 2938
  3. Sat Dec 18 08:07:04 1993
  4. 0R: net33: @4136 (via @1) [11:44 12/23/93]
  5. 0R: net33: @1 (via @4120) [07:02 12/23/93]
  6. 0R: net33: @4120 [06:19 12/23/93]
  7. 0R: net33: @4062 (via @4064) [05:11 12/23/93]
  8. 0R: net33: @4064 (via @1040) [01:18 12/23/93]
  9. 0R: net33: @1040 (via @2050) [00:38 12/23/93]
  10. 0R: net34: @2050 [22:46 12/22/93]
  11. 0R: net34: @2050 (via @1040) [03:58 12/20/93]
  12. 0R: net34: @2050 (via @1040) [14:41 12/19/93]
  13. 0R: net33: @1040 (via @1042) [15:27 12/19/93]
  14. 0R: net33: @1042 (via @2914) [13:06 12/19/93]
  15. 0R: net33: @2914 (via @2938) [22:47 12/18/93]
  16. 0R: net33: @2938 [08:19 12/18/93]
  17. ┌──────────────────────────────────────────────────────Filo─Header─(c)────┐
  18. │ Mod Name: Apollo11.423  Mod Authors: Apollo  1@92938 WWIVNet & BRNet    │
  19. │ Difficulty: ██▒▒▒▒▒▒▒▒               1@2939 TARDIS,TERRA,ICE & Mas Nets │
  20. │ WWIV Version: v4.23            Date: 12/09/93                           │
  21. │ Files Affected: UEDIT.C                                                 │
  22. │ F in UEDIT Sends Form letter                                            │
  23. └─────────────────────────────────────────────────────────────────────────┘
  24.  
  25. LEGEND:
  26. = old code, Search for this
  27. + new code
  28. - Remove or comment out this line
  29. > Modified From Virgin Code
  30.  
  31. #include <witty disclaimer>
  32.  
  33. BACKUP your Source
  34.  
  35. Load up: UEDIT.C
  36. Find: void uedit(int usern, int other)
  37. =      nl();
  38. =      prt(2,get_string(266));
  39. =      if ((thisuser.sl==255) || (wfc))
  40. -        ch=onek("Q[]{}/,.?UDRNLCPOGMSTEYZAI~%:");
  41. -                                            /* Removed for Apollo11.423 */
  42. +        ch=onek("Q[]{}/,.?UDRNLCPOGMSTEYZAI~%:F");      /* Apollo11.423 */
  43. =      else
  44. =        ch=onek("Q[]{}/,.?UDRNLCPOGMSTEYZAI%");
  45. =      switch(ch) {
  46. =        case 'Q':
  47. .
  48. .
  49. .   /* Goto the end of: case 'E' */
  50. =          if ((i>=0) && (i<=255) && (s[0])) {
  51. =            u.exempt=i;
  52. =            write_user(un,&u);
  53. =          }
  54. =          break;
  55. +        case 'F':                                       /* Apollo11.423 */
  56. +          show_files("*.FRM",syscfg.gfilesdir);         /* Apollo11.423 */
  57. +          prt(2,get_string(712));                       /* Apollo11.423 */
  58. +          mpl(8);                                       /* Apollo11.423 */
  59. +          input(s,8);                                   /* Apollo11.423 */
  60. +          if (!s[0])                                    /* Apollo11.423 */
  61. +            break;                                      /* Apollo11.423 */
  62. +          sprintf(s1,"%s%s.FRM",syscfg.gfilesdir,s);    /* Apollo11.423 */
  63. +          if (!exist(s1))                               /* Apollo11.423 */
  64. +            sprintf(s1,"%sFORM%s.MSG",syscfg.gfilesdir,s);
  65. +                                                        /* Apollo11.423 */
  66. +        if (exist(s1)) {                                /* Apollo11.423 */
  67. +          unsigned short sy,un;                         /* Apollo11.423 */
  68. +          load_workspace(s1,1);                         /* Apollo11.423 */
  69. +          helpl=0;                                      /* Apollo11.423 */
  70. +          parse_email_info(u.name,&un,&sy);             /* Apollo11.423 */
  71. +          grab_quotes(NULL, NULL);                      /* Apollo11.423 */
  72. +          email(un,sy,0,0);                             /* Apollo11.423 */
  73. +          if (!wfc)                                     /* Apollo11.423 */
  74. +            topscreen();                                /* Apollo11.423 */
  75. +          }                                             /* Apollo11.423 */
  76. +          break;                                        /* Apollo11.423 */
  77. =        case 'G':
  78. =          nl();
  79. =          outstr(get_string(274));
  80.  
  81.  
  82. done.
  83.  
  84. Save, Recompile and run.
  85. As you can see, not all that hard, just a long one.
  86.  
  87. ---- /┤PΘ££Θ   (8{[}  <-- Bald Vampire W/Glasses & Facial Hair (me)
  88.