property-browser vbox 3 hbox 1 /sim/gui/dialogs/property-browser/title true true property-list 450 290 /sim/gui/dialogs/property-browser/list dialog-apply property-list nasal hbox 2 true /sim/gui/dialogs/property-browser/label 190 input 190 /sim/gui/dialogs/property-browser/input var dlg = props.globals.getNode("/sim/gui/dialogs/property-browser", 1); var title = dlg.getNode("title", 1); var label = dlg.getNode("label", 1); var input = dlg.getNode("input", 1); var list = dlg.getNode("list", 1); var node = nil; var dir = nil; var update_interval = 2; update = func(w) { fgcommand("dialog-update", props.Node.new({"object-name": w, "dialog-name": "property-browser"})); } squeeze = func(s, n) { if (size(s) <= n or n < 7) { return s; } var l = substr(s, 0, (n - 3) / 2); var r = substr(s, size(s) + size(l) + 3 - n); return l ~ "..." ~ r; } selected = func { var lst = list.getValue(); node = props.globals.getNode(lst); if (node == nil) { node = props.globals; } if (size(node.getChildren())) { dir = node.getPath(); if (node.getPath() == "") { title.setValue("Internal Properties"); } else { title.setValue(lst); } node = nil; label.setValue(" --"); input.setValue(""); update("input"); } else { var name = node.getName(); var index = node.getIndex(); var type = node.getType(); if (index) { name ~= "[" ~ index ~ "]"; } label.setValue(squeeze(name, 30)); var value = nil; if (type == "BOOL") { value = node.getBoolValue() ? "true" : "false"; title.setValue("Hint: Ctrl-click toggles bool values"); settimer(func {title.setValue(dir) }, 5); } elsif (type == "STRING") { value = node.getValue(); } elsif (type == "NONE") { value = ""; } elsif (type != "ALIAS") { value = node.getValue() ~ ""; } input.setValue(value); update("input"); } } set = func { if (node != nil) { node.setValue(input.getValue()); input.setValue(""); } } var active = 1; auto_update = func { if (active and update_interval) { list.setValue(dir); update("property-list"); settimer(auto_update, update_interval); } } if (dlg.getNode("last") != nil) { dir = dlg.getNode("last").getValue(); } else { dir = "/"; } list.setValue(dir); selected(); update("property-list"); auto_update(); active = 0; dlg.getNode("last", 1).setValue(dir);