| 1 | #! /bin/csh |
|---|
| 2 | # |
|---|
| 3 | # file menu_station.csh |
|---|
| 4 | # ================ |
|---|
| 5 | # |
|---|
| 6 | # version 1, 15-Nov-2003 |
|---|
| 7 | # |
|---|
| 8 | # station management in SHM |
|---|
| 9 | # K. Stammler, 15-Nov-2003 |
|---|
| 10 | |
|---|
| 11 | set xprog=$SH_ROOT/setup |
|---|
| 12 | |
|---|
| 13 | set cmd="" |
|---|
| 14 | while (1 > 0) # forever |
|---|
| 15 | |
|---|
| 16 | echo "" |
|---|
| 17 | echo "Station Submenu" |
|---|
| 18 | echo "" |
|---|
| 19 | echo "(h) help text about this menu" |
|---|
| 20 | echo "(l) list existing read dialog button sets" |
|---|
| 21 | echo "(a) add station name to button set" |
|---|
| 22 | echo "(d) delete station from button set" |
|---|
| 23 | echo "(c) create empty button set" |
|---|
| 24 | echo "(r) remove complete button set" |
|---|
| 25 | echo "(s) add/modify/delete station location information" |
|---|
| 26 | echo "(g) assign transfer function and gain factor for a station" |
|---|
| 27 | echo "(t) define new transfer function class" |
|---|
| 28 | echo "(q) exit Station Submenu" |
|---|
| 29 | echo "" |
|---|
| 30 | echo -n "cmd: " |
|---|
| 31 | set cmd="$<" |
|---|
| 32 | |
|---|
| 33 | if ("$cmd" == "q") exit |
|---|
| 34 | if ("$cmd" == "l") then |
|---|
| 35 | $xprog/list_station_sets.csh |
|---|
| 36 | else if ("$cmd" == "a") then |
|---|
| 37 | $xprog/add_station_to_set.csh |
|---|
| 38 | else if ("$cmd" == "d") then |
|---|
| 39 | $xprog/delete_station_from_set.csh |
|---|
| 40 | else if ("$cmd" == "c") then |
|---|
| 41 | $xprog/create_button_set.csh |
|---|
| 42 | else if ("$cmd" == "r") then |
|---|
| 43 | $xprog/remove_button_set.csh |
|---|
| 44 | else if ("$cmd" == "s") then |
|---|
| 45 | $xprog/insert_station_location.csh |
|---|
| 46 | else if ("$cmd" == "g") then |
|---|
| 47 | $xprog/station_tf_and_gain.csh |
|---|
| 48 | else if ("$cmd" == "t") then |
|---|
| 49 | $xprog/define_tf_class.csh |
|---|
| 50 | else if ("$cmd" == "h") then |
|---|
| 51 | echo "" |
|---|
| 52 | echo "The procedure to add a complete new station is:" |
|---|
| 53 | echo "1. Decide to which dialog box (button set number) and on which" |
|---|
| 54 | echo " position (1 - 30) the station name should appear or accept" |
|---|
| 55 | echo " defaults in next step. For an overwiev on the existing station" |
|---|
| 56 | echo " entries use menu item (l). If no more free entries are available" |
|---|
| 57 | echo " or if you want to have a separate button set, create a new button" |
|---|
| 58 | echo " set using menu item (c)." |
|---|
| 59 | echo "2. Add station name to button set, menu item (a). If you accept the" |
|---|
| 60 | echo " defaults the station name will appear at the first free button." |
|---|
| 61 | echo "3. Add station location information to the SH/SHM station data file" |
|---|
| 62 | echo " using menu item (s)." |
|---|
| 63 | echo "4. Assign transfer function and gain factor to a station using menu" |
|---|
| 64 | echo " item (g). Only predefined transfer function classes may be entered" |
|---|
| 65 | echo " here. A list of these predefined transfer function classes is" |
|---|
| 66 | echo " shown when executing this function." |
|---|
| 67 | echo "5. If no predefined transfer function class can be used for your" |
|---|
| 68 | echo " station define a new transfer function class using menu item (t)." |
|---|
| 69 | echo " You need the transfer function of your recording system for" |
|---|
| 70 | echo " velocity input as poles and zeros and a normalization factor." |
|---|
| 71 | endif |
|---|
| 72 | |
|---|
| 73 | echo "" |
|---|
| 74 | echo -n "Enter <Return> ..." |
|---|
| 75 | set inp="$<" |
|---|
| 76 | |
|---|
| 77 | end |
|---|
| 78 | |
|---|
