Un essai de script
Le
Mascaret

On Open Me
display on screen doItForAll
end Open Me
On doItForAll
Set value Jour to "Joyeux Nöel"
Set value Pour to "à toutes et à tous"
Set value EtAussi to "ainsi qu'à tous ceux que vous aimez."
Return Jour & SpaceBar & Pour & SpaceBar & EtAussi
end doItForAll
display on screen doItForAll
end Open Me
On doItForAll
Set value Jour to "Joyeux Nöel"
Set value Pour to "à toutes et à tous"
Set value EtAussi to "ainsi qu'à tous ceux que vous aimez."
Return Jour & SpaceBar & Pour & SpaceBar & EtAussi
end doItForAll
if date>25122008:
display "trop tard, oups !!!"
display "maintenant, gueule de bois"
display "ça ira mieux en 2009"
end ReadJoyeuxNoel