on $*:text:/^!addcom=mod !?(\S+)/iS:#: {
  if ($read(modlist.txt,nw,$nick)) {
    writeini modcommands.ini # $regml(1) $3-
    var %text $read(modcommands.txt,1)
    if %text == $null {
      var %line Commands List: ! $+ $regml(1) $+ ,
    }
    else {
      var %line %text ! $+ $regml(1)
    }

    write -l1 commandsresonse.txt %line
    msg # $nick - The command $$2 has been added.
  }
}
on $*:text:/^!delcom=mod !?(\S+)/iS:#:{
  if ($read(modlist.txt,nw,$nick)) {
    remini modcommands.ini # $regml(1)
    var %text $read(modcommands.txt,1)
    if %text != $null {
      var %line $remove(%text,! $+ $regml(1))
    }
    write -l1 commandsresonse.txt %line
    msg # $nick - The command $$2 has been removed.
  }
}

on $*:text:/^!editcom=mod !?(\S+)/iS:#:{
  if ($read(modlist.txt,nw,$nick)) {
    writeini modcommands.ini # $regml(1) $$3-
    msg $chan $nick - The command $2 has been updated.
  }
}
on $*:text:/^!(\S+)/:#:{
  if ($read(modlist.txt,nw,$nick)) {
    if ((%floodcom) || ($($+(%,floodcom.,$2),2))) { return }
    set -u3 %floodcom On
    set -u3 %floodcom. $+ $nick On
    if ($readini(modcommands.ini,n,#,$regml(1))) msg # $v1
    if ($readini(nonmodscommands.ini,n,#,$regml(1))) msg # $v1
  }
}