6 行
385 B

  1. var
  2. maptile: string;
  3. begin
  4. maptile := RegExprReplaceMatchSubStr(GetURLBase, '1.\maps\.nlp', inttostr( Random(3)+1 )+'.maps.nlp' );
  5. ResultURL:=maptile+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'/256/png8?tprof=PrtlHere&lg=' + Version + '&app_id=SqE1xcSngCd3m4a1zEGb&token=r0sR1DzqDkS6sDnh902FWQ&xnlp=CL_JSMv2.5.0.3,SID_34725629-4FBE-4EA5-A2AB-52EA24DEA26F';
  6. end.