1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
| #include <windows.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
int RegClass(void);
LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM);
HINSTANCE hInstance;
char szClassName[] = "GraphClas";
typedef struct
{
char name[101];
float x[100];
float y[100];
}FUNC;
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nShowCmd)
{
MSG msg;
HWND hwnd;
hInstance = hInst;
if(!RegClass()) return -1;
hwnd = CreateWindow((LPCTSTR)szClassName,0,WS_OVERLAPPED | WS_VISIBLE ,0,0,700,700,NULL,NULL,hInstance,0);
if(!hwnd) return 0;
ShowWindow(hwnd,SW_SHOW);
UpdateWindow(hwnd);
while(GetMessage(&msg,0,0,0)){
TranslateMessage(&msg);
DispatchMessage(&msg);
}
return 0;
}
int RegClass(void)
{
WNDCLASS wc;
memset(&wc,0,sizeof(WNDCLASS));
wc.style = CS_VREDRAW | CS_HREDRAW;
wc.lpfnWndProc = WndProc;
wc.hInstance = hInstance;
wc.hIcon = LoadIcon(NULL,IDI_APPLICATION);
wc.hCursor = LoadCursor(NULL,IDC_ARROW);
wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
wc.lpszMenuName = NULL;
wc.lpszClassName = (LPCTSTR)szClassName;
return RegisterClass(&wc);
}
LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wParam,LPARAM lParam)
{
static short cx, cy;
static double a=1, k=1, n=-0.0001;
static FUNC myfunc;
switch(msg){
case WM_SIZE:
{
cx = LOWORD(lParam);
cy = HIWORD(lParam);
return 0;
}
case WM_CREATE:
{
strcpy(myfunc.name,"2*a*cos(kx)*exp(-nx)");
for (int i=0; i<100; i++){
myfunc.x[i]=(float)(0.314159*i);
myfunc.y[i]=(float)(2*a*cos(k*(myfunc.x[i]))*exp(n*(myfunc.x[i])));
}
return 0;
}
case WM_PAINT:
{
PAINTSTRUCT ps;
HDC hdc = BeginPaint(hwnd,&ps);
int x0=cx/10, //левый край графика
xr=cx-x0, //правый край графика
y0=cy/10, //верхний край графика
yc=cy/2, //середина графика по оси Оу
amp=yc-y0; //амплитуда графика
float ymax=0, //макс функции
ymin=0; //мин функции
TextOut(hdc,xr+x0/2,yc+y0/10,(LPCWSTR)"x",1);
//рисование прямых линий осей координат
MoveToEx(hdc,x0,cy-y0+y0/2,NULL);
LineTo(hdc,x0,y0-y0/2);
MoveToEx(hdc,x0,yc,NULL);
LineTo(hdc,xr+x0/2,yc);
//размах графика по вертикали, вычисление макс и мин функции
for(int i=0;i<100;i++){
float ycurr=myfunc.y[i];
if(ymax<ycurr) ymax=ycurr;
else if(ymin>ycurr) ymin=ycurr;
}
//макс размах по вертикали
if(ymax<abs(ymin)) ymax=(float)abs(ymin);
//значение коэф-та масштабирования по вертик
float dy=(float)amp/ymax;
//размах графика по горизонтали, вычисление макс и мин функции
float dx=(float)(xr-x0)/(myfunc.x[99]-myfunc.x[0]);
//перо синего цвета. создание
HPEN hPen=CreatePen(PS_SOLID,2,RGB(0,0,0));
HGDIOBJ hOldPen = SelectObject(hdc,hPen);
//рисование графика из начала координат
MoveToEx(hdc,x0,(int)(yc-dy*myfunc.y[0]),NULL);
//циклически рисуем прямые линии от предыдущей точки до текущей точки
for(int i=0; i<100;i++){
int xcurr=(int)(dx*(myfunc.x[i]-myfunc.x[0])+x0);
int ycurr=(int)(yc-dy*myfunc.y[i]);
LineTo(hdc,xcurr,ycurr);
}
SelectObject(hdc,hOldPen);
DeleteObject(hPen);
EndPaint(hwnd,&ps);
return 0;
}
case WM_DESTROY:
{
PostQuitMessage(0);
return 0;
}
return DefWindowProc(hwnd,msg,wParam,lParam);
}
} |