老师帮忙改成通达信可用的指标

[复制链接]
查看560 | 回复0 | 2021-12-22 12:08:45 | 显示全部楼层 |阅读模式

马上注册,结交更多股友,享用更多功能,让你轻松玩转股票

您需要 登录 才可以下载或查看,没有账号?立即注册

x
HH1:=IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IFELSE(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,HH2,LL2);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORGREEN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORGREEN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
AZ:=(3*C+L+O+H)/6;
BZ:(20*AZ+19*REF(AZ,1)+18*REF(AZ,2)+17*REF(AZ,3)+16*REF(AZ,4)+15*REF(AZ,5)+14*REF(AZ,6)
+13*REF(AZ,7)+12*REF(AZ,8)+11*REF(AZ,9)+10*REF(AZ,10)+9*REF(AZ,1)+8*REF(AZ,2)
+7*REF(AZ,3)+6*REF(AZ,4)+5*REF(AZ,5)+4*REF(AZ,6)+3*REF(AZ,7)+2*REF(AZ,8)+
REF(AZ,2))/210,COLOR00FF0F,LINETHICK2;
PARTLINE1(BZ>REF(BZ,1),BZ),COLORFF0000,LINETHICK2;
N: =1;
N1: =1;
N2: =1;
HH:=HHV(HIGH,1)/5+HHV(HIGH,2)/5+HHV(HIGH,2)/5+HHV(HIGH,5)/5+HHV (HIGH,8)/5;
LL:=LLV(LOW,1)/5+LLV(LOW,2)/5+LLV(LOW,2)/5+LLV(LOW,5)/5+LLV(LOW,8)/5;
H1:= IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
L1:= IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
GG:=IFELSE(K2=1,H2,L2);
GG1:=VALUEWHEN(ISLASTBAR,GG);
TMP1:=K2;

DRAWTEXT(CROSS(TMP1,0),HH,'空'),COLORGREEN;
DRAWTEXT(CROSS(0,TMP1),LL,'多'),COLORRED;


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则