Liber's auto2

alias readAUTO() { return $readini(auto.ini,$network,$prop) }
alias f4 {
  if ($read(auto.ini, w, $chr(91) $+ $network $+ $chr(93))) {
    if ($readauto().nick) nick $readauto().nick
    if ($readauto().nickpw) msg NickServ identify $readauto().nickpw
    if ($readauto().join) join $readauto().join
    if ($readauto().operlogin && $readauto().operpw) oper $readauto().operlogin $readauto().operpw
    echo -a Auto finished
  } 
  else { echo -a  $+ $network not found }
}