anchor.diff:  
     SaveStream.Write(fGoldCnt);
     SaveStream.Write(fGoldMaxCnt);
  -//  SaveStream.Write(fGoldDeliveryCount);
   end;
   
   
  
positive.code:       gHands[fOwner].Deliveries.Queue.AddDemand(Self, nil, wt_Gold, fGoldMaxCnt - Max(OldGoldMax, fGoldCnt), dtOnce, diNorm);
      end;
    end;
  
  ////    TryRemoveDemand
  //    for I := OldGoldMaxCnt to fGoldMaxCnt - 1 do
  //      gHands[fOwner].Deliveries.Queue.RemOffer(Self, wt_Gold, aCount);
  
  end;
  
  
  
negative.code:   if aFromScript then
      gHands[Owner].Stats.WareConsumed(aWare, aCount);
  
    Dec(fGoldCnt, aCount);
    //Only request a new resource if it is allowed by the distribution of wares for our parent player
    gHands[fOwner].Deliveries.Queue.AddDemand(Self, nil, aWare, aCount, dtOnce, diNorm);
  end;
  
  
  