Forums Scripts & Popups How would I make an uptime continue?

on *:text:!uptime*:#:{
  set %target $iif($2,$2,$mid(#,2-))
  set %channel #
  uptime 
}

alias uptime {
  sockclose uptime
  sockopen uptime nightdev.com 80
}

on *:sockopen:uptime:{
  if ($sockerr) { sockclose $sockname | halt }
  sockwrite -n $sockname GET /hosted/uptime.php?channel= $+ %target HTTP/1.1
  sockwrite -n $sockname Host: www.nightdev.com 
  sockwrite -n $sockname $crlf
}

on *:sockread:uptime:{
  if ($sockerr) { sockclose $sockname | halt }
  var %data
  sockread %data
  tokenize 32 %data
  if ($1 isnum) && ($2) { msg %channel %target has been online for $1- }
  elseif (%data == The channel is not live.) msg %channel %target is currently not online.
}

on *:sockclose:uptime:{ 
  unset %channel
  unset %target
}

on *:TEXT:!blacklist add*:#: {
  if ($nick isop #) {
    set %blacklist. $+ $$3- $+ . $+ $chan On
    msg # $$3- has been added to my blacklist, anyone using $$3- will be timed out for 10 minutes.
  }
  else {
    msg # Sorry $nick $+ , you do not have permission to add words to the blacklist
  }
}
on *:TEXT:!blacklist del*:#: {
  if ($nick isop #) {
    unset %blacklist. $+ $$3- $+ . $+ $chan On
    msg # $$3- Has been removed from the blacklist
  }
  else {
    msg # Sorry $nick $+ , you do not have permission to remove words from my blacklist
  }
}
on *:TEXT:*:#: {
  if ($nick isop #) return
  if ($read($chan $+ regs.txt,nw,$nick)) { return }
  var %i = 1
  while (%i <= $0) {
    if ($($+(%,blacklist.,$gettok($1-,%i,32),.,#),2)) {
      msg # $nick --> Don't use that word. FailFish [Timeout]
      msg # .timeout $nick 600
      break
    }
    inc %i
  }
}
}