dos33fsprogs/vaporlock/fireworks/state_machine.s

	;=================================
	; action_stars
	;=================================
	; and take 4504 cycles to do it

	; we take 4501, so waste 3
action_stars:

	jsr	draw_stars			; 6+4492 = 4498

	ldy	FRAME	;nop			; 3

	jmp	check_keyboard			; 3


	;=================================
	; action_launch_firework
	;=================================
	; and take 4504 cycles to do it

	; we take 423 so waste 4081
action_launch_firework:

	; Try X=26 Y=30 cycles=4081

        ldy	#30							; 2
Xloop1:	ldx	#26							; 2
Xloop2:	dex								; 2
	bne	Xloop2							; 2nt/3
	dey								; 2
	bne	Xloop1							; 2nt/3

	jsr	launch_firework			; 6+414 = 420

	jmp	check_keyboard			; 3


	;=================================
	; action_move_rocket
	;=================================
	; and take 4504 cycles to do it

	; we take 1245 so waste 3259
action_move_rocket:

	; Try X=35 Y=18 cycles=3259

        ldy	#18							; 2
Yloop1:	ldx	#35							; 2
Yloop2:	dex								; 2
	bne	Yloop2							; 2nt/3
	dey								; 2
	bne	Yloop1							; 2nt/3

	jsr	move_rocket			; 6+1236 = 1242

	jmp	check_keyboard			; 3


	;=================================
	; action_start_explosion
	;=================================
	; and take 4504 cycles to do it

	; we take 449 so waste 4055
action_start_explosion:

	; Try X=15 Y=50 cycles=4051 R4

	nop
	nop

        ldy	#50							; 2
Zloop1:	ldx	#15							; 2
Zloop2:	dex								; 2
	bne	Zloop2							; 2nt/3
	dey								; 2
	bne	Zloop1							; 2nt/3

	jsr	start_explosion			; 6+440 = 446

	jmp	check_keyboard			; 3


	;=================================
	; action_continue_explosion
	;=================================
	; and take 4504 cycles to do it

	; we take 4495 so waste 9
action_continue_explosion:
	lda	STATE	; nop 3
	lda	STATE	; nop 3
	lda	STATE	; nop 3

	jsr	continue_explosion			; 6+4486 = 4492

	jmp	check_keyboard				; 3


	;=================================
	; action_stall_rocket
	;=================================
	; and take 4504 cycles to do it

	; 4504 - 8 = 4496
action_stall_rocket:

	lda	#STATE_MOVE_ROCKET					; 2
	sta	STATE							; 3


	; Try X=12 Y=68 cycles=4489 R7
	nop	;
	nop	;
	lda	STATE	;3

        ldy	#68							; 2
Bloop1:	ldx	#12							; 2
Bloop2:	dex								; 2
	bne	Bloop2							; 2nt/3
	dey								; 2
	bne	Bloop1							; 2nt/3

	jmp	check_keyboard			; 3
fireworks: split off state machine 2018-09-11 18:07:16 +00:00			`;=================================`
			`; action_stars`
			`;=================================`
fireworks: more state machine setup cutting it really close with stars code 2018-09-11 19:12:06 +00:00			`; and take 4504 cycles to do it`

			`; we take 4501, so waste 3`
fireworks: split off state machine 2018-09-11 18:07:16 +00:00			`action_stars:`

			`jsr draw_stars ; 6+4492 = 4498`

fireworks: more state machine setup cutting it really close with stars code 2018-09-11 19:12:06 +00:00			`ldy FRAME ;nop ; 3`
fireworks: split off state machine 2018-09-11 18:07:16 +00:00
fireworks: more state machine setup cutting it really close with stars code 2018-09-11 19:12:06 +00:00			`jmp check_keyboard ; 3`
fireworks: split off state machine 2018-09-11 18:07:16 +00:00
fireworks: stage 1 works 2018-09-11 23:51:25 +00:00
			`;=================================`
			`; action_launch_firework`
			`;=================================`
			`; and take 4504 cycles to do it`

fireworks: add sound 2018-09-12 15:46:08 +00:00			`; we take 423 so waste 4081`
fireworks: stage 1 works 2018-09-11 23:51:25 +00:00			`action_launch_firework:`

fireworks: add sound 2018-09-12 15:46:08 +00:00			`; Try X=26 Y=30 cycles=4081`
fireworks: stage 1 works 2018-09-11 23:51:25 +00:00
fireworks: add sound 2018-09-12 15:46:08 +00:00			`ldy #30 ; 2`
			`Xloop1: ldx #26 ; 2`
fireworks: stage 1 works 2018-09-11 23:51:25 +00:00			`Xloop2: dex ; 2`
			`bne Xloop2 ; 2nt/3`
			`dey ; 2`
			`bne Xloop1 ; 2nt/3`

fireworks: add sound 2018-09-12 15:46:08 +00:00			`jsr launch_firework ; 6+414 = 420`
fireworks: stage 1 works 2018-09-11 23:51:25 +00:00
			`jmp check_keyboard ; 3`

fireworks: more cycle counting 2018-09-12 01:16:49 +00:00
			`;=================================`
			`; action_move_rocket`
			`;=================================`
			`; and take 4504 cycles to do it`

firework: launching works! 2018-09-12 02:01:51 +00:00			`; we take 1245 so waste 3259`
fireworks: more cycle counting 2018-09-12 01:16:49 +00:00			`action_move_rocket:`

firework: launching works! 2018-09-12 02:01:51 +00:00			`; Try X=35 Y=18 cycles=3259`
fireworks: more cycle counting 2018-09-12 01:16:49 +00:00
firework: launching works! 2018-09-12 02:01:51 +00:00			`ldy #18 ; 2`
			`Yloop1: ldx #35 ; 2`
fireworks: more cycle counting 2018-09-12 01:16:49 +00:00			`Yloop2: dex ; 2`
			`bne Yloop2 ; 2nt/3`
			`dey ; 2`
			`bne Yloop1 ; 2nt/3`

firework: launching works! 2018-09-12 02:01:51 +00:00			`jsr move_rocket ; 6+1236 = 1242`
fireworks: more cycle counting 2018-09-12 01:16:49 +00:00
			`jmp check_keyboard ; 3`

fireworks: start explosion works 2018-09-12 02:29:01 +00:00
			`;=================================`
			`; action_start_explosion`
			`;=================================`
			`; and take 4504 cycles to do it`

fireworks: add another click, not sure if worth it 2018-09-12 19:30:14 +00:00			`; we take 449 so waste 4055`
fireworks: start explosion works 2018-09-12 02:29:01 +00:00			`action_start_explosion:`

fireworks: add another click, not sure if worth it 2018-09-12 19:30:14 +00:00			`; Try X=15 Y=50 cycles=4051 R4`
fireworks: start explosion works 2018-09-12 02:29:01 +00:00
fireworks: add another click, not sure if worth it 2018-09-12 19:30:14 +00:00			`nop`
fireworks: start explosion works 2018-09-12 02:29:01 +00:00			`nop`

fireworks: add another click, not sure if worth it 2018-09-12 19:30:14 +00:00			`ldy #50 ; 2`
			`Zloop1: ldx #15 ; 2`
fireworks: start explosion works 2018-09-12 02:29:01 +00:00			`Zloop2: dex ; 2`
			`bne Zloop2 ; 2nt/3`
			`dey ; 2`
			`bne Zloop1 ; 2nt/3`

fireworks: add another click, not sure if worth it 2018-09-12 19:30:14 +00:00			`jsr start_explosion ; 6+440 = 446`
fireworks: start explosion works 2018-09-12 02:29:01 +00:00
			`jmp check_keyboard ; 3`


fireworks: almost there 2018-09-12 03:01:16 +00:00			`;=================================`
			`; action_continue_explosion`
			`;=================================`
			`; and take 4504 cycles to do it`

			`; we take 4495 so waste 9`
			`action_continue_explosion:`
fireworks: it works! had timing bug in HGR when X>256 2018-09-12 03:30:04 +00:00			`lda STATE ; nop 3`
			`lda STATE ; nop 3`
			`lda STATE ; nop 3`
fireworks: almost there 2018-09-12 03:01:16 +00:00
			`jsr continue_explosion ; 6+4486 = 4492`

			`jmp check_keyboard ; 3`


fireworks: stall the rocket a bit 2018-09-12 19:24:02 +00:00

			`;=================================`
			`; action_stall_rocket`
			`;=================================`
			`; and take 4504 cycles to do it`

			`; 4504 - 8 = 4496`
			`action_stall_rocket:`

			`lda #STATE_MOVE_ROCKET ; 2`
			`sta STATE ; 3`


			`; Try X=12 Y=68 cycles=4489 R7`
			`nop ;`
			`nop ;`
			`lda STATE ;3`

			`ldy #68 ; 2`
			`Bloop1: ldx #12 ; 2`
			`Bloop2: dex ; 2`
			`bne Bloop2 ; 2nt/3`
			`dey ; 2`
			`bne Bloop1 ; 2nt/3`

			`jmp check_keyboard ; 3`