#Part 2 in Applescript, 594654
wait... where's the "tips for golfing in Applescript" page?
global a
global b
global c
global s
on f at n
set end of b to a
end
on g at n
f at a
f at a
end
on h at n
g at a
g at a
end
on i at n
h at a
h at a
end
on j at n
irepeat atwith at in system info
if at a
end
end
on m at n
set end of b to a
set c to count of b
set end of s to ASCII character c
end
on n at n
m at a
m at a
m at a
end
on o at n
nrepeat atwith at in system info
nm at a
end
end
set a to random number
set b to a as list
j at a
j at a
set c to count of b
set s to ASCII character c
set s to s as list
o at a
on at a
on at a
n at a
in at a
gn at a
oj at a
ni at a
mg at a
jf at a
in at a
gm at a
om at a
nj at a
ji at a
ig at a
gn at a
om at a
display dialog s as text
###Output: