所属地区:DRAWTEXT_FIX(1,0,0,0,'地区：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0,0,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(1,0,0.08,0,'行业：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.08,0,HYBLOCK),COLORYELLOW;
所属概念:DRAWTEXT_FIX(1,0,0.16,0,'概念：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.16,0,GNBLOCK),COLORYELLOW;
所属风格:DRAWTEXT_FIX(1,0,0.24,0,'风格：'),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.24,0,FGBLOCK),COLORYELLOW;
{当前价咯线}
收盘价:REFDATE(C,DATE),DOTLINE,COLORLIGREEN;
{确定基柱}
JZ:=V/REF(V,1)>=1.9 AND C>O ;
{确定将军柱}
A1:=O<MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3)) OR O<(REFX(L,1)+REFX(L,2)+REFX(L,3))/3;
JJZ:=JZ AND A1;
STICKLINE(JJZ,C,O,3,0),COLORRED;
DD:=MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3));
{确定黄金柱}
A2:=V>REFX(V,1) AND REFX(V,1)>REFX(V,2) AND REFX(V,2)>REFX(V,3);
A3:=C<REFX(L,1) AND REFX(L,1)<REFX(L,2) AND REFX(L,2)<REFX(L,3) AND REFX(C,3)>REFX(O,3);
DRAWICON(JZ AND A2 AND A3,L,1);
STICKLINE(JZ AND A2 AND A3,C,O,3,0),COLORYELLOW;
{画出黄金线}
AA:=REF(DD,BARSLAST(JJZ));
{必杀线}
T1B:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1B));
CC:=CONST(CURRBARSCOUNT);
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2B));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
必杀线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}
DRAWTEXT(ISLASTBAR, T3HIGH, '必杀线')LINETHICK1,COLORWHITE;
MA5K:必杀线,COLORYELLOW,LINETHICK1;
EXP7:EMA(CLOSE,7);
VAR2:EMA(C,21),COLORRED,LINETHICK1;
上翘:IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),,COLORRED,LINETHICK1;
下拐:IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),COLORGREEN,LINETHICK1;
VAR1:MA(C,105),COLORRED;
上升:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORRED;
下降:IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORGREEN;
年线:MA(C,360),COLORWHITE POINTDOT;
IF(年线>=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORRED;
IF(年线<=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORGREEN;
P:=8;
KE:=V*(H-L)/REF(C,1);
KEP:=KE=HHV(KE,P);
KUD:=BARSLAST(KEP);
{红评台收:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORYELLOW;}
红评台低:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,L,REF(L,KUD)),DRAWNULL),POINTDOT,COLORWHITE;
回调警戒:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C-(C-REF(C,1))*0.618,REF(C-(C-REF(C,1))*0.618,KUD)),DRAWNULL),POINTDOT,COLORBLUE;
绿评台收:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORGREEN;
企稳警戒:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C+(REF(C,1)-C)*0.618,REF(C+(REF(C,1)-C)*0.618,KUD)),DRAWNULL),POINTDOT,COLORLIRED;
{STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红评台收,红评台收,6,1),COLORYELLOW;}
STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红评台低,红评台低,6,1),COLORWHITE;
STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),回调警戒,回调警戒,6,1),COLORBLUE;
STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),绿评台收,绿评台收,6,1),COLORGREEN;
STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),企稳警戒,企稳警戒,6,1),COLORLIRED;
