Guru
Joined: 04/06/2022
Location: GermanyPosts: 1117
| Posted: 12:12pm 03 Nov 2022 |
what about Tomainia?
@bar1010
Sadly did'nt run on MMBasic 4 Windows, but maybee can be converted to the Pico by shrinking the Images and save as JPG.
btw.
wouldn't it be better to simple encrypt (ROT13) the data to keep players from cheating?
Print ROT13$("Guvf vf n fghcvq fnzcyr grkg jvgu ab zrnavat 123!")
Function ROT13$(encode$)
Local f%,fnd%
Local abc$="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
Local nop$="NOPQRSTUVWXYZABCDEFGHIJKLMnopqrstuvwxyzabcdefghijklm"
For f%= 1 To Len(encode$)
fin$=Mid$(encode$,f%,1)
fnd%=Instr(abc$,fin$)
If fnd% Then
ROT13$=ROT13$+Mid$(nop$,fnd%,1)
Else
ROT13$=ROT13$+fin$
End If
Next f%
End Function
Edited 2022-11-04 05:23 by Martin H.