改文华，谢谢2022210　[文华财经]

粗蓝线下弱势:0,COLORFF6C00,NODRAW;

参照其它指标:0,COLORWHITE,NODRAW;

综合判断操作:0,COLORYELLOW,NODRAW;

A:=AMOUNT/V/100;

VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);

QQ:=EMA(((VARA/10)+EMA(A,13)),0);

行情线:=MA(A,1);

重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;

【操盘线】:EMA(((SLOPE(C,22)*20)+C),60),COLORRED,LINETHICK2;

{【黄金线】:}IF(重心>=【操盘线】,【操盘线】,DRAWNULL),COLORRED,LINETHICK4;

{【空仓线】:}IF(重心<【操盘线】,【操盘线】,DRAWNULL),COLORFF6C00,LINETHICK3;

{DRAWTEXT(ISLASTBAR,【操盘线】,'操盘线】',COLORRED;}

{引:EMA(CLOSE,2),LINETHICK1,COLORMAGENTA;

探:MA(CLOSE,5),LINETHICK1;}

{变:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;

金:IF(变>REF(变,1),变,DRAWNULL),COLORRED,LINETHICK1;

空:IF(变<REF(变,1),变,DRAWNULL),COLORGREEN,LINETHICK2;

DRAWTEXT(ISLASTBAR,变,'雷达线】',COLORRED,LINETHICK3;}

{顶底信号}

DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4;

DB:=EMA(REF(HHV(H,25),1),2),COLORGREEN,LINETHICK1;

{DRAWTEXT(CROSS(DB,DA),DB,'险',COLORGREEN,LINETHICK1;}

{DRAWTEXT(CROSS(DA,【操盘线】),【操盘线】*0.98,'',COLORWHITE,LINETHICK1;}

上线:=SMA(C,6.5,1);

下线:=SMA(C,13.5,1);

上线1:=SMA(C,3,1);

下线1:=SMA(C,8,1);

{DRAWTEXT( CROSS(上线,下线) AND C>O,LOW *0.96,'全仓'),COLORYELLOW;}

DRAWTEXT(CROSS(下线1,上线1),H*1.02,'#39),COLORYELLOW;

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

UPR:=BBI+3*STD(BBI,13),LINETHICK2;

DWN:=BBI-3*STD(BBI,13);

安全:=MA(CLOSE,60),LINETHICK2;

LC:=REF(CLOSE,1);

RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

DRAWTEXT( CROSS(82,RSI) , HIGH*1.04,'仓' ,COLORFF9966,LINETHICK2;

A7:=(2*C+H+L)/4;

操作:=MA(A7,5),COLOR00FF00,LINETHICK2;

操作1:=MA(A7,5)*1.03,LINETHICK2;

操作2:=MA(A7,5)*0.97,LINETHICK2;

压力1:HHV(A7,21),COLOR00F666{,CIRCLEDOT};

压力2:HHV(A7,36),COLORFF6CC0;

支撑:LLV(A7,21),COLORCYAN;

SK:=EMA((A7-压力1)/(支撑-压力1)*100,7);

SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);

{DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) AND

COUNT(SK>=SD,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW*0.98,'进' ,COLOR0099FF;

DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10 AND

COUNT(SK>SD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND

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

OPEN>REF(CLOSE,1),1,0) ,LOW*0.98,'进' ,COLORYELLOW;}

D:=MA(CLOSE,80)-MA(CLOSE,10)/3;

DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08

AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.98,'底',COLORYELLOW;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

E1:=BARSCOUNT(C);

AH:=HHV(H,200);

AL:=LLV(L,200);

B0:=(AH-AL)/40;

KB1:=H+B0;

KB2:=L-B0;

{STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-0.8*B0,1,0),COLORYELLOW,LINETHICK3;}

{DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-B0,'窗',COLORYELLOW;}

MA18:=MA(CLOSE,18);

MTM:=C-REF(C,1);

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

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

DRAWTEXT(FILTER(买=1,5) AND (H-C)<(C-O) AND C>操作,LOW,'买',COLORRED;

加1:=MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18);

DRAWTEXT(加1,LOW*0.98,'加仓',COLORCC66FF;

卖一:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);

DRAWTEXT(FILTER(卖一=1,1),HIGH*1.025,'卖',COLORGREEN;

DRAWTEXT_FIX(1,0.980,20,1,'供服务：公式修改,还原源码,做选股。',COLOR666666; 

{预测明天}

XXS:=MA(LOW,5)*(1-5/100);

XXS1:=MA(HIGH,5)*(1+5/100);

均线:=C,COLORGREEN;

AAAA:=CLOSE/REF(CLOSE,3)<=0.85 AND CROSS(C,XXS) AND C>REF(C,1),LINETHICK0 ;

DRAWTEXT(AAAA,L*0.95,'影买',COLORRED;

BBAA:=CROSS(XXS1,C);

{DRAWTEXT(CROSS(XXS1,C),H*1.012,'盘逃',COLORWHITE;}

DDDD:=CROSS(C,XXS1);

DRAWTEXT(COUNT(DDDD,3)>=1 AND C>【操盘线】*1.1 AND C<O,H*1.036,'卖',COLORYELLOW;

AA1Z:=MA(C,5);

BB1Z:=MA(C,15);

AF:=CROSS(AA1Z,BB1Z);

{STICKLINE(AF,LLV(L,4),LLV(L,4),50,1),COLORRED,LINETHICK3;

DRAWTEXT(AF,LLV(L,4),'损 启动线',COLORYELLOW;}

AAZ:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,1)<REF(CLOSE,3) AND IF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE,1)<REF(CLOSE,4) OR (REF(CLOSE,2)<REF(CLOSE,4) AND REF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE,6)<REF(CLOSE,7))));

BBZ:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(CLOSE,1)>REF(CLOSE,3) AND IF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE,1)>REF(CLOSE,4) OR (REF(CLOSE,2)>REF(CLOSE,4) AND REF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE,6)>REF(CLOSE,7))));

TYX3Z:=MA(REF(HHV((C+L+O+H)/4,30),1),3);

TYX4Z:=MA((C+L+O+H)/4,13);

TYX5Z:=EMA((C+L+O+H)/4,21);

DRAWICON(AAZ AND CLOSE>REF(OPEN,2),0.98*LOW,1);

DRAWICON(BBZ AND CLOSE<REF(CLOSE,2) AND C>【操盘线】*1.07,HIGH*1.01,2);

{修正价格}

重心1:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382,COLORYELLOW,LINETHICK1;

GAO:=HHV(C,60)-LLV(C,60);

RSIZ:=SMA(MAX(重心1-REF(重心1,1),0),5,1)/SMA(ABS(重心1-REF(重心1,1)),5,1);

指导线:=重心1+GAO*(RSIZ-0.5),COLORMAGENTA,LINETHICK1;

{STICKLINE(CROSS(RSIZ,0.1),指导线,REF(指导线,1),2,0),COLORYELLOW;

STICKLINE(CROSS(0.9,RSIZ),指导线,REF(指导线,1),2,0),COLORBLUE;}

STICKLINE(CROSS(RSIZ,0.1),L*0.99,L*0.98,4,0),COLORYELLOW;

STICKLINE(CROSS(0.9,RSIZ),H*1.01,H*1.02,4,0),COLORBLUE;

C6:=REF(C,1);

{涨跌停K线}

STICKLINE(HIGH=LOW AND CLOSE=OPEN AND (CLOSE/REF(CLOSE,1))>1.048,HIGH,LOW,3,0) ,COLORRED;

STICKLINE(HIGH=LOW AND CLOSE=OPEN AND (REF(CLOSE,1)/CLOSE)>1.048,HIGH,LOW,3,0) ,COLOR00FF00;

涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0);

STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA;

STICKLINE(涨停,H,L,0,0),COLORLIRED;

{股旁网-股票公式网站 WWW.GUPANG.COM}

DRAWTEXT(AAZ AND CLOSE>REF(OPEN,2) AND C>MA(C,6),LOW*0.95,'平底',COLORYELLOW;

DRAWTEXT(BBZ AND CLOSE<REF(CLOSE,2) AND C>【操盘线】*1.07,HIGH*1.05,'平顶',COLORCYAN;

{DRAWTEXT(ISLASTBAR,C,'-------现价',COLORWHITE;}

{弄点钱玩玩指标}

JJ:=(H+L+C)/3;QJ0:=VOL/IF(H=L,4,H-L);

JB:="KDJ.J";

QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(C,O)),QJ0*(MIN(O,C)-L));

QJ2:=IF(CAPITAL=0,QJ0*(MIN(O,C)-L),QJ0*(JJ-MIN(C,O)));

QJ3:=QJ0*(H-MAX(O,C));QJ4:=QJ0*(MAX(C,O)-JJ);

QJ5:=QJ1+QJ2;QJ6:=QJ3+QJ4;DDB:=(QJ5-QJ6)/(QJ5+QJ6)*100;

DDX:=((QJ1+QJ2)-(QJ3+QJ4))/SUM(VOL,10)*100;DDZ:=DDB*17;

DDY:=((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)*100;

弄点钱玩:=CROSS(JB,0) AND ((DDX>0 AND DDY>0) OR DDZ>400);

{STICKLINE(弄点钱玩,L*0.94,L*0.96,3,0),COLORRED;}

DRAWICON(弄点钱玩,L*0.98,11);

DRAWTEXT(CROSS(JB,0) AND ((DDX>0 AND DDY>0) OR DDZ>400),L*0.985,'弹',COLORRED;

 来源:程序化99