irchainscriptz commented on a Page, Give Of The Day  -  Feb 23, 2012

Hey had a friend do one err0r from TG007 with also the time remaining!! only thing you have to add your room name!!

1.
alias giveaway {

 2.
  sockclose give | sockopen give www.giveawayoftheday.com 80

 3.
}

 4.
on *:sockopen:give: {

 5.
  if ($sockerr) { echo -s $sockname error | sockclose give }

 6.
  else {

 7.
    sockwrite -n $sockname GET / HTTP/1.1

 8.
    sockwrite -n $sockname Host: giveawayoftheday.com

 9.
    sockwrite -n $sockname $crlf

 10.
  }

 11.
}

 12.
on *:sockread:give: {

 13.
  var %give.temp

 14.
  sockread %give.temp

 15.
  if ($regex(%give.temp,/<title>(.*)<\/title>/)) { set %giveaway.title $regml(1) }

 16.
  if ($regex(%give.temp,/<a href=\"http:\/\/www.giveawayoftheday.com\/(.*?)\/\">/)) { set %giveaway.link $regml(1) }

 17.
  if ($regex(%give.temp,/(.*)<!--\/mfunc-->(.*)<\/p>/)) { set %giveaway.time $regml(1) | msg $+($chr(37),$chr(35),Room Name Here) Free Giveaway of the Day: $htmlfree($remove(%giveaway.title,Giveaway of the Day - free licensed software daily.)) | msg $+($chr(37),$chr(35),Room Name Here) http://www.giveawayoftheday.com/ $+ %giveaway.link $+ / | msg $+($chr(37),$chr(35),ROOM Name Here) Time remaining : %giveaway.time | sockclose $sockname  }

 18.
}

 19.
alias -l htmlfree {

 20.
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;n&deg;,&quot;&#8217;)

 21.
  return %x

 22.
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.