Apple-2-SW/antoine-source
1
0
Fork 0
mirror of https://github.com/antoinevignau/source.git synced 2025-02-12 15:30:45 +00:00
Code Issues Projects Releases Wiki Activity

scene_forcee coded

Browse Source
This commit is contained in:
Antoine Vignau 2023-08-14 16:13:47 +02:00
parent 229faea98b
commit 6186ffd178
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
toutadisparu/sources/toutadisparu.s
View File

@ -290,14 +290,18 @@ main
stal $310 stal $310
lda ptrTEXTES+2 lda ptrTEXTES+2
stal $312 stal $312
*---
mainLOOP mainLOOP lda scene_actuelle
lda scene_actuelle
jsr nouvelle_scene jsr nouvelle_scene
lda scene_actuelle lda scene_actuelle
jsr image jsr image
* jsr affiche_texte * jsr affiche_texte
jsr suite_forcee
sta fgSUITEFORCEE ; true if no words but 'suite'
*---------------------------------------- *----------------------------------------
* TASK MASTER * TASK MASTER
*---------------------------------------- *----------------------------------------
@ -323,6 +327,9 @@ taskLOOP
asl asl
tax tax
jsr (taskTBL,x) jsr (taskTBL,x)
*--- Handle clicks
bra taskLOOP bra taskLOOP
*----------------------------------- Gestion du keyDown *----------------------------------- Gestion du keyDown