主图的思路:
首创新算法---从此不再有主图与副图的区分,叠加主图的副图指标MACD,即直接获取基本数据进行加工,却又无法与主图进行叠加的MACD。 将系统当前可视界面的数据数量,在设置中置为150;{可随意设置,然后与代码相同即可} 引用系统默认指标MACD;计算当前界面的最值 以及 MACD的最值,并求出百分比; 进行匹配并输出。
附图的思路:
进行4日周期的自定义;
在日K线周期环境下,画出4日K线;
只要是连续向上,就给4日K线的每根数据进行排序;
只要是有一个向下,不作序数输出;
若真,开始数9。
首创新算法---九转算法之初步。我只是搬运工:江丰鱼的文章在今日头条首发,只是将其代码演变出来而已,自行取舍。
{九转学习主图源码如下}
SHORT:=12;
LONG:=26;
MID:=9;
HH:=CONST(HHV(H,150));
LL:=CONST(LLV(L,150));
DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIF,MID);
MACD:=(DIF-DEA)*2,COLORSTICK;
DIF0:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA0:=EMA(DIF0,MID);
MACD0:=(DIF0-DEA0)*2,COLORSTICK;
MHH:=CONST(HHV(MACD0,150));
MLL:=CONST(LLV(DIF0,150));
PY:=(HH-LL)/2+LL;
BFB:=(HH-LL)/(MHH-MLL);
{ZBGS3.COM}
DIF1:=DIF0*BFB+PY;
DEA1:=EMA(DIF,MID);
MACD1:=DIF1-DEA1;
STICKLINE(MACD>REF(MACD,1)AND MACD>0,PY,PY+MACD,0.5,1),COLORLIRED;
STICKLINE(MACD<0,PY,PY+MACD,0.5,1),COLORLIGREEN;
{九转算法副图源码如下}
KX:=
TOTALBARSCOUNT-CURRBARSCOUNT+1;
C4:=IF(MOD(KX,4)=1,REFX(C,3),IF(MOD(KX,4)=2,REFX(C,2),IF(MOD(KX,4)=3,REFX(C,1),IF(MOD(KX,4)=0,C,DRAWNULL))));{C4 收盘价的模4计算}
MW:=MOD(KX,4)=0;{MW 模位}
KH4:=IF(MW,HHV(H,4),DRAWNULL);
KO4:=IF(MW,REF(O,3),DRAWNULL);
KL4:=IF(MW,LLV(L,4),DRAWNULL);
KC4:=IF(MW,C,DRAWNULL);
DRAWKLINE(KH4,KO4,KL4,KC4);
{ZBGS3.COM}
QD:=CONST(LLVBARS(L,40));
ZXH:= QD-CURRBARSCOUNT;
KC4Z0:=IF(CURRBARSCOUNT<=QD AND QD>=9*4,CONST(REF(KC4,9*4)),DRAWNULL);
KC4Z1:=IF(CURRBARSCOUNT<=QD AND QD>=8*4,CONST(REF(KC4,8*4)),DRAWNULL);
KC4Z2:=IF(CURRBARSCOUNT<=QD AND QD>=7*4,CONST(REF(KC4,7*4)),DRAWNULL);
KC4Z3:=IF(CURRBARSCOUNT<=QD AND QD>=6*4,CONST(REF(KC4,6*4)),DRAWNULL);
KC4Z4:=IF(CURRBARSCOUNT<=QD AND QD>=5*4,CONST(REF(KC4,5*4)),DRAWNULL);
KC4Z5:=IF(CURRBARSCOUNT<=QD AND QD>=4*4,CONST(REF(KC4,4*4)),DRAWNULL);
KC4Z6:=IF(CURRBARSCOUNT<=QD AND QD>=3*4,CONST(REF(KC4,3*4)),DRAWNULL);
KC4Z7:=IF(CURRBARSCOUNT<=QD AND QD>=2*4,CONST(REF(KC4,2*4)),DRAWNULL);
KC4Z8:=IF(CURRBARSCOUNT<=QD AND QD>=1*4,CONST(REF(KC4,1*4)),DRAWNULL);
KC4Z9:=IF(CURRBARSCOUNT<=QD AND QD>=0*4,CONST(REF(KC4,0*4)),DRAWNULL);
ZS:=IF(KC4Z9<KC4Z8 OR KC4Z8<KC4Z7 OR KC4Z7<KC4Z6 OR KC4Z6<KC4Z5 OR KC4Z5<KC4Z4 OR KC4Z4<KC4Z3 OR KC4Z3<KC4Z2 OR KC4Z2<KC4Z1 OR KC4Z1<KC4Z0,0,1);
{ZBGS3.COM}
ZXH0:=IF(MOD (INTPART(ZXH/4) ,9)=0,9, MOD (INTPART(ZXH/4) ,9));
DRAWNUMBER(ZS=1,KC4, ZXH0);