Вверх ↑
Этот топик читают: Гость
Ответов: 38
Рейтинг: 0
#1: 2015-11-24 11:19:17 ЛС | профиль | цитата

Add(MainForm,831537,364,196){
Width=393
Height=283
Caption="Angle"
BorderStyle=1
Point(Left)
Point(Top)
Point(Handle)
}
Add(Img_Point,1351433,623,798)
{
Color=255
Size=5
Point(X)
Point(Y)
link(Bitmap,1217249:Var2,[])
link(X,8105429:Var,[])
link(Y,1622552:Var,[])
}
Add(Img_Point,13331840,553,868)
{
Color=255
Size=5
Point(X)
Point(Y)
link(Bitmap,3258799:Var2,[])
link(X,5168329:Var,[])
link(Y,16515762:Var,[])
}
Add(Memory,5754934,1092,266)
{
Default=Integer(0)
Point(Data)
link(Data,7138346:Var2,[])
}
Add(Memory,8696897,1162,266)
{
Default=Integer(0)
Point(Data)
link(Data,4956700:Var2,[])
}
Add(InfoTip,13031842,1050,238)
{
Info=#7:Точка B|
Width=197
Height=179
}
Add(LineBreak,13253023,1092,315)
{
Caption="т.B x"
Type=1
link(Data,8118226:Var2,[])
Primary=[5168329,-532,504]
}
Add(LineBreak,7063490,1162,315)
{
Caption="т. B y"
Type=1
link(Data,6651357:Var2,[])
Primary=[16515762,-595,525]
}
Add(Memory,6369846,833,266)
{
Default=Integer(0)
Point(Data)
link(Data,7475867:Var2,[])
}
Add(Memory,4349364,903,266)
{
Default=Integer(0)
Point(Data)
link(Data,131322:Var2,[])
}
Add(InfoTip,3041855,791,238)
{
Info=#7:Точка A|
Width=197
Height=179
}
Add(LineBreak,2020742,833,315)
{
Caption="т.A x"
Type=1
link(Data,13707159:Var2,[])
Primary=[8105429,-203,434]
}
Add(LineBreak,10276285,903,315)
{
Caption="т. A y"
Type=1
link(Data,14466232:Var2,[])
Primary=[1622552,-266,455]
}
Add(LineBreak,11253698,364,287)
{
Caption="left"
Type=1
link(Data,831537:Left,[])
Primary=[12815641,133,105]
}
Add(LineBreak,5336735,371,266)
{
Caption="top"
Type=1
link(Data,831537:Top,[])
Primary=[7496421,133,147]
}
Add(MouseEvent,7997184,560,399)
{
}
Add(Memory,13103467,1365,266)
{
Default=Integer(0)
Point(Data)
link(Data,7138346:Var3,[(1371,145)])
}
Add(Memory,6754863,1470,266)
{
Default=Integer(0)
Point(Data)
link(Data,4956700:Var3,[(1476,215)])
}
Add(InfoTip,5282535,1295,238)
{
Info=#7:Точка C|
Width=260
Height=179
}
Add(MathParse,8321512,1001,553)
{
DataCount=4
MathStr="sqrt((%1 - %2)^2 + (%3 - %4)^2)"
link(X1,4579873:Var,[])
link(X2,10350765:Var,[])
link(X3,13246344:Var,[])
link(X4,14631560:Var,[])
}
Add(LineBreak,6998214,1092,350)
{
Caption="axb р"
Type=1
link(Data,13144761:Var3,[(1098,338)])
Primary=[4579873,-91,112]
}
Add(LineBreak,14860971,1365,364)
{
Caption="axc р"
Type=1
link(Data,6646220:Var2,[])
Primary=[10350765,-357,119]
}
Add(LineBreak,10962906,1162,350)
{
Caption="ayb р"
Type=1
link(Data,5471442:Var1,[(1168,339)])
Primary=[13246344,-147,154]
}
Add(LineBreak,10871878,1470,364)
{
Caption="ayc"
Type=1
link(Data,4002505:Var2,[])
Primary=[14631560,-448,161]
}
Add(MathParse,770619,1134,553)
{
DataCount=4
MathStr="sqrt((%1 - %2)^2 + (%3 - %4)^2)"
link(X1,1021751:Var,[])
link(X2,5919086:Var,[])
link(X3,5303821:Var,[])
link(X4,6337061:Var,[])
}
Add(LineBreak,13831929,833,343)
{
Caption="bxa р"
Type=1
link(Data,9512547:Var3,[(839,336)])
Primary=[1021751,301,119]
}
Add(LineBreak,1426266,1365,392)
{
Caption="bxc р"
Type=1
link(Data,6646220:Var1,[(1371,384)(1352,384)(1352,355)])
Primary=[5919086,-224,91]
}
Add(LineBreak,5583795,903,343)
{
Caption="bya р"
Type=1
link(Data,11547658:Var1,[(909,336)])
Primary=[5303821,245,161]
}
Add(LineBreak,13617587,1470,392)
{
Caption="byc"
Type=1
link(Data,4002505:Var1,[(1476,384)(1513,384)(1513,355)])
Primary=[6337061,-315,133]
}
Add(MathParse,12259638,1267,553)
{
DataCount=4
MathStr="sqrt((%1 - %2)^2 + (%3 - %4)^2)"
link(X1,4273631:Var,[])
link(X2,15122094:Var,[])
link(X3,3016356:Var,[])
link(X4,16618327:Var,[])
}
Add(LineBreak,3849483,833,371)
{
Caption="cxa р"
Type=1
link(Data,9512547:Var2,[(839,362)(820,362)])
Primary=[4273631,434,91]
}
Add(LineBreak,13559909,1092,378)
{
Caption="cxb р"
Type=1
link(Data,13144761:Var2,[(1098,370)(1078,370)])
Primary=[15122094,182,105]
}
Add(LineBreak,4417113,903,371)
{
Caption="cya р"
Type=1
link(Data,11547658:Var2,[(909,364)(955,364)])
Primary=[3016356,378,133]
}
Add(LineBreak,2549283,1162,378)
{
Caption="cyb р"
Type=1
link(Data,5471442:Var2,[(1168,372)(1215,372)])
Primary=[16618327,126,147]
}
Add(LineBreak,15968040,924,553)
{
Caption="a длина"
link(Out,8321512:doCalc,[])
Primary=[10305100,-343,462]
}
Add(LineBreak,7210664,1057,553)
{
Caption="b длина"
link(Out,770619:doCalc,[])
Primary=[3100279,-406,469]
}
Add(LineBreak,15890457,1190,553)
{
Caption="c длина"
link(Out,12259638:doCalc,[])
Primary=[10972386,-609,476]
}
Add(LineBreak,1401617,1001,602)
{
Caption="aa"
Type=1
link(Data,8321512:Result,[])
Primary=[4301622,-399,448]
}
Add(LineBreak,5541053,1134,602)
{
Caption="ab"
Type=1
link(Data,770619:Result,[])
Primary=[5949444,-525,469]
}
Add(LineBreak,12094271,1267,602)
{
Caption="ac"
Type=1
link(Data,12259638:Result,[])
Primary=[3115931,-651,490]
}
Add(GetDataEx,8118226,1092,301)
{
link(Data,5754934:Value,[])
}
Add(GetDataEx,6651357,1162,301)
{
link(Data,8696897:Value,[])
}
Add(GetDataEx,13707159,833,301)
{
link(Data,6369846:Value,[])
}
Add(GetDataEx,6646220,1365,350)
{
link(Data,3574629:Var2,[])
}
Add(GetDataEx,14466232,903,301)
{
link(Data,4349364:Value,[])
}
Add(GetDataEx,4002505,1470,350)
{
link(Data,5419772:Var2,[])
}
Add(GetDataEx,9512547,814,331)
{
link(Data,13707159:Var1,[(820,306)])
}
Add(GetDataEx,13144761,1072,333)
{
link(Data,8118226:Var1,[(1078,306)])
}
Add(GetDataEx,11547658,949,331)
{
link(Data,14466232:Var1,[(955,306)])
}
Add(GetDataEx,5471442,1209,334)
{
link(Data,6651357:Var1,[(1215,306)])
}
Add(Hub,2448769,490,1015)
{
OutCount=6
link(onEvent1,10305100:In,[])
link(onEvent2,3100279:In,[])
link(onEvent3,10972386:In,[])
link(onEvent4,3065778:doCalc,[(532,1042)(532,1140)])
}
Add(MathParse,3065778,602,1134)
{
DataCount=3
MathStr="arccos((%2^2 + %3^2 - %1^2) / (2 * %2 * %3))"
AngleMode=1
link(onResult,5714455:doOperation,[])
link(X1,4301622:Var,[])
link(X2,5949444:Var,[])
link(X3,3115931:Var,[])
}
Add(Label,15953718,763,1134)
{
Left=340
Top=95
Width=10
Height=17
Caption="0"
}
Add(Math,5714455,686,1134)
{
OpType=35
Op2=1
link(onResult,15953718:doText,[])
}
Add(Image,5815588,266,490)
{
Width=310
Height=260
Picture=[ZIP96EB040078DAEDC9310D80301404D0DFA4423A560102D8F180AA0E75860530414B1890C0F02E79B9E46EDDDA95636619EAEC14918714E5D9F7F7FFE63C3A0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000003F7603BA4C402F]
Point(onMouseDown)
Point(doRefresh)
link(onClick,12962240:doEvent1,[])
link(Bitmap,4858934:ImageBitmap,[])
}
Add(MultiElement,7003807,497,497)
{
link(Data1,12815641:Var,[])
link(Data2,7496421:Var,[])
link(Data3,7997184:MouseX,[(517,448)(566,448)])
link(Data4,7997184:MouseY,[(524,460)(573,460)])
}
BEGIN_SDK
Add(EditMulti,12199558,21,21)
{
WorkCount=1
DataCount=4
VarCount=2
Width=293
link(doWork1,1570183:doEvent1,[(53,27)(53,104)])
link(Var1,9469136:Result,[(27,170)(195,170)])
link(Var2,5984110:Result,[(34,200)(237,200)])
}
Add(MathParse,9469136,189,98)
{
MathStr="%1 - %2 - 3"
Default=400
link(X1,12199558:Data3,[(195,86)(41,86)])
link(X2,12199558:Data1,[(202,78)(27,78)])
}
Add(Hub,1570183,84,98)
{
OutCount=3
link(onEvent1,9469136:doCalc,[])
link(onEvent2,5984110:doCalc,[(172,111)(172,153)])
}
Add(MathParse,5984110,231,147)
{
MathStr="%1 - %2 - 22"
Default=400
link(X1,12199558:Data4,[(237,68)(48,68)])
link(X2,12199558:Data2,[(244,58)(34,58)])
}
END_SDK
Add(LineBreak,16468025,266,546)
{
Caption="Bitmap р"
Type=1
link(Data,5815588:ImageBitmap,[])
Primary=[5941517,357,182]
}
Add(LineBreak,1737845,497,560)
{
Caption="x"
Type=1
link(Data,7003807:Var1,[])
Primary=[14243958,336,-441]
}
Add(LineBreak,7378823,504,539)
{
Caption="y"
Type=1
link(Data,7003807:Var2,[])
Primary=[8484501,399,-357]
}
Add(Img_Point,5222614,511,966)
{
Color=255
Size=5
Point(X)
Point(Y)
link(Bitmap,3258799:Var1,[(517,761)])
link(X,6377116:Var,[])
link(Y,12310558:Var,[])
}
Add(LineBreak,6947923,1379,329)
{
Caption="т.С x"
Type=1
link(Data,3574629:Var3,[(1385,313)])
Primary=[6377116,-861,588]
}
Add(LineBreak,5257111,1498,329)
{
Caption="т.С y"
Type=1
link(Data,5419772:Var3,[(1504,313)])
Primary=[12310558,-973,609]
}
Add(GetDataEx,5419772,1470,308)
{
link(Data,6754863:Value,[])
}
Add(GetDataEx,3574629,1365,308)
{
link(Data,13103467:Value,[])
}
Add(Button,5500889,658,448)
{
Left=325
Top=15
Caption="т. A"
Data=Integer(0)
link(onClick,520557:doWork1,[(720,454)])
}
Add(Button,3492366,656,501)
{
Left=325
Top=40
Caption="т. B"
Data=Integer(1)
link(onClick,14310730:doWork2,[(702,507)(702,503)])
}
Add(Button,5099738,660,548)
{
Left=325
Top=65
Caption="т. C"
Data=Integer(2)
link(onClick,14310730:doWork3,[(720,554)])
}
Add(GetDataEx,7475867,833,140)
{
link(Data,14243958:Var,[])
}
Add(GetDataEx,7138346,1092,140)
{
Angle=3
link(Data,7475867:Var3,[])
}
Add(GetDataEx,131322,903,210)
{
link(Data,8484501:Var,[])
}
Add(GetDataEx,4956700,1162,210)
{
Angle=3
link(Data,131322:Var3,[])
}
Add(Memory,11220267,749,490)
{
Default=Integer(-1)
}
Add(HubEx,520557,716,490)
{
link(onEvent,11220267:doValue,[])
}
Add(HubEx,14310730,716,497)
{
Angle=3
link(onEvent,520557:doWork3,[])
}
Add(Hub,12962240,343,490)
{
OutCount=4
link(onEvent1,5815588:doLoad,[(369,496)(369,477)(242,477)(242,496)])
link(onEvent2,7003807:doWork1,[])
link(onEvent3,6426049:doEvent,[(481,510)(481,678)])
link(onEvent4,2070729:doEvent1,[(395,517)(395,804)])
}
Add(IndexToChanel,6426049,497,672)
{
Count=3
Point(Index)
link(onEvent1,11280267:In,[])
link(onEvent2,10014349:In,[])
link(onEvent3,9419804:In,[])
link(Index,11220267:Value,[(503,597)(755,597)])
}
Add(Hub,9432650,749,252)
{
link(onEvent1,4349364:doValue,[(872,258)(872,272)])
link(onEvent2,6369846:doValue,[(798,265)(798,272)])
}
Add(LineBreak,108604,686,252)
{
Caption="add A"
link(Out,9432650:doEvent1,[])
Primary=[11280267,-77,420]
}
Add(Hub,4540152,1057,259)
{
link(onEvent1,8696897:doValue,[(1140,265)(1140,272)])
link(onEvent2,5754934:doValue,[])
}
Add(LineBreak,23835,1001,259)
{
Caption="add B"
link(Out,4540152:doEvent1,[])
Primary=[10014349,-441,420]
}
Add(Hub,9339557,1323,259)
{
link(onEvent1,6754863:doValue,[(1433,265)(1433,272)])
link(onEvent2,13103467:doValue,[])
}
Add(LineBreak,9960871,1267,259)
{
Caption="add C"
link(Out,9339557:doEvent1,[])
Primary=[9419804,-658,427]
}
Add(Image,4858934,266,420)
{
Width=310
Height=260
Visible=1
Picture=[ZIP96EB040078DAEDC9310D80301404D0DFA4423A560102D8F180AA0E75860530414B1890C0F02E79B9E46EDDDA95636619EAEC14918714E5D9F7F7FFE63C3A0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000003F7603BA4C402F]
Point(onMouseDown)
Point(doRefresh)
}
Add(Hub,2070729,413,798)
{
OutCount=4
link(onEvent1,1351433:doDraw,[])
link(onEvent2,13331840:doDraw,[(532,811)(532,874)])
link(onEvent3,5222614:doDraw,[(469,818)(469,972)])
link(onEvent4,2448769:doEvent1,[(454,825)(454,1021)])
}
Add(GetDataEx,1217249,623,756)
{
link(Data,5941517:Var,[])
}
Add(GetDataEx,3258799,553,756)
{
Angle=1
link(Data,1217249:Var1,[])
}



Здравствуйте.
Подскажите пожалуйста как найти угол A по 3 точкам?
Нужно мерить угол по часовой от т.В до т.С. В моей программе не более 180 градусов, нужно чтобы могла показать и более.
карма: 1

0
файлы: 1code_36529.txt [12KB] [371]
vip
#1.1контекстная реклама от партнеров
Ответов: 2203
Рейтинг: 675
#2: 2015-11-24 12:51:47 ЛС | профиль | цитата
up1891, немного переделал вашу схему, изменил способ рисования, ваш был не очень. code_36530.txt
А по поводу угла между 3 точек, так в интернете полно всего, недавно такое видео нашел про двух темнокожих парней и одну девушку, так что думаю и формулы по нахождению угла можно найти.

карма: 11

0
файлы: 1code_36530.txt [6.7KB] [316]
Ответов: 8888
Рейтинг: 823
#3: 2015-11-24 16:21:28 ЛС | профиль | цитата
sla8a писал(а):
..видео..про двух темнокожих парней и одну девушку..
А где ссылка?!
sla8a,
up1891, вот с формулой и рюшечками code_36531.txt
карма: 19

0
файлы: 1code_36531.txt [7.4KB] [251]
Ответов: 38
Рейтинг: 0
#4: 2015-11-27 16:12:46 ЛС | профиль | цитата
Леонид писал(а):
up1891, вот с формулой и рюшечками code_36531.txt


Спасибо большое за формулу.

Вот у меня ещё вопрос ( не буду создавать отдельную тему ).
code_36547.txt
Программа делает скриншоты рабочего стола примерно штук 40-50 ( больше не делает ). Если делать скриншоты с маленького окна, то их получается гораздо больше. Как можно увеличить их количество?
карма: 1

0
файлы: 1code_36547.txt [3.9KB] [189]
Ответов: 16884
Рейтинг: 1239
#5: 2015-11-27 16:23:38 ЛС | профиль | цитата
up1891 писал(а):
Как можно увеличить их количество?
Поставить в комп резиновую память.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8888
Рейтинг: 823
#6: 2015-11-27 17:05:29 ЛС | профиль | цитата
Tad писал(а):
Поставить в комп резиновую память.
Во-о-от такую (экран 1360х768):
1002ночь.jpg
карма: 19

0
файлы: 11002ночь.jpg [44.1KB] [407]
Ответов: 38
Рейтинг: 0
#7: 2015-11-28 13:12:28 ЛС | профиль | цитата
Вот таким способом code_36560.txt получилось сделать 78 скринов.
Хоте сделать скриншот результата получил ошибку недостаточно памяти для выполнения операции

77


карма: 1

0
файлы: 1code_36560.txt [21.4KB] [288]
Ответов: 16884
Рейтинг: 1239
#8: 2015-11-28 13:20:21 ЛС | профиль | цитата
up1891, скрины пиши на диск (в экономном формате) и читай с диска.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 38
Рейтинг: 0
#9: 2015-11-28 13:40:02 ЛС | профиль | цитата
Tad писал(а):
up1891, скрины пиши на диск (в экономном формате) и читай с диска.


Спасибо. Тоже об этом думал.
карма: 1

0
9
Сообщение
...
Прикрепленные файлы
(файлы не залиты)