onJoinGame

$${ARRAYSIZE(@&scripts,#n);#i=0;IFMATCHES(%@#fltsm12%,0);LOG(&8[&aTSM&8] &cСпасибо за установку &aTSM &cверсии &ev1.2&c!);LOG(&8[&aTSM&8] &cСписок доступных комманд - &a/tsm help);@#fltsm12=1;ELSE;LOG(&8[&aTSM&8] &aTotal Script Manager &ev1.2);LOG(&8[&aTSM&8] &cЗагружено %#n% скриптов);ENDIF;EXEC("langTSM.txt","langTSM");DO; IFCONTAINS(%@&scriptstatus[%#i%]%,"running");  STOP("%@&scripts[%#i%]%");  EXEC("%@&scripts[%#i%]%.txt","%@&scripts[%#i%]%"); ENDIF; IFMATCHES(%#i%,%#n%);    BREAK; ENDIF; #i=#i+1;UNTIL;#i=0;DO; ARRAYSIZE(@&scripts,#n); IFMATCHES(%@#damaged%,1);  #j=0;  #k=%@#deadnum%;    IFMATCHES(%#k%,%#n%);     ELSE;   DO;    #j=#k+1;    @&scripts[%#k%]=%@&scripts[%#j%]%;    IFMATCHES(%#k%,%#n%);     BREAK;    ENDIF;    #k=#k+1;   UNTIL;    POP(@&scripts[],&del);   POP(@&scripts[],&del);  ENDIF;  WAIT(300ms);  #j=0;  ARRAYSIZE(@&scriptstatus,#n);  #k=%@#deadnum%;    DO;   #j=#k+1;   @&scriptstatus[%#k%]=%@&scriptstatus[%#j%]%;   IFMATCHES(%#k%,%#n%);    BREAK;   ENDIF;   #k=#k+1;    UNTIL;  #k=0;  @#damaged=0;  @#deadnum=0;  ARRAYSIZE(@&scripts,#n);  #i=0; ENDIF; IFMATCHES(%@#reload%,1);  UNSET(@&scriptstatus[]);  #i=0;  ARRAYSIZE(@&scripts,#n);   DO;    STOP("%@&scripts[%#i%]%");    EXEC("%@&scripts[%#i%]%.txt","%@&scripts[%#i%]%");@&scriptstatus[%#i%]=&a[running];    IFMATCHES(%#i%,%#n%);     BREAK;    ENDIF;    #i=#i+1;   UNTIL;   LOG(&8[&aTSM&8] &cСкрипты успешно перезапущены);   @#reload=0; ENDIF; IFMATCHES(%@#unload%,1); #i=0; ARRAYSIZE(@&scripts,#n); DO;  IFMATCHES(%@&scripts[%#i%]%,%@&killedscript%);   @&scriptstatus[%#i%]=&c[stopped];   STOP("%@&scripts[%#i%]%");   LOG(&8[&aTSM&8] &cСкрипт "&b%@&scripts[%#i%]%&c" остановлен);      BREAK;  ENDIF;  IFMATCHES(%#i%,%#n%);  LOG(&8[&aTSM&8] &cСкрипт с таким именем не установлен);        BREAK;  ENDIF;  #i=#i+1;   UNTIL; @#unload=0; #i=0; ENDIF; IFMATCHES(%@#launch%,1); ARRAYSIZE(@&scripts,#n); DO;  IFMATCHES(%@&scripts[%#i%]%,%@&launchedscript%);   EXEC("%@&scripts[%#i%]%.txt","%@&scripts[%#i%]%");   @&scriptstatus[%#i%]=&a[running];     LOG(&8[&aTSM&8] &cСкрипт "&b%@&scripts[%#i%]%&c" запущен);      BREAK;     ENDIF;  IFMATCHES(%#i%,%#n%);   LOG(&8[&aTSM&8] &cСкрипт с таким именем не установлен);     BREAK;  ENDIF;  #i=#i+1; UNTIL; @#launch=0; ENDIF;  IFMATCHES(%@#showlist%,1); ARRAYSIZE(@&scripts,#n); IF(#n=0); LOG(&8[&aTSM&8] &cНе установлено ни одного скрипта); ELSE; LOG(&8[&aTSM&8] &cСписок установленных скриптов:); #i=0; DO; #j=#i+1; LOG(&c%#j% - &b"%@&scripts[%#i%]%" %@&scriptstatus[%#i%]%); #i=#i+1; IFMATCHES(%#i%,%#n%); BREAK; ENDIF; UNTIL; ENDIF; @#showlist=0; UNSET(#n[]); ARRAYSIZE(@&scripts,#n); #i=0; #j=0; ENDIF;  IFMATCHES(%@#areload%,1);  STOP("%@&scripts[%@#relind%]%");  EXEC("%@&scripts[%@#relind%]%.txt","%@&scripts[%@#relind%]%");  @#relind=0;  @#areload=0; ENDIF; IFMATCHES(%@#langreload%,1);  EXEC("langTSM.txt","langTSM");  LOG(&8[&aTSM&8] &cLang-файл обновлен);  @#langreload=0; ENDIF;UNTIL;}$$