Tanis003.mod, supreme chainlister mod with gold! Blinking!!!
Pull #783 @17310
Wednesday, March 3, 1993  11:22 pm
ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
³ Mod Name:    :  TANIS003.MOD        Author :  Tanis Half-Elven 1@17315     ³
³ Difficulty   :  Easy                Date   :  2/26/93                      ³
³ Files Modded :  BBSUTL1.C           WWIV Version :  4.22 (Any Really)      ³
³ Description  :  A two colum chain lister. Also a Fix to the one chain prob.³
ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  Well i got the idea for this mod one day while playing some online game. I 
dont know quite where it came from, it just poped in there. Anyway, the mod
will display the chains in two colums. The first void has the call for gold.
But if you dont have gold/dont want gold, then the second void is for you. Oh
in the first void the gold will flash red if it is zero, kinda a freebee 
alert for the leechs. 
  The second part of this mod is just to delete some stuff to keep WWIV from  
automaticly running a chain, if ther is only 1. I hate pressing '.' and it 
running a chain with out consulting me! This came from a mod Galen made.

-*-*-*A Special thanx to Galen Pathwarden. Most of this add on code is *-*-*-
-*-*-*his making, and he also is a big help!                           *-*-*-

Step 1: Back up your source, because i am not responsible for anything that
	 happens to you or your computer.

Step 2: Load BBSUTL1.C

Step 3: Search fo : void show_chains(int *mapp, int *map) 

Step 4: Delete all of void show_chains(int *mapp, int *map) 

Step 5: Put in part a if you have gold, otherwise put in part b.

/* Part A */
void show_chains(int *mapp, int *map)
{
  int abort,i,i1;
  char s[181],s1[181],ch1d[10],ch2d[10];

  if (okansi()) {
  abort=0;
  nl();
  pla("7ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»",&abort);
  pla("7º                           1Your BBS Name here!!!                             7º",&abort);
  pla("7ÌÍÍÍËÍÍÍÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍËÍÍÍÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹",&abort);
  pla("7º 3# 7º 2Gold 7º 1Programs                  7º 3# 7º 2Gold 7º 1Programs                  7º",&abort);
  pla("7ÌÍÍÍÎÍÍÍÍÍÍÎÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÎÍÍÍÎÍÍÍÍÍÍÎÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹",&abort);
  for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  if (costgold[map[i]]==0)
	  sprintf(ch1d,"6%-3d",costgold[map[i]]);
  else sprintf(ch1d,"2%-3d",costgold[map[i]]);

  sprintf(s, "7º3%2d 7º  %s 7º 1%-25.25s ",
				 i+1,ch1d,(chains[map[i]].description));
  i++;
  if (costgold[map[i]]==0)
	  sprintf(ch2d,"6%-3d",costgold[map[i]]);
  else sprintf(ch2d,"2%-3d",costgold[map[i]]);
  sprintf(s1,"7º3%2d 7º  %s 7º 1%-25.25s 7º",
				 i+1,ch2d,chains[map[i]].description);
  strcat(s,s1);
  pla(s,&abort);
  }
  pla("7ÈÍÍÍÊÍÍÍÍÍÍÊÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÊÍÍÍÍÍÍÊÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ",&abort);
} else {
  abort=0;
  nl();
  pla("+-----------------------------------------------------------------------------+",&abort);
  pla("|                           Your BBS Name here!!!                             |",&abort);
  pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  pla("| # | Gold | Programs                  | # | Gold | Programs                  |",&abort);
  pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  if (costgold[map[i]]==0)
	  sprintf(ch1d,"6%-3d",costgold[map[i]]);
  else sprintf(ch1d,"%-3d",costgold[map[i]]);

  sprintf(s, "|%2d |  %s 0| %-25.25s ",
				 i+1,ch1d,(chains[map[i]].description));
  i++;
  if (costgold[map[i]]==0)
	  sprintf(ch2d,"6%-3d",costgold[map[i]]);
  else sprintf(ch2d,"%-3d",costgold[map[i]]);
  sprintf(s1,"|%2d |  %s 0| %-25.25s |",
				 i+1,ch2d,chains[map[i]].description);
  strcat(s,s1);
  pla(s,&abort);
  }
  pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  }
  nl();
}

/* Part B */
void show_chains(int *mapp, int *map)
{
  int abort,i,i1;
  char s[181],s1[181],ch1d[10],ch2d[10];

  if (okansi()) {
  abort=0;
  nl();
  pla("7ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»",&abort);
  pla("7º                           1Your BBS Name here!!!                             7º",&abort);
  pla("7ÌÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹",&abort);
  pla("7º 3# 7º 1Programs                         7º 3# 7º 1Programs                         7º",&abort);
  pla("7ÌÍÍÍÎÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÎÍÍÍÎÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹",&abort);
  for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {

  sprintf(s, "7º3%2d 7º 1%-32.32s ",
				 i+1,(chains[map[i]].description));
  i++;
  sprintf(s1,"7º3%2d 7º 1%-32.32s 7º",
				 i+1,ch2d,chains[map[i]].description);
  strcat(s,s1);
  pla(s,&abort);
  }
  pla("7ÈÍÍÍÊÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÊÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ",&abort);
} else {
  abort=0;
  nl();
  pla("+-----------------------------------------------------------------------------+",&abort);
  pla("|                           Your BBS Name here!!!                             |",&abort);
  pla("+---+----------------------------------+---+----------------------------------+",&abort);
  pla("| # | Programs                         | # | Programs                         |",&abort);
  pla("+---+----------------------------------+---+----------------------------------+",&abort);
  for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {

  sprintf(s, "|%2d | %-32.32s ",
				 i+1,(chains[map[i]].description));
  i++;
  if (costgold[map[i]]==0)
	  sprintf(ch2d,"6%-3d",costgold[map[i]]);
  else sprintf(ch2d,"%-3d",costgold[map[i]]);
  sprintf(s1,"|%2d | %-32.32s |",
				 i+1,chains[map[i]].description);
  strcat(s,s1);
  pla(s,&abort);
  }
  pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  }
  nl();
}

Part 6: Save BBSUTL1.C

Part 7: Go to void do_chains    

Part 8: Search for "Sorry, no external programs available."
	Go down to:
  
  if (mapp==1) {
    run_chain(map[0]);
    return;

Delete this little block of code.

Part 9: Save BBSUTL1.C again, and compile.

  That's it. simple huh? Well just watch your 's in the BBS Name, they dont
count as spaces, so dont line up the |'s or º's becuase then you will come up
short when WWIV displays the line. If you have any questions, comments or 
problems with this mod, I can be reached at 1@17315 or via the WWIVLink Mod 
Discussion sub. Cya.
				   7Tanis
			       5The Half-Elven