Add(PaintBox,16296757,133,1092)
{
Width=700
Height=400
Align=5
Color=16777215
TabOrder=1
ClearBeforeDraw=0
Point(onMouseWheel)
Point(onMouseMove)
Point(onMouseDown)
Point(MouseX)
Point(MouseY)
link(onBeforeDraw,3450544:doEvent1,[(181,1098)(181,1070)])
}
Add(Img_Point,9351544,728,1232)
{
Color=16711680
Size=3
Point(X)
Point(Y)
link(Bitmap,3013644:getVar,[])
link(X,7956951:Part1,[(741,1220)(706,1220)(706,1276)(671,1276)])
link(Y,7956951:Part2,[(748,1220)(713,1220)(713,1276)(678,1276)])
}
Add(Hub,3450544,196,1064)
{
link(onEvent1,10774283:doSetTransform,[(293,1070)(293,1238)])
link(onEvent2,10774283:doResetTransform,[(288,1077)(288,1245)])
}
Add(Img_Point,11768602,434,1239)
{
X=350
Y=200
Color=16711935
Size=5
Point(X)
Point(Y)
link(onDraw,4487587:doDraw,[])
link(Bitmap,16505516:getVar,[])
}
Add(LineBreakEx,16505516,434,1204)
{
Caption="bmp"
Type=2
}
Add(LineBreakEx,2483627,133,1141)
{
Caption="bmp"
Type=3
link(_Data,16296757:Bitmap,[])
}
Add(LineBreakEx,3013644,728,1183)
{
Caption="bmp"
Type=2
}
Add(Img_SetTransform,10774283,392,1232)
{
Point2=26215100
link(onSetTransform,9786009:doEnum,[])
link(Bitmap,6699024:Var2,[])
link(Transform,15911165:Transform,[(419,1171)(482,1171)])
}
Add(LineBreakEx,4929607,392,1197)
{
Caption="bmp"
Type=2
}
Add(Img_UseRotate,15911165,476,1127)
{
Angle=0
link(AddTransform,6583126:Transform,[])
link(Angle,16030386:Value,[(489,1115)(447,1115)(447,1458)(405,1458)])
}
Add(LineBreakEx,4146830,476,1204)
{
Caption="bmp"
Type=2
}
Add(Img_Text,4487587,476,1239)
{
X=342
Y=180
Font=[Wingdings 3,22,0,16711935,2]
Text="h"
link(Bitmap,4146830:getVar,[])
}
Add(Timer,9568122,91,1092)
{
Interval=33
link(onTimer,16296757:doRefresh,[])
}
Add(ArrayEnum,9786009,609,1232)
{
link(onItem,7956951:doSplit,[])
link(onEndEnum,3940716:doDraw,[(653,1245)(653,1333)(289,1333)(289,1420)])
}
Add(MultiStrPart,7956951,665,1232)
{
link(onSplit,9351544:doDraw,[])
}
Add(Img_UseOffset,6583126,476,1071)
{
X=-200
Y=-300
}
Add(Img_Point,3940716,301,1414)
{
Color=255
Size=6
Point(X)
Point(Y)
link(onDraw,6491488:doCalc,[])
link(Bitmap,6699024:Var1,[(307,1216)])
link(X,14411942:Var2,[])
link(Y,12273317:Var2,[])
}
Add(Memory,11644010,455,1414)
{
Point(Data)
link(onData,8958529:doValue,[])
link(Data,12653839:Var3,[(461,1391)])
}
Add(Memory,8958529,497,1414)
{
Point(Data)
link(Data,6823860:Var3,[(503,1384)])
}
Add(MathParse,6491488,350,1414)
{
DataCount=4
MathStr="atan((%3 - %1),(%4 - %2))"
AngleMode=1
link(onResult,16030386:doValue,[])
link(X1,12653839:Var2,[])
link(X2,6823860:Var2,[])
link(X3,11644010:Value,[(370,1398)(447,1398)(447,1454)(461,1454)])
link(X4,8958529:Value,[(377,1405)(440,1405)(440,1461)(503,1461)])
}
Add(Memory,16030386,399,1414)
{
link(onData,11644010:doValue,[])
}
Add(GetDataEx,12653839,350,1386)
{
Angle=3
link(Data,14411942:Var3,[])
}
Add(GetDataEx,6823860,357,1379)
{
Angle=3
link(Data,12273317:Var3,[])
}
Add(GetDataEx,12273317,315,1379)
{
Angle=3
}
Add(GetDataEx,14411942,308,1386)
{
Angle=3
}
Add(GetDataEx,6699024,392,1211)
{
link(Data,4929607:getVar,[])
}
вот сюда подаю координаты точки своей главной там где MatchParse, а вверху на массив подаю координаты всех точек остальных, и всё дергается при повороте, главное работает немного), но после определённого градуса что то идёт не так и оно переворачивается на 180...
может быть дело в не правильных смещениях градусов, обратив внимание что формула выдаёт от 0 до 180 и после идёт опять от -0 до -180 грубо говоря, а вроде как трансформация работает в режиме от 0 до 360,