Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- alias updateaop {
- var %i = 0 | var %a writeini -n Aop.ini | var %r Fibonacci Auto Aop
- msg %r Update Started.
- while (%i < $nick(#,0)) {
- inc %i
- if ($nick(#,%i) != $me) {
- if ($v1 isowner #) { %a Owners $+ $chan $address($v1,1) $v1 - %r }
- elseif ($v1 isop #) && ($v1 !isowner #) { %a Hosts $+ $chan $address($v1,1) $v1 - %r }
- }
- }
- msg All $nick($active,0,q) Owners and $nick($active,0,o) Hosts have been logged.
- msg %r Update Completed.
- }
- on *:TEXT:*:#: {
- var %m $1- | var %w !
- if ($level($address($nick,1)) == Admin || $level($address($nick,1)) == Owner) {
- if (%w $+ mass isin %m) { msg $nick Mass $2 $+ ing the room | mmode # $2 $all.users.except(#, $2) }
- elseif (%w $+ update == %m) { updateaop }
- elseif (%w $+ link isin %m) { msg $nick your link is https://dl.dropbox.com/u/ $+ %dropbox $+ / $+ $2- }
- elseif (%w $+ kick isin %m || %w $+ mode isin %m || %w $+ ban isin %m) {
- var %x = 1
- while ($nick(#,%x)) {
- var %n $nick(#,%x)
- if ($2 isin $Ndecode(%n)) {
- if (%w $+ ban == $1) { access # add deny $address(%n,1) 0 ( $+ $utfdecode(%n) $+ ) Banlisted | kick # %n $3- }
- elseif (%w $+ kick == $1) { kick # %n $3- } | elseif (%w $+ mode == $1) { mode # $3 %n }
- }
- inc %x #
- }
- }
- }
- if ($level($address($nick,1)) == Owner) {
- if (%w $+ join isin %m || %w $+ part isin %m || %w $+ hop isin %m) { msg $nick I am $remove($1,%w) $+ ing $2 | $remove($1,%w) $iif(!$2,#,$2) }
- elseif (%w $+ say isin %m) { msg $2- }
- elseif (%w $+ Aop isin %m) {
- if ($2 == Halt) { writeini -n data\settings.ini # AOP halt | msg AOP Disabled for # }
- elseif ($2 == Enable) { writeini -n data\settings.ini # AOP Unhalt | msg AOP Enabled for # }
- }
- elseif (%w $+ ss isin %m) { msg Screenshot Time Every one smile ;) | takescreenshot }
- }
- if ($1 == mija || $1 == mijo) { mode # +q $nick | msg here is your hammer My Love }
- elseif (%w $+ google isin %m) {
- msg - $nick Google.com Search for $2-
- msg - $nick Your result is here - 12 http://www.google.com/search?hl=en&ie=UTF-8&oe=UTF-8&q= $+ $replace($2-,$chr(32),+))
- }
- else { halt }
- }
- on *:JOIN:#: {
- var %y = $address($nick,1) | var %a $readini(Aop.ini,halt,$right(#,-2))
- var %b $readini(Aop.ini,Owners $+ $chan,%y) | var %c $readini(Aop.ini,Hosts $+ $chan,%y)
- if ($level(%y) == Shit) { access # add deny %y 0 ( $+ $utfdecode($nick) $+ ) Banlisted | kick # $nick Banlisted }
- elseif ($readini(data\settings.ini, #, AutoQ) == Unhalt) { mode # +q $nick }
- elseif ($readini(data\settings.ini, #, AutoO) == Unhalt) { mode # +o $nick }
- elseif ($readini(data\settings.ini, #, AutoV) == Unhalt) { mode # +v $nick }
- elseif ($readini(data\settings.ini, #, AOP) == halt) { halt }
- elseif (%c) && (%a !isin #) && ($me isop # || $me isowner #) { msg Local Host: %c | mode $chan +o $nick | haltdef }
- elseif (%b) && (%a !isin #) && ($me isowner #) { msg Local Owner: %b | mode $chan +q $nick | haltdef }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement