90 lines
2.7 KiB
C
90 lines
2.7 KiB
C
/*
|
|
ChibiOS/GFX - Copyright (C) 2012, 2013
|
|
Joel Bodenmann aka Tectu <joel@unormal.org>
|
|
|
|
This file is part of ChibiOS/GFX.
|
|
|
|
ChibiOS/GFX is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
ChibiOS/GFX is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "ch.h"
|
|
#include "hal.h"
|
|
#include "gfx.h"
|
|
#include "chprintf.h"
|
|
|
|
static GListener gl;
|
|
|
|
#define SLIDER_WIDTH 20
|
|
|
|
int main(void) {
|
|
coord_t swidth, sheight;
|
|
GHandle ghSliderH, ghSliderV, ghConsole;
|
|
font_t fui2;
|
|
GSourceHandle gsMouse;
|
|
GEventGWinSlider * pSliderEvent;
|
|
BaseSequentialStream *consout;
|
|
|
|
halInit(); // Initialize the Hardware
|
|
chSysInit(); // Initialize the OS
|
|
gdispInit(); // Initialize the display
|
|
|
|
gdispClear(Black);
|
|
|
|
// Get the display dimensions
|
|
swidth = gdispGetWidth();
|
|
sheight = gdispGetHeight();
|
|
|
|
// Get the font
|
|
fui2 = gdispOpenFont("UI2");
|
|
|
|
// Create out gwin windows/widgets
|
|
ghSliderH = gwinCreateSlider(NULL, 5, 5, swidth-10, SLIDER_WIDTH);
|
|
ghSliderV = gwinCreateSlider(NULL, 5, 10+SLIDER_WIDTH, SLIDER_WIDTH, sheight-15+SLIDER_WIDTH);
|
|
ghConsole = gwinCreateConsole(NULL, 10+SLIDER_WIDTH, 10+SLIDER_WIDTH, swidth-15-SLIDER_WIDTH, sheight-15-SLIDER_WIDTH, fui2);
|
|
consout = gwinGetConsoleStream(ghConsole);
|
|
|
|
// Color up the console window
|
|
gwinSetColor(ghConsole, White);
|
|
gwinSetBgColor(ghConsole, Blue);
|
|
|
|
// Assign the mouse to the sliders.
|
|
gsMouse = ginputGetMouse(0);
|
|
gwinAttachSliderMouseSource(ghSliderH, gsMouse);
|
|
gwinAttachSliderMouseSource(ghSliderV, gsMouse);
|
|
|
|
// We want to listen for slider events
|
|
geventListenerInit(&gl);
|
|
geventAttachSource(&gl, gwinGetSliderSource(ghSliderH), 0);
|
|
geventAttachSource(&gl, gwinGetSliderSource(ghSliderV), 0);
|
|
|
|
// Draw everything on the screen
|
|
gwinClear(ghConsole);
|
|
gwinSliderDraw(ghSliderH);
|
|
gwinSliderDraw(ghSliderV);
|
|
|
|
while(1) {
|
|
// Get an Event
|
|
// - we can assume it is a slider event as that is all we are listening for
|
|
pSliderEvent = (GEventGWinSlider *)geventEventWait(&gl, TIME_INFINITE);
|
|
|
|
// Double check that assumption
|
|
if (pSliderEvent->type != GEVENT_GWIN_SLIDER)
|
|
continue;
|
|
|
|
chprintf(consout, "%c=%d\n", pSliderEvent->slider == ghSliderH ? 'H' : 'V', pSliderEvent->position);
|
|
}
|
|
|
|
return 0;
|
|
}
|