home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / BS01.ZIP / BS01.424 next >
Encoding:
Text File  |  1995-06-09  |  7.2 KB  |  181 lines
  1. Bull Ship #1 @11132
  2. Mon Jun 05 20:33:57 1995
  3. 0R 34 06/09 07:13 WWIVNET 4051->8421
  4. 0R 34 06/08 18:18 WWIVNet 4001->4051
  5. 0R 34 06/08 14:07 WWIVnet 4000->4001
  6. 0R 34 06/08 05:34 WWIVnet ->4000
  7. 0R 34 06/07 01:09 WWIVnet 4001->4000
  8. 0R 34 06/07 08:38 WWIVnet 2001->4001
  9. 0R 34 06/06 08:11 WWIVnet 11012->2001
  10. 0R 34 06/06 00:53 WWIVnet 11132->11012
  11. 0R 34 06/05 21:55 WWIVnet ->11132
  12. ┌────────────────────────────────────────────────────────────────────────────┐
  13. │ Mod Name      : BS01.423          Mod Author: Bull Ship 1@1     SierraLink │
  14. │ Difficulty    : █▒▒▒▒▒▒▒▒▒                              1@11132 WWIVnet    │
  15. │ WWIV Version  : 4.24                                    1@2932  IceNET     │
  16. │ Mod Date      : 6/5/95                                  1@2932  TerraNET   │
  17. │ Files Affected: BBS.C                                   1@22901 WWIVLink   │
  18. │ Description   : Phone off hook, Net Pending list, change KB to 2400        │
  19. └────────────────────────────────────────────────────────────────────────────┘
  20. ══[ Description ]═════════════════════════════════════════════════════════════
  21.  
  22. The below MOD's are the very first things I change on every new version of
  23. WWIV.  They are mostly Sysop help items.. things that will make your life
  24. easier.
  25.  
  26. Note:  None of these changes are dependent on the other, you can add or
  27.        ignore whichever changes you wish.
  28.  
  29. Features:
  30. Option of taking phone off hook when you quit BBS.  Also takes phone offhook
  31. when you view your daily logs, net logs and Z log.  Worst thing for a sysop
  32. is for his users to reach a ringing phone.
  33.  
  34. Add the "Net Pending" list to Wardial (" . ") and Callout (" / ").  I have
  35. over 75 connects, no way I can remember all those node numbers <grin>.
  36.  
  37. Change the local modem speed in the last few callers from " KB " to " 2400 ".
  38.  
  39. ══[ Legend ]══════════════════════════════════════════════════════════════════
  40.  
  41. Add the lines indicated by the comment  // added for BS01.424
  42. No existing lines of code deleted.
  43.  
  44. ══[ Step 1 ]══════════════════════════════════════════════════════════════════
  45.  
  46. Please back up your source code.  Even the best programmers make mistakes.
  47.  
  48. ══[ Step 2 ]══════════════════════════════════════════════════════════════════
  49.  
  50. To take the phone offhook when you Quit the BBS.
  51. Open BBS.C and search for  case 'Q'.  (make sure the case 'Q' you found
  52. contains "end_bbs")   Replace "case 'Q'" and "case 27:" with these case
  53. statements, or modify as shown:
  54.  
  55. (case 27 is ESCAPE)
  56.  
  57.         case 'Q':
  58.           outstr(get_string(1043));   // added for BS01.424
  59.           if (ny()) {                 // added for BS01.424
  60.             outstr(get_string(1650)); // added for BS01.424
  61.                                       // string 1650 : Exit w/phone off hook?
  62.             if (ny()) {               // added for BS01.424
  63.               holdphone(1);           // added for BS01.424
  64.               }                       // added for BS01.424
  65.             end_bbs(QUIT_LEVEL);
  66.           } else clrscrb();           // changed this line for BS01.424
  67.           break;
  68.         case 27:
  69.           outstr(get_string(1043));
  70.           if (ny()) {                 // added bracket for BS01.424
  71.             outstr(get_string(1650)); // added for BS01.424
  72.                                       // string 1650 : Exit w/phone off hook?
  73.             if (ny()) {               // added for BS01.424
  74.               holdphone(1);           // added for BS01.424
  75.               }                       // added for BS01.424
  76.             end_bbs(QUIT_LEVEL);
  77.           } else clrscrb();           // changed this line for BS01.424
  78.           break;
  79.  
  80.  
  81. Now for holding the phone for things like LISTing your daily log at WFC.
  82. in BBS.C search for "CASE 'L' and add as shown:
  83.  
  84.        case 'L':
  85.           if (ok_local()) {
  86.             holdphone(1);                   // added for BS01.424
  87.             read_status();
  88.             slname(date(), s);
  89.             print_local_file(s,status.log1);
  90.             holdphone(0);                   // added for BS01.424
  91.           }
  92.           break;
  93.  
  94. Viewing your Network logs from WFC,
  95. Then search for  CASE 'N' and again place as shown:
  96.  
  97.         case 'N':
  98.           if (ok_local())
  99.             holdphone(1);                             // added for BS01.424
  100.             print_local_file("NET.LOG","NETDAT*.LOG");
  101.             holdphone(0);                             // added for BS01.424
  102.           break;
  103.  
  104. Viewing Yesterdays log from WFC,
  105. Then search for  CASE 'Y' and again place as shown:
  106.  
  107.         case 'Y':
  108.           if (ok_local()) {
  109.             holdphone(1);                   // added for BS01.424
  110.             read_status();
  111.             slname(date(), s);
  112.             print_local_file(status.log1,s);
  113.             holdphone(0);                   // added for BS01.424
  114.           }
  115.           break;
  116.  
  117.  
  118.  
  119. Viewing your Zlog from WFC,
  120. Then search for  CASE 'Z' and again place as shown:
  121.  
  122.         case 'Z':
  123.           if (ok_local()) {
  124.             holdphone(1);                   // added for BS01.424
  125.             zlog();
  126.             nl();
  127.             getkey();
  128.             holdphone(0);                   // added for BS01.424
  129.           }
  130.           break;
  131.  
  132.  
  133. ══[ Step 3 ]══════════════════════════════════════════════════════════════════
  134.  
  135. Now to add a net pending list when doing a wardial (" . ") or when doing a
  136. callout (" / "), add the lines indicated below, and don't forget the bracket
  137. also indicated:
  138.  
  139.  
  140.         case '/':
  141.           if ((net_sysnum) && (ok_local()) && ok_modem_stuff &&
  142.               ((instance==1) || (status.net_version>=34)) &&
  143.                ((syscfgovr.com_ISR[syscfgovr.primaryport]<8) || (status.net_ver
  144. sion>=35))) {  // added " { " for BS01.424   // wordwrap
  145.             print_pending_list();                // added BS01.424
  146.             force_callout(0);
  147.           }                                      // added BS01.424
  148.           break;
  149.         case '.':
  150.           if ((net_sysnum) && (ok_local()) && ok_modem_stuff &&
  151.               ((instance==1) || (status.net_version>=34)) &&
  152.                ((syscfgovr.com_ISR[syscfgovr.primaryport]<8) || (status.net_ver
  153. sion>=35))) {  // added " { " for BS01.424   //wordwrap
  154.             print_pending_list();            // added BS01.424
  155.             force_callout(1);
  156.           }                                  // added BS01.424
  157.           break;
  158.  
  159.  
  160.  
  161. ══[ Step 4 ]══════════════════════════════════════════════════════════════════
  162.  
  163. When logging on from the local keyboard, the LASTON shows that the caller
  164. signed on from the keyboard.  To change this, edit your BBS.STR using
  165. any string editor, go to string #1042.  Change  KB  to whatever speed you'd
  166. to have shown.  I change mine to read 2400.
  167.  
  168. ══[ Step 5 ]══════════════════════════════════════════════════════════════════
  169.  
  170. Done.. compile.
  171.  
  172. ══[ Disclaimer ]══════════════════════════════════════════════════════════════
  173.  
  174. Works on mine... I'm not responsible... if you have problems email me at the
  175. net addresses above and I'll try to help.
  176. 1
  177. 2    1∙∙ ─═ 2Ship's Online 1══ 2USR 28,800 DST v.everything 1══ 2209∙274∙0621 1════╗
  178. 3    1╔═══ 72.66 gigs online 1══ 72 CD-Rom drives 1══ 7WWIV MODS/Utils/Support 1═══╝
  179. 4    1╚═══════════════ 2SierraLink: Friendliest network online 1════════════─ ∙∙
  180. 5
  181.