' '---------------------------- '--- Creation information --- '---------------------------- ' 'Name: balcon.ave 'Version: 1.0 'Date: 01/11/97 'Author: Ferdi Hellweger ' Center for Research in Water Resources ' The University of Texas at Austin ' ferdi@crwr.utexas.edu ' '--------------------------- '--- Purpose/Description --- '--------------------------- ' 'This is for setting the BALANCE environment. ' ' '--------------------------------------- '--- Find out what needs configuring --- '--------------------------------------- ' choices = list.make choices = choices.add("Units") choices = choices.add("Plot Parameters") choices = choices.add("Exit") ' mychoice = msgbox.listasstring(choices, "Configure", "BALANCE") if (mychoice = nil) then exit end ' '------------------------------- '--- Call appropriate script --- '------------------------------- ' if (mychoice = "Units") then av.run("balconu", nil) end ' if (mychoice = "Plot Parameters") then av.run("balconp", nil) end ' if (mychoice = "Exit") then exit end ' '----------- '--- End --- '----------- '