Skip to content
This repository has been archived by the owner on Sep 14, 2024. It is now read-only.

Commit

Permalink
aa4
Browse files Browse the repository at this point in the history
  • Loading branch information
NosoDevTeam committed Aug 31, 2024
1 parent 3719fe5 commit 03827f9
Show file tree
Hide file tree
Showing 3 changed files with 6 additions and 7 deletions.
2 changes: 1 addition & 1 deletion lastrelease.txt
Original file line number Diff line number Diff line change
@@ -1 +1 @@
0.4.3Aa3 0.4.2Da2 x {LastOfficial} {LastBeta} {TestNet}
0.4.3Aa4 0.4.2Da2 x {LastOfficial} {LastBeta} {TestNet}
2 changes: 1 addition & 1 deletion masterpaskalform.pas
Original file line number Diff line number Diff line change
Expand Up @@ -576,7 +576,7 @@ TForm1 = class(TForm)
RestartFileName = 'launcher.sh';
updateextension = 'tgz';
{$ENDIF}
NodeRelease = 'Aa3';
NodeRelease = 'Aa4';
OficialRelease = true;
BetaRelease = false;
VersionRequired = '0.4.2';
Expand Down
9 changes: 4 additions & 5 deletions mpprotocol.pas
Original file line number Diff line number Diff line change
Expand Up @@ -205,11 +205,6 @@ function GetStringFromBlockHeader(BlockHeader:blockheaderdata):String;
While LengthIncoming(contador) > 0 do
begin
ProcessLine := GetIncoming(contador);
if BlockAge > 585 then
begin
//ToLog ('console','Out of time request');
continue;
end;
UsedProtocol := StrToIntDef(Parameter(ProcessLine,1),1);
UsedVersion := Parameter(ProcessLine,2);
PeerTime := Parameter(ProcessLine,3);
Expand All @@ -233,6 +228,10 @@ function GetStringFromBlockHeader(BlockHeader:blockheaderdata):String;
end
else if UpperCase(LineComando) = '$PING' then ProcessPing(ProcessLine,contador,true) // Done
else if UpperCase(LineComando) = '$PONG' then ProcessPing(ProcessLine,contador,false) // Done
else if BlockAge > 585 then
begin
continue;
end
else if UpperCase(LineComando) = '$GETPENDING' then SendPendingsToPeer(contador)//PTC_SendPending(contador) // Done
else if UpperCase(LineComando) = '$GETMNS' then SendMNsListToPeer(contador) //SendMNsList(contador) // Done
else if UpperCase(LineComando) = '$GETRESUMEN' then PTC_SendResumen(contador)
Expand Down

0 comments on commit 03827f9

Please sign in to comment.