1 #!/usr/bin/expect -f |
1 #!/usr/bin/expect -f |
2 #====================================================================== |
2 #====================================================================== |
3 # P R E P A R E _ I N S T R U M E N T |
3 # P R E P A R E _ I N S T R U M E N T |
4 # doc: Wed Nov 15 00:54:23 2006 |
4 # doc: Wed Nov 15 00:54:23 2006 |
5 # dlm: Wed Nov 19 15:16:44 2008 |
5 # dlm: Thu Aug 26 00:27:24 2010 |
6 # (c) 2006 ladder@ |
6 # (c) 2006 ladder@ |
7 # uE-Info: 27 14 NIL 0 0 72 2 2 8 NIL ofnI |
7 # uE-Info: 25 39 NIL 0 0 72 2 2 8 NIL ofnI |
8 #====================================================================== |
8 #====================================================================== |
9 |
9 |
10 # HISTORY: |
10 # HISTORY: |
11 # Nov 15, 2006: - adapted from [ladcp_send_command] |
11 # Nov 15, 2006: - adapted from [ladcp_send_command] |
12 # Nov 17, 2006: - finished implementation |
12 # Nov 17, 2006: - finished implementation |
13 # Oct 22, 2007: - added sleep 3 after BREAK for HP heads |
13 # Oct 22, 2007: - added sleep 3 after BREAK for HP heads |
14 # Oct 23, 2007: - cosmetics |
14 # Oct 23, 2007: - cosmetics |
15 # Nov 19, 2008: - added version |
15 # Nov 19, 2008: - added version |
16 |
16 # Aug 25, 2010: - DEFAULTS.expect -> CRUISE_SETUP.expect |
|
17 # - libBB.expect -> libRDI.expect |
17 |
18 |
18 #---------------------------------------------------------------------- |
19 #---------------------------------------------------------------------- |
19 # Setup |
20 # Setup |
20 #---------------------------------------------------------------------- |
21 #---------------------------------------------------------------------- |
21 |
22 |
22 log_user 0; |
23 log_user 0; |
23 source DEFAULTS.expect; |
24 source CRUISE_SETUP.expect; |
24 regsub {dir1} [exec which dir1] {libBB.expect} path; |
25 regsub {dir1} [exec which dir1] {libRDI.expect} path; |
25 source $path; |
26 source $path; |
26 |
27 |
27 print_version; |
28 print_version; |
28 |
29 |
29 if {$argc != 1} { |
30 if {$argc != 1} { |