Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2025-01-13 18:30:38 +00:00
Code Issues Projects Releases Wiki Activity

Fixed scrolling.

Browse Source
This commit is contained in:
Martin Haye 2014-07-23 15:39:43 -05:00
parent 760cccbb80
commit f7655e6c79
3 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Platform/Apple/virtual/src/font/equates.i
View File

@ -35,6 +35,6 @@ HPAG = INVFLG+1 ; $20 for HGR1, $40 for HGR2
dpSTR = HPAG+1 ; Pointer to source string dpSTR = HPAG+1 ; Pointer to source string
dpFROM = BASL dpFROM = dpSTR+2
dpTO = dpFROM+2 dpTO = dpFROM+2
dpTO2 = dpTO+2 dpTO2 = dpTO+2

3
Platform/Apple/virtual/src/font/fontEngine.s
View File

@ -165,7 +165,6 @@ nextLINE:
lda CV ; did we reach the end of the area? lda CV ; did we reach the end of the area?
cmp WNDBTM cmp WNDBTM
bcc calcNEXT9 bcc calcNEXT9
beq calcNEXT9
dec CV dec CV
@ -256,8 +255,6 @@ scroll2WINDOW: !zone
; WNDBTM = WNDTOP+1 ; bottom+1 of text window ; WNDBTM = WNDTOP+1 ; bottom+1 of text window
lda WNDBTM ; 23 => 24 * 8 = 192 lda WNDBTM ; 23 => 24 * 8 = 192
clc
adc #1
asl asl
asl asl
asl ; *8 asl ; *8

6
Platform/Apple/virtual/src/plasma/gameloop.pla
View File

@ -560,6 +560,10 @@ def initMap()
; Draw the first frame ; Draw the first frame
renderFrame() renderFrame()
redraw = FALSE redraw = FALSE
while TRUE
displayStr(@helloStr)
loop
end end
; Window for the map name bar ; Window for the map name bar
@ -577,7 +581,7 @@ def setWindow2()
^wndtop = 3 ^wndtop = 3
^wndbtm = 17 ^wndbtm = 17
^wndleft = 22 ^wndleft = 22
^wndwdth = 38 ^wndwdth = 37
^cursv = ^wndtop ^cursv = ^wndtop
^cursh = ^wndleft ^cursh = ^wndleft
end end