Subversion Repositories svn.mios

Rev

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

Rev 1064 Rev 1176
Line 1... Line 1...
1
; $Id: seq_trk.inc 1064 2012-05-20 19:52:32Z tk $
1
; $Id: seq_trk.inc 1176 2014-07-20 18:50:23Z tk $
2
;
2
;
3
; MIDIboxSEQ
3
; MIDIboxSEQ
4
; Functions related to Tracks (Track Names, trigger pin assignments, etc..)
4
; Functions related to Tracks (Track Names, trigger pin assignments, etc..)
5
;
5
;
6
; ==========================================================================
6
; ==========================================================================
Line 102... Line 102...
102
102
103
	;; interrupts must be disabled during DOUT update to ensure, that all triggers
103
	;; interrupts must be disabled during DOUT update to ensure, that all triggers
104
	;; are set during the same SRIO update cycle
104
	;; are set during the same SRIO update cycle
105
	movff	INTCON, PRODH		; store current interrupt status in PRODH
105
	movff	INTCON, PRODH		; store current interrupt status in PRODH
106
	IRQ_DISABLE			; disable IRQs
106
	IRQ_DISABLE			; disable IRQs
-
 
107

-
 
108
#if DEFAULT_909LIKE_HH_CONTROL_ENABLED
-
 
109
	;; special HH selection logic for 909 like control
-
 
110
	movlw	DEFAULT_909LIKE_HH_TRACK_CH - 1
-
 
111
	lfsr	FSR1, SEQ_DRUM_TRIGGERS0
-
 
112
	btfsc	WREG, 3
-
 
113
	incf	FSR1L, F
-
 
114
	call	MIOS_HLP_GetBitORMask
-
 
115
	andwf	INDF1, W
-
 
116
	bz	SEQ_TRK_SetTriggers_909CH_Cont
-
 
117
SEQ_TRK_SetTriggers_909CH_1
-
 
118
#if DEFAULT_909LIKE_HH_SWITCH_SR
-
 
119
	movlw	((DEFAULT_909LIKE_HH_SWITCH_SR-1) << 3) | ((7 - DEFAULT_909LIKE_HH_SWITCH_PIN) & 0x7)
-
 
120
	call	MIOS_DOUT_PinSet1
-
 
121
#endif
-
 
122
SEQ_TRK_SetTriggers_909CH_Cont
-
 
123
-
 
124
	movlw	DEFAULT_909LIKE_HH_TRACK_OH - 1
-
 
125
	lfsr	FSR1, SEQ_DRUM_TRIGGERS0
-
 
126
	btfsc	WREG, 3
-
 
127
	incf	FSR1L, F
-
 
128
	call	MIOS_HLP_GetBitORMask
-
 
129
	andwf	INDF1, W
-
 
130
	bz	SEQ_TRK_SetTriggers_909OH_Cont
-
 
131
SEQ_TRK_SetTriggers_909OH_1
-
 
132
#if DEFAULT_909LIKE_HH_SWITCH_SR
-
 
133
	movlw	((DEFAULT_909LIKE_HH_SWITCH_SR-1) << 3) | ((7 - DEFAULT_909LIKE_HH_SWITCH_PIN) & 0x7)
-
 
134
	call	MIOS_DOUT_PinSet0
-
 
135
#endif	
-
 
136
SEQ_TRK_SetTriggers_909OH_Cont
-
 
137
		
-
 
138
#endif
-
 
139
107
	
140
	
108
	;; get offset to table
141
	;; get offset to table
109
	movlw	LOW(SEQ_TRK_INFO_TABLE)
142
	movlw	LOW(SEQ_TRK_INFO_TABLE)
110
	addlw	SEQ_TRK_INFO_TABLE_OFFSET_SR
143
	addlw	SEQ_TRK_INFO_TABLE_OFFSET_SR
111
	movwf	TBLPTRL
144
	movwf	TBLPTRL