ソースを参照

update zmp

master
sasgis 54年前
コミット
7577f347c9
7個のファイルの変更7行の追加7行の削除
  1. +1
    -1
      Genshtab/karta_gsh_10km.zmp/GetUrlScript.txt
  2. +1
    -1
      Genshtab/karta_gsh_1km.zmp/GetUrlScript.txt
  3. +1
    -1
      Genshtab/karta_gsh_250m.zmp/GetUrlScript.txt
  4. +1
    -1
      Genshtab/karta_gsh_2km.zmp/GetUrlScript.txt
  5. +1
    -1
      Genshtab/karta_gsh_500m.zmp/GetUrlScript.txt
  6. +1
    -1
      Genshtab/karta_gsh_5km.zmp/GetUrlScript.txt
  7. +1
    -1
      history/5v_kavkaz.zmp/GetUrlScript.txt

+ 1
- 1
Genshtab/karta_gsh_10km.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
Genshtab/karta_gsh_1km.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
Genshtab/karta_gsh_250m.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
Genshtab/karta_gsh_2km.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
Genshtab/karta_gsh_500m.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
Genshtab/karta_gsh_5km.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

+ 1
- 1
history/5v_kavkaz.zmp/GetUrlScript.txt ファイルの表示

@@ -1,6 +1,6 @@
var
url : string;
begin
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(6)) );
ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
end.

読み込み中…
キャンセル
保存