请老师帮忙改成选股公式
[通达信]
A1:=HIGH;
B1:=LOW; C1:=CLOSE; A2:=REF(HIGH,1); A5:=REF(HIGH,2); A6:=REF(HIGH,3); B2:=REF(LOW,1); B5:=REF(LOW,2); B6:=REF(LOW,3); C7:=REF(CLOSE,1); C8:=REF(CLOSE,5); NUM1:=IF(A2<C7 AND A2<C8 AND A1<B5 AND A1<B6,0,1); NUM2:=IF(B2>C7 AND B2>C8 AND B1>A5 AND B1>A6,0,1); DIF1:=A1-A2; DIF2:=B1-B2; REII:=(DIF1+DIF2)*NUM1*NUM2; REIA:=SQRT(DIF1*DIF1)+SQRT(DIF2*DIF2); REI:SUM(REII,0)/SUM(REIA,0)*100,COLORWHITE,LINETHICK2,NODRAW; STICKLINE(C>0,REI,REF(REI,1),-1,0),COLORGRAY; STICKLINE(REI>REF(REI,1) AND REI>MA(REI,5),REI,REF(REI,1),-1,0),COLORRED; STICKLINE(REI<REF(REI,1) AND REI<MA(REI,5),REI,REF(REI,1),-1,0),COLORGREEN; MA(REI,5),COLORGRAY; 请老师帮忙改成3个选股公式 如下图(麻烦老师了,有点不好意思): 1.昨天是灰色柱子,今天是红色柱子的选股。 2.昨天是红柱,今天也是红柱但是今天的红柱小于昨天的红柱。 3.昨天是灰色柱子,今天也是灰色柱子的选股。 |
附件
-
1
-
2
-
3
相关帖子
{1.昨天是灰色柱子,今天是红色柱子的选股。}
A1:=HIGH; B1:=LOW; A2:=REF(HIGH,1); A5:=REF(HIGH,2); A6:=REF(HIGH,3); B2:=REF(LOW,1); B5:=REF(LOW,2); B6:=REF(LOW,3); C7:=REF(CLOSE,1); C8:=REF(CLOSE,5); NUM1:=IF(A2<C7 AND A2<C8 AND A1<B5 AND A1<B6,0,1); NUM2:=IF(B2>C7 AND B2>C8 AND B1>A5 AND B1>A6,0,1); DIF1:=A1-A2; DIF2:=B1-B2; REII:=(DIF1+DIF2)*NUM1*NUM2; REIA:=SQRT(DIF1*DIF1)+SQRT(DIF2*DIF2); REI:=SUM(REII,0)/SUM(REIA,0)*100; 红色:=REI>REF(REI,1) AND REI>MA(REI,5); 绿色:=REI<REF(REI,1) AND REI<MA(REI,5); 灰色:=C>0; XG1:REF(灰色 AND NOT(红色) AND NOT(绿色),1) AND 红色; {2.昨天是红柱,今天也是红柱但是今天的红柱小于昨天的红柱。} A1:=HIGH; B1:=LOW; A2:=REF(HIGH,1); A5:=REF(HIGH,2); A6:=REF(HIGH,3); B2:=REF(LOW,1); B5:=REF(LOW,2); B6:=REF(LOW,3); C7:=REF(CLOSE,1); C8:=REF(CLOSE,5); NUM1:=IF(A2<C7 AND A2<C8 AND A1<B5 AND A1<B6,0,1); NUM2:=IF(B2>C7 AND B2>C8 AND B1>A5 AND B1>A6,0,1); DIF1:=A1-A2; DIF2:=B1-B2; REII:=(DIF1+DIF2)*NUM1*NUM2; REIA:=SQRT(DIF1*DIF1)+SQRT(DIF2*DIF2); REI:=SUM(REII,0)/SUM(REIA,0)*100; 红色:=REI>REF(REI,1) AND REI>MA(REI,5); XG2:EVERY(红色,2) AND C<REF(C,1); {3.昨天是灰色柱子,今天也是灰色柱子的选股。} A1:=HIGH; B1:=LOW; A2:=REF(HIGH,1); A5:=REF(HIGH,2); A6:=REF(HIGH,3); B2:=REF(LOW,1); B5:=REF(LOW,2); B6:=REF(LOW,3); C7:=REF(CLOSE,1); C8:=REF(CLOSE,5); NUM1:=IF(A2<C7 AND A2<C8 AND A1<B5 AND A1<B6,0,1); NUM2:=IF(B2>C7 AND B2>C8 AND B1>A5 AND B1>A6,0,1); DIF1:=A1-A2; DIF2:=B1-B2; REII:=(DIF1+DIF2)*NUM1*NUM2; REIA:=SQRT(DIF1*DIF1)+SQRT(DIF2*DIF2); REI:=SUM(REII,0)/SUM(REIA,0)*100; 红色:=REI>REF(REI,1) AND REI>MA(REI,5); 绿色:=REI<REF(REI,1) AND REI<MA(REI,5); 灰色:=C>0; XG3:EVERY(灰色 AND NOT(红色) AND NOT(绿色),2); |