You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
713 lines
29 KiB
713 lines
29 KiB
|
4 weeks ago
|
#include <windows.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <math.h>
|
||
|
|
#include <time.h>
|
||
|
|
#include "dask.h"
|
||
|
|
#include "resource.h"
|
||
|
|
|
||
|
|
#define IDM_EXIT 110
|
||
|
|
#define IDM_SETUP 101
|
||
|
|
#define IDC_SCROLL 207
|
||
|
|
#define IDC_SPIN 301
|
||
|
|
#define IDC_START 208
|
||
|
|
#define IDC_STOP 209
|
||
|
|
#define IDC_PAUSE 210
|
||
|
|
#define IDC_EDIT 211
|
||
|
|
#define IDC_GAIN 212
|
||
|
|
#define IDC_DA 400
|
||
|
|
#define TIMER1 1
|
||
|
|
#define NONE 0
|
||
|
|
|
||
|
|
int PASCAL WinMain(HANDLE, HANDLE, LPSTR, int);
|
||
|
|
long PASCAL MainWndProc(HWND, UINT, WPARAM, LPARAM);
|
||
|
|
|
||
|
|
HANDLE hInst;
|
||
|
|
HWND hAddrComboBox;
|
||
|
|
HWND hADComboBox1;
|
||
|
|
HWND hADComboBox2;
|
||
|
|
HWND hADComboBox3;
|
||
|
|
HWND hADComboBox4;
|
||
|
|
HWND hADComboBox5;
|
||
|
|
HWND hADComboBox6;
|
||
|
|
HWND hADScroll;
|
||
|
|
HWND hEdit;
|
||
|
|
HWND MainhWnd;
|
||
|
|
|
||
|
|
I16 card=-1, card_number = 0;
|
||
|
|
U16 input[16], output=0;
|
||
|
|
I16 oldinput[16],analog_input[16],adinput[16],old_adinput1[16],old_adinput2[16];
|
||
|
|
U8 input_lo=0, input_hi=0;
|
||
|
|
|
||
|
|
LPSTR AD_Range[8]={"+/-5V","+/-2.5V","+/-1.25V","+/-0.625V","0-10V","0-5V","0-2.5V","0-1.25V"};
|
||
|
|
I16 range_value[8] = {AD_B_5_V, AD_B_2_5_V, AD_B_1_25_V, AD_B_0_625_V, AD_U_10_V, AD_U_5_V, AD_U_2_5_V, AD_U_1_25_V};
|
||
|
|
|
||
|
|
HBRUSH hLTGreenBrush,hGreenBrush,hBlueBrush,hYellowBrush,hRedBrush,hBlackBrush,hWhiteBrush,hLTRedBrush,hLTBlueBrush;
|
||
|
|
HPEN hRedPen,hYellowPen,hGreenPen,hBluePen,hLTBluePen,hLTRedPen,hLTGreenPen,hWhitePen;
|
||
|
|
|
||
|
|
I16 sample_rate=10, time_interval, range=AD_B_5_V;
|
||
|
|
|
||
|
|
POINT input_pos[16]= {{470, 280}, {440, 280},
|
||
|
|
{410, 280}, {380, 280},
|
||
|
|
{350, 280}, {320, 280},
|
||
|
|
{ 290, 280}, {260, 280},
|
||
|
|
{230, 280}, {200, 280},
|
||
|
|
{170, 280}, {140, 280},
|
||
|
|
{110, 280}, {80, 280},
|
||
|
|
{ 50, 280}, { 20, 280},
|
||
|
|
};
|
||
|
|
POINT output_pos[16] ={
|
||
|
|
{470, 340}, {440, 340},
|
||
|
|
{410, 340}, {380, 340},
|
||
|
|
{350, 340}, {320, 340},
|
||
|
|
{ 290, 340}, {260, 340},
|
||
|
|
{230, 340}, {200, 340},
|
||
|
|
{170, 340}, {140, 340},
|
||
|
|
{110, 340}, {80, 340},
|
||
|
|
{ 50, 340}, { 20, 340},
|
||
|
|
};
|
||
|
|
|
||
|
|
POINT io_pos[16] ={
|
||
|
|
{395, 40}, {370, 40},
|
||
|
|
{345, 40}, {320, 40},
|
||
|
|
{295, 40}, {270, 40},
|
||
|
|
{ 245, 40}, {220, 40},
|
||
|
|
{195, 40}, {170, 40},
|
||
|
|
{145, 40}, {120, 40},
|
||
|
|
{95, 40}, {70, 40},
|
||
|
|
{ 45, 40}, { 20, 40},
|
||
|
|
};
|
||
|
|
|
||
|
|
BOOL bCheck1[8],bCheck2[8],bStart=FALSE,bStop=FALSE,bPause=FALSE;
|
||
|
|
BOOL InitApplication(HANDLE);
|
||
|
|
BOOL InitInstance(HANDLE, int);
|
||
|
|
|
||
|
|
int PASCAL WinMain(hInstance, hPrevInstance, lpCmdLine, nCmdShow)
|
||
|
|
HANDLE hInstance, hPrevInstance;
|
||
|
|
LPSTR lpCmdLine;
|
||
|
|
int nCmdShow;
|
||
|
|
{
|
||
|
|
MSG msg;
|
||
|
|
|
||
|
|
if (!hPrevInstance)
|
||
|
|
if (!InitApplication(hInstance)) return(FALSE);
|
||
|
|
if (!InitInstance(hInstance, nCmdShow)) return(FALSE);
|
||
|
|
while (GetMessage(&msg, NULL, NULL, NULL)) {
|
||
|
|
TranslateMessage(&msg);
|
||
|
|
DispatchMessage(&msg);
|
||
|
|
}
|
||
|
|
return(msg.wParam);
|
||
|
|
}
|
||
|
|
|
||
|
|
BOOL InitApplication(hInstance)
|
||
|
|
HANDLE hInstance;
|
||
|
|
{
|
||
|
|
WNDCLASS wc;
|
||
|
|
|
||
|
|
/* Main Window Class */
|
||
|
|
wc.style = NULL;
|
||
|
|
wc.lpfnWndProc = (WNDPROC)MainWndProc;
|
||
|
|
wc.cbClsExtra = 0;
|
||
|
|
wc.cbWndExtra = 0;
|
||
|
|
wc.hInstance = hInstance;
|
||
|
|
wc.hIcon = LoadIcon(hInstance, "MyIcon");
|
||
|
|
wc.hCursor = LoadCursor(NULL, IDC_ARROW);
|
||
|
|
wc.hbrBackground = GetStockObject(LTGRAY_BRUSH);
|
||
|
|
wc.lpszMenuName = NULL;
|
||
|
|
wc.lpszClassName = "GenericWClass";
|
||
|
|
if (!RegisterClass(&wc)) return(FALSE);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
BOOL InitInstance(hInstance, nCmdShow)
|
||
|
|
HANDLE hInstance;
|
||
|
|
int nCmdShow;
|
||
|
|
{
|
||
|
|
HWND hWnd;
|
||
|
|
HMENU hSampleMenu;
|
||
|
|
|
||
|
|
hInst = hInstance;
|
||
|
|
hSampleMenu = LoadMenu(hInstance, "U7120Menu");
|
||
|
|
hWnd = CreateWindow("GenericWClass",
|
||
|
|
(LPCSTR)"9116",
|
||
|
|
WS_OVERLAPPEDWINDOW,
|
||
|
|
CW_USEDEFAULT,
|
||
|
|
CW_USEDEFAULT,
|
||
|
|
530,
|
||
|
|
480,
|
||
|
|
NULL,
|
||
|
|
hSampleMenu,
|
||
|
|
hInstance,
|
||
|
|
NULL);
|
||
|
|
MainhWnd=hWnd;
|
||
|
|
if (!hWnd) return(FALSE);
|
||
|
|
ShowWindow(hWnd, nCmdShow);
|
||
|
|
UpdateWindow(hWnd);
|
||
|
|
return(TRUE);
|
||
|
|
}
|
||
|
|
|
||
|
|
BOOL PASCAL setup(HWND hWnd, unsigned message, WPARAM wParam, LPARAM lParam)
|
||
|
|
{
|
||
|
|
int i;
|
||
|
|
char n[16];
|
||
|
|
char s[50];
|
||
|
|
switch (message) {
|
||
|
|
case WM_INITDIALOG:
|
||
|
|
for (i=0;i<16;i++) {
|
||
|
|
wsprintf(n, "%d", i);
|
||
|
|
_strupr(n);
|
||
|
|
SendMessage(GetDlgItem(hWnd,IDC_COMBO1), CB_ADDSTRING, NULL, (LONG)(LPSTR) n);
|
||
|
|
}
|
||
|
|
SendMessage(GetDlgItem(hWnd,IDC_COMBO1) , CB_SETCURSEL, 0, 0L);
|
||
|
|
|
||
|
|
break;
|
||
|
|
case WM_COMMAND:
|
||
|
|
switch(LOWORD(wParam)) {
|
||
|
|
|
||
|
|
case IDC_COMBO1:
|
||
|
|
if (HIWORD(wParam) == CBN_CLOSEUP) {
|
||
|
|
i = (int)SendMessage(GetDlgItem(hWnd,IDC_COMBO1), CB_GETCURSEL, 0, 0L);
|
||
|
|
SendMessage(GetDlgItem(hWnd,IDC_COMBO1), CB_GETLBTEXT, i, (LPARAM)((LPCSTR)n));
|
||
|
|
card_number = i;
|
||
|
|
}
|
||
|
|
return(TRUE);
|
||
|
|
case IDOK:
|
||
|
|
if ((card=Register_Card(PCI_9116, card_number)) < 0) {
|
||
|
|
wsprintf(s, "Register_Card Error = %d\n", card);
|
||
|
|
MessageBox(hWnd, s, "Error", MB_OK);
|
||
|
|
SendMessage(hWnd, WM_CLOSE, 0, 0L);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
EndDialog(hWnd, TRUE);
|
||
|
|
InvalidateRect(hWnd, NULL, FALSE);
|
||
|
|
return (TRUE);
|
||
|
|
case IDCANCEL:
|
||
|
|
EndDialog(hWnd, TRUE);
|
||
|
|
return (TRUE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return (FALSE);
|
||
|
|
}
|
||
|
|
|
||
|
|
long PASCAL MainWndProc(hWnd, message, wParam, lParam)
|
||
|
|
HWND hWnd;
|
||
|
|
UINT message;
|
||
|
|
WPARAM wParam;
|
||
|
|
LPARAM lParam;
|
||
|
|
{
|
||
|
|
HDC hDC;
|
||
|
|
PAINTSTRUCT ps;
|
||
|
|
int i, k, px, py, err;
|
||
|
|
char n[15], s[50];
|
||
|
|
double Pi = 3.1415926535;
|
||
|
|
static U16 pos=0;
|
||
|
|
|
||
|
|
switch(message) {
|
||
|
|
case WM_CREATE:
|
||
|
|
DialogBox(hInst,IDD_DIALOG2, hWnd, setup);
|
||
|
|
if(card<0) {
|
||
|
|
SendMessage(hWnd, WM_CLOSE, 0, 0L);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
for (i=0;i<8;i++) {
|
||
|
|
bCheck1[i]=FALSE;
|
||
|
|
bCheck2[i]=FALSE;
|
||
|
|
old_adinput1[i]=-1;
|
||
|
|
old_adinput2[i]=-1;
|
||
|
|
}
|
||
|
|
for (i=0 ;i <8; i++) {
|
||
|
|
input[i] = 0;
|
||
|
|
oldinput[i] = 0;
|
||
|
|
}
|
||
|
|
hAddrComboBox = CreateWindow("ComboBox", NULL,
|
||
|
|
CBS_DROPDOWNLIST | WS_CHILD | WS_VISIBLE | WS_VSCROLL,
|
||
|
|
output_pos[4].x+90, io_pos[0].y+70, 85, 120, hWnd, IDC_GAIN, hInst, NULL);
|
||
|
|
for (i=0;i<8;i++) {
|
||
|
|
SendMessage(hAddrComboBox, CB_ADDSTRING, NULL, (LONG)AD_Range[i]);
|
||
|
|
}
|
||
|
|
SendMessage(hAddrComboBox ,CB_SETCURSEL, 0, 0L);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","Start" ,
|
||
|
|
WS_CHILD | WS_VISIBLE ,
|
||
|
|
output_pos[10].x+110, output_pos[10].y+50,50, 30, hWnd, IDC_START, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","Stop" ,
|
||
|
|
WS_CHILD | WS_VISIBLE ,
|
||
|
|
output_pos[10].x+170, output_pos[10].y+50,50, 30, hWnd, IDC_STOP, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","Pause" ,
|
||
|
|
WS_CHILD | WS_VISIBLE ,
|
||
|
|
output_pos[10].x+230, output_pos[10].y+50,50, 30, hWnd, IDC_PAUSE, hInst, NULL);
|
||
|
|
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","0" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT ,
|
||
|
|
output_pos[4].x+50, io_pos[0].y-5,25,15, hWnd,IDC_DA, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","1" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+13,25,15, hWnd,IDC_DA+1, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","2" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+31,25,15, hWnd,IDC_DA+2, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","3" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+49,25,15, hWnd,IDC_DA+3, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","4" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y-5,25,15, hWnd,IDC_DA+4, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","5" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+13,25,15, hWnd, IDC_DA+5, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","6" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+31,25,15, hWnd,IDC_DA+6, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","7" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+49,25,15, hWnd, IDC_DA+7, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","0" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+97,25,15, hWnd, IDC_DA+8, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","1" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+115,25,15, hWnd, IDC_DA+9, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","2" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+133,25,15, hWnd, IDC_DA+10, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","3" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+50, io_pos[0].y+151,25,15, hWnd, IDC_DA+11, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","4" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+97,25,15, hWnd, IDC_DA+12, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","5" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+115,25,15, hWnd, IDC_DA+13, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","6" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+133,25,15, hWnd, IDC_DA+14, hInst, NULL);
|
||
|
|
|
||
|
|
CreateWindow("BUTTON","7" ,
|
||
|
|
WS_CHILD | WS_VISIBLE | BS_RADIOBUTTON | BS_LEFTTEXT,
|
||
|
|
output_pos[4].x+100, io_pos[0].y+151,25,15, hWnd, IDC_DA+15, hInst, NULL);
|
||
|
|
|
||
|
|
hLTGreenBrush = CreateSolidBrush(RGB(0, 255, 0));
|
||
|
|
hGreenBrush = CreateSolidBrush(RGB(0, 128, 0));
|
||
|
|
hBlueBrush = CreateSolidBrush(RGB(0, 0, 255));
|
||
|
|
hRedBrush = CreateSolidBrush(RGB(255, 0, 0));
|
||
|
|
hYellowBrush= CreateSolidBrush(RGB(255,255,0));
|
||
|
|
hBlackBrush= CreateSolidBrush(RGB(0,0,0));
|
||
|
|
hLTBlueBrush= CreateSolidBrush(RGB(0,255,255));
|
||
|
|
hLTRedBrush= CreateSolidBrush(RGB(255,128,0));
|
||
|
|
hWhiteBrush= CreateSolidBrush(RGB(255,255,255));
|
||
|
|
hRedPen= CreatePen(PS_SOLID,1,RGB(255,0,0));
|
||
|
|
hYellowPen= CreatePen(PS_SOLID,1,RGB(255,255,0));
|
||
|
|
hBluePen= CreatePen(PS_SOLID,1,RGB(0,0,255));
|
||
|
|
hGreenPen= CreatePen(PS_SOLID,1,RGB(0,255,0));
|
||
|
|
hLTBluePen= CreatePen(PS_SOLID,1,RGB(0,128,255));
|
||
|
|
hLTRedPen= CreatePen(PS_SOLID,1,RGB(255,128,0));
|
||
|
|
hLTGreenPen= CreatePen(PS_SOLID,1,RGB(0,128,0));
|
||
|
|
hWhitePen= CreatePen(PS_SOLID,1,RGB(255,255,255));
|
||
|
|
break;
|
||
|
|
|
||
|
|
case WM_PAINT:
|
||
|
|
hDC = BeginPaint(hWnd, &ps);
|
||
|
|
|
||
|
|
// Digital Input Box
|
||
|
|
SelectObject(hDC, hLTGreenBrush);
|
||
|
|
Rectangle(hDC, input_pos[15].x-10, input_pos[15].y-14, input_pos[0].x+26, input_pos[0].y+40);
|
||
|
|
SetTextColor(hDC,RGB(255,255,255));
|
||
|
|
SetBkColor(hDC, RGB(0, 0, 255));
|
||
|
|
TextOut(hDC, input_pos[15].x, input_pos[15].y-18, "Digital Input",13);
|
||
|
|
|
||
|
|
// Digital Output Box
|
||
|
|
SelectObject(hDC, hGreenBrush);
|
||
|
|
Rectangle(hDC, output_pos[15].x-10, output_pos[15].y-14, output_pos[0].x+26, output_pos[0].y+40);
|
||
|
|
SetTextColor(hDC,RGB(255,0,0));
|
||
|
|
SetBkColor(hDC, RGB(0, 0, 255));
|
||
|
|
TextOut(hDC, output_pos[15].x, output_pos[15].y-20, "Digital Output", 14);
|
||
|
|
|
||
|
|
// Analog Input Box
|
||
|
|
SelectObject(hDC, GetStockObject(GRAY_BRUSH));
|
||
|
|
Rectangle(hDC, output_pos[15].x-10, io_pos[15].y-24, output_pos[0].x+26, io_pos[0].y+175);
|
||
|
|
SetTextColor(hDC,RGB(255,255,0));
|
||
|
|
SetBkColor(hDC, RGB(0, 0, 255));
|
||
|
|
TextOut(hDC, io_pos[15].x, io_pos[15].y-35, "Analog Input(A/D)", 17);
|
||
|
|
|
||
|
|
SelectObject(hDC, hBlackBrush);
|
||
|
|
Rectangle(hDC, output_pos[15].x+35, io_pos[15].y-2, output_pos[4].x+41, io_pos[0].y+83);
|
||
|
|
Rectangle(hDC, output_pos[15].x+35, io_pos[15].y+87, output_pos[4].x+41, io_pos[0].y+172);
|
||
|
|
// Channel Label
|
||
|
|
SetTextColor(hDC,RGB(0,0,0));
|
||
|
|
SetBkColor(hDC, RGB(0, 255, 0));
|
||
|
|
TextOut(hDC, input_pos[15].x+243, input_pos[15].y+20, "7 0", 53);
|
||
|
|
SetBkColor(hDC, RGB(0, 128, 0));
|
||
|
|
TextOut(hDC, output_pos[15].x+243, output_pos[15].y+20, "7 0", 53);
|
||
|
|
SetBkColor(hDC, RGB(0, 255, 0));
|
||
|
|
|
||
|
|
SelectObject(hDC,hYellowBrush );
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y-5,output_pos[4].x+90, io_pos[0].y+10);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+97,output_pos[4].x+90, io_pos[0].y+112);
|
||
|
|
SelectObject(hDC, hGreenBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+13,output_pos[4].x+90, io_pos[0].y+28);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+115,output_pos[4].x+90, io_pos[0].y+130);
|
||
|
|
SelectObject(hDC, hBlueBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+31,output_pos[4].x+90, io_pos[0].y+46);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+133,output_pos[4].x+90, io_pos[0].y+148);
|
||
|
|
SelectObject(hDC, hRedBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+49,output_pos[4].x+90, io_pos[0].y+64);
|
||
|
|
Rectangle(hDC,output_pos[4].x+78, io_pos[0].y+151,output_pos[4].x+90, io_pos[0].y+166);
|
||
|
|
SelectObject(hDC, hLTBlueBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y-5,output_pos[4].x+140, io_pos[0].y+10);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+97,output_pos[4].x+140, io_pos[0].y+112);
|
||
|
|
SelectObject(hDC, hLTRedBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+13,output_pos[4].x+140, io_pos[0].y+28);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+115,output_pos[4].x+140, io_pos[0].y+130);
|
||
|
|
SelectObject(hDC, hLTGreenBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+31,output_pos[4].x+140, io_pos[0].y+46);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+133,output_pos[4].x+140, io_pos[0].y+148);
|
||
|
|
SelectObject(hDC, hWhiteBrush);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+49,output_pos[4].x+140, io_pos[0].y+64);
|
||
|
|
Rectangle(hDC,output_pos[4].x+128, io_pos[0].y+151,output_pos[4].x+140, io_pos[0].y+166);
|
||
|
|
|
||
|
|
TextOut(hDC,output_pos[13].x+90, output_pos[15].y+56," PCI-9116 ",9);
|
||
|
|
|
||
|
|
SetBkMode(hDC,TRANSPARENT);
|
||
|
|
//TextOut(hDC,output_pos[8].x+20, io_pos[15].y+182,"0 1 2 3 4 5",31);
|
||
|
|
TextOut(hDC,output_pos[4].x+50, io_pos[0].y+67,"Input",5);
|
||
|
|
TextOut(hDC,output_pos[4].x+50, io_pos[0].y+80,"Range",5);
|
||
|
|
TextOut(hDC,input_pos[15].x, io_pos[15].y-19,"Volts",5);
|
||
|
|
switch (range) {
|
||
|
|
case AD_B_5_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"5.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+67,"-5.00",5);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"5.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+159,"-5.00",5);
|
||
|
|
break;
|
||
|
|
case AD_B_2_5_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"2.50",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+67,"-2.50",5);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"2.50",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+159,"-2.50",5);
|
||
|
|
break;
|
||
|
|
case AD_B_1_25_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"1.25",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+67,"-1.25",5);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"1.25",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+159,"-1.25",5);
|
||
|
|
break;
|
||
|
|
case AD_B_0_625_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"0.625",5);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+67,"-0.625",6);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"0.625",5);
|
||
|
|
TextOut(hDC,input_pos[15].x-8, io_pos[15].y+159,"-0.625",6);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case AD_U_10_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"10.0",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+67," 0.0",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"10.0",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+159," 0.0",4);
|
||
|
|
break;
|
||
|
|
case AD_U_5_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"5.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+67,"0.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"5.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+159,"0.00",4);
|
||
|
|
break;
|
||
|
|
case AD_U_2_5_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"2.50",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+67,"0.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"2.50",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+159,"0.00",4);
|
||
|
|
break;
|
||
|
|
case AD_U_1_25_V:
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y-5,"1.25",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+67,"0.00",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+87,"1.25",4);
|
||
|
|
TextOut(hDC,input_pos[15].x-5, io_pos[15].y+159,"0.00",4);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
TextOut(hDC,input_pos[10].x, io_pos[10].y-19,"Signals",7);
|
||
|
|
TextOut(hDC,output_pos[4].x+50, io_pos[0].y-20,"Channel",7);
|
||
|
|
SetBkMode(hDC,OPAQUE);
|
||
|
|
|
||
|
|
// Detect Channel Input
|
||
|
|
for (i=0; i<8; i++) {
|
||
|
|
if (input[i])
|
||
|
|
SelectObject(hDC, hRedBrush);
|
||
|
|
else
|
||
|
|
SelectObject(hDC, GetStockObject(WHITE_BRUSH));
|
||
|
|
Ellipse(hDC, input_pos[i].x, input_pos[i].y, input_pos[i].x+20, input_pos[i].y+20);
|
||
|
|
}
|
||
|
|
// Channel Output
|
||
|
|
for (i=0; i<8; i++) {
|
||
|
|
if ((output>>i)&0x01)
|
||
|
|
SelectObject(hDC, hRedBrush);
|
||
|
|
else
|
||
|
|
SelectObject(hDC, GetStockObject(WHITE_BRUSH));
|
||
|
|
Ellipse(hDC, output_pos[i].x, output_pos[i].y, output_pos[i].x+20, output_pos[i].y+20);
|
||
|
|
}
|
||
|
|
|
||
|
|
EndPaint(hWnd, &ps);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case WM_HSCROLL:
|
||
|
|
switch(LOWORD(wParam)) {
|
||
|
|
case SB_THUMBPOSITION :
|
||
|
|
pos=HIWORD(wParam);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
SetScrollPos(lParam,SB_CTL,pos,TRUE);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case WM_COMMAND:
|
||
|
|
switch(LOWORD(wParam)) {
|
||
|
|
case IDM_EXIT:
|
||
|
|
SendMessage(hWnd, WM_CLOSE, 0, 0L);
|
||
|
|
break;
|
||
|
|
case IDC_START:
|
||
|
|
time_interval=1000/sample_rate;
|
||
|
|
SetTimer(hWnd, TIMER1, time_interval, NULL);
|
||
|
|
srand((unsigned)time(NULL));
|
||
|
|
bStop=FALSE;
|
||
|
|
bPause=FALSE;
|
||
|
|
bStart=TRUE;
|
||
|
|
break;
|
||
|
|
case IDC_STOP:
|
||
|
|
KillTimer(hWnd, TIMER1);
|
||
|
|
bStop=TRUE;
|
||
|
|
bPause=FALSE;
|
||
|
|
bStart=FALSE;
|
||
|
|
hDC = GetDC(hWnd);
|
||
|
|
SelectObject(hDC, hBlackBrush);
|
||
|
|
Rectangle(hDC, output_pos[15].x+35, io_pos[15].y-2, output_pos[4].x+41, io_pos[0].y+83);
|
||
|
|
Rectangle(hDC, output_pos[15].x+35, io_pos[15].y+87, output_pos[4].x+41, io_pos[0].y+172);
|
||
|
|
ReleaseDC(hWnd, hDC);
|
||
|
|
break;
|
||
|
|
case IDC_PAUSE:
|
||
|
|
KillTimer(hWnd, TIMER1);
|
||
|
|
bStop=FALSE;
|
||
|
|
bPause=TRUE;
|
||
|
|
bStart=FALSE;
|
||
|
|
break;
|
||
|
|
case IDC_DA:
|
||
|
|
case IDC_DA+1:
|
||
|
|
case IDC_DA+2:
|
||
|
|
case IDC_DA+3:
|
||
|
|
case IDC_DA+4:
|
||
|
|
case IDC_DA+5:
|
||
|
|
case IDC_DA+6:
|
||
|
|
case IDC_DA+7:
|
||
|
|
k=LOWORD(wParam)-IDC_DA;
|
||
|
|
if (bCheck1[k]) {
|
||
|
|
SendMessage(GetDlgItem(hWnd,wParam), BM_SETCHECK, 0, 0);
|
||
|
|
bCheck1[k]=FALSE;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
SendMessage(GetDlgItem(hWnd,wParam), BM_SETCHECK, 1, 0);
|
||
|
|
bCheck1[k]=TRUE;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case IDC_DA+8:
|
||
|
|
case IDC_DA+9:
|
||
|
|
case IDC_DA+10:
|
||
|
|
case IDC_DA+11:
|
||
|
|
case IDC_DA+12:
|
||
|
|
case IDC_DA+13:
|
||
|
|
case IDC_DA+14:
|
||
|
|
case IDC_DA+15:
|
||
|
|
k=LOWORD(wParam)-IDC_DA-8;
|
||
|
|
if (bCheck2[k]) {
|
||
|
|
SendMessage(GetDlgItem(hWnd,wParam), BM_SETCHECK, 0, 0);
|
||
|
|
bCheck2[k]=FALSE;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
SendMessage(GetDlgItem(hWnd,wParam), BM_SETCHECK, 1, 0);
|
||
|
|
bCheck2[k]=TRUE;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case IDC_GAIN:
|
||
|
|
if (HIWORD(wParam) == CBN_CLOSEUP) {
|
||
|
|
if ((i=(int)SendMessage(GetDlgItem(hWnd,IDC_GAIN),CB_GETCURSEL, 0, 0L))>=0 ) {
|
||
|
|
SendMessage(GetDlgItem(hWnd,IDC_GAIN), CB_GETLBTEXT, i, (LPARAM)((LPCSTR)n));
|
||
|
|
range = range_value[i];
|
||
|
|
InvalidateRect(hWnd, NULL, FALSE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
return(DefWindowProc(hWnd, message, wParam, lParam));
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case WM_TIMER:
|
||
|
|
if (card >= 0) {
|
||
|
|
hDC = GetDC(hWnd);
|
||
|
|
for (i=0; i<8; i++) {
|
||
|
|
DI_ReadLine (card, 0, i, &input[i]);
|
||
|
|
if ((input[i] & 0x01 ) != ((oldinput[i])&0x01)) {
|
||
|
|
if (input[i] & 0x01)
|
||
|
|
SelectObject(hDC, hRedBrush);
|
||
|
|
else
|
||
|
|
SelectObject(hDC, GetStockObject(WHITE_BRUSH));
|
||
|
|
Ellipse(hDC, input_pos[i].x, input_pos[i].y, input_pos[i].x+20, input_pos[i].y+20);
|
||
|
|
oldinput[i]=input[i];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
/* Analog Input */
|
||
|
|
BitBlt(hDC,output_pos[15].x+39,io_pos[15].y-2,331,85,hDC,output_pos[15].x+35,io_pos[15].y-2,SRCCOPY);
|
||
|
|
for (i=0;i<8;i++ ) {
|
||
|
|
if (bCheck1[i]) {
|
||
|
|
if(range < 14)
|
||
|
|
AI_9116_Config(card,P9116_AI_BiPolar,P9116_AI_SoftPolling,0,0,0);
|
||
|
|
else
|
||
|
|
AI_9116_Config(card,P9116_AI_UniPolar,P9116_AI_SoftPolling,0,0,0);
|
||
|
|
err = AI_ReadChannel(card, i, range, &analog_input[i]);
|
||
|
|
/*if(err != NoError) {
|
||
|
|
wsprintf(s, "AI_ReadChannel Error = %d\n", err);
|
||
|
|
MessageBox(hWnd, s, "Error", MB_OK);
|
||
|
|
}*/
|
||
|
|
switch(i) {
|
||
|
|
case 0:
|
||
|
|
SelectObject(hDC, hYellowPen);
|
||
|
|
break;
|
||
|
|
case 1:
|
||
|
|
SelectObject(hDC, hGreenPen);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SelectObject(hDC, hBluePen);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SelectObject(hDC, hRedPen);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SelectObject(hDC, hLTBluePen);
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SelectObject(hDC, hLTRedPen);
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SelectObject(hDC, hLTGreenPen);
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SelectObject(hDC, hWhitePen);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
//analog_input[i] = (analog_input[i] >> 4) & 0x0fff;
|
||
|
|
//adinput[i]=io_pos[0].y+83-(85*(unsigned long)analog_input[i])/4095;
|
||
|
|
adinput[i]=io_pos[0].y+42-(43*(long)analog_input[i])/32767;
|
||
|
|
if (old_adinput1[i]!=-1 ) {
|
||
|
|
MoveToEx(hDC,output_pos[15].x+39,adinput[i],NULL );
|
||
|
|
LineTo(hDC,output_pos[15].x+43,old_adinput1[i]);
|
||
|
|
}
|
||
|
|
old_adinput1[i]=adinput[i];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
BitBlt(hDC,output_pos[15].x+39,io_pos[15].y+87,331,85,hDC,output_pos[15].x+35,io_pos[15].y+87,SRCCOPY);
|
||
|
|
for (i=0;i<8;i++ ) {
|
||
|
|
if (bCheck2[i]) {
|
||
|
|
AI_ReadChannel(card, i+8, range, &analog_input[i+8]);
|
||
|
|
|
||
|
|
switch(i) {
|
||
|
|
case 0:
|
||
|
|
SelectObject(hDC, hYellowPen);
|
||
|
|
break;
|
||
|
|
case 1:
|
||
|
|
SelectObject(hDC, hGreenPen);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SelectObject(hDC, hBluePen);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SelectObject(hDC, hRedPen);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SelectObject(hDC, hLTBluePen);
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SelectObject(hDC, hLTRedPen);
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SelectObject(hDC, hLTGreenPen);
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SelectObject(hDC, hWhitePen);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
//analog_input[i+8] = (analog_input[i+8]>>4) & 0x0fff;
|
||
|
|
//adinput[i+8]=io_pos[0].y+172-(85*(unsigned long)analog_input[i+8])/4095;
|
||
|
|
adinput[i+8]=io_pos[0].y+42-(43*(long)analog_input[i+8])/32767;
|
||
|
|
if (old_adinput2[i]!=-1 ) {
|
||
|
|
MoveToEx(hDC,output_pos[15].x+39,adinput[i+8],NULL);
|
||
|
|
LineTo(hDC,output_pos[15].x+43,old_adinput2[i]);
|
||
|
|
}
|
||
|
|
old_adinput2[i]=adinput[i+8];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
ReleaseDC(hWnd, hDC);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case WM_DESTROY:
|
||
|
|
if (card >= 0) Release_Card(card);
|
||
|
|
DeleteObject(hRedBrush);
|
||
|
|
DeleteObject(hGreenBrush);
|
||
|
|
DeleteObject(hLTGreenBrush);
|
||
|
|
DeleteObject(hYellowBrush);
|
||
|
|
DeleteObject(hBlueBrush) ;
|
||
|
|
DeleteObject(hBlackBrush);
|
||
|
|
DeleteObject(hRedPen);
|
||
|
|
DeleteObject(hYellowPen);
|
||
|
|
DeleteObject(hBluePen);
|
||
|
|
DeleteObject(hGreenPen);
|
||
|
|
DeleteObject(hLTBluePen);
|
||
|
|
DeleteObject(hLTRedPen);
|
||
|
|
DeleteObject(hLTGreenPen);
|
||
|
|
DeleteObject(hWhitePen);
|
||
|
|
PostQuitMessage(0);
|
||
|
|
break;
|
||
|
|
case WM_LBUTTONDOWN:
|
||
|
|
if (card >= 0) {
|
||
|
|
px = LOWORD(lParam);
|
||
|
|
py = HIWORD(lParam);
|
||
|
|
for (i=0; i<8; i++) {
|
||
|
|
if (px>output_pos[i].x && px<output_pos[i].x+17 && py>output_pos[i].y && py<output_pos[i].y+17) {
|
||
|
|
hDC = GetDC(hWnd);
|
||
|
|
if ((output>>i)&0x01) {
|
||
|
|
output -= (((unsigned int)1)<<i);
|
||
|
|
SelectObject(hDC, GetStockObject(WHITE_BRUSH));
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
output += (((unsigned int)1)<<i);
|
||
|
|
SelectObject(hDC, hRedBrush);
|
||
|
|
}
|
||
|
|
Ellipse(hDC, output_pos[i].x, output_pos[i].y, output_pos[i].x+20, output_pos[i].y+20);
|
||
|
|
|
||
|
|
DO_WritePort(card,0, output);
|
||
|
|
ReleaseDC(hWnd, hDC);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
return(DefWindowProc(hWnd, message, wParam, lParam));
|
||
|
|
}
|
||
|
|
return(NULL);
|
||
|
|
}
|
||
|
|
|