Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.

GetUrlScript.txt 272 B

pirms 54 gadiem
12345678910
  1. var xx,yy,zz:string;
  2. begin
  3. xx:=inttostr(GetX);
  4. yy:=inttostr(round(intpower(2,getz-1)-GetY)-1);
  5. zz:=inttostr(GetZ-1);
  6. while length(xx)<8 do xx:='0'+xx;
  7. while length(yy)<8 do yy:='0'+yy;
  8. while length(zz)<2 do zz:='0'+zz;
  9. ResultURL:=GetUrlBase+xx+','+yy+','+zz;
  10. end.