All pastes #829423 Raw Edit

Someone

public text v1 · immutable
#829423 ·published 2007-12-23 03:58 UTC
rendered paste body
;commandstart

on *:TEXT:#: { /write C:\wamp\irclogs.php $chan $time  $date $nick Message: $1- }
on 1:CONNECT: { /as auth infinitybotaccount1 infinityowns | //mode $me +x | /join #DePStudios | /nick DePStudios }
on *:JOIN:#clubinfinity: { /notice $nick 0,1(9,1Join us on the web at Not Displayed 0,1)(9,1Type 0,1>info 9,1to see all of our servers0,1) | /write joined.txt $nick $time }
on *:TEXT:>commands:#: { /notice $nick 0,1User Commands:9,1 0,1>9,1site  0,1>9,1time 0,1>9,1date 0,1>9,1search 0,1>9,1prices }
on *:TEXT:>site:#: { //notice $nick 0,1L9,1ooking for web-hosting and domain sponsor! }
on *:TEXT:>time:#: { /notice $nick $time $date }
on *:TEXT:>date:#: { /notice $nick $time $date }
on *:JOIN:#DePStudios: { /notice $nick 0,1T9,1op News0,1:9,1 Welcome0,1 $nick 9,1to #DePStudios. Please Idle & Support. Looking for a web-hosting and domain sponsor. 0,1>commands 9,1to view all the commands. }
on *:TEXT:>prices:#: { /notice $nick 0,1N9,1o prices currently set. Please PM0,1 GG|DePredaTe. }
on *:TEXT:>part *:#: { if ($nick isop $chan) { /part $chan }
else { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>say *:#: {
  if ($nick isop $chan) { 
msg $chan $2-
}
else { notice $nick 9,1I'm sorry, But you must be an OP to use this command.
}
}
on *:TEXT:>join *:#: { if ($nick isop $chan) { /join $2 }
  else { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>topic *:#: { if ($nick isop $chan) { //topic $chan $2- }
  else { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>warn *:#: { if ($nick isop $chan) { /msg $2 9,1You have been warned for $3- by $nick at $time | /msg $chan 9,1 $2 has received a warning from $nick at $time for $3- }
  else { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>op *:#: { if ($nick isop $chan) { //mode $chan +o $2 } 
  ELSE { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. 
  }      
}
on *:TEXT:>deop *:#: { if ($nick isop $chan) { //mode $chan -o $2 } 
  ELSE { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. 
  }      
}
on *:TEXT:>voice *:#: { if ($nick isop $chan) { //mode $chan +v $2 } 
  ELSE { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. 
  }      
}
on *:TEXT:>devoice *:#: { if ($nick isop $chan) { //mode $chan -v $2 } 
  ELSE { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. 
  }      
}
on *:TEXT:>kick *:#: { if ($2 isop $chan) { //notice $nick You may not kick an OP! | halt }
  elseif ($nick isop $chan) { //kick $chan $2 9,1 $2 was kicked by $nick at $time | /msg $chan 9,1$2 was kicked by $nick at $time on $date }
  elseif ($nick !isop $chan) { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>ban *:#: { if ($2 isop $chan) { //notice $nick Sorry You Cannot Ban An OP | halt }
  elseif ($nick isop $chan) { //mode $chan +b $2 
  //kick $chan $2 9,1 $2 was kicked by $nick at $time }
  elseif ($nick !isop $chan) { //notice $nick 9,1I'm sorry, But you must be an OP to use this command. }
}
on *:TEXT:>unban *:#: { if ($nick isop $chan) { //mode $chan -b $2 
  //msg $2 9,1You have been unbanned by $nick }
  elseif ($nick !isop $chan) { //notice $nick 1,4 9,1I'm sorry, But you must be an OP to use this command. }
;endofcommands
;googlestart
alias google {
  sockopen google google.com 80
  %google.temp = $1-
}
on 1:sockopen:google:{
  if ($sockerr > 0) return
  sockwrite -n google $eval(GET http://www.google.com/search?hl=en&ie=UTF-8&oe=UTF-8&q=,0) $+ %google.temp $+ $eval(&btnI=I%27m+Feeling+Lucky HTTP/1.0,0)
  sockwrite -n google
}

on 1:sockread:google:{
  ;ths event has been added to in order to allow remote !google commands
  if ($sockerr > 0) return
  :nextread
  sockread %google.temp
  if ($sockbr == 0) return
  if ( Location: isin %google.temp ) {
    if ( %google.nick != $null ) {
      notice %google.nick 9,1Google0,1 $right(%google.temp,-10)
      unset %google.nick
    }
    else {
      echo 9,1Google $right(%google.temp,-10)
    }
    sockclose google | return
  }
  elseif ( did not match any documents isin %google.temp ) {
    if ( %google.nick != $null ) {
      notice %google.nick 9,1Google0,1 No match
      unset %google.nick
    }
    else {
      echo 9,1Google0,1 No match
    }
  }
  goto nextread
}


on 1:text:>search*:#:{
  %google.nick = $nick
  google $2-
}

me,12).state == 1) { g.ini all on } | else { g.ini all off }
    if ($did($dname,16).state == 1) { g.ini active on } | else { g.ini active off }
  }
}
;googleend