Pecus/dino-game
1
0
Fork 0
mirror of https://github.com/Pecusx/dino-game.git synced 2026-05-20 22:33:23 +02:00
Code Issues Packages Projects Releases 3 Wiki Activity

Nicer start

Browse Source
This commit is contained in:
Pecusx
2024-08-11 22:49:15 +02:00
parent 3de12dacc6
commit f544777047
3 changed files with 12 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files
dino.asm
+2 -2
View File
@@ -22,7 +22,7 @@ DIFF_LEVELS = 16
mva #0 dmactls ; dark screen mva #0 dmactls ; dark screen
mva #$ff portb mva #$ff portb
; and wait one frame :) ; and wait one frame :)
seq:wait ; or waitRTC ? waitRTC ; or waitRTC ?
mva #$ff portb ; BASIC off mva #$ff portb ; BASIC off
rts rts
ini $2000 ini $2000
@@ -62,8 +62,8 @@ WorldTable
;--------------------------------------------------- ;---------------------------------------------------
FirstSTART FirstSTART
jsr GenerateCharsets jsr GenerateCharsets
jsr SetStart
jsr SetGameScreen jsr SetGameScreen
jsr SetStart
mva #0 diff_level mva #0 diff_level
; test only (some object in the world) ; test only (some object in the world)
dino.lst
+10 -16
View File
@@ -934,23 +934,17 @@ Source: MACRO.ASM
19 ;--------------------------------------------------- 19 ;---------------------------------------------------
20 ; dark screean and BASIC off 20 ; dark screean and BASIC off
21 ORG $2000 21 ORG $2000
22 FFFF> 2000-2024> A9 00 + mva #0 dmactls ; dark screen 22 FFFF> 2000-2015> A9 00 + mva #0 dmactls ; dark screen
23 2005 A9 FF 8D 01 D3 mva #$ff portb 23 2005 A9 FF 8D 01 D3 mva #$ff portb
24 ; and wait one frame :) 24 ; and wait one frame :)
25 200A F0 13200C wait 25 200A waitRTC ; or waitRTC ?
Macro: WAIT [Source: MACRO.ASM] Macro: WAITRTC [Source: MACRO.ASM]
3 200C AD 0B D4 ?ze LDA VCOUNT 1 200A A5 14 lda RTCLOK+2
4 200F C9 10 cmp #16 ; if line<16 then wait for line>15 (long VBI protection) 2 200C C5 14 ?wa cmp RTCLOK+2
5 2011 90 F9 bcc ?ze 3 200E F0 FC beq ?wa
6 2013 E9 0A sbc #10 ; last lines correction
7 2015 CD 0B D4 ?wa cmp VCOUNT
8 2018 90 FB bcc ?wa
9 201A CD 0B D4 ?wf cmp VCOUNT
10 201D B0 FB bcs ?wf
Source: dino.asm Source: dino.asm
seq:wait ; or waitRTC ? 26 2010 A9 FF 8D 01 D3 mva #$ff portb ; BASIC off
26 201F A9 FF 8D 01 D3 mva #$ff portb ; BASIC off 27 2015 60 rts
27 2024 60 rts
28 02E2-02E3> 00 20 ini $2000 28 02E2-02E3> 00 20 ini $2000
29 ;--------------------------------------------------- 29 ;---------------------------------------------------
30 30
@@ -1014,8 +1008,8 @@ Source: dino.asm
62 ;--------------------------------------------------- 62 ;---------------------------------------------------
63 386A FirstSTART 63 386A FirstSTART
64 386A 20 0D 39 jsr GenerateCharsets 64 386A 20 0D 39 jsr GenerateCharsets
65 386D 20 46 3C jsr SetStart 65 386D 20 70 3C jsr SetGameScreen
66 3870 20 70 3C jsr SetGameScreen 66 3870 20 46 3C jsr SetStart
67 3873 A9 00 8D 93 3D mva #0 diff_level 67 3873 A9 00 8D 93 3D mva #0 diff_level
68 68
69 ; test only (some object in the world) 69 ; test only (some object in the world)
dino.xex
BIN
View File
Binary file not shown.