[D
	
	/LoadSW [P	
		[A  LoadFlag ]	% LoadFlag = False -> Check only if Files are existing 	
%		/MCSWFileName 'MCSW1100_' def
%		/MCTreeFileName 'MCTr1100_' def	
		
		/Result #1 def
		/MissingFile '' def
		
		/SWFile FilePath MCDir add '\' add MCSWFileName add def
		/SWFile SWFile 'S' add EloSWVersion 16 cvrs add def
		/SWFile SWFile '_V' add MCSWVersion cvs add 'S' add MCSWSubVersion cvs add def 
		MCSWBetaInfo '' ne [B
			/SWFile SWFile '_' add MCSWBetaInfo add def
		] if
		/SWFile SWFile '.HX3' add def
		/TreeFile FilePath MCDir add '\' add MCTreeFileName add def
		/TreeFile TreeFile 'S' add EloSWVersion 16 cvrs add def
		/TreeFile TreeFile PowerExtension add def
		/TreeFile TreeFile '_V' add MCTreeVersion cvs add 'S' add MCTreeSubVersion cvs add def 
		MCTreeBetaInfo '' ne [B
			/TreeFile TreeFile '_' add MCTreeBetaInfo add def
		] if
		/TreeFile TreeFile '.HX2' add def
		
		/DefaultParFile FilePath MCDir add '\' add MCTreeFileName add def
		/DefaultParFile DefaultParFile 'S' add EloSWVersion 16 cvrs add def
		/DefaultParFile DefaultParFile PowerExtension add def
		/DefaultParFile DefaultParFile '_V' add MCTreeVersion cvs add 'S' add MCTreeSubVersion cvs add def 
		MCTreeBetaInfo '' ne [B
			/DefaultParFile DefaultParFile '_' add MCTreeBetaInfo add def
		] if
		/DefaultParFile DefaultParFile '.GR3' add def
		
		
		
		
		
		% check if files are existing
		Result [B  
			SWFile FileExist not [B
				/Result #0 def 
				/MissingFile SWFile def
			] if
		] if
		
		Result [B
			TreeFile FileExist not [B
				/Result #0 def 
				/MissingFile TreeFile def
			] if
		] if
		Result [B
			DefaultParFile FileExist not [B
				/Result #0 def 
				/MissingFile DefaultParFile def
			] if
		] if
		
		
		
		Result LoadFlag and [B
			'Erasing MC firmware sector...' log     
			2 TalkIntf.ClearInstanceAll
			'Downloading MC software...' log
			SWFile dup loadobj exch PackInst:DownloadHX3File
			'Downloading MC parameter tree...' log     		
			TreeFile dup loadobj exch PackInst:DownloadHX2File		
			'Updating UPID list...' log
			TalkIntf.UpdateUPIDList       
			'Downloading MC default parameters...' log
			DefaultParFile dup loadobj exch PackInst:DownloadGR3File					
		] if
		[A /MissingFile /Result]
	]
]