ARTICLE · 1015238
技术指标公式源码编写 龙头解盘
XA1:=IF(DATE<2342.46*500,1,1);
WAN1:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
WAN2:=2*ABS(WAN1);
WAN3:=100-(100-3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))
*100,20,1)+2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))
*100,20,1),15,1));
WAN4:=100-(100-3*SMA((OPEN-LLV(L,55))/(HHV(H,55)-LLV(L,55))
*100,20,1)+2*SMA(SMA((OPEN-LLV(L,55))/(HHV(H,55)-LLV(L,55))
*100,20,1),15,1));
WAN5:=(H+L+C)/3;
WAN6:=(WAN5-MA(WAN5,10))/(0.015*AVEDEV(WAN5,10));
WAN7:=(WAN5-MA(WAN5,30))/(0.015*AVEDEV(WAN5,30));
WAN8:=IF(WAN6>=150 AND WAN6<200 AND WAN7>=150 AND WAN7<200,10,0);
WAN9:=IF(WAN6<=-150 AND WAN6>-200 AND WAN7<=-150 AND WAN7>-200,-10,WAN8)*XA1;
WANA:=(C-MA(C,13))/MA(C,13)*100;
WANB:=100-ABS(WANA);
WANC:=3*SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1)-2
*SMA(SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1),15,1);
WAND:=3*SMA((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))
*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1),15,1);
WANE:=REF(L,1)*0.9;
WANF:=L*0.9;
WAN10:=(WANF*VOL+WANE*(CAPITAL-VOL))/CAPITAL;
WAN11:=EMA(WAN10,30);
WAN12:=WAN11-C;
WAN13:=REF(C,1);
WAN14:=SMA(MAX(C-WAN13,0),7,1)/SMA(ABS(C-WAN13),7,1)*100;
WAN15:=SMA(MAX(C-WAN13,0),13,1)/SMA(ABS(C-WAN13),13,1)*100;
WAN16:=BARSCOUNT(C);
WAN17:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
WAN18:=((-100)*(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))+50)*2;
WAN19:=(C-LLV(L,15))/(HHV(H,15)-LLV(L,15))*100;
WAN1A:=(SMA(WAN19,4,1)-50)*2;
WAN1B:=SMA(WAN1A,3,1);
WAN1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
WAN1D:=SMA(WAN1C,4,1);
WAN1E:=SMA(WAN1D,3,1);
WAN1F:=(HHV(H,30)-C)/C*100;
WAN20:=IF(WAN17<=25 AND WAN18<-95 AND WAN1F>20 AND WAN1B<-30 AND WAN1E<30 AND WAN12>=-0.25 AND WAN14<22 AND WAN15<28 AND WAN16>50,80,0)*XA1;
趋势: WAN3;
顶线: IF(WANB<90,WANB,100)*XA1;
多方: IF(WAN1>0,WAN1,0)*XA1, LINESTICK;
空方: -IF(WAN1<0,WAN2,0)*XA1, LINESTICK;
抄底: WAN20,COLORRED,LINETHICK2;
预警: (IF((WAN7>=200 AND WAN6>=150) OR CROSS(65,多方),15,IF(WAN7<=-200
AND WAN6<=-150,-15,WAN9))+65),COLORCYAN,LINETHICK2;
STICKLINE(WAN3<=REF(WAN4,1),WAN3,WAN4,8,0),COLORWHITE;
STICKLINE(WAN3>REF(WAN4,1),WAN3,WAN4,8,0),COLORRED;
T1:=C>MA(C,20) AND MA(C,20)>=REF(MA(C,20),1)*XA1;
T2:=C<MA(C,20) AND MA(C,20)<REF(MA(C,20),1)*XA1;
T3:=多方>60 AND 预警>65 AND 顶线=100;
T4:=多方>48 AND 预警>65 AND 顶线<100;
T5:=空方<-38 AND 预警<65;
T6:=抄底>50 AND 顶线<90;
T7:=WAN3>REF(WAN4,1) AND VOL>REF(VOL,1) AND C>REF(C,1)*XA1;
T8:=WAN3<=REF(WAN4,1) AND C<REF(C,1) AND 预警=65 AND 抄底=0 AND 空方>=REF(空方,1) AND WANC<REF(WAND,1)*XA1;
DRAWTEXT(T1 AND COUNT(T1,30)=1,10,'上通道!'),COLORYELLOW;
DRAWTEXT(T2 AND COUNT(T2,30)=1,55,'下通道!'),COLORYELLOW;
DRAWTEXT(T3 AND COUNT(T3,30)=1,55,'拉升!'),COLORYELLOW;
DRAWTEXT(T4 AND COUNT(T4,30)=1,75,'出货!'),COLORGREEN;
DRAWTEXT(T5 AND COUNT(T5,30)=1,50,'小反弹!'),COLORWHITE;
DRAWTEXT(T6 AND COUNT(T6,30)=1,30,'反弹!'),COLORWHITE;
DRAWTEXT(T7 AND COUNT(T7,30)=1,-10,'进场!'),COLORWHITE;
DRAWTEXT(T8 AND COUNT(T8,30)=1,90,'回落!'),COLORGREEN;
技术指标公式编写，内容仅做科普学习。