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.

Завантаження…
Відмінити
Зберегти