Связь между программами

int worktime;
char ch[20];

loop();
{
pause(1000);
}

CREATE_TIMER(0, 10000)
{

if(fopen ("d:\time.txt", "r"!=0)
{
fread(worktime);
fclose ();
}

worktime++;

if(fopen ("d:\time.txt", "w"!=0)
{
fwrite (worktime);
fclose ();
}

strcpy(#ch[0], format(worktime));
writebuffernet(#ch[0], size(#ch[0]), -1, -1);

}

char ch[20];


readbuffernet (#ch[0], 20, -1, -1);
messagebox(format(#ch[0]));