Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-20 22:33:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Strong port flaut fixed! Again :)

Browse Source 
And better wind speed display.
This commit is contained in:
Pecusx
2024-03-14 19:47:23 +01:00
parent 630c5eaa1a
commit 0e699ce41a
7 changed files with 14 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Atari/textproc.asm
+10 -13
View File
@@ -1966,27 +1966,24 @@ NoShieldEnergy
;=========================
mwa Wind temp
lda #space
bit Wind+3 ; highest byte of 4 byte wind
bmi DisplayLeftWind
sta statusBuffer+80+17 ; (space) char
lda #char_TAB ; (tab) char
sta statusBuffer+80+20
bne DisplayWindValue
DisplayLeftWind
sta statusBuffer+80+20 ; (space) char
:4 lsrw temp ;divide by 16 to have a nice value on a screen
lda temp
beq DisplayWindValuex
bit Wind+3 ; highest byte of 4 byte wind
bmi DisplayLeftWindx
ldx #char_TAB ; (tab) char
stx statusBuffer+80+20
bne DisplayWindValuex
DisplayLeftWindx
lda #char_DEL ;(del) char
sta statusBuffer+80+17
sec ; Wind = -Wind
lda #$00
sbc temp
sta temp
lda #$00
sbc temp+1
sta temp+1
DisplayWindValue
:4 lsrw temp ;divide by 16 to have a nice value on a screen
lda temp
;sta decimal
DisplayWindValuex
mwx #statusBuffer+80+18 displayposition
jsr displaybyte