Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2024-12-26 04:32:05 +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
dpFROM = BASL
dpFROM = dpSTR+2
dpTO = dpFROM+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?
cmp WNDBTM
bcc calcNEXT9
beq calcNEXT9
dec CV
@ -256,8 +255,6 @@ scroll2WINDOW: !zone
; WNDBTM = WNDTOP+1 ; bottom+1 of text window
lda WNDBTM ; 23 => 24 * 8 = 192
clc
adc #1
asl
asl
asl ; *8

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

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