_____     _                  _     _              _    ___
       |_   _|_ _(_) ___  _ __      | |__ | |__  ___     / |  / _ \
         | | | '_| |/ _ \| '_ \     | '_ \| '_ \/ __|    | | | | | |
         | | | | | | (_) | | | |    | |_) | |_) \__ \    | |_| |_| |
         |_| |_| |_|\___/|_| |_|    |____/|____/|___/    |_(_)\___/

                        © 1994/98 by Paul Spijkerman
                             All Rights Reserved


     Update from V1.11 to V1.12


     Just a few things I needed :)



     Utils:   BBS
     Doors:   
     Scripts: 
     Cfg:     


    -Added a simple "mailing list" function to the BBS.
     When you give a username when writing a message, the
     BBS will check if there is a file with that name in
     the directory "Trion:".
     If there is such a file, the message is send to all
     people in the file.

     The file has the following format:
     If the section has an E-mail flag:

     "recipient name"     "E-mail address"

     If the section has no E-mail flag (just netmail):

     "recipient name"     "fidostyle nodenumber"

     Note that if there are spaces in a name or address it has
     to be places between "", because only 2 arguments on a
     line are accepted.


    -Changed the BBS a little bit so it sends the CPS of the
     last send file to a door, if a file was downloaded from
     a door. Here follows a little modified TestDownload()
     function from the DemoDoor suplied in the main archive:




void TestDownload(struct DoorIO *pd, struct ADS_Data *pp)
{
   UWORD cps;
   int   result;

   nprintf(pd, "Let's mark the startup-sequence\r\n");

   /* mark as much files as needed before calling download */

/* MarkFile(pp , "s:startup-sequence" ); */
   MarkFile(pp , "dh2:hal9002.lha" );

   Delay(100);

   nprintf(pd, "Here it comes\r\n");
   result = Download( pp );

   /* 0=OK, 1=Err, -1,-2=trouble with msgs */

   nprintf(pd, "\nresult = %d\n",  result);

   if (result == 0){
      cps = pp->BBSMsg->ADS_Data_word;
      nprintf(pd, "\nCPS = %d\n",  cps);
   }else{
      nprintf(pd, "\nError\n");
   }

   Delay(100);
}