分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册

软件名称:[B]mac99---我们要学会拿来改改为我所用前提是愈改愈好用(源码.附图.说明)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:7.00 KB
官方主页:Home Page
更新时间:2012-09-15 03:54:15
软件简介:

这是【九九九九九九】的公式源码他的特点是一个均线图适合不同周期.设计不同的参数.以适应该周期的不同需求.
{指标名mac99}
hhv(h,last(CROSS(ma(c,75),ma(c,25))=0)+1),color999900;
llv(l,last(CROSS(ma(c,75),ma(c,25))=0)+1),color999900;

#define n(qq) if(BARSCOUNT( c)<qq,0,qq)
{5*5min:白,DOTLINE,color999900/5*10:正红,DOTLINE,colorred/5*15MIN黄,DOTLINE,color00ffff/5*30MIN玫瑰红,DOTLINE,colorff00ff/5*60MIN黄绿,DOTLINE,colorgreen/
5日:灰绿,,DOTLINE,color999900/5周线:灰白,DOTLINE,color999999/
1季线:锗黄加粗,DOTLINE,LINETHICK2,Color0080FF/1半年线:蓝色加粗,DOTLINE,LINETHICK2,Colorblue/1年线:暗红加粗,LINETHICK2,Color400080}
if DATATYPE>9 then begin
MA(CLOSE,n(5)),DOTLINE,color999999;
MA(CLOSE,n(12)),DOTLINE,LINETHICK2,Color0080FF;
MA(CLOSE,n(24)),DOTLINE,LINETHICK2,Colorblue;
MA(CLOSE,n(48)),DOTLINE,LINETHICK2,Color400080;
end

if DATATYPE=9 then begin
MA(CLOSE,n(5)),DOTLINE,color999999;
MA(CLOSE,n(12)),DOTLINE,LINETHICK2,Color0080FF;
MA(CLOSE,n(24)),DOTLINE,LINETHICK2,Colorblue;
MA(CLOSE,n(48)),DOTLINE,LINETHICK2,Color400080;
end

if DATATYPE=8 then begin
MA(CLOSE,n(5)),DOTLINE,color999900;
MA(CLOSE,n(10)),DOTLINE,colorred;
MA(CLOSE,n(25)),DOTLINE,color999999;
MA(CLOSE,n(66)),DOTLINE,LINETHICK2,Color0080FF;
MA(CLOSE,n(132)),DOTLINE,LINETHICK2,Colorblue;
MA(CLOSE,n(264)),DOTLINE,LINETHICK2,Color400080;
end
if DATATYPE=7 then begin
MA(CLOSE,n(5)),DOTLINE,colorgreen;
MA(CLOSE,n(10)),DOTLINE,colorred;
MA(CLOSE,n(20)),DOTLINE,color999900;
MA(CLOSE,n(100)),DOTLINE,color999999;
end
if DATATYPE=6 then begin
MA(CLOSE,n(5)),DOTLINE,colorff00ff;
MA(CLOSE,n(10)),DOTLINE,colorgreen;
MA(CLOSE,n(60)),DOTLINE,color999900;
MA(CLOSE,n(300)),DOTLINE,color999999;
end
if DATATYPE=5 then begin
MA(CLOSE,n(5)),DOTLINE,color00ffff;
MA(CLOSE,n(10)),DOTLINE,colorff00ff;
MA(CLOSE,n(20)),DOTLINE,colorgreen;
MA(CLOSE,n(100)),DOTLINE,color999900;
end
if DATATYPE=4 then begin
MA(CLOSE,n(5)),DOTLINE,colorwhite;
MA(CLOSE,n(15)),DOTLINE,color00ffff;
MA(CLOSE,n(30)),DOTLINE,colorff00ff;
MA(CLOSE,n(60)),DOTLINE,colorgreen;
end
if DATATYPE=3 or DATATYPE=1 then begin
ma25n1:MA(CLOSE,n(25)),DOTLINE,colorwhite;
ma75n1:MA(CLOSE,n(75)),DOTLINE,color00ffff;
ma150n1:MA(CLOSE,n(150)),DOTLINE,colorff00ff;
ma300n1:MA(CLOSE,n(300)),DOTLINE,colorgreen;
end
if DATATYPE=2 then begin
ma100f:MA(CLOSE,n(100)),DOTLINE,colorwhite;
ma200f:MA(CLOSE,n(200)),DOTLINE,color00ffff;
ma500f:MA(CLOSE,n(500)),DOTLINE,colorff00ff;
ma1000f:MA(CLOSE,n(1000)),DOTLINE,colorgreen;
end;

UploadPic/2012-9/2012915151517841.jpg

现在我们认为仅仅有均线不能说明其阻力位.支撑位.我们加进了四区图.加进了黄金分割.而且这个公式和其他不同的就是他每出现一个新的高低点就重新划分新的四区和黄金分割.这是其他同类公式无法比拟的.就是上万个你也找不出能和这个公式相同的.或者接近相同的公式.我们永远不会重复编辑公式而是要不断更新.创造与众不同的公式.
下边经过改编的新图原码.我们必需谢谢【九九九九九九】提供的源码.才有现在的公式.而且新公式的要领和原作是一样的.我就是借题发挥而已.也是告诉大家学会怎么利用原来的公式.为我所用.只有使用你自己的编辑公式.用起来才能得心应手.明明白白公式的含义.其实世界上哪有那么些发明创造.能在前人的基础上更新.改造.提高.也是前进.而且是必需的.只要不是原封不动就是向前进步了.你不妨仔细比较就会发现.细微的变化还是不少的.这就加进了我本人的看法.你再去利用公式前也要加进你的意思公式才会更好的为你服务.其实这才是我编辑这个公式的真正企图.
{可变四区}
{1.K线}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8.5,0) ,COLOR000011;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000033;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000DD;
STICKLINE((CLOSE >= OPEN),HIGH,LOW,0.5,0),color0000FF;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8.5,0),color006600;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),color008800;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),color00AA00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),color00BB00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,4,0),color00CC00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),color00DD00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),color00EE00;
STICKLINE((OPEN > CLOSE),HIGH,LOW,0.5,0),color00FF00;

AH1:hhv(h,last(CROSS(ma(c,90),ma(c,30))=0)+1),color0077FF;
AL2:llv(l,last(CROSS(ma(c,90),ma(c,30))=0)+1),colorFF9900;
下跌:LAST(AH1>H),PRECIS0 ,LINETHICK0;
DRAWTEXT(barstatus=2 AND 下跌,AH1,'----【N:='+NUMTOSTRN(下跌,0)+'】----          '),ALIGN2,Color00FFff,linethick3,LAYER0;

X:=BARSLAST(DISPSTATUS=1)+1;     
P:=BACKSET(DISPSTATUS=2,X/2+1);
K:=BARSLAST(CROSS(P,0.5))+1;
K0:(0.5*AH1+0.5*AL2),COLOR00ffff,DOTLINE;
K1:IF(K>=0,(0.618*AH1+0.382*AL2),0),COLOR0077ff,DOTLINE;
K2:IF(K>=0,AL2+(AH1-AL2)*0.74,0),COLOR00FFff,DOTLINE;
K3:IF(K>=0,AL2+(AH1-AL2)*0.865,0),COLOR0000ff,DOTLINE;
K5:IF(K>=0,(0.382*AH1+0.618*AL2),0),COLOR0598ff,DOTLINE;
K6:IF(K>=0,AH1-(AH1-AL2)*0.74,0),DOTLINE;
K7:IF(K>=0,AH1-(AH1-AL2)*0.865,0),COLOR99ff99,DOTLINE;

nnl:=DISPSTATUS=2;
DRAWTEXT(nnl,AH1*0.998,'最高--→'+AH1+'元'),ALIGN1,Color0047FF,LINETHICK1;
DRAWTEXT(nnl,K3,'0.865-→'+NUMTOSTRN(K3,2)+'元'),ALIGN1,Color0047FF,LINETHICK1;
DRAWTEXT(nnl,K2,'0.742-→'+NUMTOSTRN(K2,2)+'元'),ALIGN1,Color00FFff,LINETHICK1;
DRAWTEXT(nnl,K1,'0.618-→'+NUMTOSTRN(K1,2)+'元'),ALIGN1,Color0047FF,LINETHICK1;
DRAWTEXT(nnl,K0,'0.500-→'+NUMTOSTRN(K0,2)+'元'),ALIGN1,Color00FF00,LINETHICK1;
DRAWTEXT(nnl,K5,'0.382-→'+NUMTOSTRN(K5,2)+'元'),ALIGN1,Color00FFff,LINETHICK1;
DRAWTEXT(nnl,K6,'0.258-→'+NUMTOSTRN(K6,2)+'元'),ALIGN1,Color0047FF,LINETHICK1;
DRAWTEXT(nnl,K7,'0.135-→'+NUMTOSTRN(K7,2)+'元'),ALIGN1,Color99FF99,LINETHICK1;
DRAWTEXT(nnl,AL2*1,'最低--→'+AL2+'元'),ALIGN1,VALIGN2,Color0047FF,LINETHICK1;

HK1:=AL2+(AH1-AL2)*0.742;
HK2:=AL2+(AH1-AL2)*0.5;
HK3:=AL2+(AH1-AL2)*0.258;
FILLRGN(AH1,HK1,AH1>HK1,RGB(90,0,90)),LAYER7;
FILLRGN(HK1,HK2,HK1>HK2,RGB(0,0,90)),LAYER7;
FILLRGN(HK2,HK3,HK2>HK3,RGB(0,90,0)),LAYER7;
FILLRGN(HK3,AL2,HK3>AL2,RGB(0,45,0)),LAYER7;

#define N(MAC99) if(BARSCOUNT(C)<MAC99,0,MAC99)
if DATATYPE>10 then begin  {月}
MA(CLOSE,n(6)),DOTLINE,color999999;
MA(CLOSE,n(12)),DOTLINE,LINETHICK2,Color0080FF;
MA(CLOSE,n(24)),DOTLINE,LINETHICK2,Colorblue;
MA(CLOSE,n(48)),DOTLINE,LINETHICK2,Color400080;
end   

if DATATYPE=9 then begin  {周}
MA(CLOSE,n(4)),DOTLINE,color999999;
MA(CLOSE,n(12)),DOTLINE,LINETHICK2,Color0080FF;
MA(CLOSE,n(24)),DOTLINE,LINETHICK2,Colorblue;
MA(CLOSE,n(48)),DOTLINE,LINETHICK2,Color400080;
end

if DATATYPE=8 then begin   {日}
M5:MA(CLOSE,n(5)),color0000FF;
M13:MA(CLOSE,n(13)),color0077FF;
M21:MA(CLOSE,n(21)),color999999;
M55:MA(CLOSE,n(55)),LINETHICK2,Color0080FF;
M89:MA(CLOSE,n(89)),LINETHICK2,Colorblue;
M121:MA(CLOSE,n(121)),LINETHICK2,Color400080;

end
if DATATYPE=7 then begin    {60分}
MA(CLOSE,n(5)),DOTLINE,colorgreen;
[url=http://www.70822.com/soft/sort013/sort03/down-52760.html]mac99---我们要学会拿来改改为我所用前提是愈改愈好用(源码.附图.说明)[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间:62.50000 毫秒