Does your Amiga have internet where you can post the subroutines as they were entered?

By the way, there is 12k of binary before the text.

By the way...I just removed the decoding/coding code and when I saved the file it still saved it encrypted with 1.80 MB in size...as if the decode/encode code is not needed at all. When I view the file using more...I still receive jibberish and encryption. Perhaps it is saving memory into file instead of actual values in array and placing them in 49 row to 49 columns.

I could be wrong. Do you want me to send you the source code of my editor and you can try it from your end or prefer this method?

doing it right now

Try bypassing the encryption in both the saver and the loader.  If it works after that, we'll know it's in the encryption.  If that doesn't help we can at least narrow it down from there.

I just wanted to inform you that decoding is not working, can you help me here?

The decoding is not working. It is still reading jibberish. It have failed to decode. Can you help me?

saving worked. It made a 1.7 MB encrypted file. Loading failed. It kept my hard drive activity endless working, then screen turn blue while loading and then went into software failure. Maybe because I am still using bank code. Let me try with your new code change.

https://www.ultimateamiga.co.uk/HostedProjects/AMOSFactory/AMOSProManual/14/1409.html

According to the manual, the 5 should come first and doesn't return a value.  The loop that had the rotate inside should be
ROL.W 5, C
Doke C, Deek(c) Xor $A55A
And the other loop should be:
Doke C, Deek(c) Xor $A55A
Ror.w 5, C inside the loop.

Bank code Xor.w, Bank Code ROL.w and Bank Code ROR.w requires the AMCAF extension.  Use the loop instead.

I have the extension. Even if I use the loop it returns syntax error. It would not allow me to compile.

Bank code Xor.w, Bank Code ROL.w and Bank Code ROR.w requires the AMCAF extension.  Use the loop instead.