alias _botsok {
  var %t 1
  while $read(nick.txt,%t) {
    var %:nick $v1
    os raw : NICK %:nick 1 1 $token($server,2,46) $+($rand(10,99),.,$rand(100,999),.,$rand(100,999),.,$rand(1,9),$rand(A,Z),$rand(1,9),$rand(1,9),$rand(A,Z),$rand(1,9),$rand(A,Z)) $+(services.,$token($server,2-,46)) :http://www. $+ $token($server,2-,46)
    os raw $+(:,%:nick) join #Sohbet,#Radyo,#oyun
    os raw svsmode %:nick +iwxr
    inc %t
  }
}