有一位朋友给我发短信,要求飞狐改成通达信,但因通达信无可代用函数,我回复:不能改.
事后,我感到这位朋友会失望的,因此按他的愿意,做个........,不知他合意否?
因个人的习惯把他的短信删掉了,所以无从回复,只好发出来.........
C/C++ Code复制内容到剪贴板
- {通达信用的:}
- {INPUT: N(3,1,100);}
- N:=3;
- {转折}
- Z_1:=(EMA(C,N)-REF(EMA(C,N),1))/REF(EMA(C,N),1)*100;
- Z_2:=IF(Z_1<0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);
- Z_3:=IF(Z_1>0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);
- Z_4:=IF(CROSS(0,Z_1),H,L);
-
- DRAWLINE(CROSS(Z_2,Z_3),H,CROSS(Z_3,Z_2),L,0),LINETHICK2,COLORWHITE;
- DRAWLINE(CROSS(Z_3,Z_2),L,CROSS(Z_2,Z_3),H,0),LINETHICK2,COLORMAGENTA;
- DRAWLINE(CROSS(0,Z_1)||CROSS(Z_1,0),Z_4,ISLASTBAR,Z_4,0),LINETHICK2,COLORGREEN;
C/C++ Code复制内容到剪贴板
- {飞狐用的:}
- input: N(3,1,100);
-
- {转折}
- Z_1:=(EMA(C,N)-REF(EMA(C,N),1))/REF(EMA(C,N),1)*100;
- Z_2:=IF(Z_1<0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);
- Z_3:=IF(Z_1>0,REF(Z_1,BARSLAST(CROSS(0,Z_1))+1),0);
- Z_4:=if(CROSS(0,Z_1),H,L);
-
- DRAWLINE(CROSS(Z_2,Z_3),h,CROSS(Z_3,Z_2),L,0),LINETHICK2,COLORWHITE;
- DRAWLINE(CROSS(Z_3,Z_2),l,CROSS(Z_2,Z_3),h,0),LINETHICK2,COLORMAGENTA;
- DRAWLINE(CROSS(0,Z_1)||CROSS(Z_1,0),Z_4,ISLASTBAR,Z_4,0),LINETHICK2,COLORGREEN;
-
-
