Kinda a bit, it could be shrinked. Easily. You can use this way:
On $*:Text:/[!@.]*/Si:#:{ if ($regex($1,/^[!@.]command) { your command here } }
Or
On *:Text:*:#:{ if ($1 == @command) { dnadnsa } }
Just to be simpler ^