alias benimbot {
  sockopen Artiz irc.esohbet.net 6667
}
on *:sockopen:Artiz: {
  var %botum sockwrite -n Artiz
  %botum nick Artiz
  %botum user deneme ** * yok
  .timer 1 2 %botum join 0,0
  .timer 1 4 %botum join #enes

}
on *:sockread:artiz: {
  var %botum sockwrite -n Artiz
  var %hm
  sockread %hm
  tokenize 32 %hm

  if $1 == ping {
    %botum pong $2
  }
  if $2 == privmsg {
    var %kanal $3
    if %kanal == #enes {
      var %yazi $gettok($4,1,$asc(:))
      if %yazi == Selam {
        var %nick $gettok($gettok($1,1,$asc(!)),1,$asc(:))
        %botum privmsg #enes Aleyküm Selam %nick
      }
    }
  }
}

on *:start: {
.timer 1 5 benimbot
}