Remove base64 code

This commit is contained in:
2023-03-05 11:44:06 +01:00
parent c4f765b94d
commit 144d31eaee

View File

@@ -105,10 +105,3 @@
4186IF D>255 THEN D=0:C=C+1
4190NEXT I
4999RETURN
5000REM Encodes a list of bytes to base64
5010REM Takes variable D(189) and returns E(252).
5020FOR I=0 TO 189 BY 3
5030A=D(I)/4
5040B=((D(I) AND 3) * 16) OR (D(I+1)/16)
5050C=((D(I+1) AND 4) * 16) OR (D(I+2)/16)
5060E=(D(I+2) AND 4) * 16