Emoticon Kicker

[JOhnson]

hi iv been looking for an old msn emoticon kicker that Peterj and The Gate keeper did and hell can I find it on here ... so I am hope someone remembers it and can point me in the right direction or has the code and can put it in here for me ... as always thanks for any replies on this

[err0r]

Here is one by gatekeeper http://www.tg007.net/dls/index.php?action=file&id=796

[JOhnson]

not the one I remember but will test later ... deej correct fella flood emoticon was the words I was looking for ... err0r thanks for that and as I said before I will test that later

[chain]

I had this one in a script.

 

1 
2  ;Emoticon Kicker By The Gate Keeper and Petertje
3  ;Basically works as is, fill out the amout of emots allowed,
4  ;the kick message and ban time, and enable it, and it will work fine
5 
6  ;code begins here
7  menu * {
8    -
9    Emoticon Kicker
10   .$iif(%emotkick == on,$style(2)) Turn On : set %emotkick on
11   .$iif(%emotkick != on,$style(2)) Turn Off : unset %emotkick
12   .-
13   .Amount of Emots allowed [ $+ %emotcount $+ ]
14   ..Change : set %emotcount $$?="Enter the max amount of emoticons allowed before kick is activiated"
15   .Kick Message
16   ..View : echo -at Emoticon Kick Message $chr(44) %emotmsg
17   ..Change : set %emotmsg $$?="Enter message for emotion kicker"
18   .Ban Time [ $+ %emotban $+ ]
19   ..Change : set %emotban $$?="Enter the ban time for emoticon kicker"
20 }
21
22 on @*:TEXT:*:*: emotkick $1-
23 on @*:ACTION:*:#: emotkick $1-
24 on @*:NOTICE:*:*: emotkick $1-
25 alias emotkick {
26   if (%emotkick == on) {
27	 if ($emotcount($1-) > $iif(%emotcount,%emotcount,10)) {
28	   access $iif($chan ischan,$chan,$comchan($nick,1)) add deny *! $+ $ial($nick).addr $iif(%emotban,%emotban,60) : Emoticon Kicker
29	   kick $iif($chan ischan,$chan,$comchan($nick,1)) $nick %emotmsg (Access ban set for %emotban minutes)
30	 }
31   }
32 }
33 alias emotcount {
34   var %emolist /<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/sad.png' class='bbc_emoticon' alt=':(' />-?)(p|d|s|@|>|<|\||\)|\(|\[)|:-#|8-(\)|\|)|\((a|b|c|d|e|f|g|h|i|k|m|n|o|p|l|s|u|w|t|x|y|z|0|6|8|@|\?|\^|\}|\{)\)/gi
35   var %emolist2 /\((pi|ci|au|so|sn|bah|mp|ap|co|mo|ip|um|yn|h5|tu|brb|xx|st|li|pl|al|\|\|)\)|(\*-|\^o|\|-|;|;-|<)\)|(\+o|:')\(|:\^\)|\*-\)|-?)o|-?)O/g
36   return $calc($regex($1-,%emolist)+$regex($1-,%emolist2))
37 }
38

[chain]

here also.

 

1
2 alias emotcount {
3   var %l1 /<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/sad.png' class='bbc_emoticon' alt=':(' />-?)[\$pds@><\|\)\(\[]|:-[#\*]|8-[\)\|]|\([a-ik-prtuw-z680@#%\^&\*\?\{\}]\)/gi
4   var %l2 /\((S|pi|ci|au|so|sn|bah|mp|ap|co|mo|ip|um|yn|h5|tu|brb|xx|st|li|pl|al|\|\|)\)|(:\^|\*-|\^o|\|-|;|;-|<<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/ohmy.png' class='bbc_emoticon' alt=':o' />)\)|(\+o|:')\(|<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/sad.png' class='bbc_emoticon' alt=':(' />-?)[oO]/g
5   return $calc($regex($1-,%l1)+$regex($1-,%l2))
6 }

[chain]

Emoticon flood prot by molson & Ice

 

1  #emoticon on
2  on *:TEXT:*:#: {
3	if ($nick == $me) || ($nick isop $chan) || ($nick isowner $chan) { return 10 }
4	else {
5	  var %t $strip($1-) , %t2 $remove(%t,+1) , %c $emoche(%t2) , %l $gdcheck , %l2 $bantime , %l3 $banmessage
6	  if (%c > %l) { /access $comchan($nick,1) add deny $ial($nick).addr %l2 : emo flood kick <img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/biggrin.png' class='bbc_emoticon' alt=':D' /> | /kick $comchan($nick,1) $nick %l3 (Access Ban: %l2 minutes) }
7	}
8  }
9  #emoticon end
10
11 menu * {
12   • Emoticon Flood Protection •
13   .$iif($group(#emoticon) == on,$style(2),$style(0)) Turn On: { .enable #emoticon | echo -at $color(red) Emoticon Enabled. | echo -at $color(green) This addon will kick a user for useing anymore then the allowed emoticon given. | echo -at $color(green) It doesn't matter if the emoticon is the same all or different. }
14   .$iif($group(#emoticon) == off,$style(2),$style(0)) Turn Off: { .disable #emoticon | echo -at $color(red) Emoticon Disabled. }
15 }
16
17 alias emoche {
18   var %x = $remove($1-,1)
19   %x = $replace(%x,$chr(40) $+ brb $+ $chr(41),+1,$chr(40) $+ yn $+ $chr(41),+1,$chr(40) $+ h5 $+ $chr(41),+1,$chr(40) $+ ci $+ $chr(41),+1,$chr(40) $+ ? $+ $chr(41),+1,$chr(40) $+ % $+ $chr(41),+1,$chr(40) $+ e $+ $chr(41),+1,$chr(40) $+ xx $+ $chr(41),+1,:^ $+ $chr(41),+1,$chr(40) $+ tu $+ $chr(41),+1,8-|,+1,$chr(316) $+ $chr(314) $+ O $+ $chr(297),+1,$chr(299) $+ o $+ $chr(296),+1,$chr(40) $+ R $+ $chr(41),+1,$chr(296) $+ $chr(291) $+ $chr(297),+1,$chr(40) $+ g $+ $chr(41),+1)
20   %x = $replace(%x,$chr(40) $+ A $+ $chr(41),+1,:@,+1,:-@,+1,8o|,+1,$chr(40) $+ so $+ $chr(41),+1,: $+ $chr(91),+1,:- $+ $chr(91),+1,$chr(40) $+ B $+ $chr(41),+1,$chr(40) $+ U $+ $chr(41),+1,$chr(40) $+ $chr(124) $+ $chr(124) $+ $chr(41),+1,$chr(40) $+ ^ $+ $chr(41),+1,$chr(40) $+ P $+ $chr(41),+1,$chr(40) $+ au $+ $chr(41),+1,$chr(40) $+ @ $+ $chr(41),+1,$chr(40) $+ 0 $+ $chr(41),+1,$chr(40) $+ pl $+ $chr(41),+1,$chr(40) $+ F $+ $chr(41),+1,: $+ $chr(40),+1,:- $+ $chr(40),+1,^o $+ $chr(41),+1,:-*,+1)
21   %x = $replace(%x,$chr(40) $+ C $+ $chr(41),+1,$chr(40) $+ co $+ $chr(41),+1,:S,+1,:-S,+1,$chr(40) $+ H $+ $chr(41),+1,:' $+ $chr(40),+1,$chr(40) $+ 6 $+ $chr(41),+1,:|,+1,:-|,+1,$chr(40) $+ & $+ $chr(41),+1,:-#,+1,: $+ $chr(36),+1,:- $+ $chr(36),+1,8- $+ $chr(41),+1,$chr(40) $+ ~ $+ $chr(41),+1,$chr(40) $+ S $+ $chr(41),+1,$chr(40) $+ 8 $+ $chr(41),+1,$chr(40) $+ T $+ $chr(41),+1,$chr(40) $+ pi $+ $chr(41),+1,$chr(40) $+ ap $+ $chr(41),+1,$chr(40) $+ al $+ $chr(41),+1)
22   %x = $replace(%x,$chr(40) $+ x $+ $chr(41),+1,$chr(40) $+ $chr(125) $+ $chr(41),+1,$chr(40) $+ Z $+ $chr(41),+1,$chr(40) $+ $chr(123) $+ $chr(41),+1,$chr(40) $+ L $+ $chr(41),+1,$chr(40) $+ I $+ $chr(41),+1,$chr(40) $+ ip $+ $chr(41),+1,$chr(40) $+ K $+ $chr(41),+1,$chr(40) $+ li $+ $chr(41),+1,$chr(40) $+ D $+ $chr(41),+1,$chr(40) $+ M $+ $chr(41),+1,$chr(40) $+ mp $+ $chr(41),+1,$chr(40) $+ mo $+ $chr(41),+1,$chr(40) $+ o $+ $chr(41),+1)
23   %x = $replace(%x,$chr(40) $+ bah $+ $chr(41),+1,$chr(124) $+ - $+ $chr(41),+1,: $+ $chr(41),+1,:- $+ $chr(41),+1,<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/biggrin.png' class='bbc_emoticon' alt=':D' />,+1,:-D,+1,<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/ohmy.png' class='bbc_emoticon' alt=':o' />,+1,:-O,+1,<img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/tongue.png' class='bbc_emoticon' alt=':P' />,+1,:-P,+1,$chr(40) $+ sn $+ $chr(41),+1,$chr(40) $+ * $+ $chr(41),+1,$chr(40) $+ st $+ $chr(41),+1,*- $+ $chr(41),+1,$chr(40) $+ N $+ $chr(41),+1,$chr(40) $+ Y $+ $chr(41),+1,$chr(40) $+ um $+ $chr(41),+1,$chr(40) $+ W $+ $chr(41),+1,; $+ $chr(41),+1,;- $+ $chr(41),+1)
24   var %y = $remove(%x,2,3,4,5,6,7,8,9,0,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,$chr(32),$chr(33),$chr(34),$chr(35),$chr(36),$chr(37),$chr(38),$chr(39),$chr(40),$chr(41),$chr(42),$chr(44),$chr(45),$chr(46),$chr(47),$chr(58),$chr(59),$chr(60),$chr(61),$chr(62),$chr(63),$chr(64),$chr(91),$chr(92),$chr(93),$chr(94),$chr(95),$chr(96),$chr(123),$chr(124),$chr(125),$chr(126),$chr(127),$chr(128),$chr(129),$chr(130),$chr(131),$chr(132),$chr(133),$chr(134),$chr(135),$chr(136),$chr(137),$chr(138),$chr(139),$chr(140),$chr(141),$chr(142),$chr(143))
25   %y = $remove(%y,$chr(144),$chr(145),$chr(146),$chr(147),$chr(148),$chr(149),$chr(150),$chr(151),$chr(152),$chr(153),$chr(154),$chr(155),$chr(156),$chr(157),$chr(158),$chr(159),$chr(160),$chr(161),$chr(162),$chr(163),$chr(164),$chr(165),$chr(166),$chr(167),$chr(168),$chr(169),$chr(170),$chr(171),$chr(172),$chr(173),$chr(174),$chr(175),$chr(176),$chr(177),$chr(178),$chr(179),$chr(180),$chr(181),$chr(182),$chr(183),$chr(184),$chr(185),$chr(186),$chr(187),$chr(188),$chr(189),$chr(190),$chr(191),$chr(192),$chr(193),$chr(194),$chr(195),$chr(196),$chr(197),$chr(198),$chr(199))
26   %y = $remove(%y,$chr(200),$chr(201),$chr(202),$chr(203),$chr(204),$chr(205),$chr(206),$chr(207),$chr(208),$chr(209),$chr(210),$chr(211),$chr(212),$chr(213),$chr(214),$chr(215),$chr(216),$chr(217),$chr(218),$chr(219),$chr(220),$chr(221),$chr(222),$chr(223),$chr(224),$chr(225),$chr(226),$chr(227),$chr(228),$chr(229),$chr(230),$chr(231),$chr(232),$chr(233),$chr(234),$chr(235),$chr(236),$chr(237),$chr(238),$chr(239),$chr(240),$chr(241),$chr(242),$chr(243),$chr(244),$chr(245),$chr(246),$chr(247),$chr(248),$chr(249),$chr(250),$chr(251),$chr(252),$chr(253),$chr(254),$chr(255))
27   var %z = $calc(%y)
28   return %z
29 }

Edited March 29, 2012 by chain

[JOhnson]

that the one Chain ... The Gate Keeper & PetertJe emoticon kicker I losed it in my computer crash ages ago ... thanks again for that