轻松操盘 源码

轻松操盘
量能饱和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),NODRAW,COLORYELLOW; N:=10;突破:REF(EMA(C,N),1),COLORMAGENTA,LINETHICK1; A1X:(EMA(C,5)-突破)/突破*100,NODRAW;距离:=(C-突破)/突破*100,NODRAW;出击:IF(A1X>=0,REF(EMA(C,N),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORMAGENTA,LINETHICK1;
休假:IF(A1X<0,REF(EMA(C,N),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORGREEN,LINETHICK1;STICKLINE(A1X>=0,出击,突破,0,-1)COLORMAGENTA;STICKLINE(A1X<0,休假,突破,0,-1)COLORGREEN;
持币:IF(A1X<0,突破,DRAWNULL)COLORGREEN,LINETHICK1;DRAWTEXT(ISLASTBAR AND 出击,出击,' 出击'),COLORMAGENTA;DRAWTEXT(ISLASTBAR AND 休假,休假,' 休假'),COLORGREEN;
短顶:HHV(H,20),COLORWHITE;短底:LLV(L,20),COLOR00FF00;长顶:HHV(H,60),COLORRED;长底:LLV(L,60),COLORYELLOW;DRAWKLINE(H,O,L,C);
涨幅:IF(A1X>=0,(C-出击)/出击*100,DRAWNULL)NODRAW;跌幅:IF(A1X<0,(C-休假)/休假*100,DRAWNULL)NODRAW;MA5:=MA(C,5);MA18:=MA(CLOSE,18);MA13:=MA(C,13);A:=(3*C+L+O+H)/6;
VAR1:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;MTM:=C-REF(C,1);CB:=EMA(VAR1,13);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
卖:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);DRAWTEXT(FILTER(卖=1,1),HIGH*1.01,'S'),COLORGREEN;买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'B'),COLOR00DDDD;加仓:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;DRAWTEXT(FILTER((CROSS(加仓,0) OR CROSS(CLOSE,CB)) AND 买=1,3),LOW-0.03,'↖㈩'),COLORWHITE;
跟:=MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18);DRAWTEXT(跟,LOW*0.999,'↖ 跟'),COLORRED;阳涨幅:=5;阳倍量:=2;
单阳:=C>O*(1+阳涨幅/100) AND VOL>REF(VOL,1)*阳倍量;DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00BBBB;STICKLINE(CURRBARSCOUNT<100 AND 单阳,O,C,0.8,0),COLOR00FFFF;
高不破价:=REF(C,BARSLAST(单阳));中不破价:=REF((C+L)/2,BARSLAST(单阳));低不破价:=REF(L,BARSLAST(单阳));
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND {(LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价)}(LLV(C,BARSLAST(单阳))>低不破价 OR LLV(C,BARSLAST(单阳))=低不破价);
STICKLINE(单阳不破,低不破价-低不破价*0.002,{低不破价}低不破价-低不破价*0.002,4.1,0),COLORRED;量:V,NODRAW;单阳量:REF(V,BARSLAST(单阳)),NODRAW;单阳后均量:SUM(V,BARSLAST(单阳)-1)/(BARSLAST(单阳)-1),NODRAW;
单阳后缩量:单阳后均量<单阳量*0.75,NODRAW;单阳线体:=REF(C-O,BARSLAST(单阳)),NODRAW;小线体:=ABS(C-O)<单阳线体/2.5,NODRAW;小线体严:COUNT(小线体,BARSLAST(单阳)-1)>BARSLAST(单阳)-2,NODRAW;
小线体松:COUNT(小线体,BARSLAST(单阳)-1)>BARSLAST(单阳)-3 AND C<REF(C,1)*1.03,NODRAW;两天:=LLV(C,BARSLAST(单阳))>低不破价 OR LLV(C,BARSLAST(单阳))=低不破价;
一般:=LLV(C,BARSLAST(单阳)-2)>低不破价 OR LLV(C,BARSLAST(单阳)-2)=低不破价;一般选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 一般,低不破价,低不破价,2,0),COLOR88FF00;
较强:=LLV(C,BARSLAST(单阳)-2)>中不破价 OR LLV(C,BARSLAST(单阳)-2)=中不破价;较强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 较强,中不破价,中不破价,2,0),COLOR0088FF;
最强:=LLV(C,BARSLAST(单阳)-2)>高不破价 OR LLV(C,BARSLAST(单阳)-2)=高不破价;最强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 最强,高不破价,高不破价,2,0),COLOR00FFFF;
DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价-低不破价*0.02,'1'),COLOR00BB00;DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价-低不破价*0.02,'2'),COLOR00BB00;
DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价-低不破价*0.02,'3'),COLOR00BB00;DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价-低不破价*0.02,'4'),COLOR00BB00;
DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价-低不破价*0.02,'5'),COLOR00BB00;DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价-低不破价*0.02,'6'),COLOR00BB00;
DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价-低不破价*0.02,'7'),COLOR00BB00;DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价-低不破价*0.02,'8'),COLOR00BB00;
DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价-低不破价*0.02,'9'),COLOR00BB00;DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价-低不破价*0.02,'10'),COLOR00BB00;
ARE4:=MA(C,20); ARE5:=(C>MA(C,5)); ARE6:=(MA(C,5)>MA(C,10)); ARE7:=(C>MA(C,10));ARE8:=(MA(C,5)>MA(C,20)); ARE9:=(C>MA(C,20)); ARE10:=REF(ARE4,1); ARE11:=(ARE4>ARE10);
AVX:=(((((IF(ARE5,10,(0-10))+IF(ARE6,10,(0-10)))+IF(ARE7,10,(0-10)))+IF(ARE8,10,(0-10)))+IF(ARE9,10,(0-10)))+IF(ARE11,10,(0-10)));DSLX:=(C/INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); VRE1:=MA(V,5); VRE2:=MA(V,10);
阻力位:=IF((C>200),(C*1.01),(C*1.07)); 阻力位１:=IF((C<10),(C*1.05),阻力位);止损位:=IF((C>200),(C*0.99),(C*0.93)); 止损位１:=IF((C<10),(C*0.95),止损位);TJTS1:=ISLASTBAR AND C<500; TJTS2:=ISLASTBAR AND C>500;
KDAT:=REFDATE(HHV(H,45)/1.01,DATE);{解盘位置}解盘1:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盘2:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));解盘3:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 > VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盘4:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 <= VRE2)) AND (DSLX < DSLX1)) ,1,0));解盘5:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盘6:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));解盘7:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盘8:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));解盘9:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盘10:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));解盘11:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盘12:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));解盘13:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盘14:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));解盘15:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盘16:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));解盘17:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));
解盘18:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));解盘19:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));
解盘20:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));解盘21:=CONST(IF(TJTS2 AND (CROSS(1,AVX) AND (VRE1 >= VRE2)) ,1,0));
解盘22:=CONST(IF(TJTS2 AND (CROSS(1,AVX) AND (VRE1 < VRE2)) ,1,0));解盘23:=CONST(IF(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) ,1,0));
解盘24:=CONST(IF(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) ,1,0));解盘25:=CONST(IF(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) ,1,0));
解盘26:=CONST(IF(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) ,1,0));解盘文字1:=IF(解盘1=1,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右',
IF(解盘2=1,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右',IF(解盘3=1,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右',
IF(解盘4=1,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右',IF(解盘5=1,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望',
IF(解盘6=1,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓',IF(解盘7=1,'该股放量下跌，走势明显偏弱，离场观望',IF(解盘8=1,'该股缩量下跌，走势偏弱，离场观望',IF(解盘9=1,'该股形态良好，强势明显，量能充足，可以继续持有',
IF(解盘10=1,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险',IF(解盘11=1,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓',IF(解盘12=1,'该股走势趋弱，量能不足，减持大部分筹码',
IF(解盘13=1,'该股形态不佳，注意成交量的变化，但目前不适合参与',IF(解盘14=1,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与',IF(解盘15=1,'该股有走强迹象，但量能不足，趋势不明，不适合操作',
IF(解盘17=1,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右',IF(解盘19=1,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌 ',IF(解盘21=1,'大盘形态走坏，重仓者可以减去大部分仓位 ',
IF(解盘22=1,'大盘缩量调整，注意风险，短线清仓观望',IF(解盘23=1,'大盘走势良好，量能理想，可以继续持有强势股',IF(解盘24=1,'大盘形态良好，但量能稍显不足，随时准备减仓',IF(解盘25=1,'大盘趋势不明，注意成交量变化，目前不适宜进场',
IF(解盘26=1,'大盘趋势向下，量能萎缩，不适合进场',DRAWNULL)))))))))))))))))))))));
解盘文字2:=IF(解盘16=1,'该股走势太弱，没有参与价值',IF(解盘18=1,' 如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎',IF(解盘20=1,' 可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入',DRAWNULL)));
DRAWTEXT(CURRBARSCOUNT=75{位置} AND (解盘1=1 OR 解盘2=1 OR 解盘3=1 OR 解盘4=1 OR 解盘5=1 OR 解盘6=1 OR 解盘7=1 OR
解盘8=1 OR 解盘9=1 OR 解盘10=1 OR 解盘11=1 OR 解盘12=1 OR 解盘13=1 OR 解盘14=1 OR 解盘15=1 OR 解盘17=1 OR
解盘19=1 OR 解盘21=1 OR 解盘22=1 OR 解盘23=1 OR 解盘24=1 OR 解盘25=1 OR 解盘26=1),(KDAT*0.99),解盘文字1),COLORFEFE00;
DRAWTEXT(CURRBARSCOUNT=75{位置} AND (解盘16=1 OR 解盘18=1 OR 解盘20=1),IF(解盘18=1 OR 解盘20=1,KDAT*0.98,KDAT*0.96),解盘文字2),COLOR0000FF;