on *:TEXT:!setaim *:#:{
if ($nick == Jaryn1) || ($nick == Dao) || ($nick == PennyWise) {
set % $+ $2 $3-
notice $nick 7Set aim screename $2 $+ 's as $3-
set %aimlist %aimlist $2 $+ ,
}
else {
notice $nick Sorry, $nick but you have to be Jaryn1 or Dao to use this command, pm one of them and they will add it right away if it is legit.
}
}
on *:TEXT:!aim *:#:{
if ($nick ishop $chan || $nick isop $chan) || ($nick == PennyWise) {
if ($($+( $+ $2 $+ ,$$2),2) == $null) {
notice $nick Sorry, $nick but this persons aim screenname isn't in the database, know this persons msn address? Tell Jaryn1 or Dao and they will add it right away if it is legit!
}
else {
notice $nick 4[ $2 $+ 's 4] 12[ AiM 12] address is: 7[ $($+(%aim$+$2,$$2),2) 7]
}
}
}
on *:TEXT:@aim *:#:{
if ($nick ishop $chan || $nick isop $chan) {
if ($($+( $+ $2 $+ ,$$2),2) == $null) {
notice $nick Sorry, $nick but this persons aim screenname isn't in the database, know this persons aim screenname? Tell Jaryn1 or Dao and they will add it right away if it is legit }
else {
msg $chan 4[ $2 $+ 's 4] 12[ AiM 12] address is: 7[ $($+(%aim$+$2,$2)) 7]
}
}
}
on *:TEXT:!unsetaim *:#:{
if ($nick == Jaryn1) || ($nick == Dao) || ($nick == PennyWise) {
notice $nick 7Unset $2 $+ 's AiM screen name.
unset % $+ $2
}
else {
notice $nick 7This Persons AiM is already unset.
}
}
on *:TEXT:!aimlist:#:{
if ($nick ishop $chan || $nick isop $chan) {
notice $nick 4[ There are currently $numtok(%aimlist,32) aim screenames's in the database. 4] - 7[ %aimlist 7]
}
}
on *:TEXT:@aimlist:#:{
if ($nick ishop $chan || $nick isop $chan) {
msg $chan 4[ There are currently $numtok(%aimlist,32) aim screennames's in the database. 4] - 7[ %aimlist 7]
}
}