gspt1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1:=(EMA(gspt1,3)+EMA(gspt1,6)+EMA(gspt1,12)+EMA(gspt1,24))/4;
A2:=EMA(A1,2);
A3:=EMA(A2,2);
A4:=EMA(A3,2);
A5:=EMA(A4,2);
A6:=EMA(A5,2);
A7:=EMA(A6,2);
IF(A1>=REF(A1,1),A1,DRAWNULL),COLORRED;
IF(A1< REF(A1,1),A1,DRAWNULL),COLORCYAN;
IF(A2>=REF(A2,1),A2,DRAWNULL),COLORRED;
IF(A2< REF(A2,1),A2,DRAWNULL),COLORCYAN;
IF(A3>=REF(A3,1),A3,DRAWNULL),COLORRED;
IF(A3< REF(A3,1),A3,DRAWNULL),COLORCYAN;
IF(A4>=REF(A4,1),A4,DRAWNULL),COLORRED;
IF(A4< REF(A4,1),A4,DRAWNULL),COLORCYAN;
IF(A5>=REF(A5,1),A5,DRAWNULL),COLORRED;
IF(A5< REF(A5,1),A5,DRAWNULL),COLORCYAN;
IF(A6>=REF(A6,1),A6,DRAWNULL),COLORRED;
IF(A6< REF(A6,1),A6,DRAWNULL),COLORCYAN;
IF(A7>=REF(A7,1),A7,DRAWNULL),COLORRED;
IF(A7< REF(A7,1),A7,DRAWNULL),COLORCYAN;
N:=55;
TS:=BARSLAST(L=LLV(L,N));
STARTSIGNAL:=FILTERX(TS=0,BARSSINCE(C));
DAYSSINCESTART:=BARSLAST(STARTSIGNAL);
BASEDAYS:=CONST(DAYSSINCESTART);
BASELOW:=DRAWLINE(L=LLV(L,N),L,ISLASTBAR,REF(L,TS),1),COLORRED,LINETHICK1;
BASEHIGH:=DRAWLINE(L=LLV(L,N),CONST(HHV(H,TS)),ISLASTBAR,CONST(HHV(H,TS)),1),COLOR00CCCC;
TT:=BARSLAST(L=LLV(L,N));
AH:=IF(CURRBARSCOUNT<=BASEDAYS+1&&(TT+1>0),HHV(H,TT+1),DRAWNULL);
涨幅:=IF(CURRBARSCOUNT<=(BASEDAYS),100*(C/REF(L,TS)-1),0);
收益曲线:IF(CURRBARSCOUNT<=(BASEDAYS),100*(C/REF(L,TS)-1),0),COLORMAGENTA,NODRAW;
日增长:收益曲线-REF(收益曲线,1),NODRAW;
最高涨幅:=IF(CURRBARSCOUNT<=(BASEDAYS),100*(HHV(H,TS)/REF(L,TS)-1),0),COLORRED;
MA5:=MA(CLOSE,5),COLORWHITE,LINETHICK1;
MA20:=MA(CLOSE,20),COLORMAGENTA,LINETHICK1;
gspt3:=LLV(HIGH,240);
gspt4:=100*(CLOSE-gspt3)/gspt3;
gspt5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
gspt6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
gspt7:=0;
gspt8:=MA(HHV(CLOSE-REF(CLOSE,1),0),34)/MA(ABS(CLOSE-REF(CLOSE,1)),7)*100;
gspt9:=MA(HHV(CLOSE-REF(CLOSE,1),0),13)/MA(ABS(CLOSE-REF(CLOSE,1)),13)*100;
gsptA:=BARSCOUNT(CLOSE);
gsptB:=gspt8< 20&&gspt9< 23&&gsptA>35;
gsptC:=gsptB&&COUNT(gsptB,1)=1;
gsptD:=EMA(CLOSE,21)-EMA(CLOSE,8);
gsptE:=EMA(gsptD,5);
DRAWKLINE(H,O,L,C);
gspt59:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5);
gspt60:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1)&&REFX(CLOSE,4)< CLOSE&&REFX(CLOSE,5)< REFX(CLOSE,1)&&REFX(CLOSE,6)< REFX(CLOSE,2)&&REFX(CLOSE,7)< REFX(CLOSE,3)&&REFX(CLOSE,8)< REFX(CLOSE,4);
gspt61:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6);
gspt62:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1)&&REFX(CLOSE,4)< CLOSE&&REFX(CLOSE,5)< REFX(CLOSE,1)&&REFX(CLOSE,6)< REFX(CLOSE,2)&&REFX(CLOSE,7)< REFX(CLOSE,3);
gspt63:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7);
gspt64:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1)&&REFX(CLOSE,4)< CLOSE&&REFX(CLOSE,5)< REFX(CLOSE,1)&&REFX(CLOSE,6)< REFX(CLOSE,2);
gspt65:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8);
gspt66:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1)&&REFX(CLOSE,4)< CLOSE&&REFX(CLOSE,5)< REFX(CLOSE,1);
gspt67:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8)&&REF(CLOSE,5)>REF(CLOSE,9);
gspt68:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1)&&REFX(CLOSE,4)< CLOSE;
gspt69:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8)&&REF(CLOSE,5)< REF(CLOSE,9)&&REF(CLOSE,6)>REF(CLOSE,10);
gspt70:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2)&&REFX(CLOSE,3)< REF(CLOSE,1);
gspt71:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8)&&REF(CLOSE,5)< REF(CLOSE,9)&&REF(CLOSE,6)< REF(CLOSE,10)&&REF(CLOSE,7)>REF(CLOSE,11);
gspt72:=REFX(CLOSE,1)< REF(CLOSE,3)&&REFX(CLOSE,2)< REF(CLOSE,2);
gspt73:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8)&&REF(CLOSE,5)< REF(CLOSE,9)&&REF(CLOSE,6)< REF(CLOSE,10)&&REF(CLOSE,7)< REF(CLOSE,11)&&REF(CLOSE,8)>REF(CLOSE,12);
gspt74:=REFX(CLOSE,1)< REF(CLOSE,3);
gspt75:=CLOSE< REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8)&&REF(CLOSE,5)< REF(CLOSE,9)&&REF(CLOSE,6)< REF(CLOSE,10)&&REF(CLOSE,7)< REF(CLOSE,11)&&REF(CLOSE,8)< REF(CLOSE,12)&&REF(CLOSE,9)>REF(CLOSE,13);
gspt76:=IF(PERIOD< 4,LOW*(1-(PERIOD+1)/10*0.01),LOW*0.98);
gspt77:=IF(PERIOD< 4,HIGH*(1+(PERIOD+1)/10*0.01),HIGH*1.05);
gspt78:=CURRBARSCOUNT-1;
DRAWNUMBER(gspt59&&(gspt60||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)||(gspt78=3&&gspt70)||(gspt78=4&&gspt68)||(gspt78=5&&gspt66)||(gspt78=6&&gspt64)||(gspt78=7&&gspt62)),gspt76,1),COLORMAGENTA;
DRAWNUMBER(gspt61&&(gspt62||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)||(gspt78=3&&gspt70)||(gspt78=4&&gspt68)||(gspt78=5&&gspt66)||(gspt78=6&&gspt64)),gspt76,2),COLORMAGENTA;
DRAWNUMBER(gspt63&&(gspt64||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)||(gspt78=3&&gspt70)||(gspt78=4&&gspt68)||(gspt78=5&&gspt66)),gspt76,3),COLORMAGENTA;
DRAWNUMBER(gspt65&&(gspt66||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)||(gspt78=3&&gspt70)||(gspt78=4&&gspt68)),gspt76,4),COLORMAGENTA;
DRAWNUMBER(gspt67&&(gspt68||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)||(gspt78=3&&gspt70)),gspt76,5),COLORMAGENTA;
DRAWNUMBER(gspt69&&(gspt70||gspt78=0||(gspt78=1&&gspt74)||(gspt78=2&&gspt72)),gspt76,6),COLORMAGENTA;
DRAWNUMBER(gspt71&&(gspt72||gspt78=0||(gspt78=1&&gspt74)),gspt76,7),COLORMAGENTA;
DRAWNUMBER(gspt73&&(gspt74||gspt78< 1),gspt76,8),COLORMAGENTA;
DRAWNUMBER(gspt75,gspt76,9),COLORGREEN;
gspt79:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)< REF(CLOSE,5);
gspt80:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1)&&REFX(CLOSE,4)>CLOSE&&REFX(CLOSE,5)>REFX(CLOSE,1)&&REFX(CLOSE,6)>REFX(CLOSE,2)&&REFX(CLOSE,7)>REFX(CLOSE,3)&&REFX(CLOSE,8)>REFX(CLOSE,4);
gspt81:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)< REF(CLOSE,6);
gspt82:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1)&&REFX(CLOSE,4)>CLOSE&&REFX(CLOSE,5)>REFX(CLOSE,1)&&REFX(CLOSE,6)>REFX(CLOSE,2)&&REFX(CLOSE,7)>REFX(CLOSE,3);
gspt83:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)< REF(CLOSE,7);
gspt84:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1)&&REFX(CLOSE,4)>CLOSE&&REFX(CLOSE,5)>REFX(CLOSE,1)&&REFX(CLOSE,6)>REFX(CLOSE,2);
gspt85:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)< REF(CLOSE,8);
gspt86:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1)&&REFX(CLOSE,4)>CLOSE&&REFX(CLOSE,5)>REFX(CLOSE,1);
gspt87:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8)&&REF(CLOSE,5)< REF(CLOSE,9);
gspt88:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1)&&REFX(CLOSE,4)>CLOSE;
gspt89:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8)&&REF(CLOSE,5)>REF(CLOSE,9)&&REF(CLOSE,6)< REF(CLOSE,10);
gspt90:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2)&&REFX(CLOSE,3)>REF(CLOSE,1);
gspt91:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8)&&REF(CLOSE,5)>REF(CLOSE,9)&&REF(CLOSE,6)>REF(CLOSE,10)&&REF(CLOSE,7)< REF(CLOSE,11);
gspt92:=REFX(CLOSE,1)>REF(CLOSE,3)&&REFX(CLOSE,2)>REF(CLOSE,2);
gspt93:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8)&&REF(CLOSE,5)>REF(CLOSE,9)&&REF(CLOSE,6)>REF(CLOSE,10)&&REF(CLOSE,7)>REF(CLOSE,11)&&REF(CLOSE,8)< REF(CLOSE,12);
gspt94:=REFX(CLOSE,1)>REF(CLOSE,3);
gspt95:=CLOSE>REF(CLOSE,4)&&REF(CLOSE,1)>REF(CLOSE,5)&&REF(CLOSE,2)>REF(CLOSE,6)&&REF(CLOSE,3)>REF(CLOSE,7)&&REF(CLOSE,4)>REF(CLOSE,8)&&REF(CLOSE,5)>REF(CLOSE,9)&&REF(CLOSE,6)>REF(CLOSE,10)&&REF(CLOSE,7)>REF(CLOSE,11)&&REF(CLOSE,8)>REF(CLOSE,12)&&REF(CLOSE,9)< REF(CLOSE,13);
DRAWNUMBER(gspt79&&(gspt80||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)||(gspt78=3&&gspt90)||(gspt78=4&&gspt88)||(gspt78=5&&gspt86)||(gspt78=6&&gspt84)||(gspt78=7&&gspt82)),gspt77,1),COLORMAGENTA;
DRAWNUMBER(gspt81&&(gspt82||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)||(gspt78=3&&gspt90)||(gspt78=4&&gspt88)||(gspt78=5&&gspt86)||(gspt78=6&&gspt84)),gspt77,2),COLORMAGENTA;
DRAWNUMBER(gspt83&&(gspt84||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)||(gspt78=3&&gspt90)||(gspt78=4&&gspt88)||(gspt78=5&&gspt86)),gspt77,3),COLORMAGENTA;
DRAWNUMBER(gspt85&&(gspt86||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)||(gspt78=3&&gspt90)||(gspt78=4&&gspt88)),gspt77,4),COLORMAGENTA;
DRAWNUMBER(gspt87&&(gspt88||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)||(gspt78=3&&gspt90)),gspt77,5),COLORMAGENTA;
DRAWNUMBER(gspt89&&(gspt90||gspt78=0||(gspt78=1&&gspt94)||(gspt78=2&&gspt92)),gspt77,6),COLORMAGENTA;
DRAWNUMBER(gspt91&&(gspt92||gspt78=0||(gspt78=1&&gspt94)),gspt77,7),COLORMAGENTA;
DRAWNUMBER(gspt93&&(gspt94||gspt78< 1),gspt77,8),COLORMAGENTA;
DRAWNUMBER(gspt95,gspt77,9),COLORGREEN;
字:=STRCAT(STRCAT(STRCAT('【',STKNAME),'】'),HYBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,字),COLORYELLOW;
PWXSS:=MA(C,5)>REF(MA(C,5),1)&&MA(C,5)>MA(C,10)&&MA(C,10)>REF(MA(C,10),1)&&MA(C,10)>MA(C,20)&&MA(C,20)>REF(MA(C,20),1)&&MA(C,20)>MA(C,60)&&MA(C,60)>REF(MA(C,60),1)&&MA(C,60)>MA(C,120)&&MA(C,120)>REF(MA(C,120),1)&&MA(C,120)>MA(C,240)&&MA(C,240)>REF(MA(C,240),1)&&C>MA(C,5);
DRAWTEXT_FIX(ISLASTBAR&&PWXSS,0.51,0.11,0,STRCAT('均线排列:','五线顺上')),COLORRED;
PSXSS:=MA(C,5)>REF(MA(C,5),1)&&MA(C,5)>MA(C,10)&&MA(C,10)>REF(MA(C,10),1)&&MA(C,10)>MA(C,20)&&MA(C,20)>REF(MA(C,20),1)&&C>MA(C,5);
DRAWTEXT_FIX(ISLASTBAR&&PSXSS&&NOT(PWXSS),0.01,0.11,0,STRCAT('均线排列:','三线顺上')),COLORRED;
CBWXSS:=C>COST(90)&&COST(90)>REF(COST(90),1)&&COST(80)>REF(COST(80),1)&&COST(70)>REF(COST(70),1)&&COST(60)>REF(COST(60),1)&&COST(50)>REF(COST(50),1)&&COST(40)>REF(COST(40),1)&&COST(30)>REF(COST(30),1)&&COST(20)>REF(COST(20),1)&&COST(10)>REF(COST(10),1)&&COST(5)>REF(COST(5),1);
DRAWTEXT_FIX(ISLASTBAR&&CBWXSS,0.51,0.18,0,STRCAT('成本均线:','十线顺上')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR&&CBWXSS,0.51,0.27,0,STRCAT(STRCAT('净利润额:',CON2STR(FINANCE(30)/10000,0)),'万')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR&&CBWXSS,0.51,0.35,0,STRCAT(STRCAT('收益:',CON2STR(FINANCE(33),2)),'元')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.11,0,STRCAT(STRCAT('上涨:',CON2STR(BASEDAYS,0)),'天')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.21,0,STRCAT(STRCAT('涨幅:',CON2STR(CONST(涨幅),2)),'%')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.31,0,STRCAT(STRCAT('最高涨幅:',CON2STR(CONST(最高涨幅),2)),'%')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.41,0,STRCAT(STRCAT('日内涨幅:',CON2STR(CONST(日增长),2)),'%')),COLORMAGENTA;