Aleatorizar tiempos de inicio de eventos ical

Encontré la respuesta buscando en applescript hacer hora de inicio aleatoria .

Usé el siguiente código de este hilo de la comunidad de soporte de Apple:

tell application "TextEdit"
lanzar
repetir
retraso (número aleatorio entre 2 y 8)
establecer texto a escribir como "texto" & algún elemento de {"hola", "adiós"} & texto
fin repetir
end tell

y para el texto:

algún elemento de {"azul", "rojo"}

Aquí está el script final que me funcionó:

tell application "iCal"

    establecer miCal en "Tareas programadas"
    activar
    establecer todos los eventos en cada evento en el calendario myCal
    repetir con unEvento en todos los eventos
        establecer modTiempo en (número aleatorio entre 0 y 30)
        mostrar diálogo modTiempo con título fecha de inicio de unEvento como texto
        establecer nuevaHoraInicio en (fecha de inicio de unEvento) + modTiempo * minutos
        establecer fecha de inicio de unEvento en nuevaHoraInicio
        establecer (fecha final de unEvento) en ((fecha final de unEvento) + modTiempo * minutos)
    fin repetir
end tell