二次昌九握手 (通达信 主图 附图)
阅读金昌九老哥哥的;网上抄来的【大智慧新一代DELTA主图公式】我就给他来个【画蛇添足】而启发,时间也急些。
待昌九老哥哥核对后,不误导股友。源码送出……如有问题那就算了!
昌九老哥哥的话:【DELTA理论】短周期是每四天一次循环,可惜大智慧软件没有时间間間隔的函数,【DATEDIFF】 所以我只好用大智慧的周线.其实周线是五天一个循环.与【三角洲 DELTA理论 预测】不符. 没有办法; 三角洲 DELTA理论的精髓在于预测 每四天一次循环 给改成五天一次循环预测的功能就不复存在了吧?. 只有飞狐软件有【DATEDIFF】函数可以编辑每四天一次循环的公式 咱们使用大智慧软件 就彻底没辙了.
周:="050引.CL#WEEK";
isColor周:=if(周<>ref(周,1) or barpos=1,1,0); {{转折线在每周一 }
DIS0周:=if(barpos=1 or not(isColor周),0,0);
DIS周:=SUM(DIS0周,0);
Num周:=count(isColor周,0)+DIS周;
PD0周:=isColor周 and mod(Num周,4)=0;
PD1周:=isColor周 and mod(Num周,4)=1;
PD2周:=isColor周 and mod(Num周,4)=2;
PD3周:=isColor周 and mod(Num周,4)=3;
DC0周:=REF(C,BARSLAST(PD0周));
DC1周:=REF(C,BARSLAST(PD1周));
DC2周:=REF(C,BARSLAST(PD2周));
DC3周:=REF(C,BARSLAST(PD3周));
DRAWLINE(PD0周,DC0周,PD1周,DC1周,0),Color0044ff,LINETHICK2,LAYER0;
DRAWLINE(PD1周,DC1周,PD2周,DC2周,0),Color00FFff,LINETHICK2,LAYER0;
DRAWLINE(PD2周,DC2周,PD3周,DC3周,0),ColorFF9900,LINETHICK2,LAYER0;
DRAWLINE(PD3周,DC3周,PD0周,DC0周,0),Color00ff00,LINETHICK2,LAYER0; { }
这里用到【"050引.CL#WEEK"】其中CL就是收盘价 【CL:C,LINETHICK0;】因为引用就是为了变化周期【050引】名称可以改的.
额的改动:(去掉下面源码,主要是线的问题眼花)
DRAWLINE(PD0周,DC0周,PD1周,DC1周,0),Color0044ff,LINETHICK2,LAYER0;
DRAWLINE(PD1周,DC1周,PD2周,DC2周,0),Color00FFff,LINETHICK2,LAYER0;
DRAWLINE(PD2周,DC2周,PD3周,DC3周,0),ColorFF9900,LINETHICK2,LAYER0;
DRAWLINE(PD3周,DC3周,PD0周,DC0周,0),Color00ff00,LINETHICK2,LAYER0;