on *:JOIN:#teest: { if ($nick == $me) 
  msg TerrorServ !login $me JoacimerHawt
}
else { if ($nick == TerrorServ) | halt 
}
on *:TEXT:!login*:?: { if ($3 == JoacimerHawt) 
  inc %number
  /writeini aj.ini Bots %number $nick
  //echo 4 $nick has succefully logged in.
}
on *:INVITE:#: { if ($nick == TerrorServ)
  /set %channel $chan
  /msg $readini(aj.ini,Bots,$rand(1,$lines(aj.ini))) !join %channel
}
on *:PART:#: { 
if ( *TerrorServ isin $nick ) && ( $nick isin $readini(aj.ini.Bots,$nick) )
  /remini aj.ini Bots $nick
  //echo 4 $nick Has succefully logged of.
}
on :QUIT: { 
if ( *TerrorServ isin $nick ) && ( $nick isin $readini(aj.ini.Bots,$nick) )
  /remini aj.ini Bots $nick
  //echo 4 $nick Has succefully logged of.
}
on *:TEXT:!join*:?: { if ($nick == TerrorServ)
/join $2
/msg TerrorServ !joined $2 
}
on *:TEXT:!joined*:?: {
//echo 4 $nick just joined $2 
}