通达信均线系统主图源码
通达信均线系统主图源码
{公式在线提供：www.gszx.com.cn}
C/C++ Code复制内容到剪贴板
- {M1 1 100 5
- M2 1 100 10
- M3 1 100 20
- M4 1 100 60
- M5 1 1000 120
- M6 1 1000 250
- N 1 100 20
- M 1 100 32
- P1 1 100 80
- P2 1 100 100 }
- MA5:MA(CLOSE,M1);
- MA10:MA(CLOSE,M2);
- MA20:MA(CLOSE,M3);
- MA60:MA(CLOSE,M4);
- MA120:MA(CLOSE,M5);
- MA250:MA(CLOSE,M6);
- MAA30:MA(C,30),COLORRED;
- KS:IF(MA10>MAA30,MA10,MAA30),COLORBLUE;
- A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
- A4:=SMA(A3,3,1);
- A5:=SMA(A4,3,1);
- A6:=3*A4-2*A5;
- A7:=C-REF(C,1);
- A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
- 买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
- DRAWTEXT(FILTER(买=1,5),LOW-0.05,'↖买进'),COLORYELLOW;
- STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW;
- NN:=150;
- 高11:=REFDATE(HHV(H,NN),DATE);
- 低11:=REFDATE(LLV(L,NN),DATE);
- H11:=高11-(高11-低11)*0.191;
- H12:=高11-(高11-低11)*0.382;
- H13:=高11-(高11-低11)*0.5;
- H14:=高11-(高11-低11)*0.618;
- H15:=高11-(高11-低11)*0.809;
- DRAWTEXT(CURRBARSCOUNT=1,高11,'高'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H11,'809'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H12,'618'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H13,'中'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H14,'382'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H15,'191'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,低11,'低'),COLORGREEN;
- STICKLINE(CURRBARSCOUNT=13,高11,高11,100,-2),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,H11,H11,100,-1),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,H12,H12,100,-1),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,H13,H13,100,-1),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,H14,H14,100,-1),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,H15,H15,100,-1),COLORGREEN,LINETHICK2;
- STICKLINE(CURRBARSCOUNT=13,低11,低11,100,-1),COLORGREEN,LINETHICK2;
- N33:=10;
- T1:=CONST(HHVBARS(V,N33));
- T0:IF(CURRBARSCOUNT<=N33+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL);
- IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),COLORMAGENTA;
- DRAWTEXT(ISLASTBAR,T0,' 平台');
