MIRC BOT

[Alexander007]

Hey guys all over the world . I am trying with some friends to make a counter strike irc bot and at this time we have finish with the scripting but we don't know how we can connected the bot with a  cs 1.6 server . So we are asking for yours help with the problem we have now .

 

Thanks for your time .

[Cr1MsOn]

alias server1.cmd {
  sockudp -kn server1.cmd $readini(gameservers\serverlist.ini,server1,ip) $readini(gameservers\serverlist.ini,server1,port) rcon $readini(gameservers\serverlist.ini,server1,challengenumber) $+(",$readini(gameservers\serverlist.ini,server1,rcon),") $1-
}
on *:udpread:server1.cmd: {
  if ($window(@server1)) {
    if ($sockerr > 0) { return }
    :nextread
    sockread -f %server1.cmd
    if ($sockbr == 0) { return }
    if (%server1.cmd == $null) { goto nextread }
    else {
      if ($gettok(%server1.cmd,1,32) == challenge) { writeini -n gameservers\serverlist.ini server1 challengenumber $gettok(%server1.cmd,3,32) }
      if ($left(%server1.cmd,5) == l) { %server1.cmd = $remove(%server1.cmd,$left(%server1.cmd,5)) }
    }
    if (%server1.cmd == $null) { goto nextread }
    if ((Bad challenge. isin %server1.cmd) || (No challenge for your address. isin %server1.cmd)) { sockudp -kn server1.cmd $readini(gameservers\serverlist.ini,server1,ip) $readini(gameservers\serverlist.ini,server1,port) challenge rcon }
    aline -p @server1 %server1.cmd
f (%server1.checkstatus) {
      if ($gettok(%server1.cmd,1,32) == hostname:) { set %server1.lookup-host $gettok(%server1.cmd,2-,32) }
      if ($gettok(%server1.cmd,1,32) == version) { set %server1.lookup-vac $gettok(%server1.cmd,5,32) }
      if ($gettok(%server1.cmd,1,32) == tcp/ip) { set %server1.lookup-ip $readini(gameservers\serverlist.ini,server1,ip) $+ : $+ $readini(gameservers\serverlist.ini,server1,port) }
      if ($gettok(%server1.cmd,1,32) == map) { set %server1.lookup-map $gettok(%server1.cmd,3,32) }
      if ($gettok(%server1.cmd,1,32) == players) { set %server1.lookup-players $gettok(%server1.cmd,3,32) $+ / $+ $gettok($gettok(%server1.cmd,2-,40),1,32) }
      if ($gettok(%server1.cmd,1,32) == "sv_password") { set %server1.lookup-password $gettok(%server1.cmd,3,32) }
    }
    goto nextread
  }
}
alias server1.checkstatus {
  if (!%server1.checkstatus) {
    set %server1.checkstatus checking
    server1.cmd status
    server1.cmd sv_password
    timer 1 1 server1.sendstatus
  }
  else { notice $nick Busy server, try again in 2 seconds }
}
alias server1.sendstatus {
  msg %prive 14,1[4,1«0,1 Hostname:4,1 %server1.lookup-host 4,1»14,1]14,1[4,1«0,1 IP:4,1 $readini(gameservers\serverlist.ini,server1,ip) $+ : $+ $readini(gameservers\serverlist.ini,server1,port) 4,1»14,1]14,1[4,1«0,1 VAC Status:4,1 %server1.lookup-vac 4,1»14,1]14,1[4,1«0,1 Players:4,1 %server1.lookup-players 4,1»14,1]14,1[4,1«0,1 Map:4,1 %server1.lookup-map 4,1»14,1]14,1[4,1«0,1 Password:4,1 %server1.lookup-password 4,1»14,1]
  unset %server1.checkstatus %server1.lookup-host %server1.lookup-ip %server1.lookup-map %server1.lookup-players %server1.lookup-vac %server1.lookup-password
}

all you have to do is to create a folder inside the mirc bot with name gameservers and then create a txt file and save it as serverlist.ini and inside the serverlist.ini

write this

[server1]

ip=ip here

port=port

challengenumber= leave it empty

rcon=rcon password

type=ip:port

[Alexander007]

Thank you for your help ... but we have a couple a quastions to ask .

 

Firstly , how we know that the script is working fine ? Secondly , we want to add some commands to our cs 1.6 server , that the admins of our  channel can use at our cs 1.6 servers ... how we can do that ?? ( plz if you don't mind give us an example )