Randomize ical horas de inicio de evento

He encontrado la respuesta a googlear para applescript make start time random.

He utilizado el siguiente código de esta página de soporte de apple de la comunidad hilo:

tell application "TextEdit"
launch
repeat
delay (random number from 2 to 8)
set textToType to "text" & some item of {"hello", "goodbye"} & text
end repeat
end tell

y para el texto:

some item of {"blue", "red"}

Aquí está el final de la secuencia de comandos que trabajó para mí:

tell application "iCal"

    set myCal to "Scheduled tasks"
    activate
    set allEvents to every event in calendar myCal
    repeat with anEvent in allEvents
        set modTime to (random number from 0 to 30)
        display dialog modTime with title start date of anEvent as text
        set newStartTime to (start date of anEvent) + modTime * minutes
        set start date of anEvent to newStartTime
        set (end date of anEvent) to ((end date of anEvent) + modTime * minutes)
    end repeat
end tell