All pastes #808260 Raw Edit

lololanon

public text v1 · immutable
·published 2007-12-07 12:26 UTC
rendered paste body
ON *:TEXT:*:#:{
  ; Set Channel(s) above.
  ;///////////////////////////////////////////////////////////////////
  ;///
  ;///   FTPRush Settings
  ;///
  ;///////////////////////////////////////////////////////////////////
  ; FTP Site Names - Source and destination
  var %ftp.site.src   = 
  var %ftp.site.dest  = 

  ; FTP -> Source and destination paths
  var %ftp.path.src   = /TV-XVID/
  var %ftp.path.dest  = /TV-XViD/

  ; What window to use in FTPRush
  var %ftp.window     = 12


  ; Retry count - Use with 'Complete Tag'.
  var %ftp.retry.cnt  = 25

  ; Complete Tag on Destination. (Use PERL - RegEx Patterns)
  var %ftp.done.tag   = ([^\w]*100%[^\w]*)|([^\w]*-\sCOMPLETE\s\)[^\w]*)|([^\w]*-\sCOMPLETE\s-[^\w]*)

  ; Folders that don't have or need completion tag.
  var %ftp.dir.nosfv  = Sample,Subs

  ;///////////////////////////////////////////////////////////////////
  ;///
  ;///   Settings / mIRC / Release
  ;///
  ;///////////////////////////////////////////////////////////////////
  ; Trigger only on these Bots - Seperate items by: comma
  var %Bots.Allowed = 

  ; Ignore Lines/Spam - Seperate items by: |
  var %CMD.Trigger    = NEW|COMPLETE|TV-XVID
  var %CMD.Ignore     = XXX|

  ; Release Groups Stuff - Seperate items by: comma                  
  var %Grps.Allowed   = LOL,YesTV,REViSiON,Caph,REMAX,WPi,iHT,XOR,BiA,ANGELiC,OMiCRON
  var %Grps.Banned2   = 
  ;///////////////////////////////////////////////////////////////////
  ;///
  ;///   Don't touch below ... unless you know what you are doing.
  ;///
  ;///////////////////////////////////////////////////////////////////
  var %msg = $strip($1-)
  ;if (%AUTO_ON_MP3_1_ == 1) {
  if (((%Bots.Allowed == $null) || ($count($nick, [ %Bots.Allowed ] ) > 0)) && ($count(%msg, [ %Grps.Allowed ] ) == 1) && ($count(%msg, [ %Grps.Banned2 ] ) == 0)) {
    var %RegEx.Release = (?i)( $+ %CMD.Trigger $+ )[^a-z].*?(([a-z0-9]+[_.\-\(\)]{1,3})+[a-z0-9]*[-][\w]{2,})([\w\/]*|$)
    var %RegEx.Ignore  = (?i)( $+ %CMD.Ignore $+ )

    if (((%CMD.Ignore == $null) || ($regex(%msg, %RegEx.Ignore) > 0)) && ($regex(%msg, %RegEx.Release) > 0)) {

      var %release = $regml(2) $+ $regml(4)
      if (%release != %Last.Release) {
        set %Last.Release %release

        ; Check if it is a sample/subs we are sending.
        if ($count($regml(4), [ %ftp.dir.nosfv ] ) > 0) { 
          ; If it is a sample then there is no reason to use Retry/Complete-Tag
          var %ftp.retry.cnt  = 0
          var %ftp.done.tag   = $null
        }
      }

      ;echo $timestamp 4AutoTrading >> From:[8 $+ %ftp.site.src $+ ] To:[8 $+ %ftp.site.dest $+ ] >>3 %release
      ;/scid 0 msg #unknown 3[-B0X-] 4FXP (5TV-XVID) %release () $timestamp () Sites: [8 $+ %ftp.site.src $+ ] To:[8 $+ %ftp.site.dest $+ ]

      /window -zk0 @AutoTrade | /aline -p @AutoTrade $timestamp From:[8 $+ %ftp.site.src $+ ] To:[8 $+ %ftp.site.dest $+ ] >>3 %release

      ; FTPRush - FXP Queue
      /dll rushmirc.dll RushScript RushApp.FTP.Transfer( $+ %ftp.window $+ , ' $+ %ftp.site.src $+ ', ' $+ %ftp.path.src $+ %release $+ ', '', ' $+ %ftp.site.dest $+ ', ' $+ %ftp.path.dest $+  %release $+ ', '', RS_DIRDES or RS_DIRSRC, 0, '', '', '', ' $+ %ftp.done.tag $+ ', $+ %ftp.retry.cnt $+ , 0, 0, 0, 0, 1, 0);


    }
  }
}
}