DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1,2,1);

TY:=C;

AW:=REF(TY,10)=HHV(TY,2*10+1); BW:=FILTER(AW,10); CW:=BACKSET(BW,10+1); HWD:=FILTER(CW,10);

A2W:=REF(TY,10)=LLV(TY,2*10+1); B2W:=FILTER(A2W,10); C2W:=BACKSET(B2W,10+1); LWD:=FILTER(C2W,10);

REF(H,BARSLAST(HWD)), COLORFF00FF,POINTDOT,LINETHICK5;

REF(L,BARSLAST(LWD)),COLORRED,POINTDOT,LINETHICK5;

STICKLINE(C>=O,H,L,0.3,1),COLOR0000FF;

STICKLINE(C>O,C,O,3,0),COLOR000096;

STICKLINE(C>O,C,O,3.2,0),COLOR0000A5;

STICKLINE(C>O,C,O,3,0),COLOR0000B4;

STICKLINE(C>O,C,O,3,0),COLOR0000C3;

STICKLINE(C>O,C,O,2,0),COLOR0000D2;

STICKLINE(C>O,C,O,3.2,0),COLOR0000E1;

STICKLINE(C>O,C,O,3,0),COLOR0000F0;

STICKLINE(C>O,C,O,3,0),COLOR0000FF;

STICKLINE(C<O,H,L,0.3,1),COLOR00FF00;

STICKLINE(O>=C,C,O,3,0),COLOR009600;

STICKLINE(O>=C,C,O,3.2,0),COLOR00A500;

STICKLINE(O>=C,C,O,3,0),COLOR00B400;

STICKLINE(O>=C,C,O,3,0),COLOR00C300;

STICKLINE(O>=C,C,O,3,0),COLOR00D200;

STICKLINE(O>=C,C,O,3.2,0),COLOR00E100;

STICKLINE(O>=C,C,O,3,0),COLOR00F000;

STICKLINE(O>=C,C,O,3,0),COLOR00FF00;

VAR0:=SMA(MAX(CLOSE-REF(C,1),0),12,1)/SMA(ABS(CLOSE-REF(C,1)),15,1)*100;

DRAWTEXT(CROSS(82,VAR0),H*1.04,'賣'),COLOR00FF00;

S:=C-REF(C,1);{WWW.CHNMONEY.COM}

DX:=100*EMA(EMA(S,6),6)/EMA(EMA(ABS(S),6),6);

買:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);

DRAWTEXT(FILTER(買=1,5),L*0.96,'買'),COLOR0000FF;

DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;

DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;

DRAWICON(CROSS(DA-DB,0),L*0.98,7);

JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;

DRAWICON(CROSS(84,JH),H*1.04,8);

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORFF00FF;

A1:=REF(HIGH,3)=HHV(HIGH,2*3+1);

B1:=FILTER(A1,3);

C1:=BACKSET(B1,3+1);

D1:=FILTER(C1,3);

A2:=REF(LOW,3)=LLV(LOW,2*3+1);

B2:=FILTER(A2,3);

C2:=BACKSET(B2,3+1);

D2:=FILTER(C2,3);

E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;

E2:=(HIGH+LOW)/2;

H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;

L1:=(D2 AND NOT(D1 AND E1<E2));

H2:=D1 AND NOT(D2 AND E1>=E2);

X1:=REF(BARSLAST(H1),1)+1;

F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));

G1:=F1>REF(F1,1);

I1:=BACKSET(G1,2);

LD:=I1>REF(I1,1);

L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;

X2:=REF(BARSLAST(L2),1)+1;

F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));

G2:=F2>REF(F2,1);

I2:=BACKSET(G2,2);

HD:=I2>REF(I2,1);

DRAWLINE(LD,L,HD,H,0),COLORFF00FF,LINETHICK1,;

DRAWLINE(HD,H,LD,L,0),COLORFF00FF,LINETHICK1,;