3ntity
-
Posts
12 -
Joined
-
Last visited
Content Type
Profiles
Forums
Events
Posts posted by 3ntity
-
-
I do not even see a mass kick protection anywhere in the script.. maybe I am missing something..
It is only probably kicking when you are kicked as a revenge. The script you posted looks more like it is not for protections other than revenge and mode locking.
If you need specific protections let me know.. I will whip something together real quick.
**Auto owner access** on *:OWNER:*: { if ($opnick == $me) && ($nick != $me) { .raw access $active add OWNER *! $+ $$ial($$1 $+ *,1).addr } } **Deowner** on *:DEOWNER:#:{ if ($nick == $me) halt if ($1- == -q $me) { /hop # | .raw kick $chan $nick : :@ | .raw access # add deny *! $+ $ial($nick,1).addr 30 | var %o $rand(000000,999999) $+ $chr($r(65,200)) } | prop $chan ownerkey fd^&^%&^&vbh: $+ %o | set %okey %o } } **Kick list** #kicklist on on *:join:#: { if ($readini(kick.ini,(.raw kick,$chan),$address($nick,1))) { var %ifmatch = $ifmatch if ($me isop $chan) { raw -q KICK $chan $nick $gettok(%ifmatch,2-,32) } } } menu nicklist { Kicklist .Add: var %r | writeini -n kick.ini (.raw kick,$chan) $address($1,1) $1 %r .Remove: remini kick.ini (.raw kick,$chan) $address($1,1) } #kicklist end } **Take 1** alias masskick { .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY мugεтsu var %u, %a = 1, %r Rasengan! while ( %a <= $nick($chan,0) ) { if ( $nick($chan,%a) != $me ) { %u = $addtok(%u,$nick($chan,%a),44) } if ( $numtok(%u,44) >= 20 ) { raw -q KICK $chan %u %r | unset %u } inc %a } if ( %u !== $null ) { raw -q KICK $chan %u %r | unset %u } .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY мugεтsu .raw mode $chan +k мugεтsu .raw mode $chan +iml 1 } **Mode Lock** #modelock on on *:MODE:#:{ if ($nick == $me) return if (+ isin $1-) .mode # $replace($1-,+,-) if (- isin $1-) .mode # $replace($1-,-,+) if (+k isin $1) .mode # -k $2- if (-k isin $1) .mode # +k $2- if (+l isin $1-) .mode # +l 100 if ($me isop $chan) { .raw access # delete owner $nick | .raw access # delete owner $$address($nick,1) | .raw kick # $nick MODE LOCK :@ } } #modelock end **Revenge kick** #revengekick on alias BanProtect { .raw access $active add deny $address($nick,1) 0 } on *:JOIN:#: .raw access # add owner $address($me,1) 0 on *:KICK:#:{ if ($knick == $me) { timeraccess off hop $active .raw access # clear owner .raw access # add owner $address($me,1) 0 banprotect .raw access # add deny $nick 0 .raw kick # $nick :@ set -u3 %defconnk $nick .raw access # add owner $address($me,1) 0 } } #revengekick end **Topic lock** #topiclock on on ^*:TOPIC:#:{ if ($nick == $me) halt .kick # $nick Why you touch my topic :@ | /topic # %topic } #topiclock end } **Take 2** alias Take { .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY bds˜^&˜%&^h˜g62 set %people 1 :loop if ($nick(#,%people) == cs) { inc %people | goto loop | halt } if ($nick(#,%people) == $me) { inc %people | goto loop | halt } else { .raw kick $chan $nick(#,%people) Rasengan! } inc %people if ($nick(#,%people) == $null) { unset %people } else { goto loop } .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY bds˜^&˜%&^h˜g62 .raw mode $chan +k bds˜^&˜%&^h˜g62 .raw mode $chan +iml 1 } **Masses** Masses .Mass Kick:/masskick .massop:{ set %i $nick($active,0) | :next | if $nick($active,%i) != $me mode $active +q $nick($active,%i) %kr | dec %i | if %i > 0 goto next } .massdeop:{ set %i $nick($active,0) | :next | if $nick($active,%i) != $me mode $active -q $nick($active,%i) %kr | dec %i | if %i > 0 goto next } } - **mass kick prot** (This one doesn't really work at all.) On *:KICK:#: { /inc %nrofkicks 1 timerkick 1 6 /unset %nrofkicks if ( 4 isin %nrofkicks ) { /mode $chan +b $address if ($nick != $me) { ./kick $chan $nick 0,1Excessive Kicks Detected. } }
The mass kick prot is at the end, other than That I have a Deowner prot, Mode lock, Revenge kick and a topic lock, That's all i have as for PROTS. If you wanna post some stuff feel free to do so as I am learning and it may help.
-
for the mass kick?#groups are like events. They can't be nested in other events or aliases. I would imagine everything after that join event wouldn't work.
-
Any idea why that mass kick prot doesn't work so well? I mean someone could mass kick and it wont detect and stop the kick till the last or one before that is kicked, sometimes it doesn't kick in at all.lol
**Kick list** #kicklist on on *:join:#: { if ($readini(kick.ini,(.raw kick,$chan),$address($nick,1))) { var %ifmatch = $ifmatch if ($me isop $chan) { raw -q KICK $chan $nick $gettok(%ifmatch,2-,32) } } #kicklist end } menu nicklist { Kicklist .Add: var %r | writeini -n kick.ini (.raw kick,$chan) $address($1,1) $1 %r .Remove: remini kick.ini (.raw kick,$chan) $address($1,1) }
-
lol
**Kick list** #kicklist on on *:join:#: { if ($readini(kick.ini,(.raw kick,$chan),$address($nick,1))) { var %ifmatch = $ifmatch if ($me isop $chan) { raw -q KICK $chan $nick $gettok(%ifmatch,2-,32) } } #kicklist end } menu nicklist { Kicklist .Add: var %r | writeini -n kick.ini (.raw kick,$chan) $address($1,1) $1 %r .Remove: remini kick.ini (.raw kick,$chan) $address($1,1) }
-
For Oasiz chat http://chat.oasiz.net
Most of what worked for msn will work for oasiz.
**Auto owner access** on *:OWNER:*: { if ($opnick == $me) && ($nick != $me) { .raw access $active add OWNER *! $+ $$ial($$1 $+ *,1).addr } } **Deowner** on *:DEOWNER:#:{ if ($nick == $me) halt if ($1- == -q $me) { /hop # | .raw kick $chan $nick : :@ | .raw access # add deny *! $+ $ial($nick,1).addr 30 | var %o $rand(000000,999999) $+ $chr($r(65,200)) } | prop $chan ownerkey fd^&^%&^&vbh: $+ %o | set %okey %o } } **Kick list** #kicklist on on *:join:#: { if ($readini(kick.ini,(.raw kick,$chan),$address($nick,1))) { var %ifmatch = $ifmatch if ($me isop $chan) { raw -q KICK $chan $nick $gettok(%ifmatch,2-,32) } } } menu nicklist { Kicklist .Add: var %r | writeini -n kick.ini (.raw kick,$chan) $address($1,1) $1 %r .Remove: remini kick.ini (.raw kick,$chan) $address($1,1) } #kicklist end } **Take 1** alias masskick { .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY мugεтsu var %u, %a = 1, %r Rasengan! while ( %a <= $nick($chan,0) ) { if ( $nick($chan,%a) != $me ) { %u = $addtok(%u,$nick($chan,%a),44) } if ( $numtok(%u,44) >= 20 ) { raw -q KICK $chan %u %r | unset %u } inc %a } if ( %u !== $null ) { raw -q KICK $chan %u %r | unset %u } .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY мugεтsu .raw mode $chan +k мugεтsu .raw mode $chan +iml 1 } **Mode Lock** #modelock on on *:MODE:#:{ if ($nick == $me) return if (+ isin $1-) .mode # $replace($1-,+,-) if (- isin $1-) .mode # $replace($1-,-,+) if (+k isin $1) .mode # -k $2- if (-k isin $1) .mode # +k $2- if (+l isin $1-) .mode # +l 100 if ($me isop $chan) { .raw access # delete owner $nick | .raw access # delete owner $$address($nick,1) | .raw kick # $nick MODE LOCK :@ } } #modelock end **Revenge kick** #revengekick on alias BanProtect { .raw access $active add deny $address($nick,1) 0 } on *:JOIN:#: .raw access # add owner $address($me,1) 0 on *:KICK:#:{ if ($knick == $me) { timeraccess off hop $active .raw access # clear owner .raw access # add owner $address($me,1) 0 banprotect .raw access # add deny $nick 0 .raw kick # $nick :@ set -u3 %defconnk $nick .raw access # add owner $address($me,1) 0 } } #revengekick end **Topic lock** #topiclock on on ^*:TOPIC:#:{ if ($nick == $me) halt .kick # $nick Why you touch my topic :@ | /topic # %topic } #topiclock end } **Take 2** alias Take { .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY bds˜^&˜%&^h˜g62 set %people 1 :loop if ($nick(#,%people) == cs) { inc %people | goto loop | halt } if ($nick(#,%people) == $me) { inc %people | goto loop | halt } else { .raw kick $chan $nick(#,%people) Rasengan! } inc %people if ($nick(#,%people) == $null) { unset %people } else { goto loop } .raw access # clear owner .raw access # add owner $address($me,1) 0 .raw prop $chan OWNERKEY bds˜^&˜%&^h˜g62 .raw mode $chan +k bds˜^&˜%&^h˜g62 .raw mode $chan +iml 1 } **Masses** Masses .Mass Kick:/masskick .massop:{ set %i $nick($active,0) | :next | if $nick($active,%i) != $me mode $active +q $nick($active,%i) %kr | dec %i | if %i > 0 goto next } .massdeop:{ set %i $nick($active,0) | :next | if $nick($active,%i) != $me mode $active -q $nick($active,%i) %kr | dec %i | if %i > 0 goto next } } - **mass kick prot** (This one doesn't really work at all.) On *:KICK:#: { /inc %nrofkicks 1 timerkick 1 6 /unset %nrofkicks if ( 4 isin %nrofkicks ) { /mode $chan +b $address if ($nick != $me) { ./kick $chan $nick 0,1Excessive Kicks Detected. } }
-
any luck on that sock conn?
-
-
I knew this other guy who made an attempt at it as well and the conn kept dc'ing.Started working on it this weekend actually... although Ill only probably be able to get the base part of the connection done and release it here on Techgear most likely as a snippet..
-
A basic socket connection isnt too hard to do.. more can be added to it later! Whats the main irc addy for Oasiz?
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;; Oasiz IRCX Auth Tool ;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; VERSION $1.02 $rev 24 ;; AUTHOR Rob Hildyard ;; DATE 16.07.10 ;; SUPPORT http://www.oasiz.net/forum/?showforum=83 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;; Status Window Shortcut ;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; menu status { Oasiz Auth Tool: $oa_opdg(oa.at) } ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;; Send Auth Data To Server ;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; alias oa_opdg { if (!$dialog($1)) dialog -m $1 $1 } ;; Server list alias oa_issv { ;; directory server if ($1 == 75.126.226.11) return $true ;; groups server if ($1 == 75.126.194.89) return $true ;; chat servers if ($1 == 75.126.194.90) return $true if ($1 == 75.126.194.91) return $true if ($1 == 75.126.194.92) return $true ;; local server(s) (testing) if ($1 == 192.168.0.2) return $true if ($1 == 94.14.40.174) return $true return $false } ;; Sanitize nickname alias oa_sank { var %n = $remove($1,>,'Admin_,'Sysop_,'Guide_) return %n } ;; Vefify email address alias eval_email { var %reg ^[_\.0-9a-zA-Z]+@([0-9a-zA-Z][0-9a-zA-Z]+\.)+[a-zA-Z]{2,3}$ return $regex($1,%reg) } ON ^*:LOGON:*: { %DOPASSPORT = $true %OASIZCONNX = $oa_issv($server) if (%OASIZCONNX) { .MODE ISIRCX .HALT } } RAW *:*: { if (%OASIZCONNX) { if ($numeric == 451) { .RAW -q NICK $oa_sank($me) .RAW -q USER $gettok($emailaddr,1,64) * * : $+ $fullname .HALT } if ($numeric == 910) || ($numeric == 912) { .RAW -q NICK $oa_sank($me) .RAW -q USER $gettok($emailaddr,1,64) * * : $+ $fullname } if ($numeric == 800) && ($2 == 0) { .RAW -q AUTH $iif(%DOPASSPORT,OAServPassport,OAServ) I :OASSP000000X1A .HALT } if ($1 == OAServPassport) || ($1 == OAServ) && ($2 == S) { if ($3 == OK) { if (%DOPASSPORT) { .RAW -q AUTH OAServPassport S : $+ %_oa.auth } else { .RAW -q NICK $oa_sank($me) } } else { if ( $oa.nopp() ) { ;; We are trying to connect with a passport that hasn't been updated/validated yet. D'oh! $oa_opdg(oa.at) $oa.ppmg(You must select a valid (updated) passport before attempting to connect) haltdef } else { ;; Yipee, we made it! Grab challenge response code set %_Yta true $oaGo( 2, $remove($3,OASSP000000) ) } } .HALT } if ($1 == OAServPassport) || ($1 == OAServ) && ($2 == *) { .HALT } } } on *:SOCKOPEN:x.i*:{ sockwrite -n $sockname GET /api?k= $+ %_oa.k $+ &e= $+ %_oa.e $+ &p= $+ %_oa.p $+ &a= $+ %_oa.a $+ &q= $+ %_oa.q HTTP/1.1 $+ $crlf $+ host: chat.oasiz.net $+ $crlf $+ Connection: close $str($crlf,2) } on *:SOCKREAD:x.i*:{ if ($sockerr > 0) return var %z | sockread %z while ($sockbr > 0) { tokenize 32 %z if ($regex($1-,/<challenge>(.*)</challenge>/)) { $_Ys($regml(1)) | return } if ($regex($1-,/<authcode>(.*)</authcode>/)) { $oa.ppsucc($regml(1)) | return } if ($regex($1-,/<error>(.*)</error>/)) { $oa.ppfail() | $oa.ppmg(Error: $regml(1)) | return } return } sockread %z } alias oaGo { if ( $1 == 1 ) { set %_oa.a authcode } else { set %_oa.q $2 set %_oa.a challenge } sockopen x.i $+ $rand(000,999) chat.oasiz.net 80 } alias _Ys { var %f = AUTH $iif(%DOPASSPORT,OAServPassport,OAServ) S :OASSP000000 $+ $1 if (%_Yta) { .RAW -q %f | unset %_Yta | return } ;; Sock stuff under here if (%oa.sck) dosock %oa.sck %f } alias update_pp_list { did -r oa.at 1 var %x = 1 var %s = $ini(pp.ini,0) if ( %s > 0 ) { while (%x <= %s) { if ( $ini(pp.ini,%x) == $readini(oa.ini, n, settings, pp) ) var %t = %x did -a oa.at 1 $ini(pp.ini,%x) inc %x } if (%t) { did -c oa.at 1 %t writeini -n oa.ini settings pp $did(oa.at,1).seltext } ;; Enable "delete/update" buttons did -e oa.at 365 | did -e oa.at 8 ;; Enable "connect" button if it has been updated if ( ($readini(pp.ini,n,$did(oa.at,1).seltext,u) != 0) && (($did(oa.at,110).state == 1) || ($did(oa.at,130).state == 1)) ) { did -e oa.at 34 } else { did -b oa.at 34 } $oa.upd() } else { ;; Disable "delete/update/connect" buttons if no entries did -b oa.at 365 | did -b oa.at 8 | did -b oa.at 34 $oa.ppmg(Click "Add" to start the magic..) } $oa.dlup() } ;; Last Updated alias oa.dlup { did -r oa.at 45 var %t = $readini(pp.ini,n,$did(oa.at,1).seltext,u) var %p = $iif(%t != 0, %t, N/A) did -a oa.at 45 %p } alias oa.upd { set %_oa.k $readini(pp.ini,n,$did(oa.at,1).seltext,k) set %_oa.e $readini(pp.ini,n,$did(oa.at,1).seltext,e) set %_oa.p $readini(pp.ini,n,$did(oa.at,1).seltext,p) } alias oa.ppsucc { if (!$dialog(oa.at)) { return } var %st = Authentication data successfully loaded ;; successful update. What do we do now? writeini -n pp.ini $did(oa.at,1).seltext a $1 writeini -n pp.ini $did(oa.at,1).seltext u $asctime(dd/mm/yy h:nnTT) ;; Enable add/delete buttons did -e oa.at 346 | did -e oa.at 365 ;; Enable connect button IF we have a server selected if ( ($did(oa.at,110).state == 1) || ($did(oa.at,130).state == 1) ) { did -e oa.at 34 } else { %st = %st $+ Please select which server(s) to join. } $oa.ppmg(%st) $oa.dlup() } alias oa.ppfail { if (!$dialog(oa.at)) { return } ;; Enable "add/delete" buttons did -e oa.at 346 | did -e oa.at 365 } alias oa.nopp { var %x = $readini(pp.ini,n,$readini(oa.ini, n, settings, pp),u) if ( (!%x) || (%x == 0) ) return $true return $false } alias oa.ppmg { if (!$dialog(oa.at)) { echo -s $1- | return } did -r oa.at 44 did -a oa.at 44 $1- } alias oa.svr { var %c = 0 if ( $did($dname,110).state == 1 ) %c = 3 if ( $did($dname,130).state == 1 ) %c = %c + 5 if ( %c == 3 ) %c = M if ( %c == 5 ) %c = G if ( %c == 8 ) %c = B writeini -n oa.ini settings s %c $update_pp_list() } alias Gs { if ($1 == G) return 75.126.194.89 return 75.126.194.90 } alias Doserv { var %svr = $readini(oa.ini,n,settings,s) if (%svr != <img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/cool.gif' class='bbc_emoticon' alt='B)' /> { server $Gs(%svr) } else { server $Gs(M) server -m $Gs(G) } } dialog oa.at { ;; ID , LEFT, TOP, WIDTH, HEIGHT title "Oasiz IRCX Auth Tool v1.02" size -1 -1 123 147 option dbu text "API Information:", 42, 6 4 40 8, left link "click here", 812, 47 4 60 8 list 1,5 15 112 45 text "Last Updated:", 10, 6 60 40 8, left text "N/A", 45, 45 60 75 8, left button "Add", 346, 5 70 36 11, button "Delete", 365, 43 70 36 11, button "Update", 8, 82 70 36 11, text "Server:", 100, 6 87 35 8, left check "Main", 110, 27 87 23 8, check "Groups", 130, 50 87 26 8, button "Connect", 34, 82 85 36 11, box "Status", 4, 6 98 112 33, read multi left edit -, 44, 11 107 102 19, read multi left text "Copyright © 2010", 9, 24 134 46 8, left link "oasiz.net", 12, 70 134 30 8 } on *:dialog:oa.at:init:*:{ ;; Disable "delete/update/connect" buttons if no entries if ( $ini(pp.ini,0) == 0 ) { did -b $dname 365 | did -b $dname 8 | did -b $dname 34 } ;; Server check boxes if ( $readini(oa.ini,n,settings,s) == M ) { did -c $dname 110 } if ( $readini(oa.ini,n,settings,s) == G ) { did -c $dname 130 } if ( $readini(oa.ini,n,settings,s) == B ) { did -c $dname 110 | did -c $dname 130 } $update_pp_list() } on *:dialog:oa.at:sclick:1:{ ;; Selecting passport in list var %a = $did($dname,1).seltext if (%a) { writeini -n oa.ini settings pp $did($dname,1).seltext $update_pp_list() } } ;;; Add new passport on *:dialog:oa.at:sclick:346:{ var %e = $$?="Step 1 of 3: Enter email address:", %p = $$?*="Step 2 of 3: Enter password:", %k = $$?="Step 3 of 3: Enter API Key:" ;; Validate data if ( !$eval_email(%e) ) { $oa.ppmg( Input error: Invalid email address ) | return } if ( $readini(pp.ini,n,%e,e) ) { $oa.ppmg( Input error: This passport already exists ) | return } if ( $len(%k) != 36 ) { $oa.ppmg( Input error: Incorrect API key ) | return } ;; Looks like we made it. Let's get it updated.. writeini -n pp.ini %e e %e writeini -n pp.ini %e p $md5(%p) writeini -n pp.ini %e k %k writeini -n pp.ini %e u 0 $oa.ppmg( Passport added. Updating/verifying data.. ) writeini -n oa.ini settings pp %e $update_pp_list() $oa.updv() } ;;; Delete passport on *:dialog:oa.at:sclick:365:{ if ($?!="Are you sure you want to remove this passport?" == $true) { remini pp.ini $did($dname,1).seltext ;; Lets select the first on the list (if exists) if ( $ini(pp.ini,0) > 0 ) { writeini -n oa.ini settings pp $ini(pp.ini,1) } $update_pp_list() } } alias oa.updv { ;; Disable "add/delete/connect" buttons whilst we update did -b oa.at 346 | did -b oa.at 365 | did -b oa.at 8 | did -b oa.at 34 $oaGo(1) } ;;; Update passport on *:dialog:oa.at:sclick:8:{ $oa.updv } ;;; Server choice (main) on *:dialog:oa.at:sclick:110:{ $oa.svr() } ;;; Server choice (groups) on *:dialog:oa.at:sclick:130:{ $oa.svr() } ;;; connect button on *:dialog:oa.at:sclick:34:{ set %_oa.auth $readini(pp.ini,n,$did(oa.at,1).seltext,a) $Doserv $oa.ppmg( Connecting. Please wait... ) dialog -x oa.at } ;; URLs on *:dialog:oa.at:sclick:12:{ url -an http://www.oasiz.net } on *:dialog:oa.at:sclick:812:{ url -an http://chat.oasiz.net/chat_api_key }
-
There's only one working connection for Oasiz chat and it's not a socket conn, unfortunately.If you are using a plain mIRC socket-less connection to connect to the server, then there is no way to completely disable the CTCP VERSION reply.
The only way to catch the VERSION before mIRC gets it is to use a socket connection to connect to the server.
So I guess the next question is what do you use to connect to the server?
-
Is there a way to completely disable ver reply???
Prots Ect, Suggestions For Improvement?
in General Chat Talk
Posted