home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / SYSOP / MODS1.ZIP / CONAN13.MOD < prev    next >
Text File  |  1993-04-11  |  3KB  |  62 lines
  1. Conan #1 @7307
  2. Thursday, April 8, 1993   4:39 pm [EST]
  3. ┌────────────────────────────────────────────────────────────────────────────┐
  4. │ Mod Name      : CONAN13                 Mod Author: Conan 1@473   ComLink  │
  5. │ Difficulty    : ███▒▒▒▒▒▒▒                                1@7304  IceNet   │
  6. │ WWIV Version  : 4.22                                      1@7300  WWIVWeb  │
  7. │ Mod Date      : 04/08/93                                  1@7307  WWIVNet  │
  8. │ Files Affected: MISCCMD.C                                 1@17325 WWIVLink │ 
  9. │ Description   : Record in sysoplog when user adds to the BBS list          │
  10. └────────────────────────────────────────────────────────────────────────────┘
  11. This is a very simple two line mod that I wanted to put in, because I've had
  12. many lowlife users who go into the bbslist and add numbers like 911-9023 or
  13. 976 numbers or just basically corrupt the BBSList ...so here's a basic mod
  14. to put in that writes to the sysoplog.
  15.  
  16. + add
  17. = don't change
  18.  
  19. Open up MISCCMD.C and search down to void bbslist(void)
  20. and make the following changes...
  21.             
  22. =           nl();
  23. =           prt(5,get_string(499));
  24. =           if (yn()) {
  25. =             sprintf(s1,"%sBBSLIST.MSG",syscfg.gfilesdir);
  26. =             f=open(s1,O_RDWR | O_CREAT | O_BINARY, S_IREAD | S_IWRITE);
  27. =             if (filelength(f)) {
  28. =               lseek(f,-1L,SEEK_END);
  29. =               read(f,((void *)&ch1),1);
  30. =               if (ch1==26)
  31. =                 lseek(f,-1L,SEEK_END);
  32. +               sprintf(s1,"1Added 7%-30s 1to the BBS List", name);
  33. +               sysoplog(s1);
  34. =             }
  35. =             write(f,(void *)s,strlen(s));
  36. =             close(f);
  37. =             nl();
  38.  
  39.  
  40. And that's all there is to it! Comments, problems, suggestions? You can call
  41. my board, Perfect World BBS (703)255-6606 or E-Mail me on any of the 
  42. following networks...: 
  43.         
  44.         1@473    ComLink
  45.         1@7304   IceNet
  46.         1@7300   WWIVWeb
  47.         1@7307   WWIVNet
  48.         1@17325  WWIVLink
  49.  
  50.                                         1C7onan
  51.  
  52. 7╓7┐7╓7┐7╓7─┐7╓7┐7╓7┐7╓7┐7┌╥7┐ 7╥ 7┬7╓7┐7╓7─┐7╖ 7╥7┐ 7╓7┐7╓7┐7╓7┐  5IceNet @7304 3≡ 1WWIVNet @7307
  53. 7║7┘7╟0 7╟7┬┘7╟0 7╟0 7║0 7 ║  7║╥7│7║7│7╟7┬┘7║ 7║7│ 7╟7┤7╟7┤7╙7┐  7WWIVLink @17325 3≡ 6ComLink @473
  54. 7╨0 7╙7┘7╨7└ 7╨0 7╙7┘7╙7┘7 ╨  7╙╨7┘7╙7┘7╨7└ 7╙7┘7╨7┘ 7╙7┘7╙7┘7╙7┘  17o3-255-66o6 3≡ 2WWIVWeb @73000
  55.  
  56. 
  57. 27╓7┐7╓7┐7╓7─┐7╓7┐7╓7┐7╓7┐7┌╥7┐ 7╥ 7┬7╓7┐7╓7─┐7╖ 7╥7┐ 7╓7┐7╓7┐7╓7┐  5IceNet @7304 3≡ 1WWIVNet @7307
  58. 37║7┘7╟0 7╟7┬┘7╟0 7╟0 7║0 7 ║  7║╥7│7║7│7╟7┬┘7║ 7║7│ 7╟7┤7╟7┤7╙7┐  7WWIVLink @17325 3≡ 7ComLink @473
  59. 47╨0 7╙7┘7╨7└ 7╨0 7╙7┘7╙7┘7 ╨  7╙╨7┘7╙7┘7╨7└ 7╙7┘7╨7┘ 7╙7┘7╙7┘7╙7┘  17o3-255-66o6 3≡ 5WWIVWeb @73000
  60. 5
  61. 6
  62.