Subversion Repositories svn.mios

Rev

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

Rev 679 Rev 869
Line 1... Line 1...
1
; $Id: sid_parout.inc 679 2009-02-07 22:19:22Z tk $
1
; $Id: sid_parout.inc 869 2009-12-08 21:52:43Z tk $
2
;
2
;
3
; MIDIbox SID
3
; MIDIbox SID
4
; Parameter Output Handling
4
; Parameter Output Handling
5
;
5
;
6
; ==========================================================================
6
; ==========================================================================
Line 42... Line 42...
42
	;; pre-clear MIOS_PARAMETER2 (for functions which only return a 8bit value)
42
	;; pre-clear MIOS_PARAMETER2 (for functions which only return a 8bit value)
43
	clrf	MIOS_PARAMETER2
43
	clrf	MIOS_PARAMETER2
44

44

45
	;; jump depending on mod ID
45
	;; jump depending on mod ID
46
	movf	PRODL, W
46
	movf	PRODL, W
47
	JUMPTABLE_2BYTES 0x3c+1 ; entries
47
	JUMPTABLE_2BYTES 0x3d+1 ; entries
48
	rgoto	SID_PAROUT_Get_NOP
48
	rgoto	SID_PAROUT_Get_NOP
49
	rgoto	SID_PAROUT_Get_7
49
	rgoto	SID_PAROUT_Get_7
50
	rgoto	SID_PAROUT_Get_8
50
	rgoto	SID_PAROUT_Get_8
51
	rgoto	SID_PAROUT_Get_PM8
51
	rgoto	SID_PAROUT_Get_PM8
52
	rgoto	SID_PAROUT_Get_4L
52
	rgoto	SID_PAROUT_Get_4L
Line 54... Line 54...
54
	rgoto	SID_PAROUT_Get_PAR12
54
	rgoto	SID_PAROUT_Get_PAR12
55
	rgoto	SID_PAROUT_Get_CUSTOM_SW
55
	rgoto	SID_PAROUT_Get_CUSTOM_SW
56
	rgoto	SID_PAROUT_Get_FIL4L
56
	rgoto	SID_PAROUT_Get_FIL4L
57
	rgoto	SID_PAROUT_Get_FIL4U
57
	rgoto	SID_PAROUT_Get_FIL4U
58
	rgoto	SID_PAROUT_Get_FIL12
58
	rgoto	SID_PAROUT_Get_FIL12
-
 
59
	rgoto	SID_PAROUT_Get_FIL12_DIRECT
59
	rgoto	SID_PAROUT_Get_FIL8
60
	rgoto	SID_PAROUT_Get_FIL8
60
	rgoto	SID_PAROUT_Get_OSC123_PM7
61
	rgoto	SID_PAROUT_Get_OSC123_PM7
61
	rgoto	SID_PAROUT_Get_OSC123_PM8
62
	rgoto	SID_PAROUT_Get_OSC123_PM8
62
	rgoto	SID_PAROUT_Get_OSC123_7
63
	rgoto	SID_PAROUT_Get_OSC123_7
63
	rgoto	SID_PAROUT_Get_OSC123_8
64
	rgoto	SID_PAROUT_Get_OSC123_8
Line 254... Line 255...
254
	swapf	INDF1, W
255
	swapf	INDF1, W
255
	andlw	0x0f
256
	andlw	0x0f
256
	rgoto	SID_PAROUT_Get_End
257
	rgoto	SID_PAROUT_Get_End
257
258
258
SID_PAROUT_Get_FIL12
259
SID_PAROUT_Get_FIL12
259
	SID_PAROUT_SID_FIL_MACRO	; select SIDL/SIDR filter
260
	SID_PAROUT_SID_FIL_MACRO	; for selected SIDL/SIDR filter
-
 
261
SID_PAROUT_Get_FIL12_DIRECT		; for direct reads from SIDL/SIDR Filter value
260
	movf	PREINC1, W
262
	movf	PREINC1, W
261
	andlw	0x0f
263
	andlw	0x0f
262
	movwf	MIOS_PARAMETER2
264
	movwf	MIOS_PARAMETER2
263
	movf	POSTDEC1, W	; (there is no PREDEC1)
265
	movf	POSTDEC1, W	; (there is no PREDEC1)
264
	movf	INDF1, W
266
	movf	INDF1, W