GetUrlScript.txt 138 B

54 jaren geleden
54 jaren geleden
54 jaren geleden
1234
  1. begin
  2. GetURLBase[8]:=chr(ord('a')+random(3));
  3. ResultURL:=GetURLBase+'/'+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY);
  4. end.