Login

on ^*:LOGON:*: { 
if ($server == irc.phreik.net) { 
  if (!%phreik) { cookie update }
  ircvers FLASH1 | account %cookie 
}

alias cookie { if ($1 == update) { set %phreik $$?="Enter User Name:" $$?="Enter Your Password:" } | if ($sock(cookie)) { sockclose cookie } | sockopen cookie www.phreik.net 80 }
on *:SOCKOPEN:cookie:{ sockwrite -n $sockname $+(GET /noht/cookiegrabber.php?u=,$gettok(%phreik,1,32),&p=,$gettok(%phreik,2,32) HTTP/1.1,$crlf,Accept: */*,$crlf,Host: www.phreik.net,$crlf,Connection: close,$crlf,$crlf) }
on *:SOCKREAD:cookie:{ 
  if ($sockerr > 0) return | var %sc
  sockread %sc | if (!%sc) return | tokenize 32 %sc  
  if ($2 == VALID:) { echo 9 -s * - Login successful (Account Cookie Stored [ $4- ]) - | set %cookie $4- | account $4- }
  elseif ($2 == ERR:) { echo 4 -s  - %phreik is a invalid username or password, restart. - | unset %phreik }
}