Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-08-12 12:29:04 +00:00
Code Issues Projects Releases Wiki Activity

fireworks: more cycle counting

Browse Source
This commit is contained in:
Vince Weaver 2018-09-11 21:16:49 -04:00
parent 0680a83360
commit 12957e97da
3 changed files with 51 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fireworks/fireworks.s
View File

@ -297,7 +297,7 @@ loop_forever:
jump_table:
.word (action_launch_firework-1)
.word (action_stars-1)
.word (action_move_rocket-1)
.word (action_stars-1)
.word (action_stars-1)

35
fireworks/fw.s
View File

@ -188,8 +188,7 @@ done_hill:
;===========
; 21
; lda #STATE_MOVE_ROCKET ; 2
lda #STATE_LAUNCH_ROCKET ; 2
lda #STATE_MOVE_ROCKET ; 2
sta STATE ; move to launch ; 3
rts ; 6
@ -200,7 +199,7 @@ done_hill:
;==========================================================================
; Move rocket
;==========================================================================
; cycles=24+11+20+18+14+53 = 140
; cycles=24+11+20+18+14+53 = 140+11 = 151
move_rocket:
@ -262,10 +261,18 @@ no_peak:
;========================================
; Check if out of bounds and stop moving
;========================================
; bcc = 8+7+12+20+6 = 53
; bcs/bcc = 8+7+12+20+6 = 53
; bcs/bcs/bmi = 8+7+5+33 = 53
; bcs/bcs/bpl/bcs = 8+7+5+7+20+6 = 53
; bcs/bcs/bpl/bcc/bcc = 8+7+5+7+20+6 = 53
; bcs/bcs/bpl/bcc/bcs = 8+7+5+7+20+6 = 53
lda XPOS_L ; if (xpos_l<=margin) too far left ; 3
cmp #MARGIN ; 2
bcc done_moving_first ; 3
;===========
; 8
; Due to 256 wraparound, the above will catch this case???
; cmp #XSIZE-MARGIN ; if (xpos_l>=(xsize-margin)) too far right
@ -275,18 +282,23 @@ no_peak:
lda YPOS_H ; if (ypos_h<=margin) too far up ; 3
cmp #MARGIN ; 2
bcc done_moving_second ; 3
;===========
; 7
;======================
; if falling downward
;======================
; -1
lda Y_VELOCITY_H ; 3
bmi going_up ; if (y_velocity_h>0) ; 3
;============
; 5
; if too close to ground, explode ; -1
lda YPOS_H ; if (ypos_h>=ysize-margin) ; 3
cmp #(YSIZE-MARGIN) ; 2
bcs done_moving_third ; 3
;============
; 7
; if fallen a bit past peak, explode ; -1
sec ; if (ypos_h>ysize-(ysize-peak)/2) ; 2
@ -307,9 +319,12 @@ done_moving_ft:
nop ; 2
nop ; 2
jmp done_bounds_checking ; 3
;===========
; 6
going_up:
; 30 cycles
; 33 cycles
lda MAX_STEPS ; 3
lda MAX_STEPS ; 3
lda MAX_STEPS ; 3
lda MAX_STEPS ; 3
@ -343,10 +358,15 @@ done_moving_third:
done_moving:
lda MAX_STEPS ; 3
sta CURRENT_STEP ; 3
;============
; 6
done_bounds_checking:
lda #STATE_LAUNCH_ROCKET ; 2
sta STATE ; 3
rts ; 6
@ -421,7 +441,8 @@ done_with_loop:
cmp MAX_STEPS
bne not_done_with_launch
lda #STATE_START_EXPLOSION
; lda #STATE_START_EXPLOSION
lda #STATE_LAUNCH_ROCKET
sta STATE

22
fireworks/state_machine.s
View File

@ -34,3 +34,25 @@ Xloop2: dex ; 2
jmp check_keyboard ; 3
;=================================
; action_move_rocket
;=================================
; and take 4504 cycles to do it
; we take 160 so waste 4344
action_move_rocket:
; Try X=19 Y=43 cycles=4344
ldy #43 ; 2
Yloop1: ldx #19 ; 2
Yloop2: dex ; 2
bne Yloop2 ; 2nt/3
dey ; 2
bne Yloop1 ; 2nt/3
jsr move_rocket ; 6+151 = 157
jmp check_keyboard ; 3