Вверх ↑
Ответов: 8886
Рейтинг: 823
#1: 2019-07-06 20:30:42 ЛС | профиль | цитата
Rysik, ошибки в последних знаках неизбежны, Hex таки целое, хотя и с десятичной точкой
hex


Add(MainForm,2953706,161,140)
{
}
Add(Edit,3537562,217,140)
{
Left=75
Top=10
Width=195
Text="123.456789"
ClearAfterEnter=1
}
Add(Button,10396681,161,189)
{
Left=20
Top=20
Width=20
Height=45
Caption="V\r\nV"
link(onClick,4544337:doRealHex,[])
}
Add(Edit,9300325,315,238)
{
Left=70
Top=95
Width=205
Text=""
ClearAfterEnter=1
}
Add(Edit,11527724,266,189)
{
Left=70
Top=45
Width=205
Text=""
link(onChange,15816590:doHexReal,[(305,195)(305,230)(256,230)(256,251)])
}
Add(MultiElementEx,15816590,266,238)
{
link(onRes,9300325:doText,[])
link(Real_Hex,11527724:Text,[])
}
BEGIN_SDK
Add(EditMultiEx,9285825,21,21)
{
WorkCount=#9:doRealHex|9:doHexReal|
EventCount=#5:onRes|
VarCount=#3:Res|
DataCount=#8:Real_Hex|
Width=482
Height=263
VOffset=56
HOffset=21
link(doRealHex,8819271:doCalc,[])
link(doHexReal,3351337:doSplit,[(32,90)(32,181)])
link(Res,15030429:FString,[(48,263)(447,263)])
}
Add(StrPart,3351337,42,175)
{
Char="."
link(onSplit,7381523:doEvent1,[])
link(onPart,13913458:doConvert,[(81,188)(81,223)])
link(Str,14503192:Var2,[])
}
Add(Convertor,11449650,203,182)
{
Mode=5
link(onResult,11547339:doCalc,[])
}
Add(Convertor,13913458,91,217)
{
Mode=5
link(onResult,6212640:doWork3,[(130,223)(130,141)(431,141)])
}
Add(GetDataEx,14503192,42,42)
{
link(Data,9285825:Real_Hex,[])
}
Add(Str_Enum,16186188,154,182)
{
Delimiter=""
link(onEnum,11449650:doConvert,[])
link(onEndEnum,8534407:doSplit,[(193,195)(193,230)])
}
Add(Hub,7381523,91,175)
{
link(onEvent1,11547339:doClear,[(251,181)(251,195)])
link(onEvent2,16186188:doEnum,[])
}
Add(MathParse,11547339,259,182)
{
MathStr="%0+%1/(2^(4*%2))"
Point(doClear)
link(X2,16186188:NumSubStr,[(272,173)(244,173)(244,222)(160,222)])
}
Add(DoData,9429124,315,350)
{
}
Add(Convertor,11671509,385,35)
{
Mode=6
Digits=1
link(onResult,6212640:doWork2,[])
}
Add(Memory,7674351,441,35)
{
}
Add(MathParse,5494791,336,105)
{
DataCount=1
MathStr="frac(%1*16)"
link(onResult,10532359:doWork3,[(375,111)(375,90)(256,90)])
link(X1,15653650:Var3,[(342,82)])
}
Add(For,3432543,217,98)
{
End=13
link(onEvent,5534402:doCalc,[])
link(onStop,8243732:doData,[(256,111)(256,167)])
}
Add(Memory,9614223,266,42)
{
}
Add(MathParse,5534402,266,98)
{
DataCount=1
MathStr="trunc(%1*16)"
link(onResult,6228601:doEvent1,[])
link(X1,15653650:Var2,[])
}
Add(GetDataEx,15653650,266,77)
{
link(Data,9614223:Value,[])
}
Add(MathParse,8819271,63,77)
{
DataCount=1
MathStr="trunc(%1)"
link(onResult,531078:doEvent1,[])
link(X1,2009111:Var2,[])
}
Add(Hub,531078,112,77)
{
OutCount=3
link(onEvent1,11671509:doConvert,[(137,83)(137,41)])
link(onEvent2,15539180:doClear,[(137,90)(137,133)(426,133)(426,111)])
link(onEvent3,16615704:doCalc,[])
}
Add(Hub,13719750,189,91)
{
link(onEvent1,10532359:doWork2,[(214,97)(214,48)])
link(onEvent2,3432543:doFor,[])
}
Add(MathParse,16615704,147,91)
{
MathStr="frac(%1)"
link(onResult,13719750:doEvent1,[])
link(X1,2009111:Var3,[(153,68)])
}
Add(GetDataEx,2009111,63,63)
{
link(Data,14503192:Var3,[(69,47)])
}
Add(HubEx,10532359,252,42)
{
link(onEvent,9614223:doValue,[])
}
Add(Hub,6228601,308,98)
{
link(onEvent1,14158470:doConvert,[])
link(onEvent2,5494791:doCalc,[])
}
Add(Convertor,14158470,385,98)
{
Mode=6
Digits=1
link(onResult,15539180:doStrCat,[])
}
Add(StrCat,15539180,448,98)
{
Point(doClear)
link(Str1,10081430:Var3,[(454,89)(470,89)(470,139)])
}
Add(FormatStr,15030429,441,161)
{
Mask="%1.%2"
Point(FString)
link(onFString,9285825:onRes,[(487,167)(487,83)])
link(Str1,7674351:Value,[])
}
Add(GetDataEx,10081430,448,134)
{
link(Data,15539180:Result,[])
}
Add(HubEx,16568071,427,161)
{
link(onEvent,15030429:doString,[])
}
Add(HubEx,6212640,427,35)
{
link(onEvent,7674351:doValue,[])
}
Add(DoData,8243732,385,161)
{
link(onEventData,16568071:doWork2,[])
link(Data,10081430:Var2,[(391,145)(454,145)])
}
Add(StrPart,8534407,259,224)
{
Char="."
link(onSplit,16568071:doWork3,[(431,230)])
link(Str,11547339:Result,[])
}
END_SDK
Add(MultiElementEx,4544337,217,189)
{
link(onRes,11527724:doText,[])
link(Real_Hex,3537562:Text,[])
}
BEGIN_SDK
Add(EditMultiEx,15193150,21,21)
{
WorkCount=#9:doRealHex|9:doHexReal|
EventCount=#5:onRes|
VarCount=#3:Res|
DataCount=#8:Real_Hex|
Width=482
Height=263
VOffset=56
HOffset=21
link(doRealHex,12381851:doCalc,[])
link(doHexReal,5999666:doSplit,[(32,90)(32,181)])
link(Res,3650275:FString,[(48,263)(447,263)])
}
Add(StrPart,5999666,42,175)
{
Char="."
link(onSplit,10429016:doEvent1,[])
link(onPart,6294294:doConvert,[(81,188)(81,223)])
link(Str,15517314:Var2,[])
}
Add(Convertor,14661722,203,182)
{
Mode=5
link(onResult,9347192:doCalc,[])
}
Add(Convertor,6294294,91,217)
{
Mode=5
link(onResult,5792052:doWork3,[(130,223)(130,141)(431,141)])
}
Add(GetDataEx,15517314,42,42)
{
link(Data,15193150:Real_Hex,[])
}
Add(Str_Enum,6100085,154,182)
{
Delimiter=""
link(onEnum,14661722:doConvert,[])
link(onEndEnum,8669169:doSplit,[(193,195)(193,230)])
}
Add(Hub,10429016,91,175)
{
link(onEvent1,9347192:doClear,[(251,181)(251,195)])
link(onEvent2,6100085:doEnum,[])
}
Add(MathParse,9347192,259,182)
{
MathStr="%0+%1/(2^(4*%2))"
Point(doClear)
link(X2,6100085:NumSubStr,[(272,173)(244,173)(244,222)(160,222)])
}
Add(DoData,5440160,315,350)
{
}
Add(Convertor,2856699,385,35)
{
Mode=6
Digits=1
link(onResult,5792052:doWork2,[])
}
Add(Memory,8658085,441,35)
{
}
Add(MathParse,6580332,336,105)
{
DataCount=1
MathStr="frac(%1*16)"
link(onResult,14320536:doWork3,[(375,111)(375,90)(256,90)])
link(X1,9693438:Var3,[(342,82)])
}
Add(For,10100884,217,98)
{
End=13
link(onEvent,3137247:doCalc,[])
link(onStop,521357:doData,[(256,111)(256,167)])
}
Add(Memory,8584112,266,42)
{
}
Add(MathParse,3137247,266,98)
{
DataCount=1
MathStr="trunc(%1*16)"
link(onResult,16380616:doEvent1,[])
link(X1,9693438:Var2,[])
}
Add(GetDataEx,9693438,266,77)
{
link(Data,8584112:Value,[])
}
Add(MathParse,12381851,63,77)
{
DataCount=1
MathStr="trunc(%1)"
link(onResult,8403393:doEvent1,[])
link(X1,14265648:Var2,[])
}
Add(Hub,8403393,112,77)
{
OutCount=3
link(onEvent1,2856699:doConvert,[(137,83)(137,41)])
link(onEvent2,11307791:doClear,[(137,90)(137,133)(426,133)(426,111)])
link(onEvent3,15476088:doCalc,[])
}
Add(Hub,388321,189,91)
{
link(onEvent1,14320536:doWork2,[(214,97)(214,48)])
link(onEvent2,10100884:doFor,[])
}
Add(MathParse,15476088,147,91)
{
MathStr="frac(%1)"
link(onResult,388321:doEvent1,[])
link(X1,14265648:Var3,[(153,68)])
}
Add(GetDataEx,14265648,63,63)
{
link(Data,15517314:Var3,[(69,47)])
}
Add(HubEx,14320536,252,42)
{
link(onEvent,8584112:doValue,[])
}
Add(Hub,16380616,308,98)
{
link(onEvent1,13494888:doConvert,[])
link(onEvent2,6580332:doCalc,[])
}
Add(Convertor,13494888,385,98)
{
Mode=6
Digits=1
link(onResult,11307791:doStrCat,[])
}
Add(StrCat,11307791,448,98)
{
Point(doClear)
link(Str1,15065326:Var3,[(454,89)(470,89)(470,139)])
}
Add(FormatStr,3650275,441,161)
{
Mask="%1.%2"
Point(FString)
link(onFString,15193150:onRes,[(487,167)(487,83)])
link(Str1,8658085:Value,[])
}
Add(GetDataEx,15065326,448,134)
{
link(Data,11307791:Result,[])
}
Add(HubEx,4872601,427,161)
{
link(onEvent,3650275:doString,[])
}
Add(HubEx,5792052,427,35)
{
link(onEvent,8658085:doValue,[])
}
Add(DoData,521357,385,161)
{
link(onEventData,4872601:doWork2,[])
link(Data,15065326:Var2,[(391,145)(454,145)])
}
Add(StrPart,8669169,259,224)
{
Char="."
link(onSplit,4872601:doWork3,[(431,230)])
link(Str,9347192:Result,[])
}
END_SDK

карма: 19

0