Closed Rick-T137 closed 2 weeks ago
Looks pretty easy to update TOUPPER...
add these: 1609 if x$ = "," then x$ = "-" : gosub 1660
1660 i$=left$(i$,k-1)+x$+right$(i$,len(i$)-k) 1669 return
Then, update this line: 1317 print#15,"p"+chr$(98)+chr$(y)+chr$(0)+chr$(1):gosub500:i$=left$(rc$,12)
To be:
1317 print#15,"p"+chr$(98)+chr$(y)+chr$(0)+chr$(1):input#15,rc$:i$=left$(rc$,12)
Gonna try this in DEV and see how it goes.
It worked! Tested and deployed to PROD.
Kind of a two-parter: