Skip to content

Commit

Permalink
backout change preventing RST from being updated for user's station
Browse files Browse the repository at this point in the history
  • Loading branch information
w7sst committed Feb 12, 2024
1 parent 558344e commit 98e85b2
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion Station.pas
Original file line number Diff line number Diff line change
Expand Up @@ -335,12 +335,13 @@ function TStation.NrAsText: string;
NrWithError := false;
end;

if (SentExchTypes.Exch1 = etRST) and (MyCall <> Ini.Call) then
if SentExchTypes.Exch1 = etRST then
begin
if (Ini.RunMode <> rmHST) and (Random < 0.05) then
Result := StringReplace(Result, '599', 'ENN', [rfReplaceAll]);
Result := StringReplace(Result, '599', '5NN', [rfReplaceAll]);
end;

if (Ini.RunMode <> rmHst) and (SentExchTypes.Exch2 in
[etSerialNr, etCqZone, etItuZone, etAge, etPower]) and
(MyCall <> Ini.Call) then
Expand Down

0 comments on commit 98e85b2

Please sign in to comment.