~rabbits/zombie

c4b3163daf9c5d3f828deb306f1ade6ad08de843 — Devine Lu Linvega 1 year, 9 months ago a58710b
Added balance
2 files changed, 21 insertions(+), 9 deletions(-)

M src/main.tal
M src/song.tal
M src/main.tal => src/main.tal +16 -4
@@ 275,6 275,16 @@ BRK
		LDAk #00 EQU ROT ROT STA
		#00 .Mouse/state DEO
		&no-l
	OVR #05 NEQ ,&no-bl JCN
		DUP #40 SFT
		#00 .sel/chan LDZ #30 SFT ;song/piano-vol ADD2 STH2k LDA #0f AND ORA
			STH2r STA
		&no-bl
	OVR #06 NEQ ,&no-br JCN
		DUP #0f AND
		#00 .sel/chan LDZ #30 SFT ;song/piano-vol ADD2 STH2k LDA #f0 AND ORA
			STH2r STA
		&no-br
	POP2
	POP2r
	;draw-controls JSR2


@@ 409,7 419,9 @@ JMP2r
	#00 SWP #30 SFT2
	DUP2 ;song/piano-pcm ADD2 LDA2 .Audio0/addr STHkr ADD DEO2
	DUP2 ;song/piano-len ADD2 LDA2 .Audio0/length STHkr ADD DEO2
	;song/piano-env ADD2 LDA2 .Audio0/adsr STHkr ADD DEO2
	DUP2 ;song/piano-env ADD2 LDA2 .Audio0/adsr STHkr ADD DEO2
	DUP2 ;song/piano-vol ADD2 LDA .Audio0/volume STHkr ADD DEO
	;song/piano-off ADD2 LDA #00 EQU #70 SFT ADD
	.Audio0/pitch STHr ADD DEO

JMP2r


@@ 788,8 800,9 @@ JMP2r
	#00f0 .Screen/y DEO2
	;bal-txt ;draw-str JSR2 POP2

	#0080 #00f8 #08 ;draw-knob JSR2
	#0090 #00f8 #08 ;draw-knob JSR2
	#00 .sel/chan LDZ #30 SFT ;song/piano-vol ADD2 LDA STH
	#0080 #00f8 STHkr #04 SFT ;draw-knob JSR2
	#0090 #00f8 STHr #0f AND ;draw-knob JSR2

	( waveform )
	#00b0 .Screen/x DEO2 


@@ 933,7 946,6 @@ JMP2r
	STH
	.Screen/y DEO2
	.Screen/x DEO2

	#16 .Screen/auto DEO
	#00 STHr #50 SFT2 ;flip-icns ADD2 .Screen/addr DEO2
	#01 .Screen/sprite DEOk DEO

M src/song.tal => src/song.tal +5 -5
@@ 18,12 18,12 @@
	&piano-pcm 0000
	&piano-len 0000
	&piano-env 0008
	&piano-off 00
	&piano-vol 00
	&piano-off 01
	&piano-vol cf

	&ch1 0000 0000 0008 0000
	&ch2 0000 0000 0008 0000
	&ch3 0000 0000 0008 0000
	&ch1 0000 0000 0008 01fc
	&ch2 0000 0000 0008 00ff
	&ch3 0000 0000 0008 00ff

	( drum )
	&kck