|
以下是通达信基准线主图源码（无源码的请下载附件导入）
通达信之基准线
目的：在指定日期画出十字线，用以观测当前股价之强弱，
可以作为买卖参考点。运用之妙，存乎一心，如是而已。
参数有三：最小值 最大值 默认值
Y 1990 3000 2016
M 1 12 3
D 1 31 8
--------------------------------------------------------
源码如下
TJ:=YEAR=Y AND MONTH=M AND DAY=D;
T1:=TJ>REF(TJ,1);
GC:=IF(T1,C,DRAWNULL);
SJ:=CONST(BARSSINCE(GC));
N:=SJ;
CP:=CONST(REF((H+L)/2,N));
DRAWKLINE(H,O,L,C);
STICKLINE(CURRBARSCOUNT > N AND C>=O,H,L,0.2,0),COLORFF00CC;
STICKLINE(CURRBARSCOUNT > N AND C>=O,C,O,3,0),COLORFF00CC;
STICKLINE(CURRBARSCOUNT > N AND C< O,H,L,0.2,0),COLOR00CC00;
STICKLINE(CURRBARSCOUNT > N AND C< O,C,O,3,0),COLOR00CC00;
HHYD:=CONST(HHV(H,N*2+1));
LLYD:=CONST(LLV(L,N*2+1));
STICKLINE(CURRBARSCOUNT==(N+1),HHYD,LLYD,0,0), COLORWHITE;
基准:DRAWLINE(CURRBARSCOUNT<=(N+2), CP, 1, CP, 0), COLORWHITE;
DRAWNUMBER(ISLASTBAR,CP,CP),COLORYELLOW;
62477373.jpg
| 
