TechTradeTool
所属分类:matlab编程
开发工具:matlab
文件大小:103KB
下载次数:19
上传日期:2008-01-15 06:27:41
上 传 者:
bmy6905
说明: Curve Fitting Toolbox,Excel Link,Financial Toolbox,Financial Time Series Toolbox,Optimization Toolbox
(Curve Fitting Toolbox, Excel Link, Financial Toolbox, Financial Time Series Toolbox, Optimization Toolbox)
文件列表:
stefanos\steph_Matlab\Toolboxes\TechTradeTool\DATA\Euro50.TXT (78790, 2002-10-02)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\DATA\eurotech.TXT (30286, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\DATA\Gd.txt (54404, 2002-09-21)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\DATA\southafr.TXT (78900, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\DATA\Test.txt (1363, 2002-09-18)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\Dimbeta.m (268, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\movAv.m (203, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\optimizeSys.m (1125, 2002-10-11)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\optimizeSys2.m (2294, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\plotpruin.m (572, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\plotSys.m (72, 2002-10-11)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\Pruin.m (1495, 2002-10-11)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\Stochast.m (273, 2002-10-09)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\Stock.m (642, 2002-10-07)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysdimbeta.m (1619, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysDimbetaStCr.m (2464, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysDimbetaStoh.m (2572, 2002-10-25)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysDimbeta_1.m (1752, 2002-10-10)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysPerf.m (2370, 2002-10-11)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysPerfOpt.m (1824, 2002-10-11)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\ENGINE\sysStDimbetaCr.m (2332, 2002-10-24)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\finTradeTool.mat (173272, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\Run.m (95, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\calcSystemPerf.m (4515, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\exitProgram.m (49, 2003-02-06)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\MainFig.fig (13048, 2002-10-17)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\mainForm.m (2039, 2002-10-29)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\openFile.m (288, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\optimizeStop.m (77, 2002-10-13)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\optimizeSystem.m (5678, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\plotProbRuin.m (5880, 2002-10-14)
stefanos\steph_Matlab\Toolboxes\TechTradeTool\UI\plotSystem.m (3984, 2002-10-14)
% this function reads the ASCII metastock file and returns a stock
% this function throws the dates
function [st] = readMetastockFile (fName);
% read metastock file
%array = load (fName);
startC = 3; %start counting from 0
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%get the number of lines the text contains (and the sHeader)
fid = fopen(fName, 'rt');
lines = 0;
while feof(fid) == 0
tline = fgetl(fid);
if (lines==0)
sHeader = tline;
end
if (size(tline) > 0)
lines = lines + 1;
end
end
fclose(fid);
%%%%%%%%%%%%%%%%%%%%%
%construct the header
remainder = sHeader;
pos = 0;
while (any(remainder))
[chopped,remainder] = strtok(remainder, '<>,');
chopped = lower(chopped);
if (pos >= startC)
if strcmp(chopped,'high') == 1 %idendical
header.high = pos-startC+1;
elseif strcmp(chopped,'low') == 1 %idendical
header.low = pos-startC+1;
elseif strcmp(chopped,'open') == 1 %idendical
header.open = pos-startC+1;
elseif strcmp(chopped,'close') == 1 %idendical
header.close = pos-startC+1;
elseif strcmp(chopped,'vol') == 1 %idendical
header.volume = pos-startC+1;
end
end
pos = pos+1;
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%these nubers are zero based
startR = 1;
stopR = lines-1;
stopC = 8;
datesMet = csvread(fName,startR,2, [startR, 2, stopR, 2]);
% disp (datesMet);
[linesData colons] = size(datesMet);
dates = zeros (linesData,1);
for i=1:linesData
n = datesMet(i, 1);
if (n < 19000000)
if n > 900000 %990312
n = 19000000 + n; %19990312
else
n = 20000000 + n;
end
end
y = floor(n / 10000);
m = floor((n - y*10000)/100);
d = ((n - y*10000 - m*100));
dates(i,1) = datenum (y, m, d);
end
arrayData = dlmread (fName, ',', [startR, startC, stopR, stopC]);
%construct the stock
st = stock (dates, header, arrayData);
近期下载者:
相关文件:
收藏者: