Give Of The Day

By ICEMANxxx on Feb 23, 2012

Screenshots

Questo script annuncia nel canale il software gratis, giornaliero, messo a disposizione dal sito giveawayoftheday. Il comando !give mostra la descrizione del software nel canale, mentre il comando !giveme da il link al software tramite notice. Dovrebbe funzionare anche in lingua inglese, credo che basti sostituire it.giveawayoftheday.com con www.giveawayoftheday.com ma non l'ho verificato.

This script has announced the free software in the channel, daily, made ​​available by giveawayoftheday site. The !give shows the description of the software in the channel, while the !giveme from the link with the software on notice. It should also work in English, I think that's enough to replace with it.giveawayoftheday.com/www.giveawayoftheday.com but I have not verified.

;================================================
;  Nome: Give Of The Day
;  Scritto da: ICEMANxxx
;  WebSite: www.CrazyLand.Biz
;  Email: icemanxxx@crazyland.biz
;  Data: 23/02/2012
;  IRC: Azzurra (irc.azzurra.org)
;  Canale: #CrazyLand.Biz
;================================================ 

on *:text:!give:#: {
  set %give $chan
  sockclose give
  sockopen give it.giveawayoftheday.com 80
}

on *:sockopen:give: {
  if ($sockerr) {
    echo -s Errore connessione al Sito.
    sockclose give
  }
  else {
    sockwrite -n $sockname GET $+(/) HTTP/1.1
    sockwrite -n $sockname Host: it.giveawayoftheday.com
    sockwrite -n $sockname $crlf
  }
}

on *:sockread:give: {
  var %give.temp
  sockread %give.temp
  if (*</h1>* iswm %give.temp) { set %givetitolo $left($htmlfree(%give.temp),22) | set %givetitolo2 $remove($htmlfree(%give.temp),%givetitolo) | set %linkgive $left($htmlfree(%givetitolo2),4) }
  if (*</span>* *</p>* iswm %give.temp) { msg %give 9,1Ogni giorno un Software in Regalo con licenza Pagata!!! - %givetitolo2 - | msg %give 0,1 $htmlfree(%give.temp) | msg %give 9,1 Scrivi 4,1!giveme 9,1per avere il link al programma  }
  if (*http://it.giveawayoftheday.com/ $+ %linkgive $+ * iswm %give.temp) { set %noticelink 4,1 $remove(%give.temp,<a href=",$chr(9),$chr(34),$chr(62)) }
}
alias -l htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;n&deg;,&quot;&#8217;)
  return %x
}
on *:text:!giveme:#:{
  inc %giveme
  if ($strip($1) == !giveme) && (%giveme < 3) { /notice $nick %noticelink | /timergivemeunset1 1 4 set %giveme 0 }
  if ($strip($1) == !giveme) && (%giveme > 3) { /timergivemeunset 1 3 set %giveme 0 }
}

Comments

Sign in to comment.
irchainscriptz   -  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  
sagargulati   -  Feb 23, 2012

?????

 Respond  
BellaTaylor   -  Feb 23, 2012

Why did you add code in this post? Rather than this you can describe it more specifically.

at&t coupon

 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.