start

set recipientName to "< Simon Ofield>"
set recipientAddress to ""
set theSubject to "STUDENTS SUPPORT UCU"
set theContent to "Dear Senior Manager,

I am writing to you as a UAL student to express my views on the UCU strikes.

While strike action is difficult for us students, as it disrupts our already stressful classes and assessments, I firmly believe this action is necessary as we need to challenge universities to become better employers that value and respect their staff.

As students, we are losing out on what we expected when we joined the university - but the buck of this does not fall on our staff themselves. I stand in solidarity with UAL staff and am asking you to find a satisfactory resolution to the issues raised by the trade unions.

Research from the UCU (University and College Union) has shown that across the university sector, more than half of academics are employed on precarious contracts, pay has fallen by 17% in the last 10 years and there is still an astonishing 15.9% gender pay gap. As universities, we should be in the lead to be equitable institutions, where everyone can work, learn and study to their highest ability. Surely conditions like these only set us back?

UAL is one of the best arts institutions in the world, and our chancellor - Sir Nigel Carrington - has been recognised by the Queen for his services, sits on the board of the Creative Industries Federation and on the Universities UK Board. We believe that he should use his considerable influence to improve working conditions for all staff across the higher education sector, starting with UAL.

I believe everyone deserves fair pay and working conditions. I fully support UCU in their strike action and their reasons for striking and hope an equitable solution for all parties can be found quickly. I implore you to take immediate action to bring these strikes to an end, by instructing those who negotiate on your behalf to back down from imposing the terms they’ve arrived at and re-engage with the UCU."

repeat
tell application "Mail"

##Create the message
set theMessage to make new outgoing message with properties {subject:theSubject, content:theContent, visible:true}

##Set a recipient
tell theMessage
make new to recipient with properties {name:recipientName, address:recipientAddress}

##Send the Message
send

end tell
end tell
delay 10

end repeat