十八層寶塔公式公式、源碼[其他軟件公式]
相關(guān)標(biāo)簽: 樂(lè)王選股公式源碼 、 短線暴利指標(biāo)公式源碼 、 atr自適應(yīng)公式源碼 、 牛熊線指標(biāo)公式源碼 、 股票指標(biāo)公式源碼大全 、 大智慧指標(biāo)公式源碼 、 通達(dá)信指標(biāo)公式源碼 、 選股公式源碼 、 同花順指標(biāo)公式源碼 、
飛狐十八層寶塔公式源碼如下:
draWGBK(1,COLORRGB(633,33,0),COLORRGB(33,33,0),0),colorFF0000;
ZH:=HHV(H,22);
ZHH:=H;
ZGF1:=ZHH/1.0809;ZGF2:=ZHH/1.1618;
ZL:=LLV(L,22);
ZLL:=L;
ZGFB1:=ZLL*1.0809;ZGFB2:=ZLL*1.1618;
STICKLINE(ISLASTBAR and ZGF1,ZGF1,ZGF2,40,0),SHIFT3,Color8BB2CA;
STICKLINE(ISLASTBAR and ZGFB1,ZGFB1,ZGFB2,40,0),SHIFT3,Color000080;
DRAWNUMBER(ISLASTBAR and ZGFB1,ZGFB1,ZGFB1,2),COLORRED,SHIFT1;
DRAWNUMBER(ISLASTBAR and ZGF1,ZGF1,ZGF1,2),COLORBLUE,SHIFT1;
sj:=dataCOUNT-sysparam(1);
{drawnumber(BARPOS+4=sysparam(1),l,sj,0),align5,COLORWHITE;//交易日}
漲跌:=(DYNAINFO(7)-C)/C*100,COLORYELLOW,LINETHICK0;
{drawnumber(BARPOS+4=sysparam(1),l,sj,0),align5,COLORWHITE;//交易日}
HZC:=(2*CLOSE+LOW+HIGH)/4;
HZE:=EMA(HZC,2);
HZD:=EMA(HZE,2);
HD1:=EMA(HZC,3);
//18線開花
a1:=EMA(CLOSE,5)>EMA(CLOSE,6) and EMA(CLOSE,6)>EMA(CLOSE,7) and EMA(CLOSE,7)>EMA(CLOSE,8) and EMA(CLOSE,8)>EMA(CLOSE,9)
and EMA(CLOSE,9)>EMA(CLOSE,10) and EMA(CLOSE,10)>EMA(CLOSE,11) and EMA(CLOSE,11)>EMA(CLOSE,12)
and EMA(CLOSE,12)>EMA(CLOSE,13) and EMA(CLOSE,13)>EMA(CLOSE,14) and EMA(CLOSE,14)>EMA(CLOSE,15)
and EMA(CLOSE,15)>EMA(CLOSE,20) and EMA(CLOSE,20)>EMA(CLOSE,30) and EMA(CLOSE,30)>EMA(CLOSE,60) and EMA(CLOSE,60)>EMA(CLOSE,90)
and EMA(CLOSE,90)>EMA(CLOSE,120) and EMA(CLOSE,120)>EMA(CLOSE,250);
a2:=EMA(CLOSE,5)>EMA(CLOSE,6) and EMA(CLOSE,6)>EMA(CLOSE,7) and EMA(CLOSE,7)>EMA(CLOSE,8) and EMA(CLOSE,8)>EMA(CLOSE,9)
and EMA(CLOSE,9)>EMA(CLOSE,10) and EMA(CLOSE,10)>EMA(CLOSE,11) and EMA(CLOSE,11)>EMA(CLOSE,12)
and EMA(CLOSE,12)>EMA(CLOSE,13) and EMA(CLOSE,13)>EMA(CLOSE,14);
b1:=IF(a1,1,2);
//DD=HD1:=EMA(HZC,3);
PARTLINE(b1=2,EMA(HD1,14)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,15)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,16)),ColorBLUE;
PARTLINE(b1=2,EMA(HD1,17)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,18)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,19)),ColorBLUE;
PARTLINE(b1=2,EMA(HD1,20)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,21)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,22)),ColorBLUE;
PARTLINE(b1=2,EMA(HD1,23)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,24)),ColorBLUE;PARTLINE(b1=2,EMA(HD1,25)),ColorBLUE;
PARTLINE(a2,EMA(HD1,14)),Color2277ee; PARTLINE(a2,EMA(HD1,15)),Color2277ee; PARTLINE(a2,EMA(HD1,16)),Color2277ee;
PARTLINE(a2,EMA(HD1,17)),Color2277ee; PARTLINE(a2,EMA(HD1,18)),Color2277ee; PARTLINE(a2,EMA(HD1,19)),Color2277ee;
PARTLINE(a2,EMA(HD1,20)),Color2277ee; PARTLINE(a2,EMA(HD1,21)),Color2277ee; PARTLINE(a2,EMA(HD1,22)),Color2277ee;
PARTLINE(a2,EMA(HD1,23)),Color2277ee; PARTLINE(a2,EMA(HD1,24)),Color2277ee; PARTLINE(a2,EMA(HD1,25)),Color2277ee;
PARTLINE(a1,EMA(HD1,14)),ColorRED; PARTLINE(a1,EMA(HD1,15)),ColorRED; PARTLINE(a1,EMA(HD1,16)),ColorRED;
PARTLINE(a1,EMA(HD1,17)),ColorRED; PARTLINE(a1,EMA(HD1,18)),ColorRED; PARTLINE(a1,EMA(HD1,19)),ColorRED;
PARTLINE(a1,EMA(HD1,20)),ColorRED; PARTLINE(a1,EMA(HD1,21)),ColorRED; PARTLINE(a1,EMA(HD1,22)),ColorRED;
PARTLINE(a1,EMA(HD1,23)),ColorRED; PARTLINE(a1,EMA(HD1,24)),ColorRED; PARTLINE(a1,EMA(HD1,25)),ColorRED;
//HH
PARTLINE(b1=2,EMA(HZD,2)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,3)),COLORCYAN;
PARTLINE(b1=2,EMA(HZD,4)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,5)),COLORCYAN;
PARTLINE(b1=2,EMA(HZD,6)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,7)),COLORCYAN;
PARTLINE(b1=2,EMA(HZD,8)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,9)),COLORCYAN;
PARTLINE(b1=2,EMA(HZD,10)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,11)),COLORCYAN;
PARTLINE(b1=2,EMA(HZD,12)),COLORCYAN; PARTLINE(b1=2,EMA(HZD,13)),COLORCYAN;
PARTLINE(EMA(HZD,2)>ref(EMA(HZD,2),1),EMA(HZD,2)),COLORFFFFFF;
PARTLINE(EMA(HZD,3)>ref(EMA(HZD,3),1),EMA(HZD,3)),COLORFFFFFF;
PARTLINE(EMA(HZD,4)>ref(EMA(HZD,4),1),EMA(HZD,4)),COLORFFFFFF;
PARTLINE(EMA(HZD,5)>ref(EMA(HZD,5),1),EMA(HZD,5)),COLORFFFFFF;
PARTLINE(EMA(HZD,6)>ref(EMA(HZD,6),1),EMA(HZD,6)),COLORFFFFFF;
PARTLINE(EMA(HZD,7)>ref(EMA(HZD,7),1),EMA(HZD,7)),COLORFFFFFF;
PARTLINE(EMA(HZD,8)>ref(EMA(HZD,8),1),EMA(HZD,8)),COLORFFFFFF;
PARTLINE(EMA(HZD,9)>ref(EMA(HZD,9),1),EMA(HZD,9)),COLORFFFFFF;
PARTLINE(EMA(HZD,10)>ref(EMA(HZD,10),1),EMA(HZD,10)),COLORFFFFFF;
PARTLINE(EMA(HZD,11)>ref(EMA(HZD,11),1),EMA(HZD,11)),COLORFFFFFF;
PARTLINE(EMA(HZD,12)>ref(EMA(HZD,12),1),EMA(HZD,12)),COLORFFFFFF;
PARTLINE(EMA(HZD,13)>ref(EMA(HZD,13),1),EMA(HZD,13)),COLORFFFFFF;
PARTLINE(a2,EMA(HZD,2)),ColorYELLOW; PARTLINE(a2,EMA(HZD,3)),ColorYELLOW;
PARTLINE(a2,EMA(HZD,4)),ColorYELLOW; PARTLINE(a2,EMA(HZD,5)),ColorYELLOW;
PARTLINE(a2,EMA(HZD,6)),ColorYELLOW; PARTLINE(a2,EMA(HZD,7)),ColorYELLOW;
PARTLINE(a2,EMA(HZD,8)),ColorYELLOW; PARTLINE(a2,EMA(HZD,9)),ColorYELLOW;
PARTLINE(a2,EMA(HZD,10)),ColorYELLOW; PARTLINE(a2,EMA(HZD,11)),ColorYELLOW;
PARTLINE(a2,EMA(HZD,12)),ColorYELLOW; PARTLINE(a2,EMA(HZD,13)),ColorYELLOW; {本文來(lái)至CXH99.COM}
PARTLINE(a1,EMA(HZD,2)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,3)),ColorMAGENTA;
PARTLINE(a1,EMA(HZD,4)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,5)),ColorMAGENTA;
PARTLINE(a1,EMA(HZD,6)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,7)),ColorMAGENTA;
PARTLINE(a1,EMA(HZD,8)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,9)),ColorMAGENTA;
PARTLINE(a1,EMA(HZD,10)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,11)),ColorMAGENTA;
PARTLINE(a1,EMA(HZD,12)),ColorMAGENTA; PARTLINE(a1,EMA(HZD,13)),ColorMAGENTA;
BDDD:=CLOSE=LLV(CLOSE,6),LINETHICK0;
N20:=BARSLAST(BDDD);
低:IF(N20,ref(CLOSE,N20),ref(CLOSE,N20))*0.99,COLORRED,LINETHICK0;
啟動(dòng):CLOSE>低 AND ref(CLOSE=低,1),COLOR00FF00,POINTDOT,LINETHICK0;
PARTLINE(低=ref(低,1),低),COLORRED,LINETHICK1;
{以下設(shè)置副圖顯示方式}
IF(CLOSE,CLOSE,CLOSE),COLORFF00FF,LINETHICK0;
DRAWTEXT(啟動(dòng),LOW*0.98,'↑'),COLORRED, ALIGN0;
PARTLINE(低<ref(低,1),低),COLORBLACK; {文章來(lái)至程序化交易網(wǎng) cxh99.com}
Var1:=CLOSE>ref(CLOSE,1) AND CLOSE>ref(CLOSE,2);
Var2:=ref(Var1,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var3:=ref(Var2,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var4:=ref(Var3,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var5:=ref(Var4,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var6:=ref(Var5,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var7:=ref(Var6,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var8:=ref(Var7,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var9:=ref(Var8,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
VarA:=ref(Var9,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
VarB:=ref(VarA,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
VarC:=ref(VarB,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
STICKLINE(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,CLOSE,ref(CLOSE,1),8,1),COLORWHITE;
VarD:=CLOSE<ref(CLOSE,1) AND CLOSE<ref(CLOSE,2);
VarE:=ref(VarD,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
VarF:=ref(VarE,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var10:=ref(VarF,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var11:=ref(Var10,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var12:=ref(Var11,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var13:=ref(Var12,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var14:=ref(Var13,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var15:=ref(Var14,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var16:=ref(Var15,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
Var17:=ref(Var16,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
Var18:=ref(Var17,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
STICKLINE(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,CLOSE,ref(CLOSE,1),8,0),COLORYELLOW;
Var19:=ref(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,1) AND Var1;
STICKLINE(Var19,ref(CLOSE,1),ref(CLOSE,2),8,0),COLORRED;
Var1A:=ref(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,1) AND VarD;
STICKLINE(Var1A,ref(CLOSE,1),ref(CLOSE,2),8,1),COLORGREEN;
天數(shù):'+NUMTOSTR(主力吸籌區(qū),0)+'天'),ColorFFFFFC,LINETHICK1;
MA30:=EMA(CLOSE,30);
MA60:=EMA(CLOSE,60);
MA125:=EMA(CLOSE,125);
MA250:=EMA(CLOSE,250);
A1:=MA30[SYSPARAM(1)];
RA1:=MA30[SYSPARAM(1)-1];
jt1:=IF(A1>RA1,'↑','↓');
DRAWTEXTEX(1,0,10,110,'MA30: '+NUMTOSTR(MA30[SYSPARAM(1)],2)+jt1),COLORWHITE;
A2:=MA60[SYSPARAM(1)];
RA2:=MA60[SYSPARAM(1)-1];
jt2:=IF(A2>RA2,'↑','↓');
DRAWTEXTEX(1,0,10,130,'MA60: '+NUMTOSTR(MA60[SYSPARAM(1)],2)+jt2),COLORWHITE;
A3:=MA125[SYSPARAM(1)];
RA3:=MA125[SYSPARAM(1)-1];
jt3:=IF(A3>RA3,'↑','↓');
DRAWTEXTEX(1,0,10,150,'MA125:'+NUMTOSTR(MA125[SYSPARAM(1)],2)+jt3),COLORWHITE;
A4:=MA250[SYSPARAM(1)];
RA4:=MA250[SYSPARAM(1)-1];
jt4:=IF(A4>RA4,'↑','↓');
DRAWTEXTEX(1,0,10,170,'MA250:'+NUMTOSTR(MA250[SYSPARAM(1)],2)+jt4),COLORWHITE; {內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM}
{換手100%}
svol:=INTPART(SUM(V,0)/CAPITAL);
tj0:=svol>ref(svol,1) or BARSSINCE(CLOSE)=0;
S1:=BARSLAST(tj0)+1,PRECISION,COLORWHITE;//時(shí)間1
tj2:=S1<ref(S1,1);//取點(diǎn)
S2:=if(tj2,ref(S1,1)+1,S1),PRECISION,COLORMAGENTA;//時(shí)間2
S3:=SUM(tj2,0),COLORMAGENTA;
階段總額(萬(wàn)元):=SUM(AMOUNT/10000,S2)*100,PRECISION,LINETHICK,Color008BFA;//換手100%成交額
階段總量(手):=SUM(V,S2)*100,PRECISION,LINETHICK,COLORCYAN;//換手100%成交量
階段成本(元):=(階段總額(萬(wàn)元)/(階段總量(手)/100)),LINETHICK,PRECISION2,COLORRED;
DRAWTEXTex(1,0,10,75,'階段平均成本:'+NUMTOSTR(階段成本(元)[SYSPARAM(1)],2)+'(元)'),align4,COLORCYAN;
Aa3:=SUMBARS(VOL,CAPITAL);
換手成本:=IF(CAPITAL>0,SUM(AMOUNT,Aa3)/SUM(VOL,Aa3)/100,EMA(CLOSE,120));{100%換手平均成本線};
DRAWTEXTEX(1,0,10,90,'換手成本:'+NUMTOSTR(換手成本,2)),COLORYELLOW;
BB:=BARPOS=SYSPARAM(1);
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
wd:=WEEKDAY;
pd:=SYSPARAM(1);
DRAWTEXTEX(c,1,0,840,'■今日: '+NUMTOSTR(fy[pd],0)+'年'+NUMTOSTR(fm[pd],0)+'月'+NUMTOSTR(fd[pd],0)+'日 '+wday[wd[pd]+1]),COLORYELLOW;
yyzq:=(sysparam(3)-sysparam(2))/1.8;
picl:=refx(llv(sysparam(5),yyzq),yyzq);
當(dāng)天換手率:=((VOL / CAPITAL) * 100);
b:=DATACOUNT-BARPOS+1;
Wb:=BARSLAST(SYSPARAM(1)=BARPOS)+1;
換手率1:=SUM(當(dāng)天換手率,Wb);
累計(jì)換手:=refX(換手率1,Wb[DATACOUNT]-1);
DRAWTEXT(SYSPARAM(1)=BARPOS,picl,NUMTOSTR(b[SYSPARAM(1)],0)+'天'+'換手: '+NUMTOSTR(累計(jì)換手[SYSPARAM(1)],2)+'% '),align2,COLORYELLOW;
VERTLINE(SYSPARAM(1)=BARPOS),LINEDOT,COLORGREEN;
VERTLINE(SYSPARAM(3)=BARPOS and b),LINEDOT,COLORRED;
sj:=dataCOUNT-sysparam(1);
漲跌:=(DYNAINFO(7)-C)/C*100,COLORYELLOW,LINETHICK0;
{drawnumber(BARPOS+4=sysparam(1),l,sj,0),align5,COLORWHITE;//交易日}
DRAWTEXTex(1,0,10,250,'距今漲跌:'+NUMTOSTR(漲跌[SYSPARAM(1)],2)+'%'),align4,
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 進(jìn)行 有償 編寫!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容