trig {sendl("поделить $2") if ($num>1)}             '^Вы взяли кучку монет из трупа (.+) там был.* (\d+) моне.*$','2000fn:MONEY';
trig {sendl("поделить $1") if ($num>1)}             '^Вы взяли кучку монет, там был.* (\d+) моне.*\\.$','2000fn:MONEY';

trig {sendl("дать ключ $leader")}                '^Вы взяли (.*)ключ(\\.|.*? .*)$','2000fn:MONEY';

trig {$leader="none/you"}                   '^(\w+) теперь следует за вами\\.$','2000fn:LEADER';
trig {$leader=$1}                      '^Вы приняты в группу (\w+)\w\\.$','2000fn:LEADER';
trig {$leader="none/you"}                   '^Вы прекратили следовать за \w+\\.$','2000fn:LEADER';

trig {
   CMD::cmd_unaction('GROUP');
   enable('GBUILD');
   $num = 0
} '^---------------------------+$','2000n:GSTART';

trig {
    if ($1 ne $name) {
#      trig (\&hgreen,".* $1\[ .* здесь\\.\$\]|\[\$\]","1000fn-:GROUP");
      $num += 1
   }
} '^..+(\w+).+$','4000n-:GBUILD';

{5} ,
{default} ,
 {keys}  , {key},
{лут}