ソースを参照

update zmp

undefined
sasgis 54年前
コミット
c5d58904d2
4個のファイルの変更5行の追加6行の削除
  1. +1
    -1
      Google/Ghyb.zmp/GetUrlScript.txt
  2. +1
    -1
      Google/GoogleLand.zmp/GetUrlScript.txt
  3. +1
    -1
      Google/GoogleMap.zmp/GetUrlScript.txt
  4. +2
    -3
      Google/GoogleSat.zmp/GetUrlScript.txt

+ 1
- 1
Google/Ghyb.zmp/GetUrlScript.txt ファイルの表示

@@ -1,3 +1,3 @@
begin
ResultURL:=GetURLBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
ResultURL:=GetURLBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8));
end.

+ 1
- 1
Google/GoogleLand.zmp/GetUrlScript.txt ファイルの表示

@@ -1,3 +1,3 @@
begin
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8));
end.

+ 1
- 1
Google/GoogleMap.zmp/GetUrlScript.txt ファイルの表示

@@ -1,3 +1,3 @@
begin
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8));
end.

+ 2
- 3
Google/GoogleSat.zmp/GetUrlScript.txt ファイルの表示

@@ -1,4 +1,3 @@
begin
//GetUrlBase[11]:=inttostr((GetX+GetY) mod 4)[1];
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
end.
ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8));
end.

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