DRAWGBK(1,COLORRGB(0,0,20),COLORRGB(0,60,50),1);

DRAWTEXTEX(CLOSE,1,0,22,STKLABEL+' '+STKNAME+''),colorDDFF;

BB:=BARPOS=SYSPARAM(1);

VARIABLE:WDAY[7]='星期六';

WDAY[1]:='星期日';

WDAY[2]:='星期一';

WDAY[3]:='星期二';

WDAY[4]:='星期三';

WDAY[5]:='星期四';

WDAY[6]:='星期五';

FY:=YEAR;

FM:=MONTH;

FD:=DAY;

WD:=WEEKDAY;

P:=SYSPARAM(1);

STR1:=''+'今日： '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];

DRAWTEXTEX(CLOSE,1,460,22,STR1),colorDDFF;

月向线:=98;

月量线:=100;

50,LINEDOT;

CS:=IF(CAPITAL<1,516,469);

A:=EMA(CLOSE,198)-EMA(CLOSE,CS);

B:=EMA(A,112);

月线下水:=A<0;

月转红:=A>=REF(A,1);

A11:EMA(CLOSE,55)-EMA(CLOSE,119),colorFF0000;

B1:=EMA(A11,36);

周线下水:=A11<0;

周红:=A11>=REF(A11,1);

周转红:=A11>=REF(A11,1) AND REF(A11>=REF(A11,1),1)=0;

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIFF,9);

MACD1:=2*(DIFF-DEA);

日转红:=MACD1>=0 AND REF(MACD1,1)<0;

PARTLINE(月转红,月向线),LINETHICK3,colorFFFFFF;

PARTLINE(周红,月量线),LINETHICK3,colorFF;

PARTLINE(月转红=0,月向线),LINEDOT,LINETHICK1,colorFF00;

PARTLINE(月线下水 AND 月转红=0,月向线),LINETHICK2,colorFF00;

PARTLINE(周红=0,月量线),LINEDOT,LINETHICK1,colorFF00;

PARTLINE(周线下水 AND 周红=0,月量线),LINETHICK2,colorFF00;

CS1:=100;

CS2:=HHV(ABS(MACD1),CS1);

CS3:=ABS(100/CS2);

MACD:(MACD1*CS3+100)/2,LINETHICK1,color74FFFF;

CS:=MACD;

日红:=CS>=REF(CS,1);

日转红:=日红 AND REF(日红,1)=0;

PARTLINE(日红,CS),LINETHICK3,colorFFFF;

A:=MA(VOL,5);

V1:=IF(CAPITAL<1,MA(A,74),A);

V2:=IF(CAPITAL<1,WMA(V1,360),WMA(V1,14));

V3:=(A-LLV(A,14))/(HHV(A,14)-LLV(A,14))*100;

V4:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

V7:=SMA(V4,3,1);

V8:=SMA(V7,3,1);

V5:=CROSS(V3,1) AND V1

V6:=CROSS(98,V3) AND V1>V2 AND V7>80;

W1:=CROSS(V7,V8) AND V8<20;

MACDMR:=W1 AND 周红;

DRAWICON(MACDMR,月量线,4),colorFF;

月WW1:=SMA((CLOSE-LLV(CLOSE,350))/(HHV(HIGH,350)-LLV(LOW,350)),54,1);

月线:=SMA((月WW1-LLV(月WW1,20))/(HHV(月WW1,20)-LLV(月WW1,20)),54,1)*100;

月价:月线,LINETHICK0,colorFFFFFF;

月ZZ:=SMA((VOL-LLV(VOL,350))/(HHV(VOL,350)-LLV(VOL,350)),54,1);

月量:SMA((月ZZ-LLV(月ZZ,20))/(HHV(月ZZ,20)-LLV(月ZZ,20)),54,1)*100,LINETHICK0,colorFF;

NN:=IF(MA(CLOSE,60)>MA(CLOSE,120),6,3);

NN:=3;

WW1:=SMA((CLOSE-LLV(CLOSE,21))/(HHV(HIGH,21)-LLV(LOW,21)),NN,1);

WW2:=SMA((WW1-LLV(WW1,5))/(HHV(WW1,5)-LLV(WW1,5)),NN,1)*100;

ZZ:=SMA((VOL-LLV(VOL,21))/(HHV(VOL,21)-LLV(VOL,21)),NN,1);

ZZ1:=SMA((ZZ-LLV(ZZ,5))/(HHV(ZZ,5)-LLV(ZZ,5)),NN,1)*100;

快线:=EMA(WW2,1);

价快:=快线;

慢线:=EMA(快线,2);

价慢:慢线,LINETHICK0,colorFF00;

STICKLINE(EMA(慢线,2)>=REF(EMA(慢线,2),1),EMA(慢线,1),REF(EMA(慢线,1),1),5,0),LINETHICK1,colorFF;

STICKLINE(EMA(慢线,2)

量快:EMA(ZZ1,1),LINEDOT,LINETHICK1,colorFFFFFF;

量慢:=EMA(量快,2);

PARTLINE(快线>=REF(快线,1),快线),LINETHICK1,colorFF;

PARTLINE(快线

PARTLINE(月线>=REF(月线,1),月线),LINEDOT,LINETHICK3,colorFFFFFF;

PARTLINE(月线

PARTLINE(月量>=REF(月量,1),月量),LINEDOT,LINETHICK1,color7400FF;

PARTLINE(月量

周WW1:=SMA((CLOSE-LLV(CLOSE,110))/(HHV(HIGH,110)-LLV(LOW,110)),16,1);

周线:=SMA((周WW1-LLV(周WW1,10))/(HHV(周WW1,10)-LLV(周WW1,10)),16,1)*100;

周价:周线,LINETHICK0,colorFF00FF;

周ZZ:=SMA((VOL-LLV(VOL,110))/(HHV(VOL,110)-LLV(VOL,110)),16,1);

周量:SMA((周ZZ-LLV(周ZZ,10))/(HHV(周ZZ,10)-LLV(周ZZ,10)),16,1)*100,LINETHICK0,colorFFFF;

快线2:=EMA(周线,1);

慢线2:=EMA(快线2,2);

量快2:=EMA(周量,1);

量慢2:=EMA(量快2,2);

DRAWICON(CROSS(快线2,慢线2),慢线2,10);

DRAWICON(CROSS(慢线2,快线2),快线2,11);

DRAWICON(CROSS(量快2,量慢2),量慢2,10);

DRAWICON(CROSS(量慢2,量快2),量快2,11);

PARTLINE(周线>=REF(周线,1),周线),LINETHICK2,colorFF00FF;

PARTLINE(周线>=REF(周线,1) AND 月线>=REF(月线,1),周线),LINETHICK3,colorFF;

PARTLINE(周线

PARTLINE(周量>=REF(周量,1),周量),LINEDOT,LINETHICK1,colorFFFF;

PARTLINE(周量

DRAWTEXT(FILTER(快线>=95 AND 慢线>=95 AND 周线>=90 OR 周量>=90,5),90,'周减'),PXUP4,colorFFFFFF;

DRAWTEXT(FILTER(快线>=95,5),95,'日减'),PXUP4,colorFFFFFF;

DRAWTEXT(周线>=REF(周线,1) AND CROSS(快线,慢线) AND 周线<50 AND 快线<50,快线+快线*0.1,'←价买'),colorFFFF;

DRAWTEXT(周量>=REF(周量,1) AND CROSS(快线,慢线) AND 周线<50 AND 快线<60,快线,'←量买'),colorFFFF;

DRAWICON(CROSS(价快,量快) AND 量快>60 AND 量快60 AND 价快

显示位置:=-6;

RSI6:(SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1))/(SMA(ABS(CLOSE-REF(CLOSE,1)),6,1))*100,LINEDOT,LINETHICK1,color6FFF;

DRAWICON(CROSS(RSI6,价快),RSI6,4),colorFF;

DRAWICON(CROSS(价快,RSI6),RSI6,5),colorFF00;

DRAWICON(CROSS(RSI6,周价),RSI6,4),colorFF;

LC:=REF(CLOSE,1);

月RS:=(SMA(MAX(CLOSE-LC,0),100,1))/(SMA(ABS(CLOSE-LC),100,1))*100;

月SI:=(SMA(MAX(CLOSE-LC,0),320,1))/(SMA(ABS(CLOSE-LC),320,1))*100;

PARTLINE(月RS>月SI,显示位置+2),LINETHICK4,colorFFFFFF;

PARTLINE(月RS<月SI,显示位置+2),LINEDOT,LINETHICK1,colorFF00;

周RS:=EMA((SMA(MAX(CLOSE-LC,0),25,1))/(SMA(ABS(CLOSE-LC),25,1))*100,2);

周SI:=EMA((SMA(MAX(CLOSE-LC,0),80,1))/(SMA(ABS(CLOSE-LC),80,1))*100,21);

PARTLINE(周RS>周SI,显示位置+4),LINETHICK4,colorFF;

PARTLINE(周RS<周SI,显示位置+4),LINEDOT,LINETHICK1,colorFF00;

有量:=130-15*(SMA(SMA(VOL,4,3)/SMA(VOL,24,4)+SMA(VOL,5,4)/SMA(VOL,36,4)*1.052,18,9));

STICKLINE(有量<=100,100-有量,0,2,0),color78FF;

攻击量:IF(有量<=100,100-有量,0),LINETHICK0,color78FF;

量买:周量>=REF(周量,1) AND CROSS(快线,慢线) AND 周线<50 AND 快线<60,LINETHICK0;

价买:周线>=REF(周线,1) AND CROSS(快线,慢线) AND 周线<50 AND 快线<50,LINETHICK0;

ST:=STRFIND(STKNAME,'ST',1)>0;

S:=STRFIND(STKNAME,'S',1)>0