Subversion Repositories svn.mios

Rev

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

Rev 368 Rev 1189
Line 1... Line 1...
1
; $Id: sid_rnd.inc 368 2008-06-28 21:30:47Z tk $
1
; $Id: sid_rnd.inc 1189 2014-12-19 20:00:14Z tk $
2
;
2
;
3
; SID Patch Randomizer
3
; SID Patch Randomizer
4
;
4
;
5
; ==========================================================================
5
; ==========================================================================
6
;
6
;
Line 233... Line 233...
233
	clrf	SID_EDIT_BUFFER + SID_Ix_L_OSC_PHASE, BANKED
233
	clrf	SID_EDIT_BUFFER + SID_Ix_L_OSC_PHASE, BANKED
234
234
235
	;; detune between 0..31
235
	;; detune between 0..31
236
	movlw	0x1f
236
	movlw	0x1f
237
	andwf	SID_EDIT_BUFFER + SID_Ix_L_OSC_DETUNE, BANKED
237
	andwf	SID_EDIT_BUFFER + SID_Ix_L_OSC_DETUNE, BANKED
-
 
238
-
 
239
	;; detune mode always 0
-
 
240
	SET_BSR	SID_EDIT_BUFFER
-
 
241
	clrf	SID_EDIT_BUFFER + SID_Ix_L_OSC_DTM, BANKED
238
242
239
	;; loop through left channel voices
243
	;; loop through left channel voices
240
	SET_BSR	SID_BASE
244
	SET_BSR	SID_BASE
241
	lfsr	FSR1, SID_EDIT_BUFFER + SID_Ix_L_S1V1_BASE
245
	lfsr	FSR1, SID_EDIT_BUFFER + SID_Ix_L_S1V1_BASE
242
	movlw	3
246
	movlw	3