#Screamer off
 
 
on *:input:*:{
 
  if (/ !isin $left($1,1)) { 
 
    if (! !isin $left($1,1)) {
 
      haltdef 
 
      say 15,01..:::4,1 $+ $1- $+ 15,01:::..
 
    }
 
  }
 
}
 
 
#Screamer end
 
 
 
 
#HellTalker off
 
 
on *:input:*:{
 
  if (/ !isin $left($1,1)) { 
 
    if (! !isin $left($1,1)) {
 
      haltdef 
 
      say 14,01.15,01.00,01:15,01:14,01:06,01 $+ $1- $+ 14,01:15,01:0,1:15,1.14,1.
 
    }
 
  }
 
}
 
 
#HellTalker end
 
 
 
 
#Wahoo off
 
 
on *:input:*:{
 
  if (/ !isin $left($1,1)) { 
 
    if (! !isin $left($1,1)) {
 
      haltdef 
 
      say 14,01.15,01.00,01:15,01:14,01:4,1(6,1(7,1(8,1(9,1(06,01 $+ $1- $+ 9,1)8,1)7,1)6,1)4,1)14,01:15,01:0,1:15,1.14,1.
 
    }
 
  }
 
}
 
 
#Wahoo end
 
 
 
 
#DefCon off
 
 
on *:input:*:{
 
  if (/ !isin $left($1,1)) { 
 
    if (! !isin $left($1,1)) {
 
      haltdef 
 
      say 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1«0,1 $+ $1- $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°
 
      haltdef 
 
    }
 
  }
 
}
 
 
#DefCon end
 
 
 
 
#Krewl off
 
 
on *:input:*:{
 
  if (/ !isin $left($1,1)) { 
 
    if (! !isin $left($1,1)) {
 
      haltdef 
 
      say 14©15º0°9¨4 $1- 9¨0°15º14©
 
    }
 
  }
 
}
 
 
#Krewl end
 
 
 
 
#Talker.v2 off
 
 
on *:INPUT:*: {
 
  if (/* !iswm $1) && (!$inpaste) && (!$ctrlenter) {
 
    say 14,1©15,1º0,1°4,1¨ $+ $regsubex($1-,/^(.)/g,$&
 
      $+($chr(3),03,\t,$chr(3),14)) $+ 4,1¨0,1°15,1º14,1©
 
    halt
 
  }
 
}
 
 
#Talker.v2 end
 
 
 
menu channel {
 
  Talkers
 
  .Screamer
 
  ..[On]:/enable #Screamer | msg $chan I have Enabled my Screamer Talker.
 
  ..[Off]:/disable #Screamer | msg $chan I have Disabled my Screamer Talker.
 
  ..[Test]:/echo -a 15,01..:::4,1 $+ Test $+ 15,01:::..
 
  .HellTalker
 
  ..[On]:/enable #HellTalker | msg $chan I have Enabled my HellTalker Talker.
 
  ..[Off]:/disable #HellTalker | msg $chan I have Disabled my HellTalker Talker.
 
  ..[Test]:/echo -a 14,01.15,01.00,01:15,01:14,01:06,01 $+ Test $+ 14,01:15,01:0,1:15,1.14,1.
 
  .Wahoo
 
  ..[On]:/enable #Wahoo | msg $chan I have Enabled my Wahoo Talker.
 
  ..[Off]:/disable #Wahoo | msg $chan I has Disabled my Wahoo Talker.
 
  ..[Test]:/echo -a 14,01.15,01.00,01:15,01:14,01:4,1(6,1(7,1(8,1(9,1(06,01 $+ Test $+ 9,1)8,1)7,1)6,1)4,1)14,01:15,01:0,1:15,1.14,1.
 
  .DefCon
 
  ..Delta[On]:/enable #DefCon | msg $chan DefCon Delta Achieved!! Activating Negotiationist!
 
  ..Sigma[Off]:/disable #DefCon | msg $chan A safe level of DefCon Sigma is in effect. Deactivating Negotiationist.
 
  ..Alpha[Test]:/echo -a 4,1°7,1Ø6,1±7,1Ø4,1°14,1«15,1«0,1 $+ Test $+ 15,1»14,1»4,1°7,1Ø6,1±7,1Ø4,1°
 
  .Krewl
 
  ..Be Krewl![On]:/enable #Krewl | msg $chan I am so Krewl. ;D
 
  ..DunBeKrewl[Off]:/disable #Krewl | msg $chan I'm not gonna be Krewl now.
 
  ..Krewl how?[Test]:/echo -a 14,1©15,1º0,1°9,1¨14,1 $+ Test $+ 9,1¨0,1°15,1º14,1©
 
  .Talker V2
 
  ..Talk![On]:/enable #Talker.v2 | echo -a Talker.v2 Enabled.
 
  ..DunTalk![Off]:/disable #Talker.v2 | echo -a Talker.v2 Disabled.
 
}
 

Commenting Options