Forums Scripts & Popups Script question

int main()
{ 
  add_alias("slap", a_slap);
  add_alias("slap1", a_slap1);
  add_alias("slap2", a_slap2);
  add_alias("slap3", a_slap3);
  add_alias("slap4", a_slap4);
}

string defchan = "#santharia";
string defchan = "#santharia";

string slap = "upside the head with a large trout.";
string slap1 = "with a Volvo... that was clamped anyway so the driver doesn't mind.";
string slap2 = "with the back of his hand.";
string slap3 = "with a wiffle bat.";
string slap4 = "with a Cat'O'Nine tails.";

void a_slap(void)
{
  if (ArgList[1] != NULL) defchan = ArgList[1];
  if (ArgList[0] != NULL) person = ArgList[0];
  parse_command("/describe ", defchan," slaps ", person, " ", slap, "\n");
}
void a_slap1(void)
{
  if (ArgList[1] != NULL) defchan = ArgList[1];
  if (ArgList[0] != NULL) person = ArgList[0];
  parse_command("/describe ", defchan," slaps ", person, " ", slap, "\n");
}
void a_slap2(void)
{
  if (ArgList[1] != NULL) defchan = ArgList[1];
  if (ArgList[0] != NULL) person = ArgList[0];
  parse_command("/describe ", defchan," slaps ", person, " ", slap, "\n");
}
void a_slap3(void)
{
  if (ArgList[1] != NULL) defchan = ArgList[1];
  if (ArgList[0] != NULL) person = ArgList[0];
  parse_command("/describe ", defchan," slaps ", person, " ", slap, "\n");
}
void a_slap4(void)
{
  if (ArgList[1] != NULL) defchan = ArgList[1];
  if (ArgList[0] != NULL) person = ArgList[0];
  parse_command("/describe ", defchan," slaps ", person, " ", slap, "\n");
}

 

alias xslap {
  if ($1) {
    var %s
    if ($2 == 0) { %s = upside the head with a large trout. }
    elseif ($2 == 1) { %s = with a Volvo... that was clamped anyway so the driver doesn't mind. }
    elseif ($2 == 2) { %s = with the back of his hand. }
    elseif ($2 == 3) { %s = with a wiffle bat. }
    elseif ($2 == 4) { %s = with a Cat'O'Nine tails. } 
    else { %s = with nuclear warhead... }
    describe $active slaps $1 %s
  }
  else { echo 4 -a * XSLAP syntax: /xslap nick type }
}