以下是通达信买卖主图和谐完全加密指标公式(无源码的请下载附件导入)
{买卖主图}
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),NODRAW,COLOR0000FF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),NODRAW,COLORFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),NODRAW,COLOR00FFFF;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,DYBLOCK);
Z4:=STRCAT(Z3,' ');
DRAWTEXT_FIX(ISLASTBAR,0.00,0.99,0,STRCAT(Z4,GNBLOCK)),COLORGREEN;
DA:(3*CLOSE+OPEN+LOW+HIGH)/6,POINTDOT;
DB:(20*DA+19*REF(DA,1)+18*REF(DA,2)
+17*REF(DA,3)+16*REF(DA,4)+15*REF(DA,5)+14*REF(DA,6)+13*REF(DA,7)
+12*REF(DA,8)+11*REF(DA,9)+10*REF(DA,10)+9*REF(DA,11)
+8*REF(DA,12)+7*REF(DA,13)+6*REF(DA,14)+5*REF(DA,15)+4*REF(DA,16)+3*REF(DA,17)
+2*REF(DA,18)+REF(DA,20))/210,COLORF0F000;DC:MA(DB,5),COLORYELLOW,LINETHICK1;
STICKLINE(DC>DB , DC,DB ,2.5,0),COLORGREEN,LINETHICK2;
STICKLINE(DB>DC,DC,DB,2.5,0),COLORRED,LINETHICK2;
买点:=CROSS(DB,DC) AND DB>DC;
DRAWTEXT(买点,DB*0.98,'买点'),COLORYELLOW;
卖点:=CROSS(DC,DB) AND DC>DB;
DRAWTEXT(卖点,DC*1.02,'卖点'),COLORYELLOW;
726422023.png
|