rendered paste body
----------------
on *:TEXT:!addexcept*:#FastPCW: {
if ($nick isop $chan || $nick ishop $chan) {
writeini excepts.ini $2 exceptions on
/msg $chan 7 $2 14has been added to the 7exceptions list14 by7 $nick $+ 14.
} }
on *:TEXT:!delexcept*:#FastPCW: {
if ($nick isop $chan || $nick ishop $chan) {
remini excepts.ini $nick
/msg $chan 7 $2 14has been deleted from the 7exceptions list14 by7 $nick $+ 14.
} }
on *:JOIN:#FastPCW:{
if ($nick == $me) { Halt }
if ($readini(excepts.ini,$nick,exceptions == on)) { Halt }
if ($readini(autovoices.ini,$nick,autovoice == on)) mode $chan +v $nick { Halt }
set %channy $chan
set %user $nick
set %pc.msg msg $chan
sockopen pestkick www.slushpuppy.silverinterlocution.org 80
}
on *:SOCKOPEN:pestkick*:{
sockwrite -nt $sockname GET /pestcontrol.php?pestcontrol= $+ %user HTTP/1.1
sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:pestkick*:{
var %sockread
sockread %sockread
if (<b> isin %sockread) {
set %attack $gettok($htmlfree(%sockread),4,32)
set %strength $gettok($htmlfree(%sockread),8,32)
}
if (<br> isin %sockread) {
var %combat = $htmlfree(%sockread)
%pc.msg Rsn:714 %user 1¤ 7 Strength: 14 %strength 1¤ 7 Attack: 14 %attack 1¤ 7 Combat: 14 %combat
if (%combat < 95) && ($calc(%attack + %strength) < 160) { inc %kicks | ban -ku20 %channy %user 2 You don't meet reqs 95+ cmb, join #rspc for no reqs channel. 20 sec ban ¤ Noobs owned: %kicks }
sockclose $sockname | unset %combat.3 | unset %channy | unset %user | unset %attack | unset %strength | unset %pc.msg
}
}
on *:Sockclose:pestkick*:{
Sockclose $sockname
unset %combat | unset %channy | unset %user | unset %attack | unset %strength | unset %pc.msg
}
alias -l htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x }
alias -l htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x }
Raw Content Download: http://www.pastebin.ca/raw/381387
Total Paste Views: 6
paste below
on *:TEXT:!av*:#FastPCW: {
if ($nick isop $chan || $nick ishop $chan) {
writeini autovoices.ini $2 autovoice on
/mode $chan +v $2
/msg $chan 7 $2 14has been added to 7AutoVoice list14 by7 $nick $+ 14.
}
}
on *:TEXT:!delav*:#FastPCW: {
if ($nick isop $chan || $nick ishop $chan) {
remini autovoices.ini $2
/mode $chan -v $2
/msg $chan 7 $2 14has been deleted from 7AutoVoice list14 by7 $nick $+ 14.
}
}
on *:JOIN:#FastPCW:{
if ($readini(autovoices.ini,$nick,autovoice == on)) mode $chan +v $nick
}
----------------------
on *:JOIN:#FastPCW:{
if ($readini(excepts.ini,$nick,exceptions == on)) { Halt }
if ($readini(autovoices.ini,$nick,autovoice == on)) { Halt } {
if ($nick isreg $chan) {
notice $nick 4æ7,4æ5,4æ4,5æ1,5æ5,1æ8,1 7(~ 0,1 PM ----> 7 %pmnick <---- in RuneScape for voice in #FastPCW 7,1~)¤ 4,1 5,1æ1,5æ4,5æ5,4æ7,4æ4,7æ
}
}
}
on *:TEXT:!pm*:#: {
if ($nick isop $chan) || ($nick ishop $chan) {
msg #FastPCW 4æ7,4æ5,4æ4,5æ1,5æ5,1æ8,1 7(~ 0,1 PM ----> 7 %pmnick <---- in RuneScape for voice in #FastPCW 7,1~)¤ 4,1 5,1æ1,5æ4,5æ5,4æ7,4æ4,7æ }
}
on *:TEXT:!setpm*:#: {
if ($nick isop $chan) || ($nick ishop $chan) {
set %pmnick $2- {
notice $nick PM ingame nick set to %pmnick
}
}
}
on *:TEXT:!reqs*:#FastPCW: {
if ($nick isop $chan) || ($nick ishop $chan) {
btb $2 5 14You don't meet reqs of7 95+ cmb14, train 4(5 min ban)3
}
}
on *:TEXT:!rsn*:#FastPCW: {
if ($nick isop $chan) || ($nick ishop $chan) {
btb $2 1 14Change your nick to 7RSN14, use 7/nick newnick4(1 min ban)3
}
}
on *:TEXT:!fail*:#FastPCW: {
if ($nick isop $chan) || ($nick ishop $chan) {
btb $2 2 14You failed to PM7 %pmnick 14ingame 4(2 min ban)3
}
}
----------------