Add(MainForm,2953706,21,105)
{
}
Add(Edit,4575279,91,105)
{
Left=90
Top=105
link(onEnter,10975181:doCompare,[])
}
Add(Memory,10111075,224,112)
{
link(onData,9905365:doMessage,[])
}
Add(If_else,10975181,147,112)
{
Type=2
link(onTrue,10111075:doValue,[])
link(Op2,10111075:Value,[(160,100)(195,100)(195,156)(230,156)])
}
Add(Message,9905365,287,112)
{
}
П.С. (Вообще нужно сделать сортировку строк по нарастающей (координат по Y), если кто избавит от мучений и предложит схемку, был бы благодарен)
Строки вида:
X001.005Y002.121
X003.005Y-022.022
X001.005Y402.001
X008.005Y-012.001
-X207.005Y022.001
-X205.005Y002.001
X021.005Y112.001
надо преобразовать в:
X003.005Y-022.022
X008.005Y-012.001
-X205.005Y002.001
X001.005Y002.121
-X207.005Y022.001
X021.005Y112.001
X001.005Y402.001