| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||
| @@ -1,6 +1,6 @@ | |||||
| var | var | ||||
| url : string; | url : string; | ||||
| begin | begin | ||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) ); | |||||
| url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) ); | |||||
| ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | ||||
| end. | end. | ||||