Base64 encode data: Difference between revisions
→{{header|Commodore BASIC}}
Line 492:
=={{header|Commodore BASIC}}==
Assumes the source file is a PRG on disk drive device 8, writes encoded file
<lang basic>
100 print chr$(247);chr$(14);
110 dim a$(63): rem alphabet
120 dim i(2): rem input bytes
|