Sound Blaster Chat mod
Saint #13 @27458
Mon Feb 22 21:05:00 1993
ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
³ Mod Name:    :  TST001.MOD          Author :  The Saint                    ³
³ Difficulty   :  basic block read    Update :  none                         ³
³ WWIV Version :  4.22                Date   :  02/21/93                     ³
³ Files Modded :  BBSUTL.C BBS.C                                             ³
³                  Optionally VARDEC.H                                       ³
³ Description  :  a nice sound blaster chat mod for those of you who want it ³
³                                                                            ³
ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

  The reason I'm doing this is 'cause I wanted one and couldn't find one 
  which would do what I wanted, so I coded this up a while back.

  Disclaimer:
	Aint My Fault I didn't break it, and I didn't install it.
	If it doesn't work I'll help but it should work, so have fun.


  now to the mod.

 open BBSUTL.C and find void reqchat(void) and replace it with this one.

void reqchat(void)
{
  int ok;
  char s[81], s1[81], s2[81],s3[81];

  nl();
  nl();
  ok=sysop2();
  if (restrict_chat & thisuser.restrict)
    ok=0;
  if (ok) {
    if (chatcall) {
      chatcall=0;
      pl("Chat request turned off.");
      topscreen();
    } else {
        topscreen();
		  sprintf(s,"%sCHAT.VOC",syscfg.gfilesdir);
		   if (exist(s))
				{
			outchr(12);
			npr2("ÄÄ SoundBlaster Chat ÄÄ");
			npr2("ÄÄ Non Abortable ÄÄ");
			sprintf(s3,"vplay %schat.voc",syscfg.gfilesdir);
		   shrink_out(s3,1,0,1,1);
		  nl();
			}  else  {
 sound(284);delay(200);sound(568);delay(200);sound(426);delay(200);npr("1.");
 sound(379);delay(200);sound(758);delay(200);sound(426);delay(200);npr("2.");
 sound(716);delay(200);sound(426);delay(200);sound(284);delay(200);npr("3.");
 sound(568);delay(200);sound(426);delay(200);sound(379);delay(200);npr("4.");
 sound(758);delay(200);sound(426);delay(200);sound(716);delay(200);npr("5.");
 sound(426);delay(200);sound(319);delay(200);sound(568);delay(200);npr("6.");
 sound(426);delay(200);sound(379);delay(200);sound(758);delay(200);npr("7.");
 sound(426);delay(200);sound(716);delay(200);sound(426);delay(200);npr("8.");
 sound(319);delay(200);sound(568);delay(200);sound(426);delay(200);npr("9.");
 sound(379);delay(200);sound(758);delay(200);sound(426);delay(200);npr("8.");
 sound(716);delay(200);sound(426);delay(200);sound(379);delay(200);npr("7.");
 sound(568);delay(200);sound(426);delay(200);sound(379);delay(200);npr("6.");
 sound(758);delay(200);sound(426);delay(200);sound(716);delay(200);npr("5.");
 sound(426);delay(200);sound(379);delay(200);sound(568);delay(200);npr("4.");
 sound(426);delay(200);sound(379);delay(200);sound(758);delay(200);npr("3.");
 sound(426);delay(200);sound(716);delay(200);sound(426);delay(200);npr("2.");
 sound(284);delay(200);sound(568);delay(200);sound(426);delay(200);npr("1.");
 sound(379);delay(200);sound(758);delay(200);sound(426);delay(200);npr("2.");
 sound(716);delay(200);sound(426);delay(200);sound(284);delay(200);npr("3.");
 sound(568);delay(200);sound(426);delay(200);sound(379);delay(200);npr("4.");
 sound(758);delay(200);sound(426);delay(200);sound(716);delay(200);npr("5.");
 sound(426);delay(200);npr("6.");     nosound();
		nl();
		}
		  chatcall=1;
        pl("1Chat call turned ON.");
        nl();
    }
  } else {
    pl("6Sysop not available.");
    nl();
    prt(2,"Is this an emergency? ");
    if (yn()) {
        prt(1,"Emgergency Chat Password ");
        mpl3(20);
        inputl(s1,20);
	  if (strcmp(s1,"CHATPW")==0)  {
/*		if (strcmp(s1,syscfg.chatpw)==0) {  */       //NOTE 1!
          topscreen();
		  sprintf(s,"%sECHAT.VOC",syscfg.gfilesdir);
		   if (exist(s))
				{
			npr2("ÄÄ SoundBlaster Emergency Chat ÄÄ");
			npr2("ÄÄ Non Abortable ÄÄ");
			sprintf(s3,"vplay %sechat.voc",syscfg.gfilesdir);
		   shrink_out(s3,1,0,1,1);
		  nl();
			}  else  {

  sound(440);delay(549);sound(494);delay(163);
  sound(523);delay(383);npr("1.");sound(440);delay(383);
  nosound();delay(383);sound(440);delay(549);npr("2.");
  sound(494);delay(163);sound(523);delay(383);sound(440);delay(383);npr("3.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("4.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("5.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("6.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("7.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("8.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("9.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("8.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("7.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("6.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("5.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("4.");
  sound(659);delay(54);sound(622);delay(54);sound(659);delay(54);npr("3.");
  sound(622);delay(54);sound(659);delay(54);sound(622);delay(54);npr("2.");
  nosound(); 
  	nl();
		}
			 chatcall=1;
          pl("1Chat request turned ON.");
          nl();
        } else {
			  sprintf(s2,"wrong chat PW %s",s);
			  sysoplog(s2);
		}
	 }
  }
}


ok. that's the mod, pretty simple and if you don't have a soundblaaster then 
it'll pay G&R's Sweet Child of Mine,  and if they have the chat PW it plays
another song, but I can't remember what it is.


ok, I stole the songs out of a mod from a long time back so don't sue me,
I just can't remember who wrote it.


now, get a copy of VPLAY, (which should have come with the soundblaster)
put it in the gfiles directory and find your favorite .voc and rename it
to CHAT.VOC and get another .VOC and rename it to ECHAT.VOC and put that
in your gfiles directory.

to change the chat password you need to recode it /* or type //CHATPW from 
the main prompt.*/

/* NOTE 1 */

	ok. if you want to have a configurable chat PW from the main prompt

open VARDEC.H

   find this line


	    char           res[30];
} configrec;


and change it to this

	    char           chatpw[11];    /* for chat password  */
	    char      	    res[19];
} configrec;


now open BBS.C   then in void mainmenu(void); find:


	if (strcmp(s,"CHAINEDIT")==0) {
      sysoplog(get_stringx(1,4));
      chainedit();
    }


and add this right after that.

    if (strcmp(s,"CHATPW")==0) {
		npr("The Current Chat Password is %s\r\n",syscfg.chatpw);
		npr("Would you like to change it? ");
		if (yn())
		  {
			input(s,10);
			strcpy(s,syscfg.chatpw);
		   }
	}

and last but not least delete the line with the CHATPW in it and uncomment
the line underneath it.