4 lines
143 B

  1. begin
  2. GetURLBase[24]:=chr(ord('2')+random(4));
  3. ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
  4. end.