MA250:MA(CLOSE,250),LINETHICK3;

X_54:=CLOSE;

X_55:=FILTER(BACKSET(FILTER(REF(X_54,10)=HHV(X_54,2*10+1),10),10+1),10);

X_56:=FILTER(BACKSET(FILTER(REF(X_54,10)=LLV(X_54,2*10+1),10),10+1),10);

X_57:=REF(CLOSE,BARSLAST(X_55));

X_58:=REF(CLOSE,BARSLAST(X_56));

X_59:=BARSLAST(X_55)<BARSLAST(X_56) AND NOT(X_55);

X_60:=BARSLAST(X_55)>BARSLAST(X_56) AND NOT(X_56);

波段顶:IF(X_59,X_57,X_57),POINTDOT,COLORLIGREEN,LINETHICK4;

波段底:IF(X_60,X_58,X_58),POINTDOT,COLORMAGENTA,LINETHICK4;

A201:=SIGNALS_USER(201,0),NODRAW;

DRAWTEXT(A201>0 OR A201<0,L,VARCAT('五天后解禁 ',VAR2STR(A201,0))),COLORGREEN;

DRAWTEXT(A201<0,L,VARCAT('五天后解禁 ',VAR2STR(A201,0))),COLORGREEN;

DRAWTEXT(A201>0 OR A201<0,L,'五天后解禁 '),COLORGREEN;

A101:=SIGNALS_USER(101,0),NODRAW;

DRAWTEXT(A101>0 OR A101<0,H,'解禁日 '),COLORMAGENTA;

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0.9,0.9,1,STRCAT(Z3,GNBLOCK)),COLORFF61FF;

DRAWTEXT_FIX(ISLASTBAR,0.9,1,1,FGBLOCK),COLORFF61FF;

DK:=(MA(CLOSE, 5)+MA(CLOSE, 10)+MA(CLOSE, 13)+MA(CLOSE, 21))/4;

IF(DK<=REF(DK,1),DK,DRAWNULL),COLORGREEN,LINETHICK1,NODRAW;

IF(DK>REF(DK,1),DK,DRAWNULL),COLORRED,LINETHICK1,NODRAW;

多空:DK,NODRAW;

总股本:=FINANCE(1)/100000000;

流通股本:=FINANCE(7)/100000000;

未流通比:=(总股本-流通股本)/总股本*100;

现价:=C;

全流通后价:=C*流通股本/总股本;

解禁股:=IF((流通股本-REF(流通股本,1))>0,(流通股本-REF(流通股本,1)),0),COLORYELLOW;{流通股增加}

DRAWTEXT(解禁股>0, L,'解禁'),COLORYELLOW;

{偷摸过峰}

XXX_1:=8;

XXX_2:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*1,1);

XXX_3:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*2,1);

XXX_4:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*3,1);

XXX_5:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*4,1);

XXX_6:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*5,1);

XXX_7:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*6,1);

XXX_8:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*7,1);

XXX_9:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*8,1);

XXX_10:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*9,1);

XXX_11:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*10,1);

XXX_12:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*11,1);

XXX_13:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*12,1);

XXX_14:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*13,1);

XXX_15:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*14,1);

XXX_16:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*15,1);

XXX_17:=FINDHIGH(MAX(CLOSE,OPEN),3,XXX_1*16,1);

XXX_18:=1.03;

XXX_19:=0.985;

XXX_20:=CLOSE>REF(CLOSE,1) AND CLOSE>OPEN;

XXX_21:=CLOSE>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)*XXX_18;

XXX_22:=VOL<REF(VOL,1);

XXX_23:=XXX_21 AND XXX_22 AND XXX_20 AND REF(XXX_20,1);

PWS:XXX_23 AND (CLOSE>=XXX_2*XXX_19 AND CLOSE<=XXX_2*XXX_18 OR CLOSE>=XXX_3*XXX_19 AND CLOSE<=XXX_3*XXX_18 OR CLOSE>=XXX_4*XXX_19 AND CLOSE<=XXX_4*XXX_18 OR CLOSE>=XXX_5*XXX_19 AND CLOSE<=XXX_5*XXX_18 OR CLOSE>=XXX_6*XXX_19 AND CLOSE<=XXX_6*XXX_18 OR CLOSE>=XXX_7*XXX_19 AND CLOSE<=XXX_7*XXX_18 OR CLOSE>=XXX_8*XXX_19 AND CLOSE<=XXX_8*XXX_18 OR CLOSE>=XXX_9*XXX_19 AND CLOSE<=XXX_9*XXX_18 OR CLOSE>=XXX_10*XXX_19 AND CLOSE<=XXX_10*XXX_18 OR CLOSE>=XXX_11*XXX_19 AND CLOSE<=XXX_11*XXX_18 OR CLOSE>=XXX_12*XXX_19 AND CLOSE<=XXX_12*XXX_18 OR CLOSE>=XXX_13*XXX_19 AND CLOSE<=XXX_13*XXX_18 OR CLOSE>=XXX_14*XXX_19 AND CLOSE<=XXX_14*XXX_18 OR CLOSE>=XXX_15*XXX_19 AND CLOSE<=XXX_15*XXX_18 OR CLOSE>=XXX_16*XXX_19 AND CLOSE<=XXX_16*XXX_18 OR CLOSE>=XXX_17*XXX_19 AND CLOSE<=XXX_17*XXX_18),NODRAW;

DRAWICON(PWS,LOW*0.99,38);

DRAWTEXT(PWS,LOW*0.97,' 偷偷过左峰');

{K线解盘}

MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA20:=MA(CLOSE,20);

MA60:=MA(CLOSE,60);

MA120:=MA(CLOSE,120);

MA30:=MA(CLOSE,30);

N:=2;

N1:=9;

N2:=12;

N3:=26;

N4:=1;

TT:=240/FROMOPEN;

比:=TT;

J12:=(HIGH - ((HIGH - LOW) / 3));

J23:=(LOW + ((HIGH - LOW) / 3));

AAA:=CONST(HHV(H,90));

BBB:=CONST(LLV(L,100));

T1:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T2:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)

> REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02

AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2)),1,0));

T3:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));

T4:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));

T5:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T6:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)

> REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2)),1,0));

T7:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));

T8:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));

T9:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));

T10:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));

T11:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96

AND CLOSE<REF(OPEN,1)

AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04

AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1))),1,0));

T12:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97

AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)),1,0));

T13:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03

AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1)),1,0));

T14:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND

MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)

> MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));

T15:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND CLOSE=OPEN AND

CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)

,REF(OPEN,1))),1,0));

T16:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));

T17:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)

-REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));

T18:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));

T19:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)

>REF(OPEN,1) AND CLOSE>OPEN

AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));

T20:=CONST(IF((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN

AND CLOSE/OPEN&
[url=http://www.70822.com/soft/sort013/sort05/down-168167.html]K线解盘，一个比较有用的注明K线的解盘指标（通达信主图 源码 测试图）[/url]