SMART-LAB
Новый дизайн
Мы делаем деньги на бирже
Информация
Блог им. AnCh
WealthLabDataConverter
- 13 июня 2013, 21:37
- |
Представляю вашему вниманию программу конвертирующую файлы формата Wealth-Lab (WL файлы старше 4-й версии) в формат csv или txt.
Нужно указать программе директорию в которой лежат файлы, она просканирует все поддиректории, найдет файлы и сконвертирует их. Настройки программы позволяют указать формат даты и времени, количество знаков после запятой для чисел и разделители для полей.
О найденных ошибках просьба сообщать, буду исправлять.
Исходники тут:
https://github.com/AnCh7/WealthLabDataConverter
Сама прога тут:
https://sourceforge.net/projects/wldconverter/
Нужно указать программе директорию в которой лежат файлы, она просканирует все поддиректории, найдет файлы и сконвертирует их. Настройки программы позволяют указать формат даты и времени, количество знаков после запятой для чисел и разделители для полей.
О найденных ошибках просьба сообщать, буду исправлять.
Исходники тут:
https://github.com/AnCh7/WealthLabDataConverter
Сама прога тут:
https://sourceforge.net/projects/wldconverter/
72 |
Читайте на SMART-LAB:
Инвестиции без спешки: торгуем в выходные
Дмитрий Пучкарев Рынок часто движется импульсами, тем важнее оценивать активы без спешки, не отвлекаясь на инфошум. Для этого отлично подходят...
19:03
«Ростелеком»: перспективы цифровых сервисов
ПАО «Ростелеком» — крупнейший в России интегрированный провайдер цифровых услуг и решений, работающий в сегментах B2C, B2B и B2G и...
18:03
Самый подробный разбор отчета БАЗИСа из всех, которые вы могли прочесть + что я нашел!!!
Что я сделал? ✅Просмотрел вебкаст с менеджментом ✅Изучил пресс-релиз ✅Изучил отчет за 1 квартал ✅эфир с Ириной Диденко у Максима...
19:06
Нефтяной срез: выпуск №9. Ормуз перекрыт, но акции нефтегаза падают. Надо ли покупать или сидеть на заборе в LQDT? Ищем лучших в секторе, где растет прибыль!
Продолжаю выпускать рубрику — Нефтяной срез. Цель: отслеживать важные бенчмарки в нефтяной отрасли, чтобы понимать куда дует ветер. Прошлый пост:...
13 мая 2026, 22:43
Вдруг кому-то нужно будет![]()
var Bar,FTri: integer;
var Str: string;
FTri:= FileOpen( 'C:\Quik\RTS.txt' );
for Bar := 0 to BarCount — 1 do
begin
Str :=
IntToStr(getdate(Bar))+','+
FormatFloat('0000',gettime(Bar))+'00,'+
FormatFloat('#0',PriceOpen( Bar ))+','+
FormatFloat('#0',PriceHigh( Bar ))+','+
FormatFloat('#0',PriceLow( Bar ))+','+
FormatFloat('#0',PriceClose( Bar ))+','+
FormatFloat('#0',Volume( Bar )) ;
FileWrite( FTri, Str);
end;
FileClose(FTri);