Happy Birthday Fred!
Re: Happy Birthday Fred!
Happy Birthday Frédéric. You becoming little more wiser now, congrats!
ʽʽSuccess is almost totally dependent upon drive and persistence. The extra energy required to make another effort or try another approach is the secret of winning.ʾʾ --Dennis Waitley
Re: Happy Birthday Fred!
Happy Birthday, Fred.
Thank you for your reliable product that you have developed and supported over many years and thank you for being so faithful to yourself all the time. Stay as you are, because you are just a great person and developer.
Many congratulations and many more successful years.
Kurzer
Thank you for your reliable product that you have developed and supported over many years and thank you for being so faithful to yourself all the time. Stay as you are, because you are just a great person and developer.
Many congratulations and many more successful years.
Kurzer
PB 6.02 x64, OS: Win 7 Pro x64 & Win 11 x64, Desktopscaling: 125%, CPU: I7 6500, RAM: 16 GB, GPU: Intel Graphics HD 520, User age in 2023: 56y
"Happiness is a pet." | "Never run a changing system!"
"Happiness is a pet." | "Never run a changing system!"
Re: Happy Birthday Fred!
Code: Select all
Procedure.s ordinal(number)
Protected ordinalSuffix.s
Select Right(Str(number), 1)
Case "1": ordinalSuffix = "st"
Case "2": ordinalSuffix = "nd"
Case "3": ordinalSuffix = "rd"
Default: ordinalSuffix = "th"
EndSelect
ProcedureReturn Str(number) + ordinalSuffix
EndProcedure
If Year(Date()) > 1977 And Year(Date()) < 2038
currentBirthday = Year(Date()) - 1977
If Month(Date()) = 4 And Day(Date()) = 1
Expression$ = "Happy " + ordinal(currentBirthday) + " birthday Fred!!!"
MessageRequester("Congratulations", Expression$)
Else
Expression$ = "I just heard, Happy belated " + ordinal(currentBirthday) + " birthday Fred!"
MessageRequester("Congratulations", Expression$)
EndIf
Else
MessageRequester("Urgent!", "Happy 60+ years Fred, PureBasic's Date Library needs an update.")
EndIf
Re: Happy Birthday Fred!
Thank you all
Re: Happy Birthday Fred!
Happy birthday