Subversion Repositories svn.mios

Rev

Rev 279 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 279 Rev 653
Line 1... Line 1...
1
; $Id: cs_menu_leds.inc 279 2008-04-20 16:00:29Z tk $
1
; $Id: cs_menu_leds.inc 653 2009-01-23 23:18:45Z tk $
2
;
2
;
3
; SID Control Surface LED Handler
3
; SID Control Surface LED Handler
4
;
4
;
5
; ==========================================================================
5
; ==========================================================================
6
;
6
;
Line 155... Line 155...
155
CS_MENU_LED_Update_LFO_Cont
155
CS_MENU_LED_Update_LFO_Cont
156
	movwf	TMP5
156
	movwf	TMP5
157
157
158
158
159
	;; TMP5[6]: SID play state
159
	;; TMP5[6]: SID play state
160
	movf	TMP5, W
-
 
161
	andlw	0x3f
-
 
162
	btfsc	CS_STAT2, CS_STAT2_PLAY_SID1
-
 
163
	iorlw 0x40
-
 
164
	btfsc	CS_STAT2, CS_STAT2_PLAY_SID2
160
	movf	CS_STAT2, W	; (SID1/2/3/4 flags located at CS_STAT2[7:4]
165
	iorlw 0x40
161
	andlw	0xf0
166
	btfsc	CS_STAT2, CS_STAT2_PLAY_SID3
-
 
167
	iorlw 0x40
-
 
168
	btfsc	CS_STAT2, CS_STAT2_PLAY_SID4
-
 
169
	iorlw 0x40
162
	skpz
170
	movwf	TMP5
163
	bsf	TMP5, 6
171
164
172
	;; TMP5[7]: Env Misc LED
165
	;; TMP5[7]: Env Misc LED
173
	btfsc	CS_MENU_SELECTED_ENV_CTRL, 1
166
	btfsc	CS_MENU_SELECTED_ENV_CTRL, 1
174
	bsf	TMP5, 7
167
	bsf	TMP5, 7
175
168