Subversion Repositories svn.mios

Rev

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

Rev 1177 Rev 1231
Line 1... Line 1...
1
;$Id: main.inc 1177 2014-08-10 16:15:49Z tk $
1
;$Id: main.inc 1231 2019-01-05 16:35:29Z tk $
2
;
2
;
3
;  Source Code of MBHP_MF_NG Firmware
3
;  Source Code of MBHP_MF_NG Firmware
4
;
4
;
5
; ==========================================================================
5
; ==========================================================================
6
;
6
;
Line 725... Line 725...
725
725
726
	;; for MIDIbox Link: notify begin of stream
726
	;; for MIDIbox Link: notify begin of stream
727
	call	MIOS_MIDI_BeginStream
727
	call	MIOS_MIDI_BeginStream
728

728

729
	;; Note On/Off 0x68..0x6f complies to Mackie Control Spec
729
	;; Note On/Off 0x68..0x6f complies to Mackie Control Spec
-
 
730
	;; UPDATED: added +12, see also http://midibox.org/forums/topic/15004-upcoming-mbhp_mf_ng-module/?do=findComment&comment=178903
730
	movlw	0x90			; Note Event Channel #1
731
	movlw	0x90			; Note Event Channel #1
731
	call	MIOS_MIDI_TxBufferPut
732
	call	MIOS_MIDI_TxBufferPut
732
	
733
	
733
	movlw	0x68			; 0x68..0x6f depending on button number
734
	movlw	0x68 + 12		; 0x68..0x6f depending on button number
734
	addwf	MIOS_PARAMETER1, W
735
	addwf	MIOS_PARAMETER1, W
735
	call	MIOS_MIDI_TxBufferPut
736
	call	MIOS_MIDI_TxBufferPut
736
737
737
	movlw	0x00			; velocity 0 if button released, otherwise 0x7f
738
	movlw	0x00			; velocity 0 if button released, otherwise 0x7f
738
	movf	MIOS_PARAMETER2, F
739
	movf	MIOS_PARAMETER2, F