Just as a side note, if you think the script is a little cluttered, you could do:

if ($istok(.me /me .ame /ame /action,$1,32))

instead of

if ($1 == .me) || ($1 == /me) || ($1 == .ame) || ($1 == /ame) || ($1 == /action)

Greets