tell application "iTunes"
(*make new playlist with properties {name:"Brian"}
set a to number of file tracks of library playlist 1
duplicate (file tracks of library playlist 1 whose album is "Alibis") to playlist "BriN"*)
make new playlist with properties {name:"Brian"}
set a to number of file tracks of library playlist 1
set b to ""
set mylist to the album of every track of library playlist 1
set c to {}
repeat with loop_var from 1 to (number of items in mylist)
if c does not contain (item loop_var of mylist) then
copy item loop_var of mylist to the end of c
end if
end repeat
set d to ""
repeat 5 times
duplicate (file tracks of library playlist 1 whose album is item (random number from 1 to (number of items in c)) of c) to playlist "Brian"
end repeat
end tell