equal
deleted
inserted
replaced
623 end; |
623 end; |
624 |
624 |
625 procedure chRotateTags(var s: shortstring); |
625 procedure chRotateTags(var s: shortstring); |
626 begin |
626 begin |
627 s:= s; // avoid compiler hint |
627 s:= s; // avoid compiler hint |
628 // Rotate Tags key + Precise: Toggle translucency only |
628 // Rotate Tags key + Switch: Toggle translucency only |
629 if LocalMessage and gmPrecise = gmPrecise then |
629 if LocalMessage and gmSwitch = gmSwitch then |
630 if ((cTagsMask and htTransparent) = 0) then |
630 if ((cTagsMask and htTransparent) = 0) then |
631 cTagsMask:= cTagsMask or htTransparent |
631 cTagsMask:= cTagsMask or htTransparent |
632 else |
632 else |
633 cTagsMask:= cTagsMask and (not htTransparent) |
633 cTagsMask:= cTagsMask and (not htTransparent) |
634 // Rotate Tags key + Switch: Toggle all tags on and off |
634 // Rotate Tags key + Precise: Toggle all tags on and off |
635 else if LocalMessage and gmSwitch = gmSwitch then |
635 else if LocalMessage and gmPrecise = gmPrecise then |
636 if ((cTagsMask and (htTeamName or htName or htHealth)) = 0) then |
636 if ((cTagsMask and (htTeamName or htName or htHealth)) = 0) then |
637 cTagsMask:= cPrevTagsMask |
637 cTagsMask:= cPrevTagsMask |
638 else |
638 else |
639 begin |
639 begin |
640 cPrevTagsMask:= cTagsMask; |
640 cPrevTagsMask:= cTagsMask; |