DLL для рисования объектов на экране

begin_paint(); // вызывается без параметров
end_paint(); // вызывается без параметров

rectangle(0, 100, 10, 250, 100, 0, 5, 255, 16633191, 0, 0); // прямоугольник

circle(0, 100, 100, 40, 0, 5, 255, 16633191); // окружность

ellipse(0, 100, 100, 180, 160, 0, 4, 255, 16633191); // эллипс

line(0, 100, 20, 300, 20, 0, 4, 255); // линия

Textout(3, 100, 350, "Текст Text", 65280, 255, "Arial", -24, 0,0,0,0,1,0,0); // текст

image(0, 200, 50, 200, "C:\123.bmp", -1); // изображение

disable_item("rectangle", 2); // отключение отображения объекта

enable_item("rectangle", 2); // включение отображения объекта

external(INT, "begin_paint", "begin_paint", pathfolder()+"Draw.dll");
external(INT, "Textout", "textout", pathfolder()+"Draw.dll");

string s="Tahoma";
begin_paint();

Textout(0, 50, 0, "Остановить скрипт Ctrl+Shift+Z", 16000000, 65280, "Arial", -28, 0,0,0,0,0,0,0);
Textout(1, 50, 40, "Отключить вывод текста Ctrl+Alt+Z", 255, 65280, "Arial", -28, 0,0,0,0,0,0,0);

int x=0;
loop()
{
Textout(2, 100, 170, s+" "+format(x), 255, 65279, s, -24, 0,0,0,0,0,0,0);
x++;
sleep(50);
}

int S_X0 = 10;
int GSf_cbTX0 = 10;
double s_d = 5.2;
messagebox(S_X0+GSf_cbTX0+12*s_d);

int S_X0 = 10;
int GSf_cbTX0 = 10;
double s_d = 5.2;
int result=S_X0+GSf_cbTX0+12*s_d; // присвоить результат переменной int
messagebox(result); // потом передавать в функцию

external(VOID, "begin_paint", "begin_paint", pathfolder()+"Draw.dll");
external(VOID, "end_paint", "end_paint", pathfolder()+"Draw.dll");
external(VOID, "rectangle", "rectangle", pathfolder()+"Draw.dll");
int x,y,x1=0,y1=0,x2=0,y2=0,flag=0;
povtor:
if (getkeystate(LBUTTON)==1){//если нажата ЛКМ
getmouse(x, y);//получить текущие координаты мыши
if (flag==0){x1=x;y1=y;flag=1;}//получить начальные координаты прямоугольника
else{x2=x;y2=y;}//конечные координаты прямоугольника (изменяются при перемещении мыши)
begin_paint(); //начать отрисовку прямоугольника
rectangle(0, x1, y1, x2, y2, 0, 3, 255, -1, 0, 0);
pause(50);}
else {flag=0;end_paint();} //завершить отрисовку
goto povtor;
//далее нужно записать координаты в текстовый файл,
//чтобы можно при следующем запуске программы их считать