Y8:=STRCAT(CON2STR(MONTH,0),' 月 '); 

R8:=STRCAT(CON2STR(DAY,0),' 日 '); 

NN:=BARSLAST(DATE!=REF(DATE,1))+1;

RHN:= REF(HHV(H,NN) ,0);

RLN:= REF(LLV(L,NN) ,0);

SJTJ:=DATE<1590301;

SJ:=SJTJ AND TIME<1590301;

ZS:=IF(DATE<REF(DATE,1) OR DATE>REF(DATE,1),REF(C,1),REF(REF(C,1),BARSLAST(DATE<REF(DATE,1) OR DATE>REF(DATE,1))));

KP:=IF(DATE<REF(DATE,1) OR DATE>REF(DATE,1),O,REF(O,BARSLAST(DATE<REF(DATE,1) OR DATE>REF(DATE,1))));

开:IF(SJTJ AND TIME>090000, KP,DRAWNULL),LINETHICK0,COLORYELLOW;

高:IF(SJTJ,RHN,DRAWNULL),LINETHICK0,COLORMAGENTA;

低:IF(SJTJ,RLN,DRAWNULL),LINETHICK0,COLORYELLOW;

HH1:=IF(H <REF(H,4) AND REF(H,1)<REF(H,4) AND REF(H,2)<REF(H,4) AND REF(H,3)<REF(H,4),REF(H,4),0);

LL1:=IF(L >REF(L,4) AND REF(L,1)>REF(L,4) AND REF(L,2)>REF(L,4) AND REF(L,3)>REF(L,4),REF(L,4),0);

HH2:=IF(HH1>0,HH1,REF(HH1,BARSLAST(HH1>0)));

LL2:=IF(LL1>0,LL1,REF(LL1,BARSLAST(LL1>0)));

K1:=IF(C>HH2 ,-3,IF(C<LL2 ,1,0));

K2:=IF(K1<0 OR K1>0,K1,REF(K1,BARSLAST(K1<0 OR K1>0)));

GX:=IF(C>10000,0.001,0.0005);

HH22:=IF(C>20000,HH2+20,HH2*(1+GX));

LL22:=IF(C>20000,LL2-20,LL2*(1-GX));

G:=IF(K2=1,HH22,LL22);

支撑:IF(REF(K2,1)=-3 AND SJTJ,REF(G,1),DRAWNULL),LINETHICK2,COLORRED;

压力:IF(REF(K2,1)=1 AND SJTJ,REF(G,1),DRAWNULL),LINETHICK2,COLORGREEN;

W2:=(O-C);

HKX1:=W2>0 AND K2=-3 AND SJTJ;HKX2:=W2<=0 AND K2=-3 AND SJTJ;

LKX1:=W2>0 AND K2=1 AND SJTJ;LKX2:=W2<=0 AND K2=1 AND SJTJ;

STICKLINE(HKX1,O,C,2,0),COLORRED;

STICKLINE(HKX1,O,H,0.0,0),COLORRED;

STICKLINE(HKX1,C,L,0.0,0),COLORRED;

STICKLINE(HKX2,O,C,2,1),COLORRED;

STICKLINE(HKX2,O,L,0.0,0),COLORRED;

STICKLINE(HKX2,C,H,0.0,0),COLORRED;

STICKLINE(LKX1,O,C,2,0),COLORCYAN;

STICKLINE(LKX1,O,H,0.0,0),COLORCYAN;

STICKLINE(LKX1,C,L,0.0,0),COLORCYAN;

STICKLINE(LKX2,C,O,2,1),COLORCYAN;

STICKLINE(LKX2,C,H,0.0,0),COLORCYAN;

STICKLINE(LKX2,O,L,0.0,0),COLORCYAN;

GDK:=ABS(ZS-KP)/ZS>0.02;

XB:=IF(C>13000,0.02,0.01);

GDK2:=ABS(ZS-KP)/ZS>XB;

KPGZ:=KP*1.0005;

KPDZ:=KP*0.9995;

HS11:= SJ AND C>KPGZ AND GDK2;

LS11:= SJ AND C<KPDZ AND GDK2;

HS22:= SJ AND C>=KPDZ AND REF(C,1)>=KPDZ AND GDK2;

LS22:= SJ AND C<=KPGZ AND REF(C,1)<=KPGZ AND GDK2;

HS:= HS11 OR HS22;

LS:= LS11 OR LS22;

GDJ:=IF(LS,RHN,RLN);

最高价:IF(C<KP AND TIME>090500 AND TIME<093000  , RHN,DRAWNULL),LINETHICK2,COLORGREEN;

最低价:IF(C>KP AND TIME>090500 AND TIME<093000  , RLN,DRAWNULL),LINETHICK2,COLORRED;

DRAWNUMBER(ISLASTBAR  AND TIME>090500 AND TIME<103000 AND GDK,GDJ,GDJ),COLORMAGENTA;

HKX3:=W2>0 AND HS AND SJ;HKX4:=W2<=0 AND HS AND SJ;

LKX3:=W2>0 AND LS AND SJ;LKX4:=W2<=0 AND LS AND SJ;

STICKLINE(HKX3,O,C,2,0),COLORRED;

STICKLINE(HKX3,O,H,0.0,0),COLORRED;

STICKLINE(HKX3,C,L,0.0,0),COLORRED;

STICKLINE(HKX4,O,C,2,1),COLORRED;

STICKLINE(HKX4,O,L,0.0,0),COLORRED;

STICKLINE(HKX4,C,H,0.0,0),COLORRED;

STICKLINE(LKX3,O,C,2,0),COLORCYAN;

STICKLINE(LKX3,O,H,0.0,0),COLORCYAN;

STICKLINE(LKX3,C,L,0.0,0),COLORCYAN;

STICKLINE(LKX4,C,O,2,1),COLORCYAN;

STICKLINE(LKX4,C,H,0.0,0),COLORCYAN;

STICKLINE(LKX4,O,L,0.0,0),COLORCYAN;

SJ8:=STRCAT(STRCAT(N8,Y8), R8); 

GX1:=IF(C>8000,0.001,0.0005);

HDK:=(K2=1 AND REF(K2,1)=-3 AND TIME<103500 AND NOT(GDK2)) OR (K2=1 AND REF(K2,1)=-3 AND TIME>103500) OR (K2=1 AND REF(K2,1)=1 AND REF(HS,1) AND TIME=103500);

DRAWTEXT(HDK  ,H*(1+GX1),1),COLORBLACK{COLORYELLOW};

LDD:=(K2=-3 AND REF(K2,1)=1 AND TIME<103500 AND NOT(GDK2)) OR (K2=-3 AND REF(K2,1)=1 AND TIME>103500) OR (K2=-3 AND REF(K2,1)=-3 AND REF(LS,1) AND TIME=103500);

DRAWTEXT(LDD  ,LOW,2),COLORBLACK{COLORYELLOW};

ODD:=(HS AND TIME<=090500 AND C>KP AND SJTJ) OR (HS AND REF(LS,1) AND TIME>090500 AND TIME<=102500 AND SJTJ );

DRAWTEXT(ODD,O,2),COLORBLACK{COLORYELLOW};

ODK:=(LS AND TIME<=090500 AND C<KP AND SJTJ) OR (LS AND REF(HS,1) AND TIME>090500 AND TIME<=102500 AND SJTJ);

DRAWTEXT(ODK,O,1),COLORBLACK{COLORYELLOW};

KKK1:=IF(CLOSE>10000,0.01,0.005);

GDK1:=ABS(ZS-KP)/ZS>KKK1;

HS1:=TIME>090500 AND TIME<=103000 AND HS AND GDK1;

HSZY:=HS1 AND K2=1 AND (G-H<KP*0.002);

HSZD:=TIME>090500 AND TIME<=103000 AND HS AND (REF(HS,1)=1) AND K2=-3 AND (REF(K2,1)=1); 

HSPD:=TIME>090500 AND TIME<=103000 AND HS AND K2=1 AND (REF(K2,1)=-3);

LS1:=TIME>090500 AND TIME<=103000 AND LS AND GDK1;

LSZY:=LS1 AND K2=-3 AND (L-G<KP*0.002);

LSZK:=TIME>090500 AND TIME<=103000 AND LS AND (REF(LS,1)=1) AND K2=1 AND (REF(K2,1)=-3); 

LSPK:=TIME>090500 AND TIME<=103000 AND LS AND K2=-3 AND (REF(K2,1)=1);

ZY8L:=(HSZY AND (REF(NOT(HSZY),1)=1)) OR (LSZY AND (REF(NOT(LSZY),1)=1));

DRAWTEXT(GDK AND TIME<=090500 AND SJTJ,KP,3),COLORBLACK;

XHL3:=IF(K2=-3,L,H);

DRAWTEXT_FIX(C>0,0.88,0,0,SJ8),COLOR00FFFF;

DRAWTEXT(HSZD OR LSZK,O,5),COLORYELLOW;

GX3:=IF(C>7000,0.01,0.005);

MXM:=RHN*(1+GX3);

AAA:=CONST(MXM);

GX2:=IF(C>8000,0.002,0.001);

GX4:=IF(C>5000,6,5);

ZHZ20:=IF(TIME<090000,KP,DYNAINFO(20));

ZHZ12:=IF(TIME<090000,KP,DYNAINFO(12));

ZHZ14:=IF(TIME<090000,KP,DYNAINFO(14));

DRAWTEXT(C AND CURRBARSCOUNT=(GX4+4) AND ZHZ14>0 AND TIME>090000 AND C>3500,AAA, 6),COLORWHITE;

DRAWTEXT(C AND CURRBARSCOUNT=(GX4+4) AND ZHZ14<0 AND TIME>090000 AND C>3500,AAA, 7),COLORWHITE;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)<0 AND TIME>090000 AND C>3500 ,AAA*(1+GX2),ZHZ20),COLORGREEN;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)<0 AND TIME>090000 AND C>3500,AAA,ZHZ12),COLORGREEN;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)<0 AND TIME>090000 AND C>3500,AAA*(1-GX2),ZHZ14*100),COLORGREEN;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)>0 AND TIME>090000 AND C>3500,AAA*(1+GX2),ZHZ20),COLORRED;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)>0 AND TIME>090000 AND C>3500,AAA,ZHZ12),COLORRED;

DRAWNUMBER( CURRBARSCOUNT=GX4 AND DYNAINFO(14)>0 AND TIME>090000 AND C>3500,AAA*(1-GX2),ZHZ14*100),COLORRED;

BBB:=CONST(ZHZ20);

DRAWNUMBER(ISLASTBAR AND ((REF(K2,1)=1) OR (REF(K2,1)=-3)) ,REF(G,1),REF(G,1)),COLORYELLOW;

XHL1:=IF(K2=-3,H,L);XHL2:=IF(LS,H,L);

FJTJ:=(HS AND REF(HS,1) AND TIME<103000) OR (LS AND REF(LS,1) AND TIME<103000) OR (K2=1 AND REF(K2=1,1) AND TIME>103000) OR (K2=-3 AND REF(K2=-3,1) AND TIME>103000);

KJC:=FJTJ AND ((V>25000 AND C>45000) OR (V>42000 AND C>20000) OR (V>15000 AND C>13000 AND C<20000) OR (V>40000 AND C>5500 AND C<13000)  OR (V>50000 AND C<6000)) AND TIME>091500 AND TIME<=145500;

KJC1:=KJC AND NOT(REF(KJC,1));

KJCZ:=IF(KJC1,XHL1,XHL2);

FJTJ1:=FJTJ AND (HSPD OR LSPK );

FJTJ2:=FJTJ AND (HSPD OR LSPK OR KJC1) AND NOT(HSZD OR LSZK) AND NOT(ODD OR ODK OR LDD OR HDK);

DRAWTEXT(FJTJ2 AND C>3500,KJCZ,8),COLORYELLOW;

DRAWNUMBER(ISLASTBAR AND C>0,C,C),COLORWHITE;

DRAWTEXT(((CROSS(C,HH2) AND REF(K2=-3,1)) OR (CROSS(LL2,C) AND REF(K2=1,1))) AND C>3500 AND NOT(FJTJ2),O,5),COLORYELLOW;