Apple, AppleScript, AppleScript Studio, AppleTalk, AppleWorks, ColorSync, Finder, HyperCard, iBook, iLife, iMac, iWork, Keynote, Mac, Macintosh, Mac OS, Pages, Panther, PowerBook, Power Mac, Power Macintosh, QuickTime, Safari, Tiger, Xcode sont des marques déposées par Apple Computer, Inc., enregistrées aux Etats-Unis et dans les autres pays. Liste officielle

De : (Liste AppleScript francophone) <applescript_fr@xxxxxxx.net>
À : "(Liste AppleScript francophone)" <applescript_fr@xxxxxxx.net>
Date : mercredi 26 décembre 2001 06:01
Objet : applescript_fr Digest #380

        Liste AppleScript francophone Digest #380

 1) Re: Noel
    by Daniel Varlet <varlet@xxxxxxx.ch>

De : Daniel Varlet <varlet@xxxxxxx.ch>
Date : Tue, 25 Dec 2001 09:40:40 +0100
Objet : [AS] Re: Noel

À 01:26 +0100 le 25.12.2001, Serge.Tegta écrivait au sujet de "[AS] Re: Noel" :
> Bon [& 2414 occurrences de "Noël"]

Pour résoudre ton problème je te propose :

[SCRIPT] 
set t to {"Bon"}
repeat 2414 times
	if ((count t) mod 15) = 0 then
		"" & return
	else
		space
	end if
	set the end of t to "" & result & "Noël"
end repeat
t as string
[/SCRIPT] 

;-) évidemment... 
et dans la foulée :

[SCRIPT Vœux] 
display dialog "Bonnes fêtes à tous." buttons {"*<:-)"}¬
 default button 1 with icon -20024
[/SCRIPT] 

A+



-- 
Daniel