PROC m_fl_mn_ptch
;Version 2	
GOTO BEGIN
;
;#**************************************************************************
;#	****PROCEDURE HEADER****
;#
;# 	1.0 	Introduction
;#
;#		1.1	FOT Name:	 M_FL_MN_PTCH  
;#		   	MDI Name:  M_DP_PATCH	 
;#		   	SUM Issue: N/A  	
;#			Simulator Validation Status:
;#
;#		1.2	Date Created:	03-Aug-95  
;#			    Revision: 1. 11-02-95 GJ 
;#						2. 11/18/95 GJ
;#
;#		1.3	Change Description:	
;#
;#			1. Changed procedure  name from m_ts_dp_pat1 to
;#			   m_ts_mn_ptch.
;#			2. Changed name convention from m_ts_* to m_fl_*.
;#
;#
;#		1.4	Point of Contact:	Carline Caseau	
;#			FOT Author: GJennings 	ATSC/SOHO	286-4799
;#
;#**************************************************************************
;#	2.0	Description
;#
;#		2.1	Narrative Description
;#
;#			This procedure patches the DEP executable code by suspending
;#			nominal execution and using the kernal monitor.  Telemetry
;#			will be interrupted.
;#
;#		2.2	Intended Use:
;#
;#			Patch DEP flight software using kernal monitor.
;#
;#
;#		2.3	Duration:	5 minutes
;#
;#		2.4	References:
;#
;#**************************************************************************
;#	3.0	Instructions for Use:
;#
;#		3.1	Parameters Required
;#
;#			None
;#
;#		3.2	Critical Activities
;#
;#			None
;#
;#		3.3	Special Constraints or Activities
;#
;#			At least medium rate telemetry support required for 
;#			duration of sequence.  MDI Operator on station to 
;#			support verification of procedure.
;#		
;#     		
;#**************************************************************************
;#	4.0	STEPS:

BEGIN:

LOCAL CCNT

IF (P@CMD_STATE#TELECOMMAND = "AVAILABLE") THEN
ELSE
	/CLEAR		;Clearing the Command Buffer.
ENDIF

LET CCNT = MKTCCNT

/MBDPMD,0000,3EE4,0080	;Dump unmodified sequence from memory 
WAIT		;Verify command buffer contents
/SEND
WAIT UNTIL (MKTCCNT = CCNT+1) ;verify command counter increments.

/MBHWCNFR,0080		     ;Configure DEP to monitor mode 
WAIT		;Verify command buffer contents
/SEND

WAIT UNTIL (P@CMD_STATE#TELECOMMAND = "AVAILABLE")

/MCDPRSTN				;Reset DEP to enter monitor mode
WAIT      ;Verify HK telemetry stop
/SEND

WAIT UNTIL (P@CMD_STATE#TELECOMMAND = "AVAILABLE")

/MBDPMl,0000,3EE4,793D,0506,00C8,4689,8BF4,03C6,F446,4689,EBF0,002B
/MBDPMl,0000,3EF4,C6F0,FD44,3BF8,F076,2473
WAIT		;Verify command buffer contents
/SEND

WAIT UNTIL (P@CMD_STATE#TELECOMMAND = "AVAILABLE")

/MBDPMD,0000,3EE4,0080	;Dump modified sequence from memory using kernal monitor
WAIT		;Verify command buffer contents
/SEND

WAIT UNTIL (P@CMD_STATE#TELECOMMAND = "AVAILABLE")

/MBHWCNFR,0020			;Configure DEP to restart nominal mode
WAIT		;Verify command buffer contents
/SEND

WAIT UNTIL (P@CMD_STATE#TELECOMMAND = "AVAILABLE")

/MBDPMl,0040,0000		;Jump to starting address (a reset MBDPM1
;would reload from eeprom) using a memory load command with no data words 
WAIT		;Verify telemetry restart
/SEND
WAIT UNTIL (MKTCCNT= CCNT+3) ; 

/MBDPMD 0000,3EE4,0080    ;Dump modified sequence from memory mbdpmd
WAIT		;Verify command buffer contents
/SEND  
;#************************************************************************** 
;#	5.0	Final Constraints
;#
;#		TBD
;#
;#**************************************************************************
ENDPROC