通达信一支三压看盘主图源码

一支三压？其实这个名字不准确，为什么？因为支撑和压力（阻力）线是互换的，没突破就是阻力线，突破了就是支撑线。但为什么取这个名字呢？听我慢慢道来。
 取30日最低点向前面60日内寻找到最高点。然后，通过这个高点最高价和向左的30日低点进行黄金分割。黄金分割取0.382和0.618两个点位。公四条线
1：黄色实心水平线表示前高水平线。
2：玫红色虚线表示第一阻力位。
3淡蓝色虚线表示第二阻力位。
4：黄色实心斜线表示支撑位。
 这个适合您看盘。盘中可以关注关键点位。并在窗口位置显示对应阻力位 支撑位价格（移动鼠标可见变化）；本不想写选股，因为三条阻力线都很重要，写起来比较麻烦。每突破一条阻力线都是一个介入的观察点。但估计跟帖肯定会有同学提出要选股。所以 写了一个低位选股。选股公式适个人喜好，你观察历史出票可以选定适合自己的接入点。

{主图}
LT:=FINDLOWBARS(L,0,30,1);
 HT:=FINDHIGHBARS(H,LT=0,60,1);
 LL:=REF(L,LT);
 HH:=REF(H,HT);
 NOTEXT1:DRAWLINE(HT=0,HH,LT=0,HH,1),COLORYELLOW;
 NOTEXT2:DRAWLINE(HT=0,HH,LT=0,LL,1),COLORYELLOW;
 NOTEXT3:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.382+LL,1),DOTLINE,COLORLIMAGENTA;
 NOTEXT4:DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.618+LL,1),DOTLINE,COLORLIBLUE;
 TA:=BARSLAST(REF(NOTEXT1,1)=DRAWNULL AND HT=0);
支撑线:REF(L,LT),COLORYELLOW,NODRAW;
阻力1:(HH-LL)*0.382+LL,COLORLIMAGENTA,NODRAW;
阻力2:(HH-LL)*0.618+LL,COLORLIBLUE, NODRAW;
 XG:=REF(LT=0,1) AND C>O AND C>REF(C,1);
 STICKLINE(XG,C,O,1.8,0),COLORWHITE;
 STICKLINE(XG,H,L,0,0),COLORWHITE;
 DRAWICON(XG,L*0.94,1);
 DRAWTEXT(TA=0,NOTEXT1*1.03,VARCAT(VARCAT('最高价：',VAR2STR(HH,2)),'元'))COLORYELLOW;

{选股}

LT:=FINDLOWBARS(L,0,30,1);
 HT:=FINDHIGHBARS(H,LT=0,60,1);
 LL:=REF(L,LT);
 HH:=REF(H,HT);
 NOTEXT1:=DRAWLINE(HT=0,HH,LT=0,HH,1);
 NOTEXT4:=DRAWLINE(HT=0,HH,LT=0,(HH-LL)*0.618+LL,1);
 TJ:=EVERY(C/NOTEXT4<1.03,HT);
 XG:REF(LT=0,1) AND C>O AND C>REF(C,1);