;
;       XL-Bas Present 2024 by JAC! of WUDSN.
;
;       Done for "https://logiker.com/Vintage-Computing-Christmas-Challenge-2024".
;       Single Turbobasic XL line with 97 bytes.
;       Load using ENTER "D:XLBAS24.BAS".
;       Thanks to Logiker for this challenge.