1 Server Mirc script

alias servIP { return 76.194.190.16 }
alias servPort { return 27912 }
alias servRcon { return password }

on *:TEXT:*:#:{
  if ($1 == !match) { set %udpline 0 | sockudp -k lmao $servIP $servPort ÿÿÿÿstatus | timerchdpserv 1 4 /checkuse $nick 1 | haltdef | return }
  if ($1 == !newmap) {
    if ($2 == $Null) { echo -a NO MAP NAME WAS ENTERED! }
    else { set %udpline 0 | sockudp -k lmao $servIP $servPort ÿÿÿÿstatus | timerchdpserv 1 4 /checkuse $nick 2 $2 | haltdef | return }
  }
}

alias checkuse {
  if (%udpline >= 3) { notice $1- PEOPLE ARE PLAYING | haltdef }
  if (%udpline <= 2) {
    if ($2 == 1) {
      set %pw $read(dp\passwords.txt)
      set %login $read(dp\passwords.txt)
      while (%login == %pw) { %login = $read(dp\passwords.txt) }
      sockudp -k rconn $servIP $servPort ÿÿÿÿrcon $servRcon password %pw
      sockudp -k rconn $servIP $servPort ÿÿÿÿrcon $servRcon set oppass2 %login
      sockudp -k rconn $servIP $servPort ÿÿÿÿrcon $servRcon set oppass2level 50
      notice $1 IP: $servIP $+ : $+ $servPort
      notice $1 Password: %pw
      notice $1 Login: %login
      notice $1 connect $servIP $+ : $+ $servPort $chr(59) password %pw
      unset %login | unset %pw
    }
    if ($2 == 2) {
      sockudp -k rconn $servIP $servPort ÿÿÿÿrcon $servRcon map $3
      notice $1 Map Has Been Changed To: $3
    }
  }
  unset %udpline
}
on 1:udpread:rconn:{ sockread %tr | echo -a RCON: %tr }
on 1:udpread:lmao:{ sockread %tmp | inc %udpline | echo -a $active %tmp %udpline }