Skip to content
MSN

Spec Kicker

A TG007 community discussion started by lostboyjoey.

Discussion 7 posts
Page 1 of 1
Open
Topic #4530 · 7 published posts · 756 views

#time on 
on @*:JOIN:#: { 
 if ($nick == $me) { return } 
 if ($nick isowner $chan) halt 
 if (> isin $nick) halt 
 inc -u3 %ppf. [ $+ [ $chan ] ] 
 %sn.nick = $nick 
 %sn.chan = $chan 
 if (%ppf. [ $+ [ $chan ] ] == 1) { /ctcp $nick TIME } 
 .timer.undo 1 3 /unset %sn.* 
} 
raw 908:*:{ 
 access %sn.chan add deny *! [ $+ [ $ial(%sn.nick $+ *,1).addr ] ] 60 
 kick %sn.chan %sn.nick :@ Aint gonna pay?  Then ya can't stay!!!  CHEAP ASS :D 
 .timer.ply 1 2 /splay sounds\riker.wav
} 

GateKeeper your code works AWESOME. I was wondering is there a way to add a 5 second timer before it kicks the specs? This is INSANELY fast. I been trying to add it, even asked for help on Rum's. But everything I am getting dont work. Your code must be copywrited, cause no one else seems to be able to add a 5 second timer, and we tried. Thanks again for your help.

 

Use this one its made by Rumbaar.You can change the timer to what you want but it does you give you time to see if they are specs or not.

 

menu nicklist,channel {
No Time Kick ( $+ $group(#notimekick) $+ )
.$iif($menu == nicklist,Allowed List) 
..$iif($menu == nicklist,Add) : { write allow.txt $$ial($$1 $+ *,1).addr } 
..$iif($menu == nicklist,Remove) : { write -ds $+ $$ial($$1 $+ *,1).addr allow.txt } 
.$iif($group(#notimekick) == on,$style(2),$style(0)) On: .enable #notimekick | echo -a 0,12No TIME kick $+ 0,94 On
.$iif($group(#notimekick) == off,$style(2),$style(0)) Off: .disable #notimekick | echo -a 0,12No TIME kick $+ 0,4 Off
}

#notimekick on
on ^*:JOIN:* {
if ($nick != $me) && (> !isin $nick) && ($$ial($nick $+ *,1).addr != $read(allow.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
ctcp $nick TIME
.timertime. [ $+ [ $nick ] ] $+ 1 1 10 access $!chr(37) $!+ $right($chan,-1) add DENY $$ial($nick).addr 6
.timertime. [ $+ [ $nick ] ] $+ 2 1 11 kick $!chr(37) $!+ $right($chan,-1) $nick :Non-Subscriber.
set -u12 %timertime. [ $+ [ $nick ] ]
}
}

on *:ctcpreply:*TIME*: { 
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:PART:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:QUIT:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:KICK:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
#notimekick end

Edited Aug 17, 2005 5:40 PM by Molsonâ„¢

Custom Computer

AMD Athlon 64 x2 Dual Core 5200+

Asus M2N-SLI MOB

2GB DDR2 @ 800mhz

160GB Hard Drive

NVidia GeForce 8400GS 256

 

#speckick on
on @!*:JOIN:#: { 
 if ($nick !isowner $chan) && (>* !iswm $nick) {
   inc -u2 %ppf. [ $+ [ $chan ] ] 
   set -u3 %sn.nick $nick 
   set -u3 %sn.chan $chan 
   if (%ppf. [ $+ [ $chan ] ] == 1) { /ctcp $nick TIME } 
 } 
}
raw 908:*:{
 if ($nick !isowner $comchan($nick,1)) {
   .timersk. $+ %sn.nick 1 5 { access %sn.chan add deny *! [ $+ [ $ial(%sn.nick $+ *,1).addr ] ] 60 | kick %sn.chan %sn.nick :@ Aint gonna pay?  Then ya can't stay!!!  CHEAP ASS :D }
   .timer.ply 1 2 /splay sounds\riker.wav
 }
} 
on *:PART:#: .timersk. $+ $nick off
on *:KICK:#: .timersk. $+ $knick off
on *:QUIT: .timersk. $+ $nick off
#speckick end

Try that.

Edited Aug 17, 2005 11:39 PM by OZZY_10â„¢

Gate, I noticed the coding is different and it works, but the timer does not. Its still crazy insanely fast lol. Didnt add a deny to the access list either. But damn I think that is to fast for the msn servers to voice the peeps. lol

 

Molson thanks for the coding, but I think I tried this one, and if I am correct it still boots Webtv peeps. I remember trying one that had the option to add specs to a safe list but Webtvers were getting booted also. But hell I will try it. Molson Gates thanx for the help, again.

Use this one its made by Rumbaar.You can change the timer to what you want but it does you give you time to see if they are specs or not.

 

menu nicklist,channel {
No Time Kick ( $+ $group(#notimekick) $+ )
.$iif($menu == nicklist,Allowed List) 
..$iif($menu == nicklist,Add) : { write allow.txt $$ial($$1 $+ *,1).addr } 
..$iif($menu == nicklist,Remove) : { write -ds $+ $$ial($$1 $+ *,1).addr allow.txt } 
.$iif($group(#notimekick) == on,$style(2),$style(0)) On: .enable #notimekick | echo -a 0,12No TIME kick $+ 0,94 On
.$iif($group(#notimekick) == off,$style(2),$style(0)) Off: .disable #notimekick | echo -a 0,12No TIME kick $+ 0,4 Off
}

#notimekick on
on ^*:JOIN:* {
if ($nick != $me) && (> !isin $nick) && ($$ial($nick $+ *,1).addr != $read(allow.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
ctcp $nick TIME
.timertime. [ $+ [ $nick ] ] $+ 1 1 10 access $!chr(37) $!+ $right($chan,-1) add DENY $$ial($nick).addr 6
.timertime. [ $+ [ $nick ] ] $+ 2 1 11 kick $!chr(37) $!+ $right($chan,-1) $nick :Non-Subscriber.
set -u12 %timertime. [ $+ [ $nick ] ]
}
}

on *:ctcpreply:*TIME*: { 
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:PART:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:QUIT:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
on ^*:KICK:*:{
if (!%timertime. [ $+ [ $nick ] ]) {
.timertime. [ $+ [ $nick ] ] $+ * off
unset timertime. [ $+ [ $nick ] ]
}
}
#notimekick end

Hey boss to make this safe for webtv users would I add halt to the end of (> !isin $nick) or make it look like this (>* !isin $nick) like the Gate Keeper did? Specs go flying but so do Webtv users.

 

Yes what he posted would work.

Custom Computer

AMD Athlon 64 x2 Dual Core 5200+

Asus M2N-SLI MOB

2GB DDR2 @ 800mhz

160GB Hard Drive

NVidia GeForce 8400GS 256

#speckick on
on @!*:JOIN:#: { 
if ($nick !isowner $chan) && (>* !iswm $nick) {
  inc -u2 %ppf. [ $+ [ $chan ] ] 
  set -u3 %sn. [ $+ [ $nick ] ] $true
  if (%ppf. [ $+ [ $chan ] ] < 3) ctcp $nick TIME
} 
}
raw 908:*:{
if ($nick !isowner $comchan($nick,1)) && (%sn. [ $+ [ $nick ] ]) {
  .timersk. $+ %sn.nick 1 5 kbspec $right($comchan($nick,1),-1) $ial($nick)
  .timer.ply 1 2 /splay sounds\riker.wav
}
} 
on *:PART:#: .timersk. $+ $nick off
on *:KICK:#: .timersk. $+ $knick off
on *:QUIT: .timersk. $+ $nick off
alias kbspec {
 access $chr(37) $+ $$1 add deny *! $+ $gettok($2,2,33) 60
 if ($gettok($2,1,33) ison $chr(37) $+ $1) kick $chr(37) $+ $$1 $gettok($2,1,33) :@ Aint gonna pay? Then ya can't stay!!! CHEAP ASS :D
}
#speckick end

 

try this code then if the above didn't kick/ban.