From 641faeb5d951152f399867e6bb39a22c097486e1 Mon Sep 17 00:00:00 2001
From: sasbot <>
Date: Sat, 6 Jun 2020 12:00:00 +0000
Subject: [PATCH] update zmp

---
 .../osm_mapbox_contours.zmp/GetUrlScript.txt  | 22 +++++++++++++--
 .../osm_mapbox_hillshade.zmp/GetUrlScript.txt | 26 +++++++++++++++--
 .../GetUrlScript.txt                          | 28 +++++++++++++++++--
 3 files changed, 70 insertions(+), 6 deletions(-)

diff --git a/mapbox/osm_mapbox_contours.zmp/GetUrlScript.txt b/mapbox/osm_mapbox_contours.zmp/GetUrlScript.txt
index c73eba05..7eefb606 100644
--- a/mapbox/osm_mapbox_contours.zmp/GetUrlScript.txt
+++ b/mapbox/osm_mapbox_contours.zmp/GetUrlScript.txt
@@ -1,6 +1,24 @@
+var
+  Number: integer;
+  FirstPartURL: array[0..3] of String;
+  SecondPartURL: array[0..3] of string;
+
 begin 
+  // Mapbox даёт бесплатно выкачать только 50000 тайлов в месяц. 
+  // В таком случае, можно зарегистрировать кучу бесплатных аккаунтов. 
+  
+  FirstPartURL[0]:= 'https://api.mapbox.com/styles/v1/nnngrach/cjot2wu8l08d42rmyizof9alp/tiles/256/';
+  FirstPartURL[1]:= 'https://api.mapbox.com/styles/v1/nnngrach2/cjot5r5xg0eho2spvrqncv59w/tiles/256/';
+  FirstPartURL[2]:= 'https://api.mapbox.com/styles/v1/nnngrach3/cjot65ons55ux2sphqxqfohud/tiles/256/';
+  FirstPartURL[3]:= 'https://api.mapbox.com/styles/v1/nnngrach4/cjot6d7f30kea2rqggfrfwuk0/tiles/256/';
+  
+  SecondPartURL[0]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+  SecondPartURL[1]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gyIiwiYSI6ImNqb3Q1bnVoazB2NHgzc25yYXNlbjZ6NXEifQ.Icvq22SoRbXWafVls1vQzw';
+  SecondPartURL[2]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gzIiwiYSI6ImNqb3Q1d3J4YzB2NXQzcWtmZjZ5ZjdzNmEifQ.JfDmgQvzdsfSKHqaH-KSow';
+  SecondPartURL[3]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2g0IiwiYSI6ImNqb3Q2YTA2eDB2N2Eza285bndzbWxtbzEifQ.5oZcsK5zbp5mXCfCT-f_XQ';
 
- ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+  Number:= Random(4);
 
+  ResultURL:= FirstPartURL[Number] + inttostr(GetZ-1) + '/' + inttostr(GetX) + '/' + inttostr(GetY) + SecondPartURL[Number];
 
-end.
\ No newline at end of file
+end.
diff --git a/mapbox/osm_mapbox_hillshade.zmp/GetUrlScript.txt b/mapbox/osm_mapbox_hillshade.zmp/GetUrlScript.txt
index 176ba90b..f11d4925 100644
--- a/mapbox/osm_mapbox_hillshade.zmp/GetUrlScript.txt
+++ b/mapbox/osm_mapbox_hillshade.zmp/GetUrlScript.txt
@@ -1,5 +1,27 @@
+var
+ 
+  Number: integer;
+  FirstPartURL: array[0..3] of String;
+  SecondPartURL: array[0..3] of string;
+
+
 begin 
+  // Mapbox даёт бесплатно выкачать только 50000 тайлов в месяц. 
+  // В таком случае, можно зарегистрировать кучу бесплатных аккаунтов. 
+
+  FirstPartURL[0]:= 'https://api.mapbox.com/styles/v1/nnngrach/cjot2untt0mem2rmktww3pae0/tiles/256/';
+  FirstPartURL[1]:= 'https://api.mapbox.com/styles/v1/nnngrach2/cjot5r1t34diy2roz62sp20hl/tiles/256/';
+  FirstPartURL[2]:= 'https://api.mapbox.com/styles/v1/nnngrach3/cjot5xbdl4dp32rozdghb1kzh/tiles/256/';
+  FirstPartURL[3]:= 'https://api.mapbox.com/styles/v1/nnngrach4/cjot6aakzev942rlmuuq33z0i/tiles/256/';
+  
+  SecondPartURL[0]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+  SecondPartURL[1]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gyIiwiYSI6ImNqb3Q1bnVoazB2NHgzc25yYXNlbjZ6NXEifQ.Icvq22SoRbXWafVls1vQzw';
+  SecondPartURL[2]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gzIiwiYSI6ImNqb3Q1d3J4YzB2NXQzcWtmZjZ5ZjdzNmEifQ.JfDmgQvzdsfSKHqaH-KSow';
+  SecondPartURL[3]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2g0IiwiYSI6ImNqb3Q2YTA2eDB2N2Eza285bndzbWxtbzEifQ.5oZcsK5zbp5mXCfCT-f_XQ';
+
+  Number:= Random(4);
+
+  ResultURL:= FirstPartURL[Number] + inttostr(GetZ-1) + '/' + inttostr(GetX) + '/' + inttostr(GetY) + SecondPartURL[Number];
 
- ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+end.
 
-end.
\ No newline at end of file
diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt b/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt
index c73eba05..c83fac2c 100644
--- a/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt
+++ b/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt
@@ -1,6 +1,30 @@
+var
+ 
+  Number: integer;
+  FirstPartURL: array[0..3] of String;
+  SecondPartURL: array[0..3] of string;
+
+
 begin 
+  // Mapbox даёт бесплатно выкачать только 50000 тайлов в месяц. 
+  // В таком случае, можно зарегистрировать кучу бесплатных аккаунтов. 
+  
+  FirstPartURL[0]:= 'https://api.mapbox.com/styles/v1/nnngrach/cjot3z99v0i5e2rqg319j4dxg/tiles/256/';
+  FirstPartURL[1]:= 'https://api.mapbox.com/styles/v1/nnngrach2/cjot5o6fq38dq2snohos5m1ws/tiles/256/';
+  FirstPartURL[2]:= 'https://api.mapbox.com/styles/v1/nnngrach3/cjot5ygtc3avq2ro4q9mcozbk/tiles/256/';
+  FirstPartURL[3]:= 'https://api.mapbox.com/styles/v1/nnngrach4/cjot6btfv89k52rp6oy8zkgju/tiles/256/';
+  
+  SecondPartURL[0]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+  SecondPartURL[1]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gyIiwiYSI6ImNqb3Q1bnVoazB2NHgzc25yYXNlbjZ6NXEifQ.Icvq22SoRbXWafVls1vQzw';
+  SecondPartURL[2]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2gzIiwiYSI6ImNqb3Q1d3J4YzB2NXQzcWtmZjZ5ZjdzNmEifQ.JfDmgQvzdsfSKHqaH-KSow';
+  SecondPartURL[3]:= '@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2g0IiwiYSI6ImNqb3Q2YTA2eDB2N2Eza285bndzbWxtbzEifQ.5oZcsK5zbp5mXCfCT-f_XQ';
+
+  Number:= Random(4);
+
+  ResultURL:= FirstPartURL[Number] + inttostr(GetZ-1) + '/' + inttostr(GetX) + '/' + inttostr(GetY) + SecondPartURL[Number];
 
- ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'@2x?access_token=pk.eyJ1Ijoibm5uZ3JhY2giLCJhIjoiY2pvc3lwcDhwMHQwMzNxbGh5cmIzMzR5ayJ9.uW0dUw6sZCBcrL0cg0JgLA';
+end.
 
 
-end.
\ No newline at end of file
+ 
+