Better screen clear

This commit is contained in:
Pecusx
2024-08-11 18:20:57 +02:00
parent f13b7e5c71
commit 018ee7d318
4 changed files with 595 additions and 591 deletions
+4 -2
View File
@@ -159,7 +159,7 @@ CopyLoop
rts
.endp
.proc ClearScreen
ldy #WORLD_LENGTH ; TODO: shouldn't be -1?
ldy #44 ; visible screen len
lda #0
ClearLoop
sta screen+$700,y
@@ -167,8 +167,10 @@ ClearLoop
sta screen+$500,y
sta screen+$400,y
sta screen+$300,y
sta screen+$200,y
sta screen+$100,y
dey
bpl ClearLoop
bne ClearLoop
rts
.endp
;-----------------------------------------------
+83 -83
View File
@@ -604,87 +604,87 @@ FFFD 0000 @KBCODE
00 393B CLEARWORLD.0@
00 3942 CLEARSCREEN
00 3946 CLEARSCREEN.CLEARLOOP
00 3959 WORLDTOSCREEN
00 3960 WORLDTOSCREEN.TOSCREENLOOP
00 3969 WORLDTOSCREEN.NOTHINGTODRAW
00 3972 WORLDSHIFT
00 3974 WORLDSHIFT.SHIFT
00 398E WORLDSHIFT.1@
00 3998 WORLDSHIFT.INSERTOBJECT
00 39B3 WORLDSHIFT.NOINSERT
00 39B4 ANIMATE
00 39B6 ANIMATE.2@
00 39C8 ANIMATE.NOBIRD
00 39E0 ANIMATE.ENDJUMP
00 39E6 ANIMATE.NOJUMP
00 39E7 SHOWOBJECT
00 39F3 SHOWOBJECT.OBJECTLOOP
00 39FA SHOWOBJECT.3@
00 3A0C SHOWOBJECT.4@
00 3A1E SHOWOBJECT.5@
00 3A30 SHOWOBJECT.6@
00 3A42 SHOWDINO
00 3A5D SHOWDINO.DINOLOOP
00 3A64 SHOWDINO.7@
00 3A76 SHOWDINO.8@
00 3A88 SHOWDINO.9@
00 3A9A SHOWDINO.10@
00 3AAC SHOWDINO.JUMP
00 3AC3 SHOWDINO.JPHASE1
00 3AC5 SHOWDINO.DINOLOOP1
00 3ACC SHOWDINO.11@
00 3ADE SHOWDINO.12@
00 3AF0 SHOWDINO.13@
00 3B02 SHOWDINO.14@
00 3B14 SHOWDINO.JPHASE2
00 3B16 SHOWDINO.DINOLOOP2
00 3B1D SHOWDINO.15@
00 3B2F SHOWDINO.16@
00 3B41 SHOWDINO.17@
00 3B53 SHOWDINO.18@
00 3B65 SHOWDINO.JPHASE3
00 3B67 SHOWDINO.DINOLOOP3
00 3B6E SHOWDINO.19@
00 3B80 SHOWDINO.20@
00 3B92 SHOWDINO.21@
00 3BA4 SHOWDINO.22@
00 3BB6 SHOWDINO.JPHASE4
00 3BB8 SHOWDINO.DINOLOOP4
00 3BBF SHOWDINO.23@
00 3BD1 SHOWDINO.24@
00 3BE3 SHOWDINO.25@
00 3BF5 SHOWDINO.26@
00 3C07 CHECKJOY
00 3C1F CHECKJOY.NOCHANGE
00 3C20 CHECKJOY.UP
00 3C29 CHECKJOY.DOWN
00 3C2E SETSTART
00 3C3E SETSTART.FADECOLOR
00 3C58 SETGAMESCREEN
00 3C6D DINO_RUN_0
00 3C81 DINO_RUN_1
00 3C95 DINO_RUN_2
00 3CA9 DINO_CROUCH_1
00 3CBD DINO_CROUCH_2
00 3CD1 DINOSHAPESTABLEL
00 3CD7 DINOSHAPESTABLEH
00 3CDD GROUND_0
00 3CE5 BIRD_0
00 3CED BIRD_1
00 3CF5 BIRD_2
00 3CFD BIRD_0A
00 3D05 BIRD_1A
00 3D0D BIRD_2A
00 3D15 CACTUS_0
00 3D1D CACTUS_1
00 3D25 CACTUS_2
00 3D2D CACTUS_3
00 3D35 CACTUS_4
00 3D3D GROUND_1
00 3D45 GROUND_2
00 3D4D SHAPESTABLEL
00 3D5C SHAPESTABLEH
00 3D6B DIFF_OBJECT_GAP
00 3D7B DIFF_LEVEL
00 3D7C DINOJUMPTR
00 395F WORLDTOSCREEN
00 3966 WORLDTOSCREEN.TOSCREENLOOP
00 396F WORLDTOSCREEN.NOTHINGTODRAW
00 3978 WORLDSHIFT
00 397A WORLDSHIFT.SHIFT
00 3994 WORLDSHIFT.1@
00 399E WORLDSHIFT.INSERTOBJECT
00 39B9 WORLDSHIFT.NOINSERT
00 39BA ANIMATE
00 39BC ANIMATE.2@
00 39CE ANIMATE.NOBIRD
00 39E6 ANIMATE.ENDJUMP
00 39EC ANIMATE.NOJUMP
00 39ED SHOWOBJECT
00 39F9 SHOWOBJECT.OBJECTLOOP
00 3A00 SHOWOBJECT.3@
00 3A12 SHOWOBJECT.4@
00 3A24 SHOWOBJECT.5@
00 3A36 SHOWOBJECT.6@
00 3A48 SHOWDINO
00 3A63 SHOWDINO.DINOLOOP
00 3A6A SHOWDINO.7@
00 3A7C SHOWDINO.8@
00 3A8E SHOWDINO.9@
00 3AA0 SHOWDINO.10@
00 3AB2 SHOWDINO.JUMP
00 3AC9 SHOWDINO.JPHASE1
00 3ACB SHOWDINO.DINOLOOP1
00 3AD2 SHOWDINO.11@
00 3AE4 SHOWDINO.12@
00 3AF6 SHOWDINO.13@
00 3B08 SHOWDINO.14@
00 3B1A SHOWDINO.JPHASE2
00 3B1C SHOWDINO.DINOLOOP2
00 3B23 SHOWDINO.15@
00 3B35 SHOWDINO.16@
00 3B47 SHOWDINO.17@
00 3B59 SHOWDINO.18@
00 3B6B SHOWDINO.JPHASE3
00 3B6D SHOWDINO.DINOLOOP3
00 3B74 SHOWDINO.19@
00 3B86 SHOWDINO.20@
00 3B98 SHOWDINO.21@
00 3BAA SHOWDINO.22@
00 3BBC SHOWDINO.JPHASE4
00 3BBE SHOWDINO.DINOLOOP4
00 3BC5 SHOWDINO.23@
00 3BD7 SHOWDINO.24@
00 3BE9 SHOWDINO.25@
00 3BFB SHOWDINO.26@
00 3C0D CHECKJOY
00 3C25 CHECKJOY.NOCHANGE
00 3C26 CHECKJOY.UP
00 3C2F CHECKJOY.DOWN
00 3C34 SETSTART
00 3C44 SETSTART.FADECOLOR
00 3C5E SETGAMESCREEN
00 3C73 DINO_RUN_0
00 3C87 DINO_RUN_1
00 3C9B DINO_RUN_2
00 3CAF DINO_CROUCH_1
00 3CC3 DINO_CROUCH_2
00 3CD7 DINOSHAPESTABLEL
00 3CDD DINOSHAPESTABLEH
00 3CE3 GROUND_0
00 3CEB BIRD_0
00 3CF3 BIRD_1
00 3CFB BIRD_2
00 3D03 BIRD_0A
00 3D0B BIRD_1A
00 3D13 BIRD_2A
00 3D1B CACTUS_0
00 3D23 CACTUS_1
00 3D2B CACTUS_2
00 3D33 CACTUS_3
00 3D3B CACTUS_4
00 3D43 GROUND_1
00 3D4B GROUND_2
00 3D53 SHAPESTABLEL
00 3D62 SHAPESTABLEH
00 3D71 DIFF_OBJECT_GAP
00 3D81 DIFF_LEVEL
00 3D82 DINOJUMPTR
00 0008 JUMPLEN
+508 -506
View File
File diff suppressed because it is too large Load Diff
BIN
View File
Binary file not shown.