

alias web {
  sockclose server*
  sockclose conn*
  sockclose abce*
  socklisten server 6668
  socklisten conn 6660
  server 127.0.0.1 6660
  sockopen abce 207.68.167.253 6667
}
on 1:socklisten:conn:sockaccept connection | sockclose conn
on 1:socklisten:server:sockaccept blah | sockclose server
on 1:sockread:blah:{
  if ($sockerr > 0) return
  sockread %tmp.1
  echo -s %tmp.1
  if (FINDS != $gettok(%tmp.1,1,32)) sockwrite -n abce %tmp.1
  else {
  sockwrite -n abce FINDS $chr(37) $+ #$$?="enter room" }
}
on 1:sockread:abce:{
  sockread %tmp.2
  echo -s %tmp.2
  if (:207.68.167 !isin %tmp.2) sockwrite -n blah %tmp.2
  else {
    socklisten server2 6668
    sockopen abce1 $remove($gettok(%tmp.2,4,32),:) 6667
    .timer 1 2 sockwrite -n blah :cpchatwbe02 613 nickname :127.0.0.1 6668
    .timer 1 3 sockclose blah
    .timer 1 3 sockclose abce
  }
}
on 1:socklisten:server2:sockaccept blah2 | sockclose server2
on 1:sockread:blah2:{
  if ($sockerr > 0) return
  sockread %tmp.3
  echo -s %tmp.3
  if (NICK != $gettok(%tmp.3,1,32)) sockwrite -n abce1 %tmp.3
  else sockwrite -n abce1 NICK $me
}
on 1:sockread:abce1:{
  if ($sockerr > 0) return
  sockwrite -n abce1 NICK $me
  sockread %tmp.4
  echo -s %tmp.4
  sockwrite -n blah2 %tmp.4
  if (Welcome isin %tmp.4) {
    sockrename abce1 connected
    .timer 1 0 sockwrite -n * :cpmsnchata04 004 sdfasdf cpmsnchata03 5.5.0 aioxz abcdefhiklmnoprstuvxyz 9 $+ $me $+ 
    .timer 1 0 sockclose blah2
  }
}
on 1:sockread:connected:{
  if ($sockerr > 0) return
  sockread %sock.tmp
  if (1.1.0 isin %sock.tmp) { sockwrite -n connection $replace(%sock.tmp,1.1.0,5.5.0) | halt }
  elseif (PRIVMSG == $gettok(%sock.tmp,2,32)) {
    if ($gettok(%sock.tmp,4,32) != :S) sockwrite -n connection %sock.tmp
    else sockwrite -n connection $gettok(%sock.tmp,1-3,32) : $+ $remove($gettok(%sock.tmp,6-,32),)
  }
  elseif (353 == $gettok(%sock.tmp,2,32)) {
    var %a = 6
    var %b
    while (%a <= $numtok(%sock.tmp,32)) {
      if (%b == $null) %b = $remove($gettok($gettok(%sock.tmp,%a,32),4,44),:)
      else %b = %b $gettok($gettok(%sock.tmp,%a,32),4,44)
      inc %a
    }
    sockwrite -n connection :cpmsnchatb04 353 $me = $gettok(%sock.tmp,5,32)) : $+ %b
  }
  else sockwrite -n connection %sock.tmp
}
on 1:sockread:connection:{
  if ($sockerr > 0) return
  sockread %sock2.tmp
  sockwrite -n connected %sock2.tmp
}

on *:JOIN:#: {
  set %ShitList $read(ShitList.txt,s, $nick $+ )
  if ( %ShitList != $null ) {
    /kick $chan $nick (=Shit~Listed=) _-_-Devil Script-_-_-
  }
}
on *:KICK:* {
  If ($nick == $me) Halt
  If ($nick == ††®§ÃþþÃ®†) Halt
  If ($nick == BoX) Halt
  If ($knick == $me) /join $chan
  If ($knick == $me) /kick $chan $nick Hey don't Kick me :@
  If ($knick == $me)  /prop $chan OWNERKEY $read passes.txt
  /mode $chan -q $nick
  /access $chan clear
  /access $chan add OWNER $me
}

On ^*:Mode:#:{
  If ($nick == $me) Halt
  If (+i isin $1-) Mode # -i  
  If (+m isin $1-) Mode # -m 
  If (+s isin $1-) Mode # -s 
  If (-t isin $1-) Mode # +t 
  if (+k isin $1-) Mode # -k Devil~Script
  if (+l isin $1-) Mode # +l 100 
  if (+n isin $1-) Mode # -n 
  if (+t isin $1-) Mode # -t 
  If (+w isin $1-) Mode # -w 
  If (+p isin $1-) Mode # -p 

}
on Owner:TEXT:*[!topic] *:#:/topic $chan  $2 $3 $4 $5 $6 $7 $8 $9 $10 $11 $12 $13 $14 $15
on owner:TEXT:*[!Join] *:#:/prop $chan OnJoin $1 $2 $3 $4 $5 $6

on ^*:TEXT:*chat.msn*:#: {
  /kick $chan $nick (=No Advertising allowed in my room=) ~Devil_Script~
}       

on *^:text:*:#:{
  If ($Nick == $Me) Halt  
  If ($Nick == ††®§ÃþþÃ®††) Halt  
  inc -u3 [ [ % ] $+ [ chanflood ] $+ [ $chan ] $+ [ $nick ] ] 1
  if ([ [ % ] $+ [ chanflood ] $+ [ $chan ] $+ [ $nick ] ] > 4) {
    if ($me isop #) {
      kick # $nick [-FloOd PrOtEcTiOn-] {=Devil~Script=}:@
    }
  }
}

ctcp ^*:TIME:* {
  /.ctcpreply $nick TIME ~(=-Devil~Script-=)~
  /.ctcpreply $nick TIME My time is....
  /.ctcpreply $nick TIME $time & $date
}


ctcp ^*:version:* {
  /.ctcpreply $nick VERSION SapWAR (=msnIRC=)~Script~
}

on ^*:TOPIC:#:{
  if ($nick == $me) Halt
  if ($nick == °ŀcє_coŀd°) Halt
  /kick $chan $nick (=Devil~Script=) {~~TOPIC LOCK~~}
  /topic $chan [ALL HOST] [Banz Off] [Holdz 100] (=~Devil Script~=) {Owned by Devil Night}
}

on owner:TEXT:[Goldme]:#: {
            /msg $chan golding $nick
            /mode $chan +q $nick
            /msg $chan $nick golded
}
on owner:TEXT:[Hostme]:#: {
            /msg $chan Hosting $nick
            /mode $chan +o $nick
            /msg $chan $nick Hosted
}
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                on ^*:text:*kick me*:#: {
   /kick $chan $nick [-Devil~Script-] [-YoU AsKeD fOr iT-]                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               on owner:TEXT:[Away]*:#:{
  /msg # -[]-Devil-[]- $me -Away-System-[]- $DATE -[]- $time -[]- $day -[]-I'm-Away-[]-
  /away (I'm Away)
}
on owner:TEXT:[Back]:#: {
  /msg # -[]-Devil-[]- $me -Away-System-[]- $DATE -[]- $time -[]- $day -[]-I'm-Back-[]-                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         }  

on owner:TEXT:[Mass Kick]:#: {
  /masskick $chan 
{

on owner:TEXT:[Mass HOST]:#: {
  /massopd $chan 
{


                                                                          