3 This file is part of the MSP Märklin suite
4 Copyright © 2006-2009 Mikkosoft Productions, Mikko Rasa
5 Distributed under the GPL
8 #include <msp/gltk/button.h>
9 #include <msp/strings/formatter.h>
10 #include "libmarklin/locomotive.h"
12 #include "routeselect.h"
13 #include "trainpanel.h"
14 #include "trainproperties.h"
18 using namespace Marklin;
20 TrainPanel::TrainPanel(Engineer &e, const GLtk::Resources &r, Train &t):
28 add(*(lbl_addr=new GLtk::Label(res, format("%2d", train.get_locomotive().get_address()))));
29 lbl_addr->set_style("digital");
30 lbl_addr->set_geometry(GLtk::Geometry(10, geom.h-34, 35, 24));
32 add(*(lbl_name=new GLtk::Label(res, train.get_name())));
33 lbl_name->set_style("digital");
34 lbl_name->set_geometry(GLtk::Geometry(45, geom.h-34, geom.w-55, 24));
35 train.signal_name_changed.connect(sigc::mem_fun(lbl_name, &GLtk::Label::set_text));
37 add(*(lbl_speed=new GLtk::Label(res, format("%2d", train.get_locomotive().get_speed()))));
38 lbl_speed->set_style("digital");
39 lbl_speed->set_geometry(GLtk::Geometry(10, geom.h-58, 35, 24));
40 train.signal_target_speed_changed.connect(sigc::mem_fun(this, &TrainPanel::train_speed_changed));
42 add(*(sld_speed=new GLtk::HSlider(res)));
43 sld_speed->set_geometry(GLtk::Geometry(50, geom.h-51, geom.w-80, 10));
44 sld_speed->set_range(0, 14);
45 sld_speed->set_step(1);
46 sld_speed->signal_value_changed.connect(sigc::mem_fun(this, &TrainPanel::speed_slider_changed));
48 add(*(tgl_forward=new GLtk::Toggle(res)));
49 tgl_forward->set_text("Fwd");
50 tgl_forward->set_geometry(GLtk::Geometry(geom.w-30, geom.h-59, 20, 27));
51 tgl_forward->set_value(!train.get_locomotive().get_reverse());
52 tgl_forward->signal_toggled.connect(sigc::mem_fun(this, &TrainPanel::forward_toggled));
54 add(*(lbl_route=new GLtk::Label(res, "Free run")));
55 lbl_route->set_style("digital");
56 lbl_route->set_geometry(GLtk::Geometry(10, 58, geom.w-20, 24));
57 train.signal_route_changed.connect(sigc::mem_fun(this, &TrainPanel::train_route_changed));
59 add(*(lbl_status=new GLtk::Label(res, train.get_status())));
60 lbl_status->set_style("digital");
61 lbl_status->set_geometry(GLtk::Geometry(10, 34, geom.w-20, 24));
62 train.signal_status_changed.connect(sigc::mem_fun(this, &TrainPanel::train_status_changed));
64 const map<unsigned, string> &funcs = train.get_locomotive().get_type().get_functions();
66 for(map<unsigned, string>::const_iterator i=funcs.begin(); i!=funcs.end(); ++i, x+=35)
68 string fname = i->second;
69 fname[0] = toupper(fname[0]);
71 add(*(tgl=new GLtk::Toggle(res)));
73 tgl->set_geometry(GLtk::Geometry(x, geom.h-85, 35, 27));
74 tgl->set_value(train.get_locomotive().get_function(i->first));
75 tgl->signal_toggled.connect(sigc::bind(sigc::mem_fun(this, &TrainPanel::func_toggled), i->first));
77 tgl_funcs[i->first] = tgl;
79 train.get_locomotive().signal_function_changed.connect(sigc::mem_fun(this, &TrainPanel::loco_function_changed));
83 add(*(btn=new GLtk::Button(res, "Edit")));
84 btn->set_geometry(GLtk::Geometry(geom.w-50, 10, 40, 24));
85 btn->signal_clicked.connect(sigc::mem_fun(this, &TrainPanel::edit_clicked));
87 add(*(btn=new GLtk::Button(res, "Place")));
88 btn->set_geometry(GLtk::Geometry(geom.w-90, 10, 40, 24));
89 btn->signal_clicked.connect(sigc::mem_fun(this, &TrainPanel::place_clicked));
91 add(*(btn=new GLtk::Button(res, "GoTo")));
92 btn->set_geometry(GLtk::Geometry(geom.w-130, 10, 40, 24));
94 add(*(btn=new GLtk::Button(res, "Route")));
95 btn->set_geometry(GLtk::Geometry(geom.w-170, 10, 40, 24));
96 btn->signal_clicked.connect(sigc::mem_fun(this, &TrainPanel::route_clicked));
99 void TrainPanel::speed_slider_changed(double v)
101 train.set_speed(static_cast<unsigned>(v));
104 void TrainPanel::train_speed_changed(unsigned speed)
106 lbl_speed->set_text(format("%2d", speed));
107 sld_speed->set_value(speed);
110 void TrainPanel::loco_function_changed(unsigned func, bool value)
112 map<unsigned, GLtk::Toggle *>::iterator i = tgl_funcs.find(func);
113 if(i!=tgl_funcs.end())
114 i->second->set_value(value);
117 void TrainPanel::train_route_changed(const Route *r)
120 lbl_route->set_text(r->get_name());
122 lbl_route->set_text("Free run");
125 void TrainPanel::train_status_changed(const string &s)
127 lbl_status->set_text(s);
130 void TrainPanel::place_clicked()
132 engineer.place_train(train);
135 void TrainPanel::edit_clicked()
137 TrainProperties *dialog = new TrainProperties(engineer, res, &train);
138 engineer.get_root().add(*dialog);
139 dialog->set_position(geom.x+geom.w, geom.y+geom.h-dialog->get_geometry().h);
140 dialog->set_visible(true);
143 void TrainPanel::route_clicked()
145 RouteSelect *dialog = new RouteSelect(engineer, res, train);
146 engineer.get_root().add(*dialog);
147 dialog->set_position(geom.x+geom.w, geom.y+geom.h-dialog->get_geometry().h);
148 dialog->set_visible(true);
151 void TrainPanel::forward_toggled(bool value)
153 train.set_reverse(!value);
156 void TrainPanel::func_toggled(bool value, unsigned func)
158 train.get_locomotive().set_function(func, value);