大頂震倉金不換指標公式源碼[大智慧公式]
相關標簽:大智慧主圖公式源碼 、 大智慧分時指標源碼 、 大智慧ddx指標源碼 、 大智慧bs指標源碼 、 大智慧散戶指標源碼 、 大智慧主圖指標公式 、 大智慧公式源碼附圖 、 大智慧股票公式源碼 、 布林線副圖指標源碼 、 大智慧跨周期指標源碼 、 大智慧操盤線指標源碼 、 黑馬指標源碼大智慧版 、 大智慧指標公式大全 、 大智慧地量指標公式 、 大智慧逃頂指標公式 、
{大智慧5.57版本,改動后和樓主的有區別,呵呵。大家再修改吧!
原理解析:
源碼:
MA7:MA(C,7),colorwhite;
MA13:MA(C,13),coloryellow;
MA21:MA(C,21),COLORRED;
MA42:MA(C,42),colorgreen;
MA119:MA(C,119),COLORBLUE;A12:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
B1:=HIGH+B0;
B2:=LOW-B0;
追:=ref(c,ref(hhvbars(v,21),0)),COLORGREEN,linethick0;
m1:=ma(close,1),linethick0;
a1:=V>1*ref(V,1) and (c/ref(C,1)-1)*100>9.5 and m1>=追,COLORRED;
DRAWICON(cross(a1,1),l*0.98,3),COLORWHITE,;
DRAWTEXT(a1,l*0.93,'追'),LINETHICK1,colorred;
DRAWTEXT(IF(CROSS(69,SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100),1,0),HIGH*1.045,'持幣'),colorgreen;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
VAR28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5),LOW,'▲'),COLORRED;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
AA:=SMA(VARF,3,1);
SS:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>79);
DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (AA>SS) AND CROSS(84,RSI),H*1.028,'▼'),LINETHICK7,COLOR00FFFF;
DRAWTEXT(CROSS(84,RSI) AND CROSS(76,VAR28),H*1.01,'頂'),LINETHICK7,colorblue;
VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR6:=(VAR3+VAR4+VAR5)/3;
VAR7:=EMA(VAR6,5);
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
VAR8:=IF(VAR6<=-20,10,0);
VAR9:=HHV(VAR8,10);
VARA10:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K1:=EMA(VAR7,5)*2, , COLORFF00FF;
D1:=EMA(K1,5), , COLORWHITE;
J1:=K1*3-D1*2, ,COLORYELLOW;
VARB10:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J1>10;
DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*0.93,'持'),COLORFF00FF;
DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*0.94,'股'),COLORFF00FF;VARE10:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF10:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'主'),LINETHICK1,COLORFF00FF;
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.94,'力'),LINETHICK1,COLORFF00FF;
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.93,'行'),LINETHICK1,COLORFF00FF;
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.92,'為'),LINETHICK1,COLORFF00FF;
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,'震'),COLORWHITE;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.96,'倉'),COLORWHITE;DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,8);
A10:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B10:=REF(C,A10+1)>C AND REF(DIFF,A10+1)<DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B10>0,1,0),L,'大'),Color0000F5;
DRAWTEXT(IF(B10>0,1,0),L-0.11,'底'),Color0000F5;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K11:=SMA(RSV,3,1);
D11:=SMA(K11,3,1);
A2:=BARSLAST(REF(CROSS(K11,D11),1));
B20:=REF(C,A2+1)>C AND REF(K11,A2+1)<K11 AND CROSS(K11,D11);
DRAWTEXT(IF(B20>0,1,0),L-0.22,'小'),Color6C8CCF;
DRAWTEXT(IF(B20>0,1,0),L-0.35,'底'),Color6C8CCF;
LC1:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC1,0),6,1)/SMA(ABS(CLOSE-LC1),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC1,0),12,1)/SMA(ABS(CLOSE-LC1),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L-0.46,'中'),Color0067DE;
DRAWTEXT(IF(B3>0,1,0),L-0.57,'底'),Color0067DE;
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D10:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D10>0,1,0),H+0.1,'小頂'),ColorB27800;
C2:=BARSLAST(REF(CROSS(D11,K11),1));
D2:=REF(C,C2+1)<C AND REF(K11,C2+1)>K11 AND CROSS(D11,K11);
DRAWTEXT(IF(D2>0,1,0),H+0.25,'中頂'),Color0AB000;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H+0.4,'大頂'),ColorFF0000;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容