on *:text:*:#Chan: {
  if ($nick == bot) {
    var %percent $calc($regex($1-,/[A-Z]/g)/$len($1-)*100)
    var %nname = $gettok($strip($remove($remove($1,[),]):,burc),1,124)
    var %caps = 40
    if (%percent > %caps) {
      window @mutes
      set -l %cmcount $iif($readini(capsmute.ini,%nname,caps),$v1,0)
      set -l %crcoun $iif($readini(capsmute.ini,%nname,reset),$v1,0)
      set -l %cmtime $iif($readini(capsmute.ini,%nname,time),$v1,0)
      var %cmtimec = $calc(%cmtime-%ctime)
      if (%cmtimec <= 7200) and (%cmtimec != 0) {
      writeini capsmute.ini %nname caps $ctime
      inc %cmcount
      writeini capsmute.ini %nname caps %cmcount
      if (%cmcount == 1) {
        msg #chan !pm %nname %nname, Its a Warning massage for using caps -=its auto script message=-
        echo @mutes $date - $Time : %nname - warrning %crcount
      }
      elseif (%cmcount == 2) {
        msg #chan !pm %nname %nname, You have been muted for abuse caps after warning -=its auto script message=-
        msg #chan !mute %nname 15 Caps 1st time after warning
        echo @mutes $date - $Time : %nname - Mute 15 minutes %crcount
      }
      elseif (%cmcount == 3)  {
        msg #chan !pm %nname %nname, You have been muted for abuse caps after 1 mute alrady -=its auto script message=-
        msg #chan !mute %nname 30 Caps 2nd time after 1 mute
        echo @mutes $date - $Time : %nname - mute 30 minutes %crcount
      }
      elseif (%cmcount == 4) {
        msg #chan !pm %nname %nname, You have been muted for abuse caps after 2 mutes -=its auto script message=-
        msg #chan !mute %nname 60 caps 3th time time after 2 mutes
        echo @mutes $date - $Time : %nname - mute 60 minutes %crcount
        set -l %cmcount 0
        inc %crcount
        writeini capsmute.ini %nname caps %cmcount
        writeini capsmute.ini %nname reset %crcount
        set -l %crcount $iif ($readini(capsmute.ini,%nname,reset),$v1,0)
        }
       else {
       set -l %cmcount 0
       writeini capsmute.ini %nname caps %cmcount
       msg #chan !pm %nname %nname, Its a Warning massage for using caps -=its auto script message=-
       }
      }
    }
  }
}