Вверх ↑
Ответов: 167
Рейтинг: 7
#1: 2020-05-15 16:08:27 ЛС | профиль | цитата
вот что-то сделал. [flood]меня в соавторах укажите (шутка)[/flood]
Add(HTTP_Get,8712403,70,14)
{
URL="https://www.cbr-xml-daily.ru/daily_eng_utf8.xml"
link(onStatus,1046958:doPosition,[(126,20)(126,69)])
link(onDownload,7917980:doConvert,[])
link(onURLSize,1046958:doMax,[(118,34)(118,76)])
}
Add(Convertor,7917980,133,21)
{
Mode=11
link(onResult,4870837:doEvent1,[])
}
Add(GProgressBar,1046958,133,63)
{
Left=5
Top=328
Width=553
Point(doMax)
}
Add(BlockFind,4317450,203,21)
{
StartBlock="<Name>"
EndBlock="</Value>"
Point(onNotFind)
link(onSearch,9399948:doAdd,[])
}
Add(Memo,9399948,247,21)
{
Left=94
Top=2
Width=213
Height=323
ScrollBars=3
Point(doSetSelStart)
}
Add(BlockFind,5654930,238,98)
{
IncludeBlock=1
StartBlock="<Name>"
EndBlock="</Name>"
Point(onNotFind)
link(onSearch,11119013:doEvent1,[])
link(onEndSearch,162950:doSearch,[(278,111)(278,132)])
}
Add(BlockFind,162950,287,126)
{
IncludeBlock=1
StartBlock="<Value>"
EndBlock="</Value>"
Point(onNotFind)
link(onSearch,9666116:doAdd,[(324,132)(324,146)])
link(Text,11194919:Value,[(293,84)(174,84)(174,148)(202,148)])
}
Add(Memory,11194919,196,98)
{
link(onData,5654930:doSearch,[])
}
Add(Hub,4870837,175,21)
{
link(onEvent1,4317450:doSearch,[])
link(onEvent2,11194919:doValue,[(196,34)])
}
Add(MainForm,790398,14,0)
{
Width=622
Height=390
link(onCreate,8712403:doDownload,[])
}
Add(Label,3624708,299,63)
{
Left=313
Top=103
Width=133
Height=17
Caption="Бабло в вашей валюте :D"
}
Add(Label,13774534,299,25)
{
Left=458
Top=105
Width=141
Height=17
Caption="Баблишко в другой валюте"
}
Add(Label,13497554,430,203)
{
Left=459
Top=123
Width=141
Height=17
Color=16777215
Caption="0"
AutoSize=1
Alignment=2
}
Add(Edit,14870372,119,203)
{
Left=317
Top=121
Width=120
Text="0"
link(onChange,8236252:doWork2,[])
}
Add(Math,3758564,371,203)
{
OpType=2
link(onResult,13497554:doText,[])
link(Op1,10153435:Result,[(377,191)(362,191)(362,256)(230,256)])
}
Add(ListBox,11046335,378,119)
{
Left=312
Top=3
Width=126
Height=97
Point(Index)
link(onClick,8783951:doWork2,[])
}
Add(ArrayRW,3525391,322,203)
{
link(onRead,3758564:doOperation,[])
link(Array,1057528:Var2,[(328,197)(327,197)])
link(Index,9195470:Var,[])
}
Add(ArrayRW,14705544,182,203)
{
link(onRead,10153435:doOperation,[])
link(Array,1057528:Var1,[(188,173)])
link(Index,6333450:Var,[])
}
Add(GetDataEx,1057528,321,168)
{
link(Data,14381241:Var2,[])
}
Add(Math,10153435,224,203)
{
OpType=3
link(onResult,3525391:doRead,[])
link(Op1,14870372:Text,[(230,191)(218,191)(218,249)(125,249)])
}
Add(RealArray,915662,504,42)
{
RealArray=[]
}
Add(ListBox,11707937,378,56)
{
Left=467
Top=3
Width=126
Height=97
Point(Index)
link(onClick,8783951:doWork1,[(417,69)])
}
Add(Hub,11119013,336,98)
{
link(onEvent1,11707937:doAdd,[(368,104)(368,62)])
link(onEvent2,11046335:doAdd,[(364,111)(364,125)])
}
Add(LineBreak,5531962,399,105)
{
Type=1
link(Data,11707937:Index,[])
Primary=[6333450,-210,70]
}
Add(LineBreak,9543655,399,161)
{
Type=1
link(Data,11046335:Index,[])
Primary=[9195470,-70,14]
}
Add(LineBreak,16090877,140,182)
{
link(Out,8236252:doWork1,[(172,188)])
Primary=[13110375,287,-56]
}
Add(HubEx,8783951,413,126)
{
link(onEvent,13110375:In,[])
}
Add(HubEx,8236252,168,203)
{
link(onEvent,14705544:doRead,[])
}
Add(ArrayRW,9666116,329,126)
{
link(Array,14381241:Var3,[(335,117)])
}
Add(GetDataEx,14381241,321,112)
{
link(Data,915662:Array,[(327,93)(510,93)])
}


--- Добавлено в 2020-05-15 16:38:34

P.P.S: я взял этот сайт лишь потому-что он первый мне под руку попался. Так что насколько он быстрый и точный я не знаю. УЧТИТЕ ЭТО!
карма: 0
c, c++, lua
0
Редактировалось 8 раз(а), последний 2020-05-15 16:38:34