Ksp reference Manual

Load/Save Commands
133
KSP Reference Manual

---

$count := 0
while($count < 8)
%preset[$count] := %table[$count]
inc($count)
end while
end on
on ui_control ($Load)
$load_arr_id := load_array(%preset,0)
end on
on ui_control ($Save)
$save_arr_id := save_array(%preset,0)
end on
on async_complete
if ($NI_ASYNC_ID = $load_arr_id)
$load_arr_id := -1
$Load := 0
if ($NI_ASYNC_EXIT_STATUS = 1)
$count := 0
while($count < 8)
%table[$count] := %preset[$count]
inc($count)
end while
end if
end if
if ($NI_ASYNC_ID = $save_arr_id)
$save_arr_id := -1
$Save := 0
end if
end on
Exporting and loading the contents of a UI table
See Also 
$NI_ASYNC_ID
$NI_ASYNC_EXIT_STATUS
on async_complete
save_array()
15.4. load_array_str()
load_array_str(,
)
Loads an array from an external file (.nka file) using the file's absolute
path
Load/Save Commands
134
KSP Reference Manual

---

The array variable. This name must be
present in the .nka file
The absolute path of the .nka file
Remarks
• The behaviour is similar to 
load_array()
with mode set to 0, but instead of manually choos-
ing an .nka file you can specify it with an absolute path.
• Can be used in init (synchronous), 
persistence_changed
, UI and pgs callbacks.
Example
(see next page)
on init
set_ui_height(2)
declare @basepath_browser
{set browser path here, for example
@basepath_browser := "/Users//Desktop/Arrays"}
declare @file_path
make_persistent(@file_path)
declare @file_name
make_persistent(@file_name)
declare ui_file_selector $file_browser
declare $browser_id
$browser_id := get_ui_id($file_browser)
set_control_par_str($browser_id,$CONTROL_PAR_BASEPATH,@basepath_browser)
set_control_par($browser_id,$CONTROL_PAR_WIDTH,112)
set_control_par($browser_id,$CONTROL_PAR_HEIGHT,68)
set_control_par($browser_id,$CONTROL_PAR_COLUMN_WIDTH,110)
set_control_par($browser_id,$CONTROL_PAR_FILE_TYPE,$NI_FILE_TYPE_ARRAY)
move_control_px($file_browser,66,2)
declare ui_table %table[8] (2,2,100)
make_persistent(%table)
move_control(%table,3,1)
declare %preset[8]
declare $load_arr_id
$load_arr_id := -1
declare $count
end on
on async_complete