The ISAP GUI and the routines that it uses are all written in pure IDL. There are no calls to external code e.g. FORTRAN , C etc. Installation is easy,
.size 50000 10000 ; increase program code size. Just temporary
; until the code shrinks again. Honestly.
res=expand_path('+idl_dir:[LIB]')
!path = res + ',' + !path
res=expand_path('+[conman.isap_v21]')
!path = !path + ',' + res
;* Directory defines. These point to the various directories
;* where a user want to read/write data.
defsysv,'!isap_fits','disk$user1:[conman.isap_fits]'
defsysv,'!isap_xdr', 'disk$user1:[conman.isap_xdr]'
defsysv,'!isap_ascii','disk$user1:[conman.isap_ascii]'
defsysv,'!sap_gui',1
;* GUI defines - these system variables define various changeable values
;* used in the GUI. Some are fixed values, others get changed within the
;* GUI as it operates.
;*
;* Here is a spare copy of the originals:
;*
;* defsysv,'!gui_errorbars','no' ; initially no errorbars on plots
;* defsysv,'!gui_cw_main_x',650 ; x pixels on main cw_draw window
;* defsysv,'!gui_cw_main_y',350 ; y pixels on main cw_draw window
;* defsysv,'!gui_cw_avg_x',350 ; x pixels on main average draw windows
;* defsysv,'!gui_cw_avg_y',350 ; y pixels on main average draw windows
;* defsysv,'!gui_cw_rebin_x',350 ; x pixels on main rebin draw windows
;* defsysv,'!gui_cw_rebin_y',350 ; y pixels on main rebin draw windows
;* defsysv,'!gui_button_columns',15 ; how many buttons in selections
;* defsysv,'!gui_main_x_pixels',750 ; width of button boxes on main gui
;* defsysv,'!gui_main_y_pixels',60 ; height of button boxes on main gui
;* defsysv,'!gui_colours','yes' ; use colour colour table? Or mono?
;* defsysv,'!gui_psym',3 ; symbol used for default plotting
;* defsysv,'!gui_show_masked',0 ; show masked data? 0 = no
;*
defsysv,'!gui_errorbars','no'
defsysv,'!gui_cw_main_x',650
defsysv,'!gui_cw_main_y',350
defsysv,'!gui_cw_avg_x',350
defsysv,'!gui_cw_avg_y',350
defsysv,'!gui_cw_rebin_x',350
defsysv,'!gui_cw_rebin_y',350
defsysv,'!gui_button_columns',15
defsysv,'!gui_main_x_pixels',750
defsysv,'!gui_main_y_pixels',60
defsysv,'!gui_colours','yes'
defsysv,'!gui_psym',3
defsysv,'!gui_show_masked',0
;*
sci_anal5