加载中…算法：在通达信软件中，对MA5、MA10、MA20和MA60进行大小排序
(2018-01-25 16:32:24)| 分类： 技术分析 |
｛算法：在通达信软件中，对MA5、MA10、MA20和MA60进行大小排序｝
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,15);
MA60:=MA(C,20);
HH1:=MAX(MA5,MA10);
HH2:=MAX(MA20,MA60);
HH:MAX(HH1,HH2),NODRAW;
LL1:=MIN(MA5,MA10);
LL2:=MIN(MA20,MA60);
LL:MIN(LL1,LL2),NODRAW;
B5:IF(MA5=HH OR
MA5=LL,1,0),NODRAW;
B10:IF(MA10=HH OR
MA10=LL,1,0),NODRAW;
B20:IF(MA20=HH OR
MA20=LL,1,0),NODRAW;
B60:IF(MA60=HH OR
MA60=LL,1,0),NODRAW;
H0:IF(B5=B10 AND
B5=1,MAX(MA5,MA10),0),NODRAW;
L0:IF(B5=B10 AND
B5=1,MIN(MA5,MA10),0),NODRAW;
O0:IF(C>=O AND B5=B10 AND
B5=1,MAX(MA20,MA60),IF(B5=B10 AND
B5=1,MIN(MA20,MA60),0)),NODRAW;
C0:IF(B5=B10 AND
B5=1,MA20+MA60-O0,0),NODRAW;
H1:IF(B5=B20 AND
B20=1,MAX(MA5,MA20),0),NODRAW;
L1:IF(B5=B20 AND
B20=1,MIN(MA5,MA20),0),NODRAW;
O1:IF(C>=O AND B5=B20 AND
B20=1,MAX(MA10,MA60),IF(B5=B20 AND
B20=1,MIN(MA10,MA60),0)),NODRAW;
C1:IF(B5=B20 AND
B20=1,MA10+MA60-O1,0),NODRAW;
H2:IF(B5=B60 AND
B60=1,MAX(MA5,MA60),0),NODRAW;
L2:IF(B5=B60 AND
B60=1,MIN(MA5,MA60),0),NODRAW;
O2:IF(C>=O AND B5=B60 AND
B60=1,MAX(MA20,MA10),IF(B5=B60 AND
B60=1,MIN(MA20,MA10),0)),NODRAW;
C2:IF(B5=B60 AND
B60=1,MA20+MA10-O2,0),NODRAW;
H3:IF(B10=B60 AND
B60=1,MAX(MA10,MA60),0),NODRAW;
L3:IF(B10=B60 AND
B60=1,MIN(MA10,MA60),0),NODRAW;
O3:IF(C>=O AND B10=B60 AND
B60=1,MAX(MA20,MA5),IF(B10=B60 AND
B60=1,MIN(MA20,MA5),0)),NODRAW;
C3:IF(B10=B60 AND
B60=1,MA20+MA5-O3,0),NODRAW;
H4:IF(B10=B20 AND
B20=1,MAX(MA10,MA20),0),NODRAW;
L4:IF(B10=B20 AND
B20=1,MIN(MA10,MA20),0),NODRAW;
O4:IF(C>=O AND B10=B20 AND
B20=1,MAX(MA60,MA5),IF(B10=B20 AND
B20=1,MIN(MA60,MA5),0)),NODRAW;
C4:IF(B10=B20 AND
B20=1,MA60+MA5-O4,0),NODRAW;
H5:IF(B20=B60 AND
B60=1,MAX(MA60,MA20),0),NODRAW;
L5:IF(B20=B60 AND
B60=1,MIN(MA60,MA20),0),NODRAW;
O5:IF(C>=O AND B20=B60 AND
B60=1,MAX(MA10,MA5),IF(B20=B60 AND
B60=1,MIN(MA10,MA5),0)),NODRAW;
C5:IF(B20=B60 AND
B60=1,MA10+MA5-O5,0),NODRAW;
XH:H0+H1+H2+H3+H4+H5,NODRAW;
XL:L0+L1+L2+L3+L4+L5,NODRAW;
XC:C0+C1+C2+C3+C4+C5,NODRAW;
XO:O0+O1+O2+O3+O4+O5,NODRAW;
DRAWKLINE(XH,XO,XL,XC);
喜欢
0
赠金笔