just for fun
just for fun
- Subject: just for fun
- From: Michelle Steiner <email@hidden>
- Date: Mon, 24 Nov 2003 08:59:43 -0700
global q
set q to {}
set x to {}
repeat with i from 1 to 99 by 2
copy i to the end of x
end repeat
set xx to my a(x)
on a(z)
set r to random number from 1 to count z
copy item r of z to end of q
if (count z) is 1 then
return q
else if r is greater than 1 and r is less than (count z) then
set xxx to items 1 through (r - 1) of z & items (r + 1) through -1 of
z
else if r is (count z) then
set xxx to items 1 through -2 of z
else
set xxx to items 2 through -1 of z
end if
my a(xxx)
end a
--
The problem with political jokes is that too many of them get elected.
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.