pro ff_obj_mem_map,event widget_control,event.top,get_uvalue=datptr dat1 = *datptr ;structure from ff_initial dat2 = dat1.dat ;structure from ff_gui ;get vis fits file widget_control,dat2.savefile,get_value=name obj = hsi_image() obj ->set,vis_filename = name v = obj->get(/obj,class='hsi_visibility') vis = v->getdata() obj ->set,used_xyoffset=vis[0].xyoffset time = vis[0].trange en = vis[0].erange xy = vis[0].xyoffset det = dat2.udet obj -> set,im_time_interval=time obj -> set,image_algorithm='njit' obj -> set,det_index_mask=det obj -> set,im_energy_binning = en obj -> set,pixel_size = [.5d,.5d] ;[1d,1d] obj -> set,xyoffset = xy obj -> set,image_dim = [128,128] obj -> set,NJ_SHOW_MAPS=1 obj -> plotman,colortable=5 ;delete NJIT default windows wdel,1 wdel,4 end