neauoire
/
oquonie
mirror of https://git.sr.ht/~rabbits/oquonie
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fixed issue with redraw happening during dialog

This commit is contained in:
Devine Lu Linvega 2023-03-15 21:26:14 -07:00
parent db1fa89fea
commit 8e727b420c
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/oquonie.tal
View File

@ -130,7 +130,9 @@ BRK
;patt-icns/4 #00 draw-fill
unlock-controls
( callback )
#0000 [ LIT2 &callback $2 ] EQU2k [ JMP JSR2k ] POP2 POP2
#0000
DUP2 [ LIT2 &callback $2 ] EQU2k [ JMP JSR2k ] POP2 POP2
,&callback STR2
request-update
BRK
@ -435,7 +437,7 @@ JMP2r
!animate/position
&done ( -- ) unlock-controls JMP2r
&done ( -- ) !unlock-controls
(
@|camera )
@ -1121,10 +1123,12 @@ JMP2r
@try-redraw ( -- )
;on-dialog/callback LDA2 #0000 NEQ2 ?&skip
[ LIT &requests $1 ] #01 [ JCN JMP2r ]
redraw-room
#00 ,&requests STR
[ LIT2 &count $2 ] INC2 ,&count STR2
&skip
JMP2r