diff options
Diffstat (limited to 'ldmicro/confdialog.cpp')
| -rw-r--r-- | ldmicro/confdialog.cpp | 418 |
1 files changed, 209 insertions, 209 deletions
diff --git a/ldmicro/confdialog.cpp b/ldmicro/confdialog.cpp index 3967fc7..066a91c 100644 --- a/ldmicro/confdialog.cpp +++ b/ldmicro/confdialog.cpp @@ -25,15 +25,15 @@ #include <windows.h> #include <stdio.h> #include <stdlib.h> -#include <commctrl.h> +//#include <commctrl.h> #include "ldmicro.h" -static HWND ConfDialog; +// static HWND ConfDialog; -static HWND CrystalTextbox; -static HWND CycleTextbox; -static HWND BaudTextbox; +// static HWND CrystalTextbox; +// static HWND CycleTextbox; +// static HWND BaudTextbox; static LONG_PTR PrevCrystalProc; static LONG_PTR PrevCycleProc; @@ -42,208 +42,208 @@ static LONG_PTR PrevBaudProc; //----------------------------------------------------------------------------- // Don't allow any characters other than 0-9. in the text boxes. //----------------------------------------------------------------------------- -static LRESULT CALLBACK MyNumberProc(HWND hwnd, UINT msg, WPARAM wParam, - LPARAM lParam) -{ - if(msg == WM_CHAR) { - if(!(isdigit(wParam) || wParam == '.' || wParam == '\b')) { - return 0; - } - } - - LONG_PTR t; - if(hwnd == CrystalTextbox) - t = PrevCrystalProc; - else if(hwnd == CycleTextbox) - t = PrevCycleProc; - else if(hwnd == BaudTextbox) - t = PrevBaudProc; - else - oops(); - - return CallWindowProc((WNDPROC)t, hwnd, msg, wParam, lParam); -} - -static void MakeControls(void) -{ - HWND textLabel = CreateWindowEx(0, WC_STATIC, _("Cycle Time (ms):"), - WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, - 5, 13, 145, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(textLabel); - - CycleTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", - WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, - 155, 12, 85, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(CycleTextbox); - - HWND textLabel2 = CreateWindowEx(0, WC_STATIC, - _("Crystal Frequency (MHz):"), - WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, - 0, 43, 150, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(textLabel2); - - CrystalTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", - WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, - 155, 42, 85, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(CrystalTextbox); - - HWND textLabel3 = CreateWindowEx(0, WC_STATIC, _("UART Baud Rate (bps):"), - WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, - 5, 73, 145, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(textLabel3); - - BaudTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", - WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, - 155, 72, 85, 21, ConfDialog, NULL, Instance, NULL); - NiceFont(BaudTextbox); - - if(!UartFunctionUsed()) { - EnableWindow(BaudTextbox, FALSE); - EnableWindow(textLabel3, FALSE); - } - - if(Prog.mcu && (Prog.mcu->whichIsa == ISA_ANSIC || - Prog.mcu->whichIsa == ISA_INTERPRETED)) - { - EnableWindow(CrystalTextbox, FALSE); - EnableWindow(textLabel2, FALSE); - } - - OkButton = CreateWindowEx(0, WC_BUTTON, _("OK"), - WS_CHILD | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE | BS_DEFPUSHBUTTON, - 258, 11, 70, 23, ConfDialog, NULL, Instance, NULL); - NiceFont(OkButton); - - CancelButton = CreateWindowEx(0, WC_BUTTON, _("Cancel"), - WS_CHILD | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, - 258, 41, 70, 23, ConfDialog, NULL, Instance, NULL); - NiceFont(CancelButton); - - char explanation[1024] = ""; - - if(UartFunctionUsed()) { - if(Prog.mcu && Prog.mcu->uartNeeds.rxPin != 0) { - sprintf(explanation, - _("Serial (UART) will use pins %d and %d.\r\n\r\n"), - Prog.mcu->uartNeeds.rxPin, Prog.mcu->uartNeeds.txPin); - } else { - strcpy(explanation, - _("Please select a micro with a UART.\r\n\r\n")); - } - } else { - strcpy(explanation, _("No serial instructions (UART Send/UART Receive) " - "are in use; add one to program before setting baud rate.\r\n\r\n") - ); - } - - strcat(explanation, - _("The cycle time for the 'PLC' runtime generated by LDmicro is user-" - "configurable. Very short cycle times may not be achievable due " - "to processor speed constraints, and very long cycle times may not " - "be achievable due to hardware overflows. Cycle times between 10 ms " - "and 100 ms will usually be practical.\r\n\r\n" - "The compiler must know what speed crystal you are using with the " - "micro to convert between timing in clock cycles and timing in " - "seconds. A 4 MHz to 20 MHz crystal is typical; check the speed " - "grade of the part you are using to determine the maximum allowable " - "clock speed before choosing a crystal.")); - - HWND textLabel4 = CreateWindowEx(0, WC_STATIC, explanation, - WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE, - 11, 104, 310, 400, ConfDialog, NULL, Instance, NULL); - NiceFont(textLabel4); - - // Measure the explanation string, so that we know how to size our window - RECT tr, cr; - HDC hdc = CreateCompatibleDC(NULL); - SelectObject(hdc, MyNiceFont); - SetRect(&tr, 0, 0, 310, 400); - DrawText(hdc, explanation, -1, &tr, DT_CALCRECT | - DT_LEFT | DT_TOP | DT_WORDBREAK); - DeleteDC(hdc); - int h = 104 + tr.bottom + 10; - SetWindowPos(ConfDialog, NULL, 0, 0, 344, h, SWP_NOMOVE); - // h is the desired client height, but SetWindowPos includes title bar; - // so fix it up by hand - GetClientRect(ConfDialog, &cr); - int nh = h + (h - (cr.bottom - cr.top)); - SetWindowPos(ConfDialog, NULL, 0, 0, 344, nh, SWP_NOMOVE); - - - PrevCycleProc = SetWindowLongPtr(CycleTextbox, GWLP_WNDPROC, - (LONG_PTR)MyNumberProc); - - PrevCrystalProc = SetWindowLongPtr(CrystalTextbox, GWLP_WNDPROC, - (LONG_PTR)MyNumberProc); - - PrevBaudProc = SetWindowLongPtr(BaudTextbox, GWLP_WNDPROC, - (LONG_PTR)MyNumberProc); -} - -void ShowConfDialog(void) -{ - // The window's height will be resized later, to fit the explanation text. - ConfDialog = CreateWindowClient(0, "LDmicroDialog", _("PLC Configuration"), - WS_OVERLAPPED | WS_SYSMENU, - 100, 100, 0, 0, NULL, NULL, Instance, NULL); - - MakeControls(); +// static LRESULT CALLBACK MyNumberProc(HWND hwnd, UINT msg, WPARAM wParam, +// LPARAM lParam) +// { +// if(msg == WM_CHAR) { +// if(!(isdigit(wParam) || wParam == '.' || wParam == '\b')) { +// return 0; +// } +// } + +// LONG_PTR t; +// if(hwnd == CrystalTextbox) +// t = PrevCrystalProc; +// else if(hwnd == CycleTextbox) +// t = PrevCycleProc; +// else if(hwnd == BaudTextbox) +// t = PrevBaudProc; +// else +// oops(); + +// return CallWindowProc((WNDPROC)t, hwnd, msg, wParam, lParam); +// } + +// static void MakeControls(void) +// { +// HWND textLabel = CreateWindowEx(0, WC_STATIC, _("Cycle Time (ms):"), +// WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, +// 5, 13, 145, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(textLabel); + +// CycleTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", +// WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, +// 155, 12, 85, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(CycleTextbox); + +// HWND textLabel2 = CreateWindowEx(0, WC_STATIC, +// _("Crystal Frequency (MHz):"), +// WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, +// 0, 43, 150, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(textLabel2); + +// CrystalTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", +// WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, +// 155, 42, 85, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(CrystalTextbox); + +// HWND textLabel3 = CreateWindowEx(0, WC_STATIC, _("UART Baud Rate (bps):"), +// WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | SS_RIGHT, +// 5, 73, 145, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(textLabel3); + +// BaudTextbox = CreateWindowEx(WS_EX_CLIENTEDGE, WC_EDIT, "", +// WS_CHILD | ES_AUTOHSCROLL | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, +// 155, 72, 85, 21, ConfDialog, NULL, Instance, NULL); +// NiceFont(BaudTextbox); + +// if(!UartFunctionUsed()) { +// EnableWindow(BaudTextbox, FALSE); +// EnableWindow(textLabel3, FALSE); +// } + +// if(Prog.mcu && (Prog.mcu->whichIsa == ISA_ANSIC || +// Prog.mcu->whichIsa == ISA_INTERPRETED)) +// { +// EnableWindow(CrystalTextbox, FALSE); +// EnableWindow(textLabel2, FALSE); +// } + +// OkButton = CreateWindowEx(0, WC_BUTTON, _("OK"), +// WS_CHILD | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE | BS_DEFPUSHBUTTON, +// 258, 11, 70, 23, ConfDialog, NULL, Instance, NULL); +// NiceFont(OkButton); + +// CancelButton = CreateWindowEx(0, WC_BUTTON, _("Cancel"), +// WS_CHILD | WS_TABSTOP | WS_CLIPSIBLINGS | WS_VISIBLE, +// 258, 41, 70, 23, ConfDialog, NULL, Instance, NULL); +// NiceFont(CancelButton); + +// char explanation[1024] = ""; + +// if(UartFunctionUsed()) { +// if(Prog.mcu && Prog.mcu->uartNeeds.rxPin != 0) { +// sprintf(explanation, +// _("Serial (UART) will use pins %d and %d.\r\n\r\n"), +// Prog.mcu->uartNeeds.rxPin, Prog.mcu->uartNeeds.txPin); +// } else { +// strcpy(explanation, +// _("Please select a micro with a UART.\r\n\r\n")); +// } +// } else { +// strcpy(explanation, _("No serial instructions (UART Send/UART Receive) " +// "are in use; add one to program before setting baud rate.\r\n\r\n") +// ); +// } + +// strcat(explanation, +// _("The cycle time for the 'PLC' runtime generated by LDmicro is user-" +// "configurable. Very short cycle times may not be achievable due " +// "to processor speed constraints, and very long cycle times may not " +// "be achievable due to hardware overflows. Cycle times between 10 ms " +// "and 100 ms will usually be practical.\r\n\r\n" +// "The compiler must know what speed crystal you are using with the " +// "micro to convert between timing in clock cycles and timing in " +// "seconds. A 4 MHz to 20 MHz crystal is typical; check the speed " +// "grade of the part you are using to determine the maximum allowable " +// "clock speed before choosing a crystal.")); + +// HWND textLabel4 = CreateWindowEx(0, WC_STATIC, explanation, +// WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE, +// 11, 104, 310, 400, ConfDialog, NULL, Instance, NULL); +// NiceFont(textLabel4); + +// // Measure the explanation string, so that we know how to size our window +// RECT tr, cr; +// HDC hdc = CreateCompatibleDC(NULL); +// SelectObject(hdc, MyNiceFont); +// SetRect(&tr, 0, 0, 310, 400); +// DrawText(hdc, explanation, -1, &tr, DT_CALCRECT | +// DT_LEFT | DT_TOP | DT_WORDBREAK); +// DeleteDC(hdc); +// int h = 104 + tr.bottom + 10; +// SetWindowPos(ConfDialog, NULL, 0, 0, 344, h, SWP_NOMOVE); +// // h is the desired client height, but SetWindowPos includes title bar; +// // so fix it up by hand +// GetClientRect(ConfDialog, &cr); +// int nh = h + (h - (cr.bottom - cr.top)); +// SetWindowPos(ConfDialog, NULL, 0, 0, 344, nh, SWP_NOMOVE); + + +// PrevCycleProc = SetWindowLongPtr(CycleTextbox, GWLP_WNDPROC, +// (LONG_PTR)MyNumberProc); + +// PrevCrystalProc = SetWindowLongPtr(CrystalTextbox, GWLP_WNDPROC, +// (LONG_PTR)MyNumberProc); + +// PrevBaudProc = SetWindowLongPtr(BaudTextbox, GWLP_WNDPROC, +// (LONG_PTR)MyNumberProc); +// } + +// void ShowConfDialog(void) +// { +// // The window's height will be resized later, to fit the explanation text. +// ConfDialog = CreateWindowClient(0, "LDmicroDialog", _("PLC Configuration"), +// WS_OVERLAPPED | WS_SYSMENU, +// 100, 100, 0, 0, NULL, NULL, Instance, NULL); + +// MakeControls(); - char buf[16]; - sprintf(buf, "%.1f", (Prog.cycleTime / 1000.0)); - SendMessage(CycleTextbox, WM_SETTEXT, 0, (LPARAM)buf); - - sprintf(buf, "%.6f", Prog.mcuClock / 1e6); - SendMessage(CrystalTextbox, WM_SETTEXT, 0, (LPARAM)buf); - - sprintf(buf, "%d", Prog.baudRate); - SendMessage(BaudTextbox, WM_SETTEXT, 0, (LPARAM)buf); - - EnableWindow(MainWindow, FALSE); - ShowWindow(ConfDialog, TRUE); - SetFocus(CycleTextbox); - - MSG msg; - DWORD ret; - DialogDone = FALSE; - DialogCancel = FALSE; - while((ret = GetMessage(&msg, NULL, 0, 0)) && !DialogDone) { - if(msg.message == WM_KEYDOWN) { - if(msg.wParam == VK_RETURN) { - DialogDone = TRUE; - break; - } else if(msg.wParam == VK_ESCAPE) { - DialogDone = TRUE; - DialogCancel = TRUE; - break; - } - } - - if(IsDialogMessage(ConfDialog, &msg)) continue; - TranslateMessage(&msg); - DispatchMessage(&msg); - } - - if(!DialogCancel) { - char buf[16]; - SendMessage(CycleTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), - (LPARAM)(buf)); - Prog.cycleTime = (int)(1000*atof(buf) + 0.5); - if(Prog.cycleTime == 0) { - Error(_("Zero cycle time not valid; resetting to 10 ms.")); - Prog.cycleTime = 10000; - } - - SendMessage(CrystalTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), - (LPARAM)(buf)); - Prog.mcuClock = (int)(1e6*atof(buf) + 0.5); - - SendMessage(BaudTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), - (LPARAM)(buf)); - Prog.baudRate = atoi(buf); - } - - EnableWindow(MainWindow, TRUE); - DestroyWindow(ConfDialog); - return; -} +// char buf[16]; +// sprintf(buf, "%.1f", (Prog.cycleTime / 1000.0)); +// SendMessage(CycleTextbox, WM_SETTEXT, 0, (LPARAM)buf); + +// sprintf(buf, "%.6f", Prog.mcuClock / 1e6); +// SendMessage(CrystalTextbox, WM_SETTEXT, 0, (LPARAM)buf); + +// sprintf(buf, "%d", Prog.baudRate); +// SendMessage(BaudTextbox, WM_SETTEXT, 0, (LPARAM)buf); + +// EnableWindow(MainWindow, FALSE); +// ShowWindow(ConfDialog, TRUE); +// SetFocus(CycleTextbox); + +// MSG msg; +// DWORD ret; +// DialogDone = FALSE; +// DialogCancel = FALSE; +// while((ret = GetMessage(&msg, NULL, 0, 0)) && !DialogDone) { +// if(msg.message == WM_KEYDOWN) { +// if(msg.wParam == VK_RETURN) { +// DialogDone = TRUE; +// break; +// } else if(msg.wParam == VK_ESCAPE) { +// DialogDone = TRUE; +// DialogCancel = TRUE; +// break; +// } +// } + +// if(IsDialogMessage(ConfDialog, &msg)) continue; +// TranslateMessage(&msg); +// DispatchMessage(&msg); +// } + +// if(!DialogCancel) { +// char buf[16]; +// SendMessage(CycleTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), +// (LPARAM)(buf)); +// Prog.cycleTime = (int)(1000*atof(buf) + 0.5); +// if(Prog.cycleTime == 0) { +// Error(_("Zero cycle time not valid; resetting to 10 ms.")); +// Prog.cycleTime = 10000; +// } + +// SendMessage(CrystalTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), +// (LPARAM)(buf)); +// Prog.mcuClock = (int)(1e6*atof(buf) + 0.5); + +// SendMessage(BaudTextbox, WM_GETTEXT, (WPARAM)sizeof(buf), +// (LPARAM)(buf)); +// Prog.baudRate = atoi(buf); +// } + +// EnableWindow(MainWindow, TRUE); +// DestroyWindow(ConfDialog); +// return; +// } |