[D
	/LoadSW [P
		[A LoadFlag Mode]	% LoadFlag = False -> Check only if Files are existing 	

			/IntfSWFileName 'IntfSWCmdTabIO_' def
			/IntfTreeFileName 'IntfTrCmdTabIo_' def

    		/Result #1 def
   			/MissingFile '' def	
			
			/SWFile FilePath IntfSel.IntfDir add '\' add IntfSWFileName add EloTypeExt add def
			/SWFile SWFile '_V' add IntfSel.IntfSWVersion cvs add 'S' add IntfSel.IntfSWSubVersion cvs add def 
			IntfSel.IntfSWBetaInfo '' ne [B
				/SWFile SWFile '_' add IntfSel.IntfSWBetaInfo add def
			] if
			Mode [B
			  0 [B /SWFile SWFile '.HX2' add def ]   
			  1 [B /SWFile SWFile '.HX3' add def ]   			
			] [B
			] case  

			
			/TreeFile FilePath IntfSel.IntfDir add '\' add IntfTreeFileName add EloTypeExt add def
			/TreeFile TreeFile '_V' add IntfSel.IntfTreeVersion cvs add 'S' add IntfSel.IntfTreeSubVersion cvs add def 
			MCTreeBetaInfo '' ne [B
				/TreeFile TreeFile '_' add IntfSel.IntfTreeBetaInfo add def
			] if
			/TreeFile TreeFile '.HX2' add def

			/DefaultParFile FilePath IntfSel.IntfDir add '\' add IntfTreeFileName add EloTypeExt add def
			/DefaultParFile DefaultParFile '_V' add IntfSel.IntfTreeVersion cvs add 'S' add IntfSel.IntfTreeSubVersion cvs add def 
			IntfSel.IntfTreeBetaInfo '' ne [B
				/DefaultParFile DefaultParFile '_' add IntfSel.IntfTreeBetaInfo 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 interface firmware sector...' log     
				3 TalkIntf.ClearInstanceAll
				'Downloading interface software...' log
				Mode [B
				  0 [B SWFile dup loadobj exch PackInst:DownloadHX2File	]
				  1 [B SWFile dup loadobj exch PackInst:DownloadHX3File	]
		    ] [B
		    ] case 	  
				'Downloading interface parameter tree...' log     		
		    	TreeFile dup loadobj exch PackInst:DownloadHX2File		
				'Updating UPID list...' log
		    	TalkIntf.UpdateUPIDList       
				'Downloading interface default parameters...' log
				DefaultParFile dup loadobj exch PackInst:DownloadGR3File					
			] if
	   	[A /MissingFile /Result]
   	] 
]