[B 
	[B
		/InputDict exch def
	]
	[B	
		/InputDict 0 cdict def
	] tryexcept
		
   'Firmware_6v12' nknown not [B
		'Firmware_6v12' import
	] if
	/SuccessDlgFlag #0 def				   
	[B	   
		#0 Firmware_6v12:Init
		InputDict Firmware_6v12:InitPackInst	[B
			InputDict Firmware_6v12:InstallProc
			/Continue exch def
			/SuccessDlgFlag exch def			   
		] if	
	] 
	[B
		/Msg get 'E' 'A' msgdlg
	] tryexcept
  
	Firmware_6v12:PackInstExit
  
]