Change sprite color and fade

[Northern49]

Before I ask my question I'd first like to say thank you to everyone who's helped me with my little, and occasionally big requests over the past week. Thank you.

What would I type into call script to do the following?

Event[ID] = Color[#,#,#,#]
Event[ID] opacity -=   

 

[Northern49]

bump