InPuT :)

By Abbas on Aug 29, 2007

Just A Smiple InPut ;)

Note :--

Please Use IN Chanserv Server :)

Give ME Good MArk Pleaseee ;)))))

Thanks A LOT

Bye To All My Hawkee Friends ;)

-------------------------------------------------------------------
Note: This OnlY Use Where Is Chanserv Server Thanks
-------------------------------------------------------------------
on *:INPUT:#:{
  if ($1 == +m) { mode $chan $2 +m }
  if ($1 == -m) { mode $chan $2 -m }
  if ($1 == +r) { mode $chan $2 +r }
  if ($1 == -r) { mode $chan $2 -r }
  if ($1 == +i) { mode $chan $2 +i }
  if ($1 == -i) { mode $chan $2 -i }
  if ($1 == +s) { mode $chan $2 +s }
  if ($1 == -s) { mode $chan $2 -s }
  if ($1 == +p) { mode $chan $2 +p }
  if ($1 == -p) { mode $chan $2 -p }
  if ($1 == +mi) { mode $chan $2 +mi }
  if ($1 == -mi) { mode $chan $2 -mi }
  if ($1 == +im) { mode $chan $2 +im }
  if ($1 == -im) { mode $chan $2 -im }
  if ($1 == +mr) { mode $chan $2 +mr }
  if ($1 == -mr) { mode $chan $2 -mr }
  if ($1 == +rm) { mode $chan $2 +rm }
  if ($1 == -rm) { mode $chan $2 -rm }
  if ($1 == +ri) { mode $chan $2 +ri }
  if ($1 == -ri) { mode $chan $2 -ri }
  if ($1 == +ir) { mode $chan $2 +ir }
  if ($1 == -ir) { mode $chan $2 -ir }
  if ($1 == +rim) { mode $chan $2 +rim }
  if ($1 == -rim) { mode $chan $2 -rim }
  if ($1 == +irm) { mode $chan $2 +irm }
  if ($1 == -irm) { mode $chan $2 -irm }
  if ($1 == +mir) { mode $chan $2 +mir }
  if ($1 == -mir) { mode $chan $2 -mir }  
  if ( !op = $1) { cs op $chan $2 } 
  if ( !deop = $1) { cs deop $chan $2 } 
  if ( !voice = $1) { /mode $chan +v $2 } 
  if ( !devoice = $1) { /mode $chan -v $2 }
  if ( !aka = $1) { /msg ChanServ@services.dal.net AKICK $chan add $2 }
  if ( !akd = $1) { /msg ChanServ@services.dal.net AKICK $chan del $2 }
  if ( !invite = $1) { /invite $2 $chan }
  if ( !akl = $1) { /msg ChanServ@services.dal.net AKICK $chan list }
  if ( .kick = $1) { /k $2 $Reason } 
  if ( .ban = $1) { mode $chan +b $2 } 
  if ( .unban = $1) { mode $chan -b $2 } 
-------------------------------------------------------------------
:) Its Script Work Great :) 
-------------------------------------------------------------------
Please Give Me Good Mark ;)
-------------------------------------------------------------------

Comments

Sign in to comment.
guest598594   -  Aug 30, 2007

so the whole thing would be

;-------------------------------------------------------------------
;Note: This OnlY Use Where Is Chanserv Server Thanks
;-------------------------------------------------------------------
on *:input:#:{
  if ($left($1-,1) == +) {
    mode $chan + $+ $1
  }
  elseif ($left($1-,1) == -) {
    mode $chan - $+ $1
  }
  if ( !op = $1) { cs op $chan $2 } 
  if ( !deop = $1) { cs deop $chan $2 } 
  if ( !voice = $1) { mode $chan +v $2 } 
  if ( !devoice = $1) { mode $chan -v $2 }
  if ( !aka = $1) { msg ChanServ@services.dal.net AKICK $chan add $2 }
  if ( !akd = $1) { msg ChanServ@services.dal.net AKICK $chan del $2 }
  if ( !invite = $1) { invite $2 $chan }
  if ( !akl = $1) { msg ChanServ@services.dal.net AKICK $chan list }
  if ( .kick = $1) { k $2 $Reason } 
  if ( .ban = $1) { mode $chan +b $2 } 
  if ( .unban = $1) { mode $chan -b $2 } 
;-------------------------------------------------------------------
;:) Its Script Work Great :) 
;-------------------------------------------------------------------
;Please Give Me Good Mark ;)
;-------------------------------------------------------------------
 Respond  
guest598594   -  Aug 30, 2007

for the modes, u can simplify it a LOT

on *:input:#:{
  if ($left($1-,1) == +) {
    mode $chan + $+ $1
  }
  elseif ($left($1-,1) == -) {
    mode $chan - $+ $1
  }
}

and where you say

Note: This OnlY Use Where Is Chanserv Server Thanks

make it

;Note: This OnlY Use Where Is Chanserv Server Thanks

(semicolon in front of it, that way mirc ignores it)

 Respond  
Abbas   -  Aug 30, 2007

it not working :s

 Respond  
FRISH   -  Aug 30, 2007

In that, you left out equal signs, there must be two i think..
= does the same job as == so it works, although i prefer to use == ;)

 Respond  
T7Davey   -  Aug 30, 2007

Saurabh -.- same as any other forums

 Respond  
Godzilla   -  Aug 29, 2007

Err... I don\'t know how to [-code-] and [-/code-]

 Respond  
FRISH   -  Aug 29, 2007

good but, begin a line with \";\" to exlude it from the code
also you can replace

  if ($1 == +m) { mode $chan $2 +m }
upto...
if ($1 == -mir) { mode $chan $2 -mir } 

with

if ($regex($1,/[-+][prism]/S)) { mode $chan $1 }

also you dont need the /\'s like in /mode and /k etc

keep it up ;)

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.