on $*:text:/^!delcom !?(\S+)/iS:#:{
if ($read(sreglist.txt,nw,$nick)) && ($2 != $null) {
msg $chan removed $2 from commands!
remini allcommands.ini commands $regml(1)
var %text $read(commandsresonse.txt,1)
if %text != $null {
var %line $remove(%text,! $+ $regml(1))
}
write -l1 commandsresonse.txt %line
}
}