| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('2')+random(9)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||
| @@ -1,4 +1,6 @@ | |||||
| var | |||||
| url: string; | |||||
| begin | begin | ||||
| GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
| ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
| ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
| end. | end. | ||||