:.TYPE
:.THIS PROGRAM TYPES TO LOCATIONS SPECIFIED IN THE OUTPUT COMMANDS. CHANGE THESE TO CHANGE WHERE IT IS TYPING
:0→A
:Output(0,4)
:Disp "Type Your Name:"
:Output(0,5)
:"WRMH"→GDB5
:det(3)
:"VQLG"
:det(3)
:"ZUPKFC"
:det(1)
:" YTOJEB"
:det(2)
:"XSNIDA"
:"                "→GDB9
:
:Repeat B=54 and (A≠0
:getKey→B
:If B=56 and (A≠0
:A-1→A
:Output(A,5,' '►Frac)
:Output(A,5)
:End
:If B=15
:0→A
:Output(0,5,GDB9)
:Output(0,5)
:End
:.CHANGE THIS NUMBER IF YOU WANT THE MAX NUMBER OF CHARACTERS TO NOT BE 16
:If A<16
:If B>10 and (B<48)
:If {B+GDB5-11}→C
:Disp C►Frac
:C→{A+{L1}}
:A+1→A
:End
:End
:End
:End
:0→{A+{L1}}
:Output(0,0)
:Disp {L1}
:Repeat getKey=54
:End