Remote

alias sock {
  if ($1 == START) {
    sockclose phreik
    sockopen phreik 72.20.32.21 6667
  }
  elseif ($1 == CLOSE) { sockclose phreik }
  elseif ($1 == MSG) { swrite PRIVMSG # : $2- }
  elseif ($1 == WHSP) { swrite PRIVMSG $snicks : $2- }
  elseif ($1 == MODE || $1 == KICK || $1 == NOTICE) { swrite $1 # $2- }
  elseif ($1 == JOIN || $1 == PART) { swrite $1 # }
  elseif ($1 == HOP) { swrite PART $+(#,$crlf,JOIN) # }
}
alias swrite { sockwrite -n phreik $1- }
on *:sockopen:phreik:{
  swrite USER %username * * $+(:,OCX)
  swrite account %phreik.cookie
}
on *:sockread:phreik:{
  if ($sockerr) { return }
  sockread %sd | if (!%sd) { return } | tokenize 32 %sd
  if ($1 == PING) { sockwrite -tn phreik PONG $2- }
  if ($readini(data\settings.ini, $3, Spy) == Unhalt) {
    elseif ($2 == PRIVMSG) { swrite PRIVMSG %base : $timestamp $nick ( $3 ) - $remove($1-,
S e
Tahoma;0) }
    elseif ($2 == MODE) {   }
    elseif ($2 == KICK) {   }
    elseif ($2 == JOIN) {   }
    elseif ($2 == PART) {   }
  }
}



on ^*:TEXT:*:#: { if ($readini(data\settings.ini, #, Spy) == Unhalt) { swrite PRIVMSG %base : $timestamp $nick ( # ): $remove($1-,
S e
Tahoma;0) } }
On ^*ACTION:*:#: { if ($readini(data\settings.ini, #, Spy) == Unhalt) { swrite PRIVMSG %base : $timestamp -Action- $nick ( # ): $remove($1-,
S e
Tahoma;0) } }
on ^*:JOIN:#: { if ($readini(data\settings.ini, #, Spy) == Unhalt) { swrite PRIVMSG %base : $timestamp $nick Joined ( # ) } }
on ^*:PART:#: { if ($readini(data\settings.ini, #, Spy) == Unhalt) { swrite PRIVMSG %base : $timestamp $nick Parteded ( # ) } }
menu Channel {
  Spy Options
  .Set Base: set %base #
  .$iif($readini(data\settings.ini, #, Spy) = Unhalt, $Style(1)) Spy On # : $iif($readini(data\settings.ini, #, Spy) = Unhalt,gizop off Spy on #,gizop on Spy on #)
  -
}
alias gizop {
  if ($1 == on) { writeini -n data\settings.ini # $2  Unhalt | echo 3 # * $2- Enable }
  elseif ($1 == off) { writeini -n data\settings.ini # $2 halt | echo 4 # * $2- Disable }
}