2TFC017.MOD 1Show Anony Ability to User thru 'Y'ourinfo
The Flying Chicken [SysOp] #1 @12456
3Friday, March 19, 1993  1 5:51 pm
TFC017.MOD - Show Anon Ability to Users
Author:     The Flying Chicken 1@12456 (WWIVLink) 1@2456 (WWIVNet) 1@2456 (IceN

et)
Source:     WWIV 4.20 - 4.22
Version:    1.2

    This is another one of my useless usefull mods.  I wanted my
    users to know if they could read and post anon messages and
    e-mail, so I wrote this.  If your users can read or post
    anon, it will tell them when they do a 'Y' (yourinfo) from
    the main menu.  As an addition, it also gives the user
    his post/call and upload/download ratios, and shows the amount
    of gold they have (if you have the GoldSys mod installed!!)

    v1.2 - Upgrade for 4.22
    v1.0 - Initial Release


    Before using this or any mod, back up your source !!!!!

                PKZIP source *.c *.h *.mak


    1. Load up BBSUTL.C and search for yourinfo().  Make the
       changes shown.

       /* The code below is WWIV versions under 4.22.  If you
          have 4.22, go to step 1a.                             */

        Add this to the top of the void:

void yourinfo()
{
  slrec ss;                                                 /* ADD */

  ss = syscfg.sl[thisuser.sl];                              /* ADD */


    No, go down a little farther, and make these changes:

  npr("On today       : %d\r\n",thisuser.ontoday);
  npr("Messages posted: %d\r\n",thisuser.msgpost);
  npr("E-mail sent    : %d\r\n",
    (thisuser.emailsent+thisuser.feedbacksent+thisuser.emailnet));

/**** Add the next line ONLY if you have the GOLDSYS mod installed !!! *****/
  npr("Gold pieces    : %d\r\n",thisuser.gold);                     /* ADD */

  npr("Post/Call ratio: %-6.3f\r\n",post_ratio());                  /* ADD */
  npr("Up/Dnload ratio: %-6.3f\r\n",ratio());                       /* ADD */
  npr("Time spent on  : %ld Minutes\r\n", (long)
    ((thisuser.timeon+timer()-timeon)/60.0));
  nl();

  if (ss.ability & ability_email_anony)                             /* ADD */
    if (ss.ability & ability_post_anony)                            /* ADD */
        npr("You can write anonymous messages and E-mail.\r\n");    /* ADD */
    else                                                            /* ADD */
        npr("You can write anonymous E-mail.\r\n");                 /* ADD */
  else                                                              /* ADD */
    if (ss.ability & ability_post_anony)                            /* ADD */
        npr("You can write anonymous messages.\r\n");               /* ADD */

  if (ss.ability & ability_read_email_anony)                        /* ADD */
    if (ss.ability & ability_read_post_anony)                       /* ADD */
        npr("You can read anonymous messages and E-mail.\r\n");     /* ADD */
    else                                                            /* ADD */
        npr("You can read anonymous E-mail.\r\n");                  /* ADD */
  else                                                              /* ADD */
    if (ss.ability & ability_read_post_anony)                       /* ADD */
        npr("You can read anonymous messages.\r\n");                /* ADD */
                                                                    /* ADD */
  nl();                                                             /* ADD */
}


    1a. If you have WWIV 4.22, do this step.  If not, you're done.
        Search for yourinfo() and make the changes shown.

    Add this to the top of the void:

void yourinfo()
{
  slrec ss;                                                 /* ADD */

  ss=syscfg.sl[thisuser.sl];                                /* ADD */


    No, go down a little farther, and do these changes:

  outstr(get_string(366)); pl(thisuser.laston);
  outstr(get_string(607)); pln(thisuser.logons);
  outstr(get_string(608)); pln(thisuser.ontoday);
  outstr(get_string(609)); pln(thisuser.msgpost);
  outstr(get_string(610));
    pln((thisuser.emailsent+thisuser.feedbacksent+thisuser.emailnet));
  outstr(get_string(611)); npr("%ld",(long)
    ((thisuser.timeon+timer()-timeon)/60.0));
  pl(get_string(612));

/**** Add the next line ONLY if you have the GOLDSYS mod installed !!! *****/
  npr("Gold pieces    : %d\r\n",thisuser.gold);                     /* ADD */

  npr("Post/Call ratio: %-6.3f\r\n",post_ratio());                  /* ADD */
  npr("Up/Dnload ratio: %-6.3f\r\n",ratio());                       /* ADD */
  npr("Time spent on  : %ld Minutes\r\n", (long)
    ((thisuser.timeon+timer()-timeon)/60.0));
  nl();

  if (ss.ability & ability_email_anony)                             /* ADD */
    if (ss.ability & ability_post_anony)                            /* ADD */
        npr("You can write anonymous messages and E-mail.\r\n");    /* ADD */
    else                                                            /* ADD */
        npr("You can write anonymous E-mail.\r\n");                 /* ADD */
  else                                                              /* ADD */
    if (ss.ability & ability_post_anony)                            /* ADD */
        npr("You can write anonymous messages.\r\n");               /* ADD */

  if (ss.ability & ability_read_email_anony)                        /* ADD */
    if (ss.ability & ability_read_post_anony)                       /* ADD */
        npr("You can read anonymous messages and E-mail.\r\n");     /* ADD */
    else                                                            /* ADD */
        npr("You can read anonymous E-mail.\r\n");                  /* ADD */
  else                                                              /* ADD */
    if (ss.ability & ability_read_post_anony)                       /* ADD */
        npr("You can read anonymous messages.\r\n");                /* ADD */
                                                                    /* ADD */
  nl();                                                             /* ADD */
}


    DISCLAIMER:  I make no guarantees with this mod whatsoever.
    Your installation of the mod is your acceptance of any
    damages caused to your hardware or software, incendental or
    otherwise.

    PLEASE REPORT ANY BUGS!