on this line
else { scon %a msg %rchan $+(.:,$remove($$2,$chr(60),$chr(62)),@,$1,:.) $remove($3-,$chr(36)) | dec %a }
remove the @,$1