#sha
Add(Button,1199699,-147,224)
{
Left=95
Top=165
Align=2
Caption="Generate"
link(onClick,2688970:doSearch,[])
}
Add(FileSearch,2688970,-84,224)
{
Ext="*.txt"
Dir="-"
Point(ShortName)
link(onSearch,9899361:doDelete,[])
link(Dir,1056164:CurrentDir,[])
}
Add(Counter,4022338,266,238)
{
link(onNext,6768717:doCompare,[])
}
Add(If_else,6768717,315,238)
{
Type=1
Op2=Integer(10)
link(onFalse,2688970:doStop,[(386,251)(386,287)(-96,287)(-96,237)])
}
Add(FormatStr,3304271,161,231)
{
Mask="#EXTINF:0,%1
%2"
link(onFString,3557646:doEvent1,[])
link(Str2,5338079:Value,[(174,219)(103,219)(103,267)(20,267)])
}
Add(Dir,1056164,-77,168)
{
}
Add(Delete,9899361,-28,224)
{
Count=2
link(onDelete,5338079:doValue,[])
}
Add(Memory,5338079,14,224)
{
link(onData,8794297:doSearch,[])
}
Add(BlockFind,8794297,63,224)
{
IncludeBlock=1
Delete=0
StartBlock=""
EndBlock=""
link(onEndSearch,4574141:doReplace,[])
}
Add(Replace,4574141,112,231)
{
SubStr=""
link(onReplace,3304271:doString,[])
}
Add(Memo,10508442,266,140)
{
Left=240
Top=175
Align=5
Strings=#7:#EXTM3U|
ScrollBars=2
}
Add(Hub,3557646,210,231)
{
link(onEvent1,10508442:doAdd,[(254,237)(254,146)])
link(onEvent2,4022338:doNext,[])
}
Add(InfoTip,2281075,-105,126)
{
Info=#29:Задание типа файла для поиска|
Height=151
}
Add(InfoTip,15146008,-35,147)
{
Info=#22:Удаление всего лишнего|
Width=190
Height=130
}
Add(InfoTip,11823156,259,196)
{
Info=#41:Остановить поиск после 10 найденых файлов|
Width=113
Height=81
}
Add(InfoTip,12540981,-14,14)
{
Info=#27:-=Сохранение в формат M3U=-|
Font=[MS Sans Serif,14,1,0,1]
Width=309
Height=60
}
Ответов: 1088
Рейтинг: 112
|
|||
Автор молчит... Вот сохранение в формат M3U(хотя если точнее то это генерация M3U):
|
|||
карма: 0 |
|