My Board

Code: Select all

alias wpw {
  if ($hget(whatpulse1) != $null) { hfree whatpulse1 }
  hmake whatpulse1
  set %wpwho $1-
  set %wpmethod aline -n @WhatPulse
  window -ae @WhatPulse
  if ($sock(whatpulse1).to != $null) { sockclose whatpulse1 }
  if (%wpproxy == $null) {
    sockopen whatpulse1 whatpulse.org 80
  }
  else {
    sockopen whatpulse1 %wpproxy %wpproxyport
  }
}

on *:sockopen:whatpulse1: {
  if (%wpproxy == $null) {
    sockwrite -n whatpulse1 GET /api/user.php?account= $+ %wpwho  HTTP/1.1
  }
  else {
    sockwrite -n whatpulse1 GET http://whatpulse.org/api/user.php?account= $+ %wpwho  HTTP/1.1
  }
  sockwrite -n whatpulse1 Host: whatpulse.org
  sockwrite -n whatpulse1 User-Agent: WhatPulse mIRC script
  sockwrite -n whatpulse1
}

on *:sockread:whatpulse1: {
  sockread %wptemp
  wpsockparse1 %wptemp
}

alias -l wpsockparse1 {
  if ($1 == W) {
    hadd whatpulse1 $2 $3-
  }
  if ($1- == X END) {
    %wpmethod AccountName: $hget(whatpulse1, AccountName)
    %wpmethod Country: $hget(whatpulse1, Country)
    %wpmethod DateJoined: $hget(whatpulse1, DateJoined)
    %wpmethod Homepage: $hget(whatpulse1, Homepage)
    %wpmethod LastPulse: $hget(whatpulse1, LastPulse)
    %wpmethod Pulses: $hget(whatpulse1, Pulses)
    %wpmethod TotalKeyCount: $hget(whatpulse1, TotalKeyCount)
    %wpmethod TotalMouseClicks: $hget(whatpulse1, TotalMouseClicks)
    %wpmethod AvKeysPerPulse: $hget(whatpulse1, AvKeysPerPulse)
    %wpmethod AvClicksPerPulse: $hget(whatpulse1, AvClicksPerPulse)
    %wpmethod AvKPS: $hget(whatpulse1, AvKPS)
    %wpmethod AvCPS: $hget(whatpulse1, AvCPS)
    %wpmethod Rank: $hget(whatpulse1, Rank)
    %wpmethod TeamID: $hget(whatpulse1, TeamID)
    %wpmethod TeamName: $hget(whatpulse1, TeamName)
    %wpmethod TeamMembers: $hget(whatpulse1, TeamMembers)
    %wpmethod TeamKeys: $hget(whatpulse1, TeamKeys)
    %wpmethod TeamDescription: $hget(whatpulse1, TeamDescription)
    %wpmethod TeamDateFormed: $hget(whatpulse1, TeamDateFormed)
    %wpmethod RankInTeam: $hget(whatpulse1, RankInTeam)
    %wpmethod -----------------------------------------------------
    sockclose whatpulse1
    unset %wpwho
    unset %wpmethod
    unset %wptemp
  }
}