Du kannst nicht mehr als 25 Themen auswählen Themen müssen entweder mit einem Buchstaben oder einer Ziffer beginnen. Sie können Bindestriche („-“) enthalten und bis zu 35 Zeichen lang sein.

GetUrlScript.txt 395 B

vor 4 Jahren
1234567891011121314151617
  1. var
  2. Step:integer;
  3. shiftx,shifty:integer;
  4. y:integer;
  5. begin
  6. shiftx:=225280;
  7. shifty:=5632000;
  8. step:=round(225280/round(intpower(2,getz-3)))
  9. if gety<3 then step:=225280;
  10. y:=round(intpower(2,getz-1))-GetY-1;
  11. if y<=0 then y:=1;
  12. ResultURL:=GetURLBase+inttostr(shiftx+getx*step)+','+inttostr(shifty+Y*step)+','+inttostr(shiftx+getx*step+step)+','+inttostr(shifty+Y*step+step);
  13. end.