25개 이상의 토픽을 선택하실 수 없습니다. Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

GetUrlScript.txt 269 B

54 년 전
12345678
  1. var
  2. xx,yy:integer;
  3. begin
  4. xx:=GetX;
  5. yy:=GetY-2;
  6. ResultURL:=GetURLBase+'&s='+inttostr(8-GetZ)+'&w=256&h=256&lt=0&ws=0&u=umap&x='+inttostr(round((xx-intpower(2,GetZ-3))*256+10))+'&y='+inttostr(round(intpower(2,GetZ-1)-yy)*-256+round(128*intpower(2,GetZ-2)));
  7. end.