Flcker..

dino.asm

@@ -46,7 +46,7 @@ screen
     .ds $100*SCR_HEIGHT
 ; display list
 GameDL
-    :10 .byte SKIP8   ; empty lines
+    :15 .byte SKIP8   ; empty lines
 
     .rept SCR_HEIGHT, #
       .byte MODE2+LMS+SCH   ; gr.0+LMS+HSCRL
@@ -92,8 +92,12 @@ FirstSTART
     mva #$50 screen+$700+32
 EndLoop
     jsr WorldShift
+    ;lda #$32
+    ;sta COLBAK
     jsr WorldToScreen
     jsr ShowDino
+    ;lda #$5f
+    ;sta COLBAK
     jsr CheckJoy
     ;waitRTC                   ; or waitRTC ?
     ;key

dino.lab

@@ -587,104 +587,104 @@ FFFD	0000	@KBCODE
 00	2C00	FONT4
 00	3000	SCREEN
 00	3800	GAMEDL
-00	380B	LINE0_ADDR
-00	380E	LINE1_ADDR
-00	3811	LINE2_ADDR
-00	3814	LINE3_ADDR
-00	3817	LINE4_ADDR
-00	381A	LINE5_ADDR
-00	381D	LINE6_ADDR
-00	3820	LINE7_ADDR
-00	3825	WORLDTABLE
-00	3865	FIRSTSTART
-00	38AA	ENDLOOP
-00	3908	GENERATECHARSETS
-00	390A	GENERATECHARSETS.COPYLOOP
-00	3932	CLEARWORLD
-00	3936	CLEARWORLD.0@
-00	393D	CLEARSCREEN
-00	3941	CLEARSCREEN.CLEARLOOP
-00	3954	WORLDTOSCREEN
-00	395B	WORLDTOSCREEN.TOSCREENLOOP
-00	3964	WORLDTOSCREEN.NOTHINGTODRAW
-00	396D	WORLDSHIFT
-00	396F	WORLDSHIFT.SHIFT
-00	3989	WORLDSHIFT.1@
-00	3993	WORLDSHIFT.INSERTOBJECT
-00	39AE	WORLDSHIFT.NOINSERT
-00	39AF	ANIMATE
-00	39B1	ANIMATE.2@
-00	39C3	ANIMATE.NOBIRD
-00	39DB	ANIMATE.ENDJUMP
-00	39E1	ANIMATE.NOJUMP
-00	39E2	SHOWOBJECT
-00	39EE	SHOWOBJECT.OBJECTLOOP
-00	39F5	SHOWOBJECT.3@
-00	3A07	SHOWOBJECT.4@
-00	3A19	SHOWOBJECT.5@
-00	3A2B	SHOWOBJECT.6@
-00	3A3D	SHOWDINO
-00	3A58	SHOWDINO.DINOLOOP
-00	3A5F	SHOWDINO.7@
-00	3A71	SHOWDINO.8@
-00	3A83	SHOWDINO.9@
-00	3A95	SHOWDINO.10@
-00	3AA7	SHOWDINO.JUMP
-00	3ABE	SHOWDINO.JPHASE1
-00	3AC0	SHOWDINO.DINOLOOP1
-00	3AC7	SHOWDINO.11@
-00	3AD9	SHOWDINO.12@
-00	3AEB	SHOWDINO.13@
-00	3AFD	SHOWDINO.14@
-00	3B0F	SHOWDINO.JPHASE2
-00	3B11	SHOWDINO.DINOLOOP2
-00	3B18	SHOWDINO.15@
-00	3B2A	SHOWDINO.16@
-00	3B3C	SHOWDINO.17@
-00	3B4E	SHOWDINO.18@
-00	3B60	SHOWDINO.JPHASE3
-00	3B62	SHOWDINO.DINOLOOP3
-00	3B69	SHOWDINO.19@
-00	3B7B	SHOWDINO.20@
-00	3B8D	SHOWDINO.21@
-00	3B9F	SHOWDINO.22@
-00	3BB1	SHOWDINO.JPHASE4
-00	3BB3	SHOWDINO.DINOLOOP4
-00	3BBA	SHOWDINO.23@
-00	3BCC	SHOWDINO.24@
-00	3BDE	SHOWDINO.25@
-00	3BF0	SHOWDINO.26@
-00	3C02	CHECKJOY
-00	3C1A	CHECKJOY.NOCHANGE
-00	3C1B	CHECKJOY.UP
-00	3C24	CHECKJOY.DOWN
-00	3C29	SETSTART
-00	3C39	SETSTART.FADECOLOR
-00	3C53	SETGAMESCREEN
-00	3C68	DINO_RUN_0
-00	3C7C	DINO_RUN_1
-00	3C90	DINO_RUN_2
-00	3CA4	DINO_CROUCH_1
-00	3CB8	DINO_CROUCH_2
-00	3CCC	DINOSHAPESTABLEL
-00	3CD2	DINOSHAPESTABLEH
-00	3CD8	GROUND_0
-00	3CE0	BIRD_0
-00	3CE8	BIRD_1
-00	3CF0	BIRD_2
-00	3CF8	BIRD_0A
-00	3D00	BIRD_1A
-00	3D08	BIRD_2A
-00	3D10	CACTUS_0
-00	3D18	CACTUS_1
-00	3D20	CACTUS_2
-00	3D28	CACTUS_3
-00	3D30	CACTUS_4
-00	3D38	GROUND_1
-00	3D40	GROUND_2
-00	3D48	SHAPESTABLEL
-00	3D57	SHAPESTABLEH
-00	3D66	DIFF_OBJECT_GAP
-00	3D76	DIFF_LEVEL
-00	3D77	DINOJUMPTR
+00	3810	LINE0_ADDR
+00	3813	LINE1_ADDR
+00	3816	LINE2_ADDR
+00	3819	LINE3_ADDR
+00	381C	LINE4_ADDR
+00	381F	LINE5_ADDR
+00	3822	LINE6_ADDR
+00	3825	LINE7_ADDR
+00	382A	WORLDTABLE
+00	386A	FIRSTSTART
+00	38AF	ENDLOOP
+00	390D	GENERATECHARSETS
+00	390F	GENERATECHARSETS.COPYLOOP
+00	3937	CLEARWORLD
+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	0008	JUMPLEN