Re: Ordinal Numbers (1st, 2nd, etc.)
Re: Ordinal Numbers (1st, 2nd, etc.)
- Subject: Re: Ordinal Numbers (1st, 2nd, etc.)
- From: Arthur J Knapp <email@hidden>
- Date: Fri, 17 Aug 2001 10:32:12 -0400
>
Date: Thu, 16 Aug 2001 18:21:37 -0400
>
Subject: Ordinal Numbers (1st, 2nd, etc.)
>
From: "Greg Back" <email@hidden>
>
Does anyone know of a way to change integers (1, 2, 3) to ordinal numbers
>
(1st, 2nd, 3rd)?? I know you can set of equivalent lists and match them up,
>
but is there an easier way??
set anInteger to 5
set anOrdinal to AsOrdinal00(anInteger)
-- > "5th"
on AsOrdinal(n)
if n = 1 then
return "1st"
else if n = 2 then
return "2nd"
else if n = 3 then
return "3rd"
else
return "" & n & "th"
end if
end AsOrdinal
... if you want something that looks cool:
on AsOrdinal(n)
try
return word n of "1st 2nd 3rd"
on error
return "" & n & "th"
end try
end AsOrdinal
Arthur J. Knapp
http://www.stellarvisions.com
mailto:email@hidden
Hey, check out:
http://www.natural-innovations.com/as/