Black Scorpion Posted March 12, 2007 Report Share Posted March 12, 2007 (edited) I have been working on this, and can't seem to get it right. I had it in a test code with other on text commands, and they work just fine. But, I cant seem to get the kick ban for VSIXc to work for me. alias kicknick { kicknick $1 } alias kickban { access $1 add deny $ial($1).addr %ban | kick $1 } on *:TEXT:*:#: { tokenize 32 $vstrip($1-) .if ($1 == ****) { $knick msg # You cannot say that here $nick } } Suggestions, help, slaps, any real help would be appreciated. Thank You Edited March 12, 2007 by Wiley E. Link to comment Share on other sites More sharing options...
Guest X-Fusion Posted March 12, 2007 Report Share Posted March 12, 2007 (edited) alias kicknick { kicknick $1 } alias kickban { access $1 add deny $ial($1).addr %ban | kick $1 } on *:TEXT:*:#: { tokenize 32 $vstrip($1-) .if ($1 == ****) { $knick msg # You cannot say that here $nick } } You cant call an alias within its own alias. It wont work. Also, no need for .if .. try .. alias kicknick { kick # $nick Don't use that word! } alias kickban { access # add deny $address($nick,1) %ban | kicknick } on *:TEXT:*:#:{ tokenize 32 $vstrip($1-) if ($1 == wordhere) { var %ban = 10 kickban } } } Something like that. Something real quick strewn together. Don't see why it wouldnt work. But, if it does, reply back. Edited March 12, 2007 by X-Fusion Link to comment Share on other sites More sharing options...
Guest Travis Posted March 12, 2007 Report Share Posted March 12, 2007 (edited) $chan and # mean nothing in an alias. alias kickban { access $1 add deny $address($2,2) $3 : $+ $4- | kick $1 $2 $4- } on *:TEXT:*:#:{ tokenize 32 $vstrip($1-) if ($1 == wordhere) kickban $chan $nick 10 $1 Not Allowed } Now this is just an example. I don't like it because it only kicks if $1 is the offensive word. This also won't remove any entry they already have. Regardless, you cannot use common identifiers like $chan or $nick in an alias. A local variable in the text event wouldn't transfer to the alias either. /kickban $chan $Nick <time> <reason> in the kickban alias, now: $1 = $chan, $2 = $nick, $3 = length of ban, $4 = reason Edited March 12, 2007 by Travis Link to comment Share on other sites More sharing options...
Black Scorpion Posted March 12, 2007 Author Report Share Posted March 12, 2007 (edited) Ok, I understand what I had wrong. So, then to just do a kick i would say : if ($1 == wordhere) kicknick $chan or to ban : if ($1 == wordhere) var %ban = 10 kickban the 10 meaning 10 minutes Edited March 12, 2007 by Wiley E. Link to comment Share on other sites More sharing options...
Guest pony Posted March 12, 2007 Report Share Posted March 12, 2007 REMOTES NEW #subkick off on *:text:*:#:{ if ($nick isop $chan) return if (%sub1 isin $1-) || (%sub2 isin $1-) || (%sub3 isin $1-) || (%sub4 isin $1-) ||(%sub5 isin $1-) || (%sub6 isin $1-) || (%sub7 isin $1-) || (%sub8 isin $1-) { set -u30 %skick. [ $+ [ $nick ] ] $calc( %skick. [ $+ [ $nick ] ] + 1) if (%skick. [ $+ [ $nick ] ] == 1) { msg $chan That is not a WORD we use here in this room $nick please dont say it any more its a nasty word- first warning! } if (%skick. [ $+ [ $nick ] ] == 2) { /mode $chan -v $nick msg $chan SECOND WARNING $nick , DO NOT SAY IT AGAIN :| } if (%skick. [ $+ [ $nick ] ] >= 3) { access $chan add deny $$address($nick,1) 5 kick $chan $nick You were warned, this is not the room for that :| [5 minute ban] } } } on *:action:*:#:{ if ($nick isop $chan) return if (%sub1 isin $1-) || (%sub2 isin $1-) || (%sub3 isin $1-) || (%sub4 isin $1-) || (%sub5 isin $1-) || (%sub6 isin $1-) || (%sub7 isin $1-) || (%sub8 isin $1-) { set -u30 %skick. [ $+ [ $nick ] ] $calc( %skick. [ $+ [ $nick ] ] + 1) if (%skick. [ $+ [ $nick ] ] == 1) { msg $chan That is not a WORD we use here in this room $nick please dont say it any more its a nasty word- first warning! } if (%skick. [ $+ [ $nick ] ] == 2) { /mode $chan -v $nick msg $chan SECOND WARNING $nick , DO NOT SAY IT AGAIN :| } if (%skick. [ $+ [ $nick ] ] >= 3) { access $chan add deny $$address($nick,1) 5 kick $chan $nick You were warned, this is not the room for that :| [5 minute ban] } } } #subkick end +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ POP UPS MENU extras .Subject Kick ( $+ $group(#subkick) $+ ) ..On:{ .enable #subkick echo -t $msn.get($cid,room) 5:: 13Subject Kick On echo -t $msn.get($cid,room) 5:: 13Current Kick Words Set Are... $iif(!%sub1,echo -t $msn.get($cid,room) 13 1. 7None Set,echo -t $msn.get($cid,room) 5::13 1.8 %sub1) $iif(!%sub2,echo -t $msn.get($cid,room) 13 2. 7None Set,echo -t $msn.get($cid,room) 5::13 2.8 %sub2) $iif(!%sub3,echo -t $msn.get($cid,room) 13 3. 7None Set,echo -t $msn.get($cid,room) 5::13 3.8 %sub3) $iif(!%sub4,echo -t $msn.get($cid,room) 13 4. 7None Set,echo -t $msn.get($cid,room) 5::13 4.8 %sub4) $iif(!%sub5,echo -t $msn.get($cid,room) 13 5. 7None Set,echo -t $msn.get($cid,room) 5::13 5.8 %sub5) $iif(!%sub6,echo -t $msn.get($cid,room) 13 6. 7None Set,echo -t $msn.get($cid,room) 5::13 6.8 %sub6) $iif(!%sub7,echo -t $msn.get($cid,room) 13 7. 7None Set,echo -t $msn.get($cid,room) 5::13 7.8 %sub7) $iif(!%sub8,echo -t $msn.get($cid,room) 13 8. 7None Set,echo -t $msn.get($cid,room) 5::13 8.8 %sub8) } ..Off:.disable #subkick | echo -t $msn.get($cid,room) 10 Subject Kick Off ..set ...change %sub1 1:set %sub1 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub1 ...change %sub2 2:set %sub2 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub2 ...change %sub3 3:set %sub3 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub3 ...change %sub4 4:set %sub4 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub4 ...change %sub5 5:set %sub5 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub5 ...change %sub6 6:set %sub6 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub6 ...change %sub7 7:set %sub7 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub7 ...change %sub8 8:set %sub8 $$?="Enter Word To Kick For - With *Wildcards*:" | echo -t $msn.get($cid,room) 10 Kick Word/Subject Set As 13 %sub8 ..Unset All Words ...YES:unset %sub* | echo -t $msn.get($cid,room) 10 All Kick Words/Subjects Cleared ..set words are ...%sub1 , %sub2 , %sub3 , %sub4 , %sub5 , %sub6 , %sub7 , %sub8:/echo -a $active $chan Not my work just edited a little from me worked good for me in msn days good luck Ok, I understand what I had wrong. So, then to just do a kick i would say : if ($1 == wordhere) kicknick $chan or to ban : if ($1 == wordhere) var %ban = 10 kickban the 10 meaning 10 minutes also use $1- not $1 == frist word in the sentance $1- == all words including the frist word example if 333 was the word to kick for 333 you mean it would kick you mean 333 it wouldnt but if you used $1- it would kick when ever and were ever 333 was said it would warn then kick ect... im trierd so i think im explaing it right anyways good luck Link to comment Share on other sites More sharing options...
Black Scorpion Posted March 14, 2007 Author Report Share Posted March 14, 2007 (edited) Thanks everyone. This code seems to work best for what I want to create : alias kicknick { access $1 add deny $address($2,2) $3 : $+ $4- | kick $1 $2 $4- } on *:TEXT:*:#:{ tokenize 32 $vstrip($1-) if ($1- == ***) kicknick $chan $nick 0 $1 Not Allowed } After a few tests, i oculd not edit to just kick and not ban. I will use this snippet for ban deny, and wil try to make it just kick. I just seem to have an issue with kicknick. I am gfoing to try and edit the ban time, but if anyone can lend a hand..I'll have a pepsi for you:D What I want is to filter a few words and kick for a few and then ban for some. I really do not want a warning system. I have the filter complete, and functional. Now the bans, but I just can't get it to do a simple kick. THNX! Edited March 14, 2007 by Wiley E. Link to comment Share on other sites More sharing options...
IRCx Posted March 14, 2007 Report Share Posted March 14, 2007 (edited) Thanks everyone. This code seems to work best for what I want to create : alias kicknick { access $1 add deny $address($2,2) $3 : $+ $4- | kick $1 $2 $4- } on *:TEXT:*:#:{ tokenize 32 $vstrip($1-) if ($1- == ***) kicknick $chan $nick 0 $1 Not Allowed } After a few tests, i oculd not edit to just kick and not ban. I will use this snippet for ban deny, and wil try to make it just kick. I just seem to have an issue with kicknick. I am gfoing to try and edit the ban time, but if anyone can lend a hand..I'll have a pepsi for you:D What I want is to filter a few words and kick for a few and then ban for some. I really do not want a warning system. I have the filter complete, and functional. Now the bans, but I just can't get it to do a simple kick. THNX! on *:TEXT:*:#:{ tokenize 32 $Vkick($1-) if ($1- isin $read text/kickword.txt) { kick # $nick } elseif ($1- isin $read text/banword.txt) { access # add deny $nick | kick # $nick } } alias Vkick { var %a, %b = $regsub($1-,/^VSIXc\|\|[^>]+\|\|[^>]+\|\|[^>]+\|\|* :,,%a) | return %a } put a kickword.txt and a banword.txt in a file called text , put this file in mirc directorie should work dunno if this is what you r looking for Edited March 14, 2007 by IRCx Link to comment Share on other sites More sharing options...
Guest Travis Posted March 14, 2007 Report Share Posted March 14, 2007 alias kicknick { if (-* !iswm $1) || ($len($1) > 3) halt if (b isin $1) access $2 add deny $address($3,2) $4 : $+ $5- if (k isin $1) kick $2 $3 $iif(b isin $1,$5-,$4-) } on *:TEXT:*:#:{ tokenize 32 $vstrip($1-) if ($1- == ***) kicknick -bk $chan $nick 0 $1 Not Allowed } now you can say kicknick -b to only ban, -k to only kick or -kb to kick and ban. Ok, if ($1- == ****) This says, if the whole text line == ****. Do you understand? The whole line has to exactly match ****. You would probably want to say isin or something. if (**** isin $1-) would be more what you want. IRCx would this work? if ($1- isin $read text/kickword.txt) From my experience this would check to see if $1- is in a random line of kickword.txt. But I have never written a badword kick, nor do I use text files in protects, so I don't know, which is why I ask. Link to comment Share on other sites More sharing options...
Guest X-Fusion Posted March 14, 2007 Report Share Posted March 14, 2007 Thats the same thing I asked earlier Travis. I'm used to using $read(filename.txt,line). Link to comment Share on other sites More sharing options...
IRCx Posted March 14, 2007 Report Share Posted March 14, 2007 IRCx would this work? if ($1- isin $read text/kickword.txt) From my experience this would check to see if $1- is in a random line of kickword.txt. But I have never written a badword kick, nor do I use text files in protects, so I don't know, which is why I ask. yes , i just tested the thing i posted myself and it works Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now