Hi there!
With acknowledgements to Yuri_dragon_17
rem This command hides the mouse pointer
hide mouse
rem Clear screen
cls
rem Define message string and write to screen
message$="With acknowledgements to Yuri_dragon_17"
center text 320,240,message$
rem A short pause before proceeding
wait 3000
rem Turn on screen refreshing
sync on
rem Display message a given number of times
repeat
rem Increment times counter
inc times
rem Set ink colour
ink rgb(0,255,0),0
rem Define message string ...
s$="Wishing you a very MERRY CHRISTMAS"
rem Clear screen
cls
rem ... and where to write to screen
for s=1 to len(s$)
center text 320,s*10-10,left$(s$,s)
next s
rem Set ink colour
ink rgb(255,0,0),0
rem Increment s counter
s=s+1
rem Write text to screen
center text 320,s*10-10,"and a"
rem Increment s counter
s=s+1
rem write text to screen
center text 320,s*10,"HAPPY NEW YEAR"
rem A short pause before proceeding
wait 30
rem Clear screen
cls
rem Let programme handle screen refreshing
sync
rem Number of times to display message
until times=100
rem Return screen refreshing to system
sync off
rem Write text to screen
center text 320,400,"Press any key to exit"
rem Wait for keypress
wait key
gearce
(GRC)
LANG MEY YER LUM REEK
That's ODD ...... In 1911, 3 men were hung for the murder of Sir Edmund Berry at Greenbury Hill, their last names were Green, Berry, and Hill.
