on *:input:*:{
  if ($left($1,1) == -) { ;if the first letter is equal to -
    set %modees $chan($chan).mode 
  } 
  if ($left($1,1) == -) && ($2-) { 
    msg $chan $1- ;msg chan what u wanna do ^_^
    mode $active $left($1,2) $iif($2-,$2-,$null) ;do the mode
  halt } ;halt
  if ($left($1,1) == -) && ($mid($1,2,2) !isincs %modees) { ;if its already not in modes
    msg $chan $1- ;tell the channel that
    timermode 1 0.5 msg $chan $active is already $1
    unset %modees ;unset modes
    halt ;halt
  }
  if ($mid($1,2,2) isincs %modees) && ($left($1,1) == -) {
    mode $active $left($1,2) $iif($2-,$2-,$null) ;do the mode
    unset %modees ;unset the modes of chan
  }
}

------------------------------------------
--------------------------------------------------------------------------------------------------------

NEW FILE?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@'
Yeah k:
:
-------------------------------------------------------------------------------------------------------
on *:input:*:{
  if ($left($1,1) == $chr(43)) { ;if the first letter from the left is equal to $chr(43) try this out: //echo -a $chr(43)
  set %modees $chan($chan).mode } ; set the modes of channel
  if ($mid($1,2,2) isincs %modees) && ($left($1,1) == $chr(43)) { ;if the inputted mode is in modes...
    timermode 1 0.5 msg $chan $chan is already $1 ;tell you its already in the modes
    unset %modees  ;unset the modes
  }
  if ($mid($1,2,2) !isincs %modees) && ($left($1,1) == $chr(43)) { ;if the inputted mode eg +B <<< mode is in modes4 chan
    mode $active + $+ $mid($1,2,2) $iif($2-,$2-,$null) ;do the mode
    unset %modees ;unset the modes of chan
  }
}