VCCC2023A1

Author: Michael T Barry
Category: Christmas Challenge
System:   Apple 1
Language: 6502 machine language
Len source code: 193 keystrokes, in two lines with two <CR>s
Len exe file:    70 bytes
Len code only:   70 bytes

Instructions:
Enter these two source lines at the WOZMON prompt:

80:A9 FF 48 A9 1E 48 A2 FE A0 5 20 A1 0 20 93 0 20 93 0 A2 F B4 B5 20 A9 0 CA D0 F8 A2 F1 B4 C6 20
:A9 0 E8 D0 F8 A0 5 A9 A0 20 EF FF 88 D0 F8 A9 AA 4C EF FF 5 5 16 3 1 3 1 3 18 1 3 1 3 1 1A 5

 followed by 

80R

I use https://www.scullinsteel.com/apple1/

 and copy/paste the source using the Load button

Description:
Hand-assembled.  Uses a 16-byte table and depends on a 40-column screen with auto scroll.
WOZMON can't RTS from the R command without help, so six bytes of code prepare the stack.
The code contains eight JSRs, but no RTSs.  The only RTS needed is in WOZMON ROM @ $FFF7.

Comments:
I surprised myself with a bug-free run on the first try!80:A9 FF 48 A9 1E 48 A2 FE A0 5 20 A1 0 20 93 0 20 93 0 A2 F B4 B5 20 A9 0 CA D0 F8 A2 F1 B4 C6 20
:A9 0 E8 D0 F8 A0 5 A9 A0 20 EF FF 88 D0 F8 A9 AA 4C EF FF 5 5 16 3 1 3 1 3 18 1 3 1 3 1 1A 5