清醒买卖主图（源码、贴图）

清醒买卖主图

VAR1:=BARSCOUNT(CLOSE);
VAR2:=HHV(HIGH,200);
VAR3:=LLV(LOW,200);
VAR4:=(VAR2-VAR3)/40;
VAR5:=HIGH+VAR4;
卖:=STICKLINE(VAR1/30=FLOOR(VAR1/30),VAR5,VAR5+3*VAR4,3,0);
DRAWTEXT(卖 0,H+0.1,'卖'),COLORGREEN;
VAR6:=IF(YEAR =2003 AND MONTH 1,0,1);
VAR7:=REF(CLOSE-OPEN,2);
VAR8:=REF(CLOSE,1);
VAR9:=REF(CLOSE,2);
VARA:=REF(CLOSE,3);
VARB:=REF(CLOSE,4);
VARC:=MAX(MAX(MAX(CLOSE,VAR8),VAR9),VARA);
VARD:=MIN(MIN(MIN(CLOSE,VAR8),VAR9),VARA);

品红变盘:= STICKLINE(CLOSE=VARC AND VAR8=VARD,VAR9,CLOSE,5,1)*VAR6;
DRAWTEXT(品红变盘 0,H+0.21,'变盘')COLORYELLOW;
黄色下跌:= STICKLINE(CLOSE=VARD AND (VAR8 VAR9 OR VAR8 VARA) OR VAR8=VARD AND (VAR9=VARC OR

VARA=VARC) AND CLOSE VAR9 OR VAR9=VARD AND VARA=VARC AND CLOSE VAR8 OR VARA=VARD AND

CLOSE VAR8 AND CLOSE VAR9,VAR8,CLOSE,5,0)*VAR6,COLORYELLOW;
绿色买:= STICKLINE(VAR8=VARC AND CLOSE=VARD,VAR9,CLOSE,3,0)*VAR6;
DRAWTEXT(绿色买 0,L-0.21,'追涨')COLORMAGENTA;
买:=STICKLINE(VAR8=VARD AND CLOSE =VAR9 OR (VAR9=VARD AND VAR8 =VARA OR VARA=VARD AND

VAR8 =VAR9) AND VAR9 VARB AND CLOSE =VAR8,VAR8,VAR9,3,0)*VAR6;
DRAWTEXT(买 0,L-0.11,'买')COLORCYAN;

VARE:=SAR(5,1,5);
VARF:=EMA(CLOSE,30);
VAR10:=IF(CLOSE 450,8,IF(CLOSE =20 AND CLOSE 150,0.2,IF(CLOSE 20 AND CLOSE =10,0.07,IF

(CLOSE 10,0.03,0.07))));
牛熊分界线:EMA(CLOSE,30)COLORCYAN,POINTDOT;
STICKLINE(CLOSE VARE,VARF,VARF+VAR10,1,0)*VAR6,COLORRED;
STICKLINE(CLOSE VARE,VARF,VARF-VAR10,1,0)COLORGREEN;

{www.9m8.cn}VAR1:=BARSCOUNT(CLOSE);
VAR2:=HHV(HIGH,200);
VAR3:=LLV(LOW,200);
VAR4:=(VAR2-VAR3)/40;
VAR5:=HIGH+VAR4;}
STICKLINE(VAR1/30=FLOOR(VAR1/30),VAR5,VAR5+3*VAR4,8,0), COLOR0000FF;
STICKLINE(VAR1/30=FLOOR(VAR1/30),VAR5,VAR5+2*VAR4,7,0), COLOR0000FF;
{www.9m8.cn}VAR6:=IF(YEAR =2003 AND MONTH 1,0,1);
VAR7:=REF(CLOSE-OPEN,2);
VAR8:=REF(CLOSE,1);
VAR9:=REF(CLOSE,2);
VARA:=REF(CLOSE,3);
VARB:=REF(CLOSE,4);
VARC:=MAX(MAX(MAX(CLOSE,VAR8),VAR9),VARA);
VARD:=MIN(MIN(MIN(CLOSE,VAR8),VAR9),VARA);
红色持股: STICKLINE(CLOSE=VARC AND (VAR8 =VAR9 OR VAR8 =VARA)
OR VAR8=VARC AND (VAR9=VARD OR VARA=VARD) AND
CLOSE =VAR9 OR VAR9=VARC AND VARA=VARD AND CLOSE =VAR8
OR VARA=VARC AND CLOSE =VAR8 AND CLOSE =VAR9,VAR8,CLOSE,5,1)*VAR6,COLORRED;
品红变盘: STICKLINE(CLOSE=VARC AND VAR8=VARD,VAR9,CLOSE,5,1)*VAR6,COLORYELLOW;
黄色下跌: STICKLINE(CLOSE=VARD AND (VAR8 VAR9 OR VAR8 VARA) OR VAR8=VARD AND (VAR9=VARC OR

VARA=VARC) AND CLOSE VAR9 OR VAR9=VARD AND VARA=VARC AND CLOSE VAR8 OR VARA=VARD AND

CLOSE VAR8 AND CLOSE VAR9,VAR8,CLOSE,5,0)*VAR6,COLORYELLOW;
绿色买: STICKLINE(VAR8=VARC AND CLOSE=VARD,VAR9,CLOSE,5,0)*VAR6,COLORGREEN;}
STICKLINE(VAR8=VARD AND CLOSE =VAR9 OR (VAR9=VARD AND VAR8 =VARA OR VARA=VARD AND

VAR8 =VAR9) AND VAR9 VARB AND CLOSE =VAR8,VAR8,VAR9,5,0)*VAR6,COLORBLUE;
兰色抛售: STICKLINE(VAR8=VARC AND CLOSE VAR9 OR (VAR9=VARC AND VAR8 VARA OR VARA=VARC AND

VAR8 VAR9) AND VAR9 =VARB AND CLOSE VAR8,VAR8,VAR9,5,1)*VAR6,COLORBLUE;
{www.9m8.cn}VARE:=SAR(5,1,5);
VARF:=EMA(CLOSE,30);
VAR10:=IF(CLOSE 450,8,IF(CLOSE =20 AND CLOSE 150,0.2,IF(CLOSE 20 AND CLOSE =10,0.07,IF

(CLOSE 10,0.03,0.07))));}

变色龙: STICKLINE(CLOSE VARE,VARF,VARF+VAR10,6,0)*VAR6,COLORWHITE;
STICKLINE(CLOSE VARE,VARF,VARF-VAR10,6,0), COLORCYAN ;
STICKLINE(CROSS(CLOSE,VARE),VARF,VARF-VAR10,6,0)COLORMAGENTA;
STICKLINE(CROSS(VARE,CLOSE),VARF,VARF+VAR10,6,0)*VAR6,COLORMAGENTA;
STICKLINE(RANGE(DAY,6,9) OR RANGE(DAY,27,30),VARF+0.01,VARF-0.01,6,0)*VAR6,COLORMAGENTA;
生命线: FORCAST(CLOSE,30)*VAR6, CIRCLEDOT;
支撑: MA(CLOSE,13)*0.955*VAR6;