'Example of How to Obtain the current document in Maxim and Mess around with it. I.e. 'write into the fits header and obtain the image array Dim Max_Doc Dim App Dim Suc1 Dim cdelt2 cdelt2=CDbl(10) Set App=GetObject("","Maxim.Application") Set Max_Doc=App.CurrentDocument V=Max_Doc.ImageArray Suc1=Max_Doc.SetFITSKEY("strCDELT2",cdelt2)