home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / IMA001.ZIP / IMA001.MOD < prev   
Encoding:
Text File  |  1995-06-17  |  3.7 KB  |  90 lines
  1. Ima Moron #1 @10331
  2. Fri Jun 16 12:14:26 1995
  3. ┌───────────────────────────────────────────────────────────Filo─header─(c)──┐
  4. │ Mod Name:       IMA001.424              Author:  Ima Moron 1@10331 WWIVnet │
  5. │ Difficulty:     Simple                  Date:    June 16, 1995             │
  6. │ WWIV Version:   4.24                                                       │
  7. │ Files Affected: MMENU.C, LILO.C                                            │
  8. │ Description:    Displays user ratio status and enforces post ratios over   │
  9. │                 the chains. Options during installation are in the code    │
  10. │                 comments.                                                  │
  11. │                                                                            │
  12. └────────────────────────────────────────────────────────────────────────────┘
  13.  
  14. More Info: Originally known as the FORCPOST.MOD by Dr. Schizophrenic #1 @6955
  15. dated Apr 11 05:24:41 1992, updated throughout the litany of versions of
  16. WWIV by Ima Moron 1@10331 WWIVNet. Enough of the credits. You have a five
  17. user logon option before hitting the new users with the chain ratio. Remove
  18. marked lines below if you wish to immediately initiate the forced post
  19. ratio over the chains and have the user ration info displayed at first
  20. user logon.
  21.  
  22.  
  23.  Step 1)  Back up your source code!
  24.  
  25.  Step 2)  Open MMENU.C
  26.  
  27.  Step 3) Search for " pl(get_string(8)); ", without the quotes. Just below
  28.          this is " case '.': ", insert the case '.': below, delete the old
  29.          case '.':
  30.  
  31. /*++*/  case '.':    /* Begin of forcpost mod */
  32. /*++*/     helpl=26;
  33. /*++*  if (thisuser.logons > 5) {   /* This is the line you remove or change */
  34. /*++*  if (!(thisuser.exempt & exempt_post))
  35. /*++*/ if ((syscfg.post_call_ratio>0.0001) && (post_ratio()<syscfg.post_call_ra
  36. tio)) {
  37. /*++*/  nl();
  38. /*++*/  nl();
  39. /*++*/  sprintf(s,"1Your post/call ratio is2 %-5.3f1.You need a ratio of 2%-5.3f1 to0
  40.  play onliners.",
  41. /*++*/  post_ratio(), syscfg.post_call_ratio);
  42. /*++*/  pl(s);
  43. /*++*/  nl();
  44. /*++*/ return;
  45. /*++*/      }
  46. /*++*/      }    /* Remove this line if you removed the one above. */
  47. /*++*/  write_inst(INST_LOC_CHAINS,0,INST_FLAGS_ONLINE);
  48. /*++*/  existprint(get_string(1030));
  49. /*++*/  do_chains();
  50. /*++*/  break;  /* End of forcpost mod, mmenu.c */
  51.  
  52. /* == */  case '$':
  53.  
  54.  
  55.   Step 4) Open LILO.C
  56.  
  57.   Step 5) Search for " get_string(1171) ", without the quotes.
  58.  
  59. /* == */    npr("%s%d\r\n",get_string(1171),instance);
  60. /* == */    nl();
  61. /*++*/    nl();
  62. /*++*/  if (thisuser.logons > 5) {   /* Remove if you want to display the user 
  63. ratio information at logon */
  64. /*++*/  if (thisuser.exempt & exempt_post)
  65. /*++*/  prt(1,"2Your Post/Call Ratio :1 You are exempt from Post/Call ratios.")0;
  66. /*++*/  if (!(thisuser.exempt & exempt_post))
  67. /*++*/    npr("2Your Post/Call Ratio  :1 %-5.3f2  System Requirement:1 %-5.3f",0
  68. /*++*/    post_ratio(), syscfg.post_call_ratio);
  69. /*++*/  nl();
  70. /*++*/  if (thisuser.exempt & exempt_ratio)
  71. /*++*/ prt(1,"2Your Up/Dowload Ratio:1 You are exempt from Up/Download ratios.")0;
  72. /*++*/  if (!(thisuser.exempt & exempt_ratio))
  73. /*++*/ npr("2Your Up/Download Ratio:1 %-5.3f2 System Requirement:1 %-5.3f",0
  74. /*++*/   ratio(), syscfg.req_ratio);
  75. /*++*/  nl();
  76. /*++*/  nl();
  77. /*++*/   }  /* Remove if you want to display ratio information immediately */
  78.  
  79. /* == */    if (thisuser.forwardusr) {
  80. /* == */      if (thisuser.forwardsys) {
  81.  
  82.   Step 6)  Run Make, should be warning and error free.
  83.  
  84.   !!REMEMBER!! If you "make it", you're responsible for it! I assume no
  85.   responsibility for your installing this mod. Please send comments to
  86.   1@10331 WWIVNet 1@9661 Icenet concerning this mod.
  87.  
  88.   {END}
  89.  
  90.