自用选股公式_

长阴短柱选股公式　:

选股通用公式：C/REF(C,1)<0.95 and V<REF(V,1)/1.9;

盘中选股公式：C/REF(C,1)<0.95 and V*240/FROMOPEN<REF(V,1)/1.9;

财务数据:

DRAWGBKLAST(CLOSE>0, STRIP(RGB(10,10,10),RGB(50,15,8),0));   
X:=1;   
DRAWTEXTABS(10,10,'所属板块:'+BKNAME),LINETHICK2,COLOR0000FF;   
DD:=FINANCE2(35)*X;    
SS:=FINANCE2(37)*X;    
GG:=(FINANCE2(33)/FINANCE2(35))/10*X;    
HH:=DYNAINFO(39)*X;   
DRAWTEXTABS(10,28,'总股本:'+NUMTOSTRN(DD,0)+'万'+'.流通A股:'+NUMTOSTRN(SS,0)   
+'万'+'.人均持股:'+CEILING(CAPITAL*100/EXTRADATA('散户线'))+'.市盈率:'  
+NUMTOSTRN(HH,2)+''+'.每股收益:'+NUMTOSTRN(GG,3)),LINETHICK2,COLORWHITE;   
DRAWTEXTABS(10,100,'机构评级:'+EXTRASTRING('评级')),LINETHICK2,COLOR8285FF;   
流通市值:=C*CAPITAL*VOLUNIT/100000000;   
市净率:=DYNAINFO(58);    
F:=COST(5 );   
J:=COST(95 );    
M:=COST(15 );   
N:=COST(85 );    
F1:=(J-F)/(F+J)*100;   
M1:=(N-M)/(N+M)*100;    
成本集中度:=F1;    
莸利比例:=WINNER(C )*100;    
日换手率:=VOL/CAPITAL*100;    
净资产:=FINANCE2(4)*X;    
每股公积金:=FINANCE2(7)*X;   
每股未分配:=FINANCE2(8)*X;   
股东权益比:=FINANCE2(9)*X;    
主营同比:=FINANCE2(11)*X;    
净利润同比:=FINANCE2(10)*X;    
净资收益率:=FINANCE2(5)*X;     
毛利润率:=FINANCE2(12)*X;    
现金流:=FINANCE2(6)*X;   
现金比:=FINANCE2(23)/FINANCE2(14)*100;   
负债比:=FINANCE2(20)/FINANCE2(14)*100;   
DRAWTEXTABS(10,46,'流通市值:'+流通市值+' '),LINETHICK2,COLORFF00FF;   
DRAWTEXTABS(140,46,'市净率:'+市净率+' '),LINETHICK2,COLORFF00FF;    
DRAWTEXTABS(280,46,'成本集中度:'+成本集中度+'% '),LINETHICK2,COLORFF00FF;    
DRAWTEXTABS(420,46,'莸利比例:'+莸利比例+'% '),LINETHICK2,COLORFF00FF;    
DRAWTEXTABS(560,46,'日换手率:'+日换手率+'% '),LINETHICK2,COLORFF00FF;    
DRAWTEXTABS(10,64,'净资产:'+净资产+'元 '),LINETHICK2,COLORGREEN;    
DRAWTEXTABS(140,64,'每股公积金:'+每股公积金+'元 '),LINETHICK2,COLORGREEN;   
DRAWTEXTABS(280,64,'每股未分配:'+每股未分配+'元 '),LINETHICK2,COLORGREEN;    
DRAWTEXTABS(420,64,'股东权益比:'+股东权益比+'% '),LINETHICK2,COLORGREEN;    
DRAWTEXTABS(560,64,'负债比:'+负债比+'% '),LINETHICK2,COLORGREEN;    
DRAWTEXTABS(10,82,'主营同比:'+主营同比+'% '),LINETHICK2,COLOR00FFFF;    
DRAWTEXTABS(140,82,'净利润同比:'+净利润同比+'% '),LINETHICK2,COLOR00FFFF;    
DRAWTEXTABS(280,82,'净资收益率:'+净资收益率+'% '),LINETHICK2,COLOR00FFFF;   
DRAWTEXTABS(420,82,'毛利润率:'+毛利润率+'% '),LINETHICK2,COLOR00FFFF;   
DRAWTEXTABS(560,82,'现金流:'+现金流+'元 '),LINETHICK2,COLOR00FFFF;   
DRAWTEXTABS(672,82,'现金比:'+现金比+'% '),LINETHICK2,COLOR00FFFF;    
  
GJ:=IF(C=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(V+0.01)/100);   
TT1:='今日成交量大于昨日,且有继续增大趋势';   
TT2:='今日成交量小于昨日，但有放大迹象';   
TT3:='今日成交量大于昨日, 但有缩小迹象';   
TT4:='今日成交量小于昨日，且有缩小迹象';   
TT:=IFS(BARSTATUS=2 AND V>REF(V,1) AND MA(V,5)>REF(MA(V,5),1),TT1,IFS(BARSTATUS=2 AND V<REF(V,1) AND MA(V,5)>REF(MA(V,5),1),TT2   
,IFS(BARSTATUS=2 AND V>REF(V,1)AND MA(V,5)<REF(MA(V,5),1),TT3,TT4)));   
DRAWTEXTABS(460,100,TT),LINETHICK2,COLOR8285FF;

风险评估:

{ 参数n:40   100   55 }

活期存款利率:=0.81*1.0;
一年期存款利率:=3.87*1.0;
三年期存款利率:=5.22*1.0;
名义无风险利率:=一年期存款利率;
风险补偿率:=0.03986;
投资期望收益率:=名义无风险利率+风险补偿率;
风险补偿率二:=0.03986;
名义无风险利二:=三年期存款利率;
i2:=名义无风险利二+风险补偿率二;
v0:=1/(1+投资期望收益率);
x0:=1/(1+i2);
m2:=1;
k1:=0.68;
k11:=0.75;
v1:=(POW(1+投资期望收益率,K1)-1)/投资期望收益率;
x1:=(POW(1+i2,K11)-1)/i2;
g:=0.03;
m:=2;
g2:=0.05;
v2:=1-POW((1+g)/(1+投资期望收益率),m-1);
x2:=1-POW((1+g2)/(1+i2),m2-1);
v3:=(1+g)*v2/(投资期望收益率-g);
x3:=(1+g2)*x2/(i2-g2);
v4:=POW(v0,k1+(m-1))/投资期望收益率;
x4:=POW(x0,k11+(m2-1))/i2;
v5:=(v1+v3);
x5:=(x1+x3);
每股收益:=FINANCE2(3);
预期每股收益:=0.278;
预期每股收益二:=0.29;
股息分配比例:=0.35;
股息分配比例二:=0.42;
红股折算股息:=0.12;
红股折算股息二:=0.09;
现金股息:=预期每股收益*股息分配比例;
现金股息二:=预期每股收益二*股息分配比例二;
基准股息:=现金股息+红股折算股息;
基准股息二:=现金股息二+红股折算股息二;
d:=基准股息;
d2:=基准股息二;
上证指数平均价:="SH000001$AMOUNT"/"SH000001$VOL"/100;
深圳成指平均价:="SZ399001$AMOUNT"/"SZ399001$VOL"/100;
沪深个股平均价:=("SH000001$AMOUNT"+"SZ399001$AMOUNT")/("SH000001$VOL"+"SZ399001$VOL")/100;
股票平均成交价:=AMOUNT/(VOL*100);
股票理论价格:=d*POW(V0,K1)*v5+d*POW(1+g,m-1)*v4;
股票理论价格二:=d2*POW(x0,K11)*x5+d2*POW(1+g2,m2-1)*x4;
股价泡沫率估算:=100*(股票平均成交价-股票理论价格)/股票理论价格/1000;
泡沫估算二:=100*(股票平均成交价-股票理论价格二)/股票理论价格二;
今成交均价:=股票平均成交价;
理论价估算:=股票理论价格;
理论价二:=股票理论价格二;
每股市盈率:=DYNAINFO(39);
股票合理市赢率:=股票理论价格/预期每股收益*100;
股票合理市赢二:=股票理论价格二/预期每股收益二;
合理市赢二:=股票合理市赢二;
十日均价泡沫估:=100*(ma(股票平均成交价,10)-股票理论价格)/股票理论价格/1000;
{趋势+逃顶 参数n:40 100 55 }
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2:=SMA(VAR1,9,1)+100;
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4:=SMA(VAR3,3,1);
VAR5:=SMA(VAR4,3,1)+100;
VAR6:=VAR5-VAR2;
个股升降坐标:IF(VAR6>n,VAR6-n,0),PRECIS2,colorf00ff0;
STICKLINE(REF(个股升降坐标,1)<个股升降坐标,个股升降坐标,REF(个股升降坐标,1),5,0),colorf00ff0;
STICKLINE(REF(个股升降坐标,1)>个股升降坐标,个股升降坐标,REF(个股升降坐标,1),5,0),color00ff00;
历史最高成交价:=HHV(HIGH,0);
历史最低成交价:=LLV(LOW,0);
H1:=INDEXA;
大盘短线压力:=(((INDEXC + INDEXL) + INDEXH) / 3);
XHH:=((INDEXA / INDEXV) / 100);
短线支撑:=(IF((INDEXC > 200),大盘短线压力,XHH) - INDEXL);
大盘短线支撑:=(INDEXC - 短线支撑);
VAR193:=(INDEXC + 短线支撑);
DRAWTEXTABS(20,5,'■活期存款利率:'+NUMTOSTRN(活期存款利率,2)+'%'),Color00FFFF;
DRAWTEXTABS(170,5,'■一年期存款利率:'+NUMTOSTRN(一年期存款利率,2)+'%'),Color00FFFF;
DRAWTEXTABS(325,5,'■三年期存款利率:'+NUMTOSTRN(三年期存款利率,2)+'%'),Color00FFFF;
DRAWTEXTABS(490,5,'■存款名义无风险利率:'+NUMTOSTRN(名义无风险利率,2)+'%'),Color00FFFF;
DRAWTEXTABS(20,20,'■存款风险补偿率:'+NUMTOSTRN(风险补偿率,2)+'%'),Color00FFFF;
DRAWTEXTABS(170,20,'■个股股息分配比例:'+NUMTOSTRN(股息分配比例,2)+'%'),Color00FFFF;
DRAWTEXTABS(325,20,'■个股分红折算股息:'+NUMTOSTRN(红股折算股息,2)+'元'),Color00FFFF;
DRAWTEXTABS(490,20,'■持有个股基准股息:'+NUMTOSTRN(基准股息,2)+'元/股'),Color00FFFF;
DRAWTEXTABS(20,75,'■当前每股收益:'+NUMTOSTRN(每股收益,2)+'元'),Color00FF00;
DRAWTEXTABS(175,75,'■理想预期每股收益:'+NUMTOSTRN(预期每股收益,2)+'元'),Color00FF00;
DRAWTEXTABS(345,75,'■当前每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),Color00FF00;
DRAWTEXTABS(520,75,'■个股合理市赢率:'+NUMTOSTRN(股票合理市赢率,2)+'倍'),Color00FF00;
DRAWTEXTABS(680,75,'■投资期望收益率:'+NUMTOSTRN(投资期望收益率,2)+'%'),Color00FF00;
DRAWTEXTABS(20,90,'■上证指数均价:'+NUMTOSTRN(上证指数平均价,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(175,90,'■深圳成指均价:'+NUMTOSTRN(深圳成指平均价,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(345,90,'■沪深个股平均价:'+NUMTOSTRN(沪深个股平均价,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(520,90,'■个股对应大盘平均成交价:'+NUMTOSTRN(股票平均成交价,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(20,105,'■对应经济周期【股价泡沫率】估算:'+NUMTOSTRN(股价泡沫率估算,0)+'% →'),ColorFFFF00;
DRAWTEXTABS(265,105,'当前个股成交均价:'+NUMTOSTRN(今成交均价,2)+'元 →'),ColorFFFF00;
DRAWTEXTABS(440,105,'对应经济周期十日【均价泡沫率】估算:'+NUMTOSTRN(十日均价泡沫估,0)+'%'),ColorFFFF00;
DRAWTEXTABS(20,120,'■历史最高成交价:'+NUMTOSTRN(历史最高成交价,2)+'元'),Color0000FF;
DRAWTEXTABS(200,120,'■历史最低成交价:'+NUMTOSTRN(历史最低成交价,2)+'元'),Color0000FF;
DRAWTEXTABS(370,120,'■大盘短线压力: '+NUMTOSTRN(大盘短线压力,2)+'点'),Color0000FF;
DRAWTEXTABS(540,120,'■大盘短线支撑: '+NUMTOSTRN(大盘短线支撑,2)+'点'),Color0000FF;

成交量：

成交量:VOL,COLORWHITE,PRECIS0,LINETHICK0;
换手率:=VOL/CAPITAL*100;
成交额:=AMOUNT;
T:=TIMETOT0(CURRENTTIME)/60;
交易日:=IF(CURRENTDATE=DATE,1,0);
交易时间:=IF(交易日=1 AND CURRENTTIME>=93000 AND CURRENTTIME<150000 AND DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,
IF(CURRENTTIME<113000,(T-570),IF(CURRENTTIME>130000,(T-660),120)),240);
虚拟量:VOL*240/交易时间,COLORYELLOW,PRECIS0,LINETHICK0;
虚换手:换手率*240/交易时间,COLORFF00FF,PRECIS2,LINETHICK0;
虚拟额:成交额*240/交易时间/10000,COLORWHITE,PRECIS0,LINETHICK0;
量比:="量比#MIN1";
获利盘:=WINNER(CLOSE)*100;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和度:IF(SAT>1,1,SAT)*100,COLORYELLOW,PRECIS2,LINETHICK0;
STICKLINE(DISPSTATUS=2 AND 交易时间>0,VOL,VOL*240/交易时间,8,1),COLORYELLOW;
STICKLINE(C>=O,0,VOL,8,0),COLOR000011;
STICKLINE(C>=O,0,VOL,6.5,0),COLOR000033;
STICKLINE(C>=O,0,VOL,5,0),COLOR000055;
STICKLINE(C>=O,0,VOL,3.5,0),COLOR000077;
STICKLINE(C>=O,0,VOL,2,0),COLOR000099;
STICKLINE(C>=O,0,VOL,0.5,0),COLOR0000BB;
STICKLINE(C<O,0,VOL,8,0),COLOR222200;
STICKLINE(C<O,0,VOL,6.5,0),COLOR333300;
STICKLINE(C<O,0,VOL,5,0),COLOR444400;
STICKLINE(C<O,0,VOL,3.5,0),COLOR555500;
STICKLINE(C<O,0,VOL,2,0),COLOR666600;
STICKLINE(C<O,0,VOL,0.5,0),COLOR777700;
VAR1:=DYNAINFO(17)*REF(MA(VOL,5),1);
VAR2:=DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT;
预测:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VAR1,VAR2)/10000;
预测量:STICKLINE(IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VAR1,VAR2),VAR1,0,7,1),COLORGRAY;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),POINTDOT,COLORRED;
主卖:IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,AA*(HIGH-LOW),VOL /2)),COLORCYAN,POINTDOT;
资金异动:VOL/MA(VOL,55)*100,COLORYELLOW;
{量柱副图}
PERIOD5:=COUNT(DATE<>REF(DATE,1),2)=2;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
VVOL:IF(BARSCOUNT(CLOSE)=1 AND PERIOD5,VOL*240/FROMOPEN,0),LINETHICK0;
STICKLINE(BARSCOUNT(CLOSE)=1 AND PERIOD5,VVOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>REF(V,1)*1.9;
AA1:=VOL<REF(LLV(VOL,13),1);
AA2:=VOL<REF(LLV(VOL,55),1);
STICKLINE(AA,0,V,4,0),COLORYELLOW;
STICKLINE(AA1,0,V,4,0),COLORGREEN;
STICKLINE(AA2,0,V,4,0);
TJ1:=COUNT(V>REF(V,1)*1.9,4)=1;
TJ2:=COUNT(V<REF(V,1) AND L>MIN(L,4) AND L>REF(L,1),3)=3 ;
TJ3:=TJ1 AND TJ2;
STICKLINE(TJ3,0,V,4,0),COLORRED;
MV2:=MA(V,2);
MV6:=MA(V,6);
MV20:=MA(V,20);
量柱:V/CAPITAL*100,VOLSTICK;
倍量柱:=IF(V/REF(V,1)>1.9 AND C>REF(C,1),1,0);
高量柱:=IF(V=HHV(V,10),3,2);
低量柱:=IF(V=LLV(V,10),9,8);
并肩平量柱:=IF((V/REF(V,1)>0.95 AND V/REF(V,1)<1.05),7,6);
缩量柱:=IF(V<REF(V,1) AND REF(V,1)<REF(V,2) AND REF(V,2)<REF(V,3),25,35);
梯量柱:=IF(V>REF(V,1) AND REF(V,1)>REF(V,2) AND REF(V,2)>REF(V,3),11,10);
{}
V5:MA(VOL,5),COLORFF00FF,PRECIS0,LAYER0;
V35:MA(VOL,35),COLORGREEN,PRECIS0,LAYER0;
V135:MA(VOL,135),COLORWHITE,PRECIS0,LAYER0;
DRAWTEXTREL(2,25,'量　比:'),COLORYELLOW;
DRAWTEXTREL(60,25,NUMTOSTRN(量比,2)),COLORYELLOW;
DRAWRECTREL(125,25,325,225,RGB(30,30,30)),COLORYELLOW;
DRAWRECTREL(125,25,IF(125+量比*10<=325,125+量比*10,325),225,RGB(155,50,50)),COLORYELLOW;
DRAWTEXTREL(400,25,'■紫线5天'),COLORFF00FF;
DRAWTEXTREL(500,25,'■绿线35天'),COLORGREEN;
DRAWTEXTREL(600,25,'■白线135天'),COLORWHITE;
DRAWTEXTREL(2,275,'虚换手:'),COLORYELLOW;
DRAWTEXTREL(60,275,NUMTOSTRN(虚换手,2)+'%'),COLORYELLOW;
DRAWRECTREL(125,275,325,475,RGB(30,30,30)),COLORYELLOW;
DRAWRECTREL(125,275,IF(125+虚换手*10<=325,125+虚换手*10,325),475,RGB(155,50,50)),COLORYELLOW;
DRAWTEXTREL(2,525,'饱和度:'),COLORYELLOW;
DRAWTEXTREL(60,525,NUMTOSTRN(量能饱和度,2)+'%'),COLORYELLOW;
DRAWRECTREL(125,525,325,725,RGB(30,30,30)),COLORYELLOW;
DRAWRECTREL(125,525,125+量能饱和度*2,725,RGB(155,50,50)),COLORYELLOW;
DRAWTEXTREL(2,775,'获利盘:'),COLORYELLOW;
DRAWTEXTREL(60,775,NUMTOSTRN(获利盘,2)+'%'),COLORYELLOW;
DRAWRECTREL(125,775,325,975,RGB(30,30,30)),COLORYELLOW;
DRAWRECTREL(125,775,125+获利盘*2,975,RGB(155,50,50)),COLORYELLOW;

{主买主卖}
STICKLINE(VOL>0,VOL,0,4,1),COLORWHITE;
STICKLINE(主买>0,0,主买,4,0),COLORRED;
STICKLINE(主卖<0,0,主卖,4,0),COLOR00FF00;

{量柱六和一}

量柱六合一指标


倍量:(VOL/REF(VOL,1)>2 and COUNT(CLOSE>OPEN,1)) or (LOW>REF(HIGH,1) and COUNT(OPEN>CLOSE,1) and VOL/REF(VOL,1)>2),STICK,COLORBLUE,linethick4;

DRAWTEXT(倍量,0.75,'倍量'),COLORBLUE;


百日地量:LLV(VOL,100)==VOL,STICK,COLORRED,LINETHICK4;

DRAWTEXT(百日地量,0.5,'地量'),colorred;


倍缩量:VOL/REF(VOL,1)<0.5,STICK,COLORFF00FF,linethick2;


缩量涨:

COUNT(C>REF(C,1),2)==2 AND COUNT(VOL<REF(VOL,1),2)==2,COLORYELLOW,,STICK,linethick2;


黑太阳:

IF(LOW>REF(HIGH,1) and COUNT(OPEN>CLOSE,1),0.5,0),STICK,colorwhite,linethick4;

DRAWTEXT(黑太阳,0.2,'黑太阳'),COLORwhite;


红太阳:

IF(LOW>REF(HIGH,1) and COUNT(OPEN<CLOSE,1),0.5,0),STICK,colorred,linethick4;

DRAWTEXT(红太阳,0.2,'红太阳'),COLORRED;

划线主图：

 

{点石成金(红绿双线); 参数:绿(0,0,1000),红(0,0,1000)}

 

高点时区:=PEAKBARS(4,30,1 );

低点时区:=TROUGHBARS(4,30,1 );

eee:=BACKSET(BARSTATUS=2 ,if(绿=0,高点时区+1,绿));

ee:=FILTER(eee ,if(绿=0,高点时区*2,绿+2 ));

VERTLINE(ee,2 ),ALIGN2,COLORFFff00;

s2:=COUNT(eee ,绿 );

bc:=s2;

点石成金H:=IF(close>100,SUM(h*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(H,bc)/SUM(C,BC)){,colorred,LINETHICK2};

点石成金L:=IF(close>100,SUM(l*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(L,bc)/SUM(C,BC)){,colorblue,LINETHICK2};

点石成金:if(ref(h,bc)>ref(h,bc+1) and ref(h,bc)>ref(h,bc-1) ,点石成金h,点石成金l),color00ff00,LINETHICK1;

PARTLINE(点石成金,eee=1 ),color00ff00,LINETHICK2;

DRAWTEXT(BARSTATUS=2,点石成金*1.01,''+点石成金),COLOR00ff00,VALIGN2,ALIGN2;

DRAWTEXT(ee,点石成金*1.01,''+绿),COLOR00ff00,VALIGN2,ALIGN2;

DRAWTEXT(BARSTATUS=2,点石成金*1.01,'________'),COLOR00ff00,VALIGN2,ALIGN2;

eee1:=BACKSET(BARSTATUS=2 ,if(红=0,低点时区+1,红));

ee1:=FILTER(eee1 ,if(红=0,低点时区*2,红+2 ));

VERTLINE(ee1,2 ),ALIGN2,COLORFFdd00;

s21:=COUNT(eee1 ,红 );

bc1:=s21;

点石成金H1:=IF(close>100,SUM(h*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(H,bc1)/SUM(C,BC1));

点石成金L1:=IF(close>100,SUM(l*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(L,bc1)/SUM(C,BC1));

点石成金1:if(ref(h,bc1)>ref(h,bc1+1) and ref(h,bc1)>ref(h,bc1-1) ,点石成金h1,点石成金l1),colorred,LINETHICK1;

PARTLINE(点石成金1,eee1=1 ),colorred,LINETHICK2;

DRAWTEXT(BARSTATUS=2,点石成金1*0.98,''+点石成金1),COLORred,VALIGN0,ALIGN2;

DRAWTEXT(ee1,点石成金1*0.98,''+红),COLORred,VALIGN0,ALIGN2;

DRAWTEXT(BARSTATUS=2,点石成金1*0.98,'________'),COLOR00ff00,VALIGN0,ALIGN2;

 

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;{高低点出现在同一K线上时可作取舍}

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

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

L1:=D2 AND NOT(D1 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 BARSTATUS=2 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),COLORGRAY,LINETHICK1,POINTDOT;

DRAWLINE(HD,H,LD,L,0),COLORGRAY,LINETHICK1,POINTDOT;

J1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);

DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORGRAY,LINETHICK1,POINTDOT;

A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));

D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}

A4:=L>REF(L,REF(BARSLAST(LD),1)+1);

B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}

DRAWICON(HH,H,5),ALIGN1;     DRAWICON(LL,L,4),ALIGN1;

H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}

X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));

G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1); {长期低点，也可供引用}

L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;

X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));

 

G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);{长期高点，也可供引用}

DRAWLINE(HZ,H,LZ,L,0),color00ff00,LINETHICK1;

DRAWLINE(LZ,L,HZ,H,0),color00ff00,LINETHICK1;{长期连线}

K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);

DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),color00ff00,LINETHICK1; {最后的长期连线，连在收盘价上}

UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);

VV:=UU>REF(UU,1);

WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);

XX:=WW>REF(WW,1);

DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;

UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);

VV2:=UU2>REF(UU2,1);

WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);

XX2:=WW2>REF(WW2,1);

DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

{123Q4}

前一低:=REF(L,BARSLAST(VV)){,COLOR99FF66,POINTDOT,LINETHICK1};

前二低:=REF(L,BARSLAST(XX)){,COLORFF66FF,POINTDOT,LINETHICK1};

前一高:=REF(H,BARSLAST(VV2)){,COLOR99FF66,POINTDOT,LINETHICK1};

前二高:=REF(H,BARSLAST(XX2)){,COLORFF66FF,POINTDOT,LINETHICK1};

 

求4看空:h*前一低/if(前一高=h,前二高,前一高);

求4看多:l*前一高/if(前一低=l,前二低,前一低);

 

前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;

前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;

前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;

前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;

短高:=REF(H,BARSLAST(VV2));

短低:=REF(L,BARSLAST(VV));

短比: (C-短低)/(短高-短低),LINETHICK0;

 

{以下语句为三角形部分}

 

底:REF(L,BARSLAST(VV)),COLOR0000FF,LINETHICK2;

頂:REF(H,BARSLAST(VV2)),color00ff00,LINETHICK2;

 

{下迭三角形：藍色三角形畫完介入}

StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}

DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}

DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

 

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}

{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}

{上漲三角形：紅色三角形畫完出局}

StickLine(VV2 ,頂,底,0,0),COLOR0000FF,linethick3;{}

DRAWLINE(VV,L,VV2,H,0),COLOR0000FF,linethick3;{斜}

 

 

DRAWLINE(VV,L,VV2,底,0),COLOR0000FF,linethick3;{?};

ZDT:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(ZDT>9.8,O,C,6,0),COLOR0000FF;

STICKLINE(ZDT<-9.8,O,C,6,0),COLOR00FF00;

DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,'B') , colorred;

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.008,'S'),colorgreen;

{四区主图}

W:=BARSLAST(DISPSTATUS=1);

P:=BACKSET(DISPSTATUS=2,W/2+1);

K:=BARSLAST(CROSS(P,0.5));

KJ:=HHVALL(HIGH)-LLVALL(LOW);

低涨:(C/LLV(LOW,W)-1)*100,COLOR0000FF,LINETHICK0,PRECIS2;

天:BARSLAST(L=LLV(LOW,W)),COLOR00FFFF,LINETHICK0,PRECIS0;

DRAWTEXT(HIGH=HHVALL(HIGH) and K>=0,HIGH*1.01,'←'+NUMTOSTRN(HIGH,2)),COLORFFFFFF;

 

{支撑压力}

PT  := REF(HIGH,1)-REF(LOW,1);

重心:=(HIGH + LOW + CLOSE)/3;

压力Ⅰ:= 2*重心-LOW;

压力Ⅱ:= 重心 + PT;

 

支撑Ⅰ:= 2*重心-HIGH;

支撑Ⅱ:= 重心 - PT;

DRAWTEXTABS(75,8,'  《趋势操作》'),ColorFFFF00;

DRAWTEXTABS(150,8,'  重心:'+重心),Color208FFF;

DRAWTEXTABS(75,27,'    支  撑'),ColorFFFFFF;

DRAWTEXTABS(75,44,'    '+支撑Ⅰ),ColorFFFFFF;

DRAWTEXTABS(75,62,'    '+支撑Ⅱ),ColorFFFFFF;

DRAWTEXTABS(75,27,'                压  力'),Color00FF00;

DRAWTEXTABS(75,44,'                '+压力Ⅰ),Color00FF00;

DRAWTEXTABS(75,62,'                '+压力Ⅱ),Color00FF00;

 

DRAWTEXTABS(75,5,'│'),Color00FFFF;

DRAWTEXTABS(75,17,'│'),Color00FFFF;

DRAWTEXTABS(75,29,'│'),Color00FFFF;

DRAWTEXTABS(75,41,'│'),Color00FFFF;

DRAWTEXTABS(75,53,'│'),Color00FFFF;

DRAWTEXTABS(75,65,'│'),Color00FFFF;

DRAWTEXTABS(218,5,'│'),Color00FFFF;

DRAWTEXTABS(218,17,'│'),Color00FFFF;

DRAWTEXTABS(218,29,'│'),Color00FFFF;

DRAWTEXTABS(218,41,'│'),Color00FFFF;

DRAWTEXTABS(218,53,'│'),Color00FFFF;

DRAWTEXTABS(218,65,'│'),Color00FFFF;

DRAWTEXTABS(146,25,'│'),Color00FFFF;

DRAWTEXTABS(146,29,'│'),Color00FFFF;

DRAWTEXTABS(146,41,'│'),Color00FFFF;

DRAWTEXTABS(146,53,'│'),Color00FFFF;

DRAWTEXTABS(146,65,'│'),Color00FFFF;

DRAWTEXTABS(80,0,'────────────'),Color00FFFF;

DRAWTEXTABS(80,20,'────────────'),Color00FFFF;

DRAWTEXTABS(80,37,'────────────'),Color00FFFF;

DRAWTEXTABS(80,54,'────────────'),Color00FFFF;

DRAWTEXTABS(80,71,'────────────'),Color00FFFF;

 

 

{以下设置个股信息}

DRAWTEXTREL(10,400,'■低点至今上涨:'+NUMTOSTRN(低涨,2)+'％  '+NUMTOSTRN(天,0)+'天'),COLOR0000FF;

DRAWTEXTREL(10,460,'■目前可见K线:'+NUMTOSTRN(W+1,0)+'天'),COLOR00FF00;

DRAWTEXTREL(10,520,'■趋势判断,123Q4；波段操作，点石成金。'),COLORFF8899;

DRAWTEXTREL(10,580,'■蓝色三角形画完介入，红色三角形画完出局'),COLORWHITE;

{盖印}

 

DRAWRECTABS(28,29,58,62,rgb(250,250,80)),color000099;

DRAWRECTABS(27,29,57,63,rgb(250,60,80)),colorred;

DRAWTEXTABS(30,35,'黍离'),colorFFFFFF,LINETHICK1;

DRAWTEXTABS(30,48,'专用'),colorFFFFFF,LINETHICK1;