Untitled

;###########################################################;
;    Idle #w4r(GameSurge) &  /server -m irc.w4r.us          ;
;  W4RCODE v3.6                                             ;
;      By Jewbacca & kobE                *ReadMe File*      ;
;                          ** Please Read Text Below **     ;
;###########################################################;
;                                                           ;
;********** DO NOT GIVE THIS SCRIPT TO ANYONE!! ************;
;******** FOR PRIVATE USE ONLY, NO NEWBS ALLOWED. **********;
;                                                           ;
;#######################-READ-ME-###########################;
;#######################--START--###########################;
;                                                           ;
;    *Manul*w4rCode*                                        ;
; Use /Talk <Text> to Msg in MyCode                         ;
; Use /DTalk <Coded Text> to Msg in Coded Text Normaly      ;
;;;                                                         ;
;    *Notice*w4rcode*                                       ;
; Use /Ntc <Text> to Notice in roflcode                     ;
; Use /DNtc <Coded Text> to Notice in Coded Text Normaly    ;
;;;                                                         ;
;    *Echo*w4rcode*                                         ;
; Use /See <Text> to Echo (Only U See) Text -> MyCode       ;
; Use /Dsee <Coded Text> to Echo roflcode -> Text           ;
;#######################---END---###########################;
;#######################^^^^^^^^############################;

;# |  Script Start | #;
;---------------------;

;;*[ Talk Script *];;
alias talk { msg $active $w4rcode($1-) | echo $active $timestamp [Code: $+ 2 $me $+  $+ ] $UrCode($1-) }
alias Dtalk { msg $active $UrCode($1-) }


;;*[ Notice Script ]*;;
alias ntc { notice $active $w4rcode($1-) | echo $active $timestamp [Code: $+ 2 $me $+ 2 $+ ] $UrCode($1-) }
alias Dntc { notice $active $UrCode($1-) }

;;*[ See Script ]*;;
alias See { echo $active $1- Codes To $w4rcode($1-) }
alias DSee { echo $active $1- Decodes To $UrCode($1-) }


;;*[ When Msg SomeOne, What You See ]*;;
on *:INPUT:*:{
  if (%auto-code == 1) { 
    if ($left($1,1) == /) { return 0 }
    else { 
      say $MyCode($1-) | haltdef 
      echo $active $timestamp [Code: $+ 2 $me $+  $+ ] $1-
    }
  }
}

;;*[ When Some1 Msgs You in Chan, Auto Decoder ]*;;
on ^*:TEXT:*:#:{
  if ($left($1-,3) == : $+ $chr(9) $+ :) { 
    echo $chan $timestamp < $+  $nick  $+ > $1- | haltdef
    echo $chan $timestamp [Code: $+ 4 $nick $+  $+ ] $UrCode($1-) | haltdef 
  }
}

;;*[ When Some1 PMs You, Auto Decoder ]*;;
on ^*:TEXT:*:?:{
  if ($left($1-,3) == : $+ $chr(9) $+ :) { 
    echo $nick $timestamp < $+  $nick  $+ > $1- | haltdef
    echo $nick $timestamp [Code: 4 $+ $nick $+  $+ ] $UrCode($1-) | haltdef 
  }
}

;;*[ When Some1 Notices You, Auto Decoder ]*;;
on ^*:NOTICE:*:*:{
  if ($left($1-,3) == : $+ $chr(9) $+ :) { 
    echo $iif($chan != $null,$chan,$nick) $timestamp - $+  $nick  $+ : $+ $chan $+ - $1- | haltdef
    echo $iif($chan != $null,$chan,$nick) $timestamp [Notice Code: $+ 4 $nick $+  $+ ] $UrCode($1-) | haltdef 
  }
}

;;*[ When you First load the Script ]*;;
on *:Load: { echo -a Loaded w4rcode! Please read the ReadMe on the top of the Script! }

;; The  Coder & DeCoder ;;
;; --  DO NOT EDIT!  -- ;;
alias w4rcode { return : $+ $chr(9) $+ : $+ $replace($1-,j,¡,b,¢,u,£,m,¤,x,¥,f,¦,g,§,h,ª,v,«,a,¬,k,¯,r,·,d,±,p,´,z,µ,n,¶,q,ð,l,º,y,¹,t,²,c,³,i,»,w,¾,e,¿,s,æ,o,÷,5,Ò,2,ò,0,ó,7,Ó,1,Ô,9,ô,4,õ,8,Õ,6,Ö,3,ö,&,°,%,Â,^,Ç,$,Æ,@,Ì,#,×,!,Í,*,È,$chr(40),×,$chr(41),Ñ,q,Ù,+,Ú,-,Û,=,Ü,[,Ý,],Þ,$chr(123),ß,$chr(125),á,;,ã,',å,",ç,.,í,<,ð,>,©,/,ú,?,ý,\,ù,|,û,`,ÿ,~,ü,$chr(3),®,$chr(2),¼,$chr(31),½,$chr(22),Ã,$chr(15),Å,$chr(32),::) }
alias UrCode { return $remove($replace($1-,¡,j,¢,b,£,u,¤,m,¥,x,¦,f,§,g,ª,h,«,v,¬,a,¯,k,·,r,±,d,´,p,µ,z,¶,n,ð,q,º,l,¹,y,²,t,³,c,»,i,¾,w,¿,e,æ,s,÷,o,Ò,5,ò,2,ó,0,Ó,7,Ô,1,ô,9,õ,4,Õ,8,Ö,6,ö,3,°,&,Â,%,Ç,^,Æ,$,Ì,@,×,#,Í,!,È,*,×,$chr(40),Ñ,$chr(41),Ù,q,Ú,+,Û,-,Ü,=,Ý,[,Þ,],ß,$chr(123),á,$chr(125),ã,;,å,',ç,",í,.,ð,<,©,>,ú,/,ý,?,ù,\,û,|,ÿ,`,ü,~,®,$chr(3),¼,$chr(2),½,$chr(31),Ã,$chr(22),Å,$chr(15),::,$chr(32)),: $+ $chr(9) $+ :) }
;; ^^  DO NOT EDIT!  ^^ ;;

;-------------------;
;# |  Script End | #;