Testnet 3.0.3

Updated netprotocol to 8

src/core/UConst.pas

@@ -116,7 +116,7 @@ Const
   CT_NetProtocol_Version: Word = $0007; // Version 3.0.2 only allows net protocol 7 (Introduced on 3.0.0)
   // IMPORTANT NOTE!!!
   // NetProtocol_Available MUST BE always >= NetProtocol_version
-  CT_NetProtocol_Available: Word = $0007;  // Remember, >= NetProtocol_version !!!
+  CT_NetProtocol_Available: Word = $0008;  // Remember, >= NetProtocol_version !!!
 
   CT_MaxAccountOperationsPerBlockWithoutFee = 1;
 
@@ -167,7 +167,7 @@ Const
   CT_OpSubtype_Data_Signer                = 103;
   CT_OpSubtype_Data_Receiver              = 104;
 
-  CT_ClientAppVersion : AnsiString = {$IFDEF PRODUCTION}'3.0.2'{$ELSE}{$IFDEF TESTNET}'TESTNET 3.0.2'{$ELSE}{$ENDIF}{$ENDIF};
+  CT_ClientAppVersion : AnsiString = {$IFDEF PRODUCTION}'3.0.2'{$ELSE}{$IFDEF TESTNET}'TESTNET 3.0.3'{$ELSE}{$ENDIF}{$ENDIF};
 
   CT_Discover_IPs =  'bpascal1.dynamic-dns.net;bpascal2.dynamic-dns.net;pascalcoin1.dynamic-dns.net;pascalcoin2.dynamic-dns.net;pascalcoin1.dns1.us;pascalcoin2.dns1.us;pascalcoin1.dns2.us;pascalcoin2.dns2.us'{$IFDEF TESTNET}+';99.254.181.147;159.89.12.242;18.236.158.185'{$ENDIF};
 

src/core/UNode.pas

@@ -305,7 +305,7 @@ begin
             j := TNetData.NetData.ConnectionsCountAll;
             for i:=0 to j-1 do begin
               if (TNetData.NetData.GetConnection(i,nc)) then begin
-                if (nc<>SenderConnection) And (nc.Connected) then begin
+                if (nc<>SenderConnection) And (nc.Connected) And (nc.RemoteOperationBlock.block>0) then begin
                   TThreadNodeNotifyNewBlock.Create(nc,Bank.LastBlockFound,opsht);
                 end;
               end;
@@ -499,7 +499,7 @@ begin
       j := TNetData.NetData.ConnectionsCountAll;
       for i:=0 to j-1 do begin
         If TNetData.NetData.GetConnection(i,nc) then begin
-          if (nc<>SenderConnection) And (nc.Connected) then TThreadNodeNotifyOperations.Create(nc,valids_operations);
+          if (nc<>SenderConnection) And (nc.Connected) And (nc.RemoteOperationBlock.block>0) then TThreadNodeNotifyOperations.Create(nc,valids_operations);
         end;
       end;
     end;