hedgewars/uCommands.pas
changeset 7426 55b49cc1f33a
parent 7412 9e5aa3c8dc62
child 7805 2a249a4faf5b
equal deleted inserted replaced
7423:ec8f690f3e0f 7426:55b49cc1f33a
    93     begin
    93     begin
    94     if t^.Name = CmdStr then
    94     if t^.Name = CmdStr then
    95         begin
    95         begin
    96         if TrustedSource or t^.Trusted then
    96         if TrustedSource or t^.Trusted then
    97             begin
    97             begin
    98             if t^.Rand and not CheckNoTeamOrHH then 
    98             if t^.Rand and (not CheckNoTeamOrHH) then 
    99                 CheckSum:= CheckSum xor LongWord(SDLNet_Read32(@CmdStr)) xor LongWord(s[0]) xor GameTicks;
    99                 CheckSum:= CheckSum xor LongWord(SDLNet_Read32(@CmdStr)) xor LongWord(s[0]) xor GameTicks;
   100             t^.Handler(s);
   100             t^.Handler(s);
   101             end;
   101             end;
   102         exit
   102         exit
   103         end
   103         end