forked from KolibriOS/kolibrios
664 lines
16 KiB
C++
664 lines
16 KiB
C++
#include "func.h"
|
|
#include "parser.h"
|
|
#include "use_library.h"
|
|
|
|
const char header[] = "Graph";
|
|
const char empty_text[] = "No function loaded. Type file name and press Enter. ";
|
|
const char er_file_not_found[] = "Cannot open file. ";
|
|
const char str_filename[]="Filename:";
|
|
const char str_editfile[]="Edit";
|
|
|
|
// íà÷àëüíûå ðàçìåðû
|
|
#define WND_W 600
|
|
#define WND_H 470
|
|
|
|
#define LIGHTGREEN 0xff0000
|
|
#define WHITE 0xffffff
|
|
#define BLACK 0x0
|
|
#define LIGHTBLUE 0x0000ff
|
|
#define LIGHTRED 0xff0000
|
|
|
|
// font colors
|
|
#define BIGFONTCOLOR BLACK
|
|
#define SMALLFONTCOLOR BLACK
|
|
|
|
#define THREE 3.0
|
|
// minimum space: 3 pixels
|
|
|
|
#define BIG_HEIGHT 4.0
|
|
#define SMALL_HEIGHT 2.0
|
|
#define TEXT_X 15.0
|
|
// numeric format for output
|
|
#define FORMAT "%f"
|
|
// format for two coords
|
|
#define FORMAT_COORD "(%f,%f)"
|
|
// special value to text if enough space
|
|
#define FORMAT_TEST "0.00"
|
|
|
|
#define DELTA_BIG 1.0
|
|
#define DELTA_SMALL 0.1
|
|
|
|
double *points;
|
|
Dword point_count = 0;
|
|
double x1,y1,x2,y2;
|
|
char *funct = NULL;
|
|
|
|
char edit_path[256];
|
|
edit_box mybox = {200,92,WND_H-16-32,0xffffff,0x94AECE,0,0x808080,0x10000000,
|
|
sizeof(edit_path)-1,(dword)&edit_path, 0, 0, 0};
|
|
|
|
char *full_head;
|
|
|
|
char *HugeBuf = NULL;
|
|
|
|
//char fuck[64] = "$this is a fucking marker$";
|
|
// ïàðàìåòðû êîìàíäíîé ñòðîêè
|
|
#ifdef AUTOBUILD
|
|
extern char params[1024];
|
|
char params[1024];
|
|
#else
|
|
char params[1024] = "_FIND_ME_";
|
|
#endif
|
|
|
|
/*
|
|
|
|
fucking piece of shit
|
|
|
|
*/
|
|
|
|
// constructor of TCoord
|
|
TCoord coord(double x, double y)
|
|
{
|
|
TCoord r;
|
|
r.x = x;
|
|
r.y = y;
|
|
return r;
|
|
}
|
|
|
|
// move and scale mathematical coords to fit screen coords
|
|
TCoord mat2Graf(TCoord c, TCoord scrMin, TCoord scrMax, TCoord mMin, TCoord mMax)
|
|
{
|
|
TCoord r;
|
|
if (c.x > mMax.x)
|
|
c.x = mMax.x;
|
|
if (c.x < mMin.x)
|
|
c.x = mMin.x;
|
|
if (c.y > mMax.y)
|
|
c.y = mMax.y;
|
|
if (c.y < mMin.y)
|
|
c.y = mMin.y;
|
|
r.x = (scrMax.x - scrMin.x) / (mMax.x - mMin.x) * (c.x - mMin.x) + scrMin.x;
|
|
r.y = (scrMax.y - scrMin.y) / (mMax.y - mMin.y) * (mMax.y - c.y) + scrMin.y;
|
|
|
|
return r;
|
|
}
|
|
|
|
// double-îáåðòêè
|
|
void line_d( double x1, double y1, double x2, double y2)
|
|
{
|
|
line(di(x1), di(y1), di(x2), di(y2));
|
|
}
|
|
|
|
void outtextxy_d( double x, double y, char * text, int len)
|
|
{
|
|
outtextxy(di(x), di(y), text, len);
|
|
}
|
|
|
|
// huge function to draw all the stuff except the function itself
|
|
void drawAxis( TCoord scrMin, TCoord scrMax, TCoord mMin, TCoord mMax)
|
|
{
|
|
TCoord cZero={0.0,0.0},
|
|
gMin, gMax, gZero, step;
|
|
TCoord from, to;
|
|
double i=0.0;
|
|
int j;
|
|
double xmin, xmin2, ymin, ymin2;
|
|
char buf[30]="";
|
|
|
|
|
|
// scr means Screen(bounding rect)
|
|
// m means Mathematical
|
|
// g means Graphic(real screen position)
|
|
|
|
//rtlDebugOutString("draw axis called\n");
|
|
|
|
//format(debuf, 30, "test: %f,%f,%f,%f\n", 123.45, 1.0, -0.9, 12.57);
|
|
//rtlDebugOutString(debuf);
|
|
|
|
gMin = mat2Graf(mMin, scrMin, scrMax, mMin, mMax);
|
|
gMax = mat2Graf(mMax, scrMin, scrMax, mMin, mMax);
|
|
gZero = mat2Graf(cZero, scrMin, scrMax, mMin, mMax);
|
|
|
|
// clear
|
|
// setcolor(WHITE);
|
|
//rectangle(di(gMin.x), di(gMin.y), di(gMax.x), di(gMax.y));
|
|
// ftopku
|
|
|
|
setcolor(BLACK);
|
|
// osy X
|
|
line_d(gMin.x, gZero.y ,gMax.x, gZero.y);
|
|
// osy Y
|
|
line_d(gZero.x, gMin.y, gZero.x, gMax.y);
|
|
// bounding rect
|
|
line_d(gMin.x, gMin.y, gMax.x, gMin.y);
|
|
line_d(gMin.x, gMax.y, gMax.x, gMax.y);
|
|
|
|
line_d(gMin.x, gMin.y, gMin.x, gMax.y);
|
|
line_d(gMax.x, gMin.y, gMax.x, gMax.y);
|
|
|
|
// coords of the rect : lower left
|
|
format(buf, 30, FORMAT_COORD, x1, y1);
|
|
//rtlDebugOutString(buf);
|
|
outtextxy_d(gMin.x, gMin.y + textheight(buf, 20), buf, 20);
|
|
// upper left
|
|
format(buf, 30, FORMAT_COORD, x1, y2);
|
|
outtextxy_d(gMin.x, gMax.y - textheight(buf, 20), buf, 20);
|
|
// lower right
|
|
format(buf, 30, FORMAT_COORD, x2, y1);
|
|
outtextxy_d(gMax.x - textwidth(buf, 20), gMin.y + textheight(buf, 20), buf, 20);
|
|
// upper right
|
|
format(buf, 30, FORMAT_COORD, x2, y2);
|
|
outtextxy_d(gMax.x - textwidth(buf, 20), gMax.y - textheight(buf, 20), buf, 20);
|
|
|
|
//rtlDebugOutString("some lines painted\n");
|
|
|
|
|
|
step.x = (mMax.x - mMin.x) / (scrMax.x - scrMin.x);
|
|
step.y = (mMax.y - mMin.y) / (scrMax.y - scrMin.y);
|
|
|
|
// round values
|
|
xmin = id(di((mMin.x / DELTA_BIG) * DELTA_BIG));
|
|
ymin = id(di((mMin.y / DELTA_BIG) * DELTA_BIG));
|
|
|
|
// (0,0)
|
|
|
|
if ((x1 * x2 <= 0.0) && (y1 * y2 <= 0.0))
|
|
{
|
|
from.x=0.0;
|
|
from.y=0.0;
|
|
from = mat2Graf(from, scrMin, scrMax, mMin, mMax);
|
|
setcolor(BLACK);
|
|
format(buf, 30, FORMAT, 0.0);
|
|
outtextxy_d(from.x - textwidth(buf, 20), from.y + textheight(buf, 20), buf, 20);
|
|
}
|
|
|
|
|
|
// big marks on X
|
|
//settextstyle(0, 0, 1);
|
|
if (DELTA_BIG / step.x > THREE)
|
|
{
|
|
for (i = xmin; i <= mMax.x; i += DELTA_BIG)
|
|
{
|
|
if (i != 0.0)
|
|
{
|
|
from.x = i;
|
|
to.x = from.x;
|
|
from.y = -BIG_HEIGHT * step.y;
|
|
to.y = BIG_HEIGHT * step.y;
|
|
from = mat2Graf(from, scrMin, scrMax, mMin, mMax);
|
|
to = mat2Graf(to, scrMin, scrMax, mMin, mMax);
|
|
setcolor(BLACK);
|
|
line_d(from.x, from.y, to.x, to.y);
|
|
// write number
|
|
format(buf, 30, FORMAT, i);
|
|
// if it fits in the GAP, then write it
|
|
if (from.y > scrMin.y && (DELTA_BIG > (textwidth(buf, 20) + 1.0) * step.x))
|
|
{
|
|
setcolor(BIGFONTCOLOR);
|
|
outtextxy_d(from.x - textwidth(buf, 20) / 2.0, to.y - textheight(buf, 20), buf, 20);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
//rtlDebugOutString("big marks x painted\n");
|
|
|
|
// big marks on Y
|
|
if (DELTA_BIG / step.y > THREE)
|
|
{
|
|
for (i = ymin; i <= mMax.y; i += DELTA_BIG)
|
|
{
|
|
if (i != 0.0)
|
|
{
|
|
from.y = i;
|
|
to.y = from.y;
|
|
from.x = -BIG_HEIGHT * step.x;
|
|
to.x = BIG_HEIGHT * step.x;
|
|
from = mat2Graf(from, scrMin, scrMax, mMin, mMax);
|
|
to = mat2Graf(to, scrMin, scrMax, mMin, mMax);
|
|
setcolor(BLACK);
|
|
line_d(from.x, from.y, to.x, to.y);
|
|
format(buf, 30, FORMAT, i);
|
|
if (from.x > scrMin.x && (DELTA_BIG > textheight(buf, 20) * step.y))
|
|
{
|
|
setcolor(BIGFONTCOLOR);
|
|
outtextxy_d(from.x + TEXT_X, to.y - textheight(buf, 20) / 2.0, buf, 20);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
xmin2 = id(di(mMin.x / DELTA_SMALL)) * DELTA_SMALL;
|
|
ymin2 = id(di(mMin.y / DELTA_SMALL)) * DELTA_SMALL;
|
|
|
|
if (DELTA_SMALL / step.x > THREE)
|
|
{
|
|
j = di((( - xmin + xmin2 ) / DELTA_SMALL));
|
|
for (i = xmin2; i <= mMax.x; i += DELTA_SMALL, j++)
|
|
{
|
|
if (j % 10 == 0)
|
|
{
|
|
// we need to skip every tenth mark, to avoid overwriting big marks
|
|
j = 0;
|
|
continue;
|
|
}
|
|
from.x = i;
|
|
to.x = from.x;
|
|
from.y = -SMALL_HEIGHT * step.y;
|
|
to.y = SMALL_HEIGHT * step.y;
|
|
from = mat2Graf(from, scrMin, scrMax, mMin, mMax);
|
|
to = mat2Graf(to, scrMin, scrMax, mMin, mMax);
|
|
setcolor(BLACK);
|
|
line_d(from.x, from.y, to.x, to.y);
|
|
format(buf, 30, FORMAT, i);
|
|
|
|
if (from.y > scrMin.y && (DELTA_SMALL > textwidth(buf, 20) * step.x))
|
|
{
|
|
setcolor(SMALLFONTCOLOR);
|
|
outtextxy_d(from.x - textwidth(buf, 20) / 2.0, to.y - textheight(buf, 20), buf, 20);
|
|
}
|
|
|
|
|
|
}
|
|
|
|
}
|
|
|
|
// finally small marks on Y
|
|
if (DELTA_SMALL / step.y > THREE)
|
|
{
|
|
//rtlDebugOutString("really small marks y painted\n");
|
|
j = di((( - ymin + ymin2) / DELTA_SMALL));
|
|
for (i = ymin2; i <= mMax.y; i += DELTA_SMALL, j++)
|
|
{
|
|
if (j % 10 == 0)
|
|
{
|
|
// we need to skip every tenth, to avoid overwriting
|
|
j = 0;
|
|
continue;
|
|
}
|
|
from.y = i;
|
|
to.y = from.y;
|
|
from.x = -SMALL_HEIGHT * step.x;
|
|
to.x = SMALL_HEIGHT * step.x;
|
|
from = mat2Graf(from, scrMin, scrMax, mMin, mMax);
|
|
to = mat2Graf(to, scrMin, scrMax, mMin, mMax);
|
|
setcolor(BLACK);
|
|
line_d(from.x, from.y, to.x, to.y);
|
|
format(buf, 30, FORMAT, i);
|
|
if (from.x > scrMin.x && (DELTA_SMALL > textheight(buf, 20) * step.y))
|
|
{
|
|
setcolor(SMALLFONTCOLOR);
|
|
outtextxy_d(from.x + TEXT_X, from.y - textheight(buf, 20) / 2.0, buf, 20);
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
/*
|
|
ends fucking piece of shit
|
|
*/
|
|
|
|
void drawFunction( function_t fi, TCoord scrMin, TCoord scrMax,
|
|
TCoord mMin, TCoord mMax, DWORD color)
|
|
{
|
|
double x;
|
|
double y;
|
|
int firstPoint = 1;
|
|
TCoord p, p0 = {0.0, 0.0}, step;
|
|
|
|
drawAxis(scrMin, scrMax, mMin, mMax);
|
|
|
|
setcolor(color);
|
|
step.x = (mMax.x - mMin.x) / (scrMax.x - scrMin.x);
|
|
|
|
for (x = mMin.x; x < mMax.x; x += step.x)
|
|
{
|
|
y = fi(x);
|
|
// function is defined here and gets in the range
|
|
if (1) // òóò áûëî óñëîâèå, ÷òî ôóíêöèÿ ïðàâèëüíî âû÷èñëåíà
|
|
{
|
|
if ((y > mMin.y) && (y < mMax.y))
|
|
{
|
|
p = mat2Graf(coord(x, y), scrMin, scrMax, mMin, mMax);
|
|
// if it's our first point, only remember its coords
|
|
// otherwise, draw a line_d from prev to current
|
|
if (firstPoint == 0)
|
|
{
|
|
line_d(p0.x, p0.y, p.x, p.y);
|
|
}
|
|
else
|
|
firstPoint = 0;
|
|
|
|
p0 = p;
|
|
}
|
|
else // too big/small
|
|
{
|
|
firstPoint = 1;
|
|
}
|
|
}
|
|
else // no value
|
|
{
|
|
firstPoint = 1;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
struct kosBDVK
|
|
{
|
|
Dword attrib;
|
|
Dword name_type;
|
|
Dword create_time;
|
|
Dword create_date;
|
|
Dword access_time;
|
|
Dword access_date;
|
|
Dword modify_time;
|
|
Dword modify_date;
|
|
Dword size_low;
|
|
Dword size_high;
|
|
};
|
|
|
|
// èòîãîâàÿ âåðñèÿ ÷èòàëêè òåêñòîâûõ ôàéëîâ
|
|
int load_points3()
|
|
{
|
|
kosFileInfo fileInfo;
|
|
kosBDVK bdvk;
|
|
int filePointer = 0;
|
|
|
|
int i,j,k;
|
|
double d;
|
|
Dword filesize, num_number;
|
|
|
|
double *p2=0;
|
|
|
|
// get file size
|
|
strcpy(fileInfo.fileURL,edit_path);
|
|
fileInfo.OffsetLow = 0;
|
|
fileInfo.OffsetHigh = 0;
|
|
fileInfo.dataCount = 0;
|
|
fileInfo.rwMode = 5;
|
|
fileInfo.bufferPtr = (Byte *)&bdvk;
|
|
Dword rr = kos_FileSystemAccess( &(fileInfo) ); // â CKosFile íåò îïðåäåëåíèÿ ðàçìåðà
|
|
sprintf(debuf, "getsize: %U\n", rr);
|
|
rtlDebugOutString(debuf);
|
|
if (rr != 0)
|
|
{
|
|
kos_WriteTextToWindow(10,10,0x90,0xFF0000,(char*)er_file_not_found,strlen(er_file_not_found));
|
|
return 0;
|
|
}
|
|
|
|
filesize = bdvk.size_low;
|
|
num_number = filesize / 2;
|
|
|
|
HugeBuf = (char *)allocmem(filesize + 1); // ðàçáèðàåì êàê ñòðîêó, îòñþäà òåðìèíàòîð \0
|
|
|
|
for (i=0;i<filesize+1;i++)
|
|
HugeBuf[i] = 0;
|
|
|
|
strcpy(fileInfo.fileURL,edit_path);
|
|
fileInfo.OffsetLow = 0;
|
|
|
|
fileInfo.OffsetHigh = 0;
|
|
fileInfo.dataCount = filesize;
|
|
fileInfo.rwMode = 0;
|
|
fileInfo.bufferPtr = (Byte *)HugeBuf;
|
|
rr = kos_FileSystemAccess( &(fileInfo) ); // êàêàÿ-òî ïðîáëåìà ñ hands.dll, CKosFile íå ðàáîòàë
|
|
|
|
sprintf(debuf, "read3: %U\n", rr);
|
|
rtlDebugOutString(debuf);
|
|
|
|
strcpy(full_head, header);
|
|
strcpy(full_head+strlen(full_head), " - ");
|
|
strcpy(full_head+strlen(full_head), edit_path); // bad code
|
|
|
|
// à òåïåðü ðàçîáðàòüñÿ â ýòîì
|
|
|
|
i=0;
|
|
k=0;
|
|
while (i < filesize)
|
|
{
|
|
|
|
while (isalpha(HugeBuf[i]) && i<filesize) i++;
|
|
if (i == filesize) break;
|
|
if (k==4 && HugeBuf[i] == '=')
|
|
{
|
|
//sprintf(debuf,"function: %S",HugeBuf + i);
|
|
//rtlDebugOutString(debuf);
|
|
// we have a function here
|
|
//HugeBuf[0] = ' ';
|
|
funct = HugeBuf + i + 1;
|
|
strcpy(full_head+strlen(full_head), ". Function y=");
|
|
strcpy(full_head+strlen(full_head), funct);
|
|
return 1;
|
|
}
|
|
|
|
d = convert(HugeBuf+i, &j);
|
|
if (d == ERROR)
|
|
{
|
|
sprintf(debuf, "Error in input file, byte %U, count %U\n", i, k);
|
|
rtlDebugOutString(debuf);
|
|
kos_WriteTextToWindow(10, 10, 0, 0x00, (char*)debuf, strlen(debuf));
|
|
return 0;
|
|
}
|
|
if (d == ERROR_END)
|
|
{
|
|
rtlDebugOutString("EOF :)!\n");
|
|
break;
|
|
}
|
|
|
|
i+=j;
|
|
switch (k)
|
|
{
|
|
case 0:
|
|
x1=d;
|
|
break;
|
|
case 1:
|
|
x2=d;
|
|
break;
|
|
case 2:
|
|
y1=d;
|
|
break;
|
|
case 3:
|
|
y2=d;
|
|
break;
|
|
default:
|
|
{
|
|
if (p2 == NULL)
|
|
p2 = (double *)allocmem(num_number * 8);
|
|
p2[k-4]=d;
|
|
}
|
|
}
|
|
k++;
|
|
}
|
|
// format(debuf, 30, "(%f,%f)-(%f,%f)",x1,y1,x2,y2);
|
|
// rtlDebugOutString(debuf);
|
|
point_count=(k - 4)/2;
|
|
|
|
//
|
|
points = (double *)allocmem(point_count * 2 * 8);
|
|
for (i = 0; i < point_count * 2; i++)
|
|
points[i] = p2[i];
|
|
freemem(p2);
|
|
// sprintf(debuf, "count: %U\n", point_count);
|
|
// rtlDebugOutString(debuf);
|
|
sprintf(debuf, ". Number of points: %U.", point_count);
|
|
strcpy(full_head+strlen(full_head), debuf);
|
|
freemem(HugeBuf);
|
|
HugeBuf = NULL;
|
|
return 1;
|
|
}
|
|
|
|
void LaunchTinypad()
|
|
{
|
|
kosFileInfo fileInfo;
|
|
|
|
strcpy(fileInfo.fileURL,"/sys/tinypad");
|
|
fileInfo.OffsetLow = 0;
|
|
fileInfo.OffsetHigh = (Dword)edit_path;
|
|
fileInfo.rwMode = 7; // launch
|
|
kos_FileSystemAccess(&fileInfo);
|
|
|
|
}
|
|
|
|
// âû÷èñëèòü çàäàííóþ ôóíêöèþ èëè êóñî÷íî-ëèíåéíóþ ìåæäó òî÷êàìè
|
|
double fu(double x)
|
|
{
|
|
int i;
|
|
double res;
|
|
|
|
|
|
if (funct)
|
|
{
|
|
set_exp(funct,x);
|
|
get_exp(&res); // ïàðñèòü äëÿ êàæäîãî çíà÷åíèÿ õ? äà ÿ ñ óìà ñîøåë.
|
|
return res;
|
|
}
|
|
|
|
if (point_count == 0)
|
|
{
|
|
return 0.0;
|
|
}
|
|
|
|
if (x <= points[0])
|
|
return points[1];
|
|
if (x >= points[(point_count-1) * 2])
|
|
return points[(point_count-1) * 2 + 1];
|
|
|
|
for (i = 0; i < point_count; i++)
|
|
{
|
|
if ((x >= points[2 * i]) && (x < points[2 * (i + 1)]))
|
|
break;
|
|
}
|
|
|
|
return (x - points[2 * i]) / (points[2 * (i + 1)] - points[2 * i])
|
|
* (points[2 * (i + 1) + 1] - points[2 * i + 1]) + points[2 * i + 1];
|
|
|
|
}
|
|
|
|
void draw_window(void)
|
|
{
|
|
double xx0=0.0, yy0=0.0;
|
|
|
|
kos_WindowRedrawStatus(1);
|
|
kos_DefineAndDrawWindow(100,80,WND_W,WND_H, 0x33,0xFFFFFF,0,0,(Dword)full_head);
|
|
kos_WindowRedrawStatus(2);
|
|
|
|
sProcessInfo info;
|
|
kos_ProcessInfo(&info, 0xFFFFFFFF);
|
|
int cWidth = info.processInfo.width - 9;
|
|
int cHeight = info.processInfo.height - kos_GetSkinHeight() - 4;
|
|
|
|
mybox.top = cHeight - 50;
|
|
mybox.width = cWidth - mybox.left - 80;
|
|
|
|
if (info.processInfo.status_window&0x04) return; //draw nothing if window is rolled-up
|
|
|
|
if (point_count == 0 && funct == NULL)
|
|
{
|
|
kos_WriteTextToWindow((cWidth - 8 * strlen(empty_text))/2,cHeight/2-25,0x90,
|
|
0x000000,(char *)empty_text,strlen(empty_text));
|
|
}
|
|
else
|
|
{
|
|
drawFunction(&fu, coord(10, 20), coord(id(cWidth - 20), id(cHeight - 70)),
|
|
coord(x1,y1), coord(x2,y2), 0x00ff0000);
|
|
|
|
}
|
|
|
|
kos_WriteTextToWindow(15, mybox.top + 4, 0x90, 0x000000, (char*)str_filename, strlen(str_filename));
|
|
|
|
edit_box_draw((DWORD)&mybox);
|
|
|
|
kos_DefineButton(cWidth - 70, mybox.top, 50, 21, 5, 0xc0c0c0);
|
|
kos_WriteTextToWindow(cWidth - 60, mybox.top + 4, 0x90, 0x000000, (char*)str_editfile,0);
|
|
}
|
|
|
|
void kos_Main()
|
|
{
|
|
kos_InitHeap();
|
|
full_head = (char*)allocmem(300);
|
|
strcpy(full_head, "Graph");
|
|
load_edit_box();
|
|
if (params[0]) // fuck[0] for debug
|
|
{
|
|
rtlDebugOutString("launched with params");
|
|
rtlDebugOutString((char*)params);
|
|
strcpy(edit_path, params);
|
|
mybox.size=mybox.pos=strlen(edit_path);
|
|
//rtlDebugOutString((char*)edit_path);
|
|
load_points3();
|
|
}
|
|
rtlDebugOutString("data loaded.\n");
|
|
draw_window();
|
|
for (;;)
|
|
{
|
|
edit_box_mouse((dword)&mybox);
|
|
switch (kos_WaitForEvent())
|
|
{
|
|
case 1:
|
|
draw_window();
|
|
break;
|
|
case 2:
|
|
// key pressed, read it
|
|
Byte keyCode;
|
|
kos_GetKey(keyCode);
|
|
|
|
switch (keyCode)
|
|
{
|
|
case 0x0D:
|
|
if (HugeBuf!=NULL)
|
|
{
|
|
//sprintf(debuf, "freemem: HugeBuf = %X", HugeBuf);
|
|
//rtlDebugOutString(debuf);
|
|
freemem((void*)HugeBuf); // ÷òî çà áàã - ïîíÿòü íå ìîãó.
|
|
HugeBuf = NULL;
|
|
funct = NULL;
|
|
}
|
|
if (points!=NULL)
|
|
{
|
|
//sprintf(debuf, "freemem: points = %X", points);
|
|
//rtlDebugOutString(debuf);
|
|
freemem((void*)points); // è òóò. íó íå îáðàùàþñü ÿ ê ýòîìó óêàçàòåëþ, òîëüêî ïàìÿòü â íåãî
|
|
// ïîòîì ñíîâà âûäåëÿþ
|
|
points = NULL;
|
|
}
|
|
point_count = 0;
|
|
kos_DrawBar(10,10,200,20,0xFFFFFF); // ôîí äëÿ ñîîáùåíèé îá îøèáêàõ
|
|
if (load_points3())
|
|
draw_window();
|
|
break;
|
|
default:
|
|
{
|
|
__asm
|
|
{
|
|
mov ah, keyCode
|
|
}
|
|
edit_box_key((dword)&mybox);
|
|
}
|
|
}
|
|
break;
|
|
|
|
|
|
case 3:
|
|
// button pressed; we have only one button, close
|
|
Dword button;
|
|
kos_GetButtonID(button);
|
|
if (button == 1)
|
|
kos_ExitApp();
|
|
if (button == 5)
|
|
LaunchTinypad();
|
|
}
|
|
}
|
|
}
|
|
|