Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-12-23 09:32:43 +00:00
Code Issues Projects Releases Wiki Activity

vm: fix load_raw, fix rng bug in textelite (carry flag shifting...)

Browse Source
This commit is contained in:
Irmen de Jong 2024-03-17 13:47:21 +01:00
parent 04df3c9f7f
commit fe2b67998c
4 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/res/prog8lib/virtual/diskio.p8
View File

@ -189,7 +189,7 @@ diskio {
sub load_raw(uword filenameptr, uword start_address) -> uword { sub load_raw(uword filenameptr, uword start_address) -> uword {
%ir {{ %ir {{
loadm.w r65534,diskio.load_raw.filenameptr loadm.w r65534,diskio.load_raw.filenameptr
loadm.w r65535,diskio.load_raw.address_override loadm.w r65535,diskio.load_raw.start_address
syscall 57 (r65534.w, r65535.w): r0.w syscall 57 (r65534.w, r65535.w): r0.w
returnr.w r0 returnr.w r0
}} }}

2
docs/source/todo.rst
View File

@ -1,8 +1,6 @@
TODO TODO
==== ====
vm textelite: after 1 galaxy jump: galaxy maps shows wrong planet name until you redraw them a second time. Current planet name changes when showing maps and asking planet i)nfo!
... ...

2
examples/textelite.p8
View File

@ -692,7 +692,7 @@ galaxy {
sub twist(uword x) -> uword { sub twist(uword x) -> uword {
ubyte xh = msb(x) ubyte xh = msb(x)
ubyte xl = lsb(x) ubyte xl = lsb(x)
rol(xh) xh <<= 1 ; make sure carry flag is not used on first shift!
rol(xl) rol(xl)
return mkword(xh, xl) return mkword(xh, xl)
} }

2
gradle.properties
View File

@ -5,4 +5,4 @@ org.gradle.daemon=true
kotlin.code.style=official kotlin.code.style=official
javaVersion=11 javaVersion=11
kotlinVersion=1.9.22 kotlinVersion=1.9.22
version=10.2-SNAPSHOT version=10.2