| 多空神准变色磁力线: {多空神准变色磁力线} N:=11; M:=6; MA(C,5); MA(C,13); MID:=(3*CLOSE+LOW+OPEN+HIGH)/6; K:COST(80),LINETHICK1; X1:=(C+L+H)/1.5; X2:=EMA(X1,3); X3:=EMA(X2,2.5); 磁力线:(MA(CLOSE,30)+MA(CLOSE,72))/2,COLORGREEN; 多空线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; DRAWTEXT(CROSS(多空线,磁力线),多空线,'进场'),COLORYELLOW,LINETHICK2; DRAWTEXT(CROSS(磁力线,多空线),磁力线,'走人'),COLORRED,LINETHICK2; STICKLINE(CLOSE/REF(C,1)>=1.09,O,C,2.7,0),COLORYELLOW; STICKLINE(CLOSE/REF(C,1)<=0.91,O,C,2.7,0),COLORGREEN; STICKLINE(X2>=X3,LOW,HIGH,0,1),COLORRED; STICKLINE(X2>=X3,CLOSE,OPEN,3.2,2),COLORRED; STICKLINE(X2<X3,LOW,HIGH,0,1),COLOR00FF00; STICKLINE(X2<X3,CLOSE,OPEN,3.2,2),COLOR00FF00; 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; DRAWTEXT(CROSS(DA-DB,0),L*0.95,''),COLORRED; JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100; DRAWTEXT(CROSS(84,JH),H*1.02,''),COLORGREEN; STICKLINE(CROSS(X3,X2),OPEN,CLOSE,3.2,0),COLOR00FF00; STICKLINE(CROSS(X2,X3),OPEN,CLOSE,3.2,0),COLORRED; CV:=CLOSE; 地心引力区1:磁力线*1.1,LINETHICK2,COLORRED; 地心引力区2:磁力线*0.9,LINETHICK2,COLORFF33FF; BBIBOLL:(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4; MA6:=MA(C,6); MA18:=MA(C,24); MA55:=MA(C,55); MA135:=MA(C,135); STICKLINE((CLOSE>OPEN) AND (X2<X3),CLOSE,OPEN,3.2,2),COLOR00FF00; STICKLINE((CLOSE>OPEN) AND (X2>=X3),CLOSE,OPEN,3.2,2),COLORRED; UPR:BBIBOLL+M*STD(BBIBOLL,N); DWN:BBIBOLL-M*STD(BBIBOLL,N); STICKLINE((CLOSE<OPEN) AND (X2<X3),CLOSE,OPEN,3.2,0),COLOR00FF00; STICKLINE((CLOSE<OPEN) AND (X2>=X3),CLOSE,OPEN,3.2,0),COLORRED; 开天眼(顶尖财经 股票学院: www.58188.com): {黄色块及坑后上涨；K线低位黄金坑。 该组源码的作用是：在大盘股指的时间周期末端，波段拉升前的挖坑洗盘重要标志。 该标志，仅仅作为分辨右侧交易前，研判大牛股启动的左侧黄色K线坑的建仓洗盘。并非左侧买进信号！} TYP := (HIGH + LOW + CLOSE)/3; CCI := (TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); M1P:=30; P2P:=100; VAR1P:=(C+H+O+L)/4; 洗盘P:=MA(VAR1P,M1P)*(1-P2P/1000); STICKLINE(CCI<=-100,L*0.995,L*0.995,9.5,0),COLORRED,LINETHICK6; STICKLINE(CCI<=100 AND L<=洗盘P,L*0.99,L*0.99,9.5,0),colorYellow,LINETHICK6; {CF} CF:=(C-REF(C,1))/(REF(C,1))*100; STICKLINE(H=C AND O<>C,O,O+(H-O)/3,6.5,0),COLORYELLOW,LAYER0; STICKLINE(CF>1.0935 AND H=C,O+(H-O)/3,O+(H-O)/3*2,6.5,0),COLORYELLOW{COLORMAGENTA},LAYER0; STICKLINE(CF>1.0935 AND H=C AND O<>C,O+(H-O)/3*2,C,6.5,0),COLORYELLOW,LAYER0; K2:=1; M55:=MA(C,3); A3:=IF(K2<>2,EMA((EMA(C,5)+EMA(C,6)+EMA( C,7))/3,3),0); 黄金跑道:IF(M55>REF(A3,1),A3,0),PRECIS2,colorYellow,LINETHICK0;{黄金跑道线} {突破捉妖。拉升信号} {三轨主图} MC:=100; 中轨:MA(CLOSE,100),colorGray,PRECIS2,LINETHICK2,LAYER2; NN:=0.7; {0.4} MIDZ:=MA(CLOSE,MC); {中轨} UPPER:=MIDZ+NN*STD(CLOSE,MC); {上轨} LOWER:=MIDZ-NN*STD(CLOSE,MC); {下轨} {2、中期下插线} BN1:=MA(CLOSE,13)+MA(CLOSE,13)-REF(MA(CLOSE,13),1); {34} 分水岭N1:=IF(MA(CLOSE,100)<BN1,BN1,MA(CLOSE,100)); Y1:=分水岭N1-(EMA(C,2)-分水岭N1); OUT6:=CROSS(LOWER,Y1); DRAWTEXT(OUT6,O*1,'↖突破'),COLORWHITE; {开天眼--只适合做K线向上爬坡，波段初起时的股票，当趋势结束会消失。 出信号后--不要在纠结过往的大牛股为什么没信号，那是因为前一波段已经结束！ } F2:=BARSLAST(EMA(C,3)<=EMA(C,5)); {3、13} F3:=IF(EMA(C,3)>=EMA(C,3),EMA(C,5),0); {3、13、5；3、3、30} 天眼:IF(CURRBARSCOUNT<CONST(F2+3),F3,0),PRECIS2,COLORred,LINETHICK0; BR:=MA(CLOSE,8)+MA(CLOSE,8)-REF(MA(CLOSE,8),1); {原13} 分水岭R:=IF(MA(CLOSE,13)<BR,BR,MA(CLOSE,13)); {原17} YR:=分水岭R-(EMA(C,3)-分水岭R); {XGC:=IF(YR>AN3,YR,0);} {F5上穿YR开天眼} OUTF:=CROSS(天眼,YR); DRAWTEXT(OUTF,L*1,'★天眼'),COLORRED; {★追财神--原则上K线变红时才追} VAR16:=MA(CLOSE,30); 上轨16:=VAR16+2*STD(CLOSE,60); XG16:=CROSS(C,上轨16); DRAWTEXT(XG16 AND (C<O OR (CF>1.0935 AND H=C AND O<>C)),H*1.02,'★追财神'),COLORYELLOW; {红绿导航} {红绿三角【副图】} A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1); B10304:=FILTER(A10304,3); C10304:=BACKSET(B10304,3+1); D10304:=FILTER(C10304,3);{高点} A20304:=REF(LOW,3)=LLV(LOW,2*3+1); B20304:=FILTER(A20304,3); C20304:=BACKSET(B20304,3+1); D20304:=FILTER(C20304,3);{低点} E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍} H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; L10304:=(D20304 AND NOT(D10304 AND E10304=E20304)); X10304:=REF(BARSLAST(H10304),1)+1; F10304:=BACKSET(H10304 AND COUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304)); G10304:=F10304>REF(F10304,1); I10304:=BACKSET(G10304,2); LD0304:=I10304>REF(I10304,1);{过滤后低点} L20304:=LD0304 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; X20304:=REF(BARSLAST(L20304),1)+1; F20304:=BACKSET(L20304 AND COUNT(H10304,X20304)>0,HHVBARS(IF(H10304,HIGH,0),X20304)); G20304:=F20304>REF(F20304,1); I20304:=BACKSET(G20304,2); HD0304:=I20304>REF(I20304,1);{过滤后高点} UU0304:=BACKSET(BARSTATUS=2,BARSLAST(LD0304)+1); VV0304:=UU0304>REF(UU0304,1); UU20304:=BACKSET(BARSTATUS=2,BARSLAST(HD0304)+1); VV20304:=UU20304>REF(UU20304,1); {以下语句为三角形部分} 底:REF(L,BARSLAST(VV0304)),COLORMAGENTA,LINETHICK2,PRECIS2,LAYER2; 顶:REF(H,BARSLAST(VV20304)),COLORGreen,LINETHICK2,PRECIS2; {文字} NN304:= DISPSTATUS=2; DRAWTEXT(nn304,底,'' +NUMTOSTRN(底,2)+''),COLORMAGENTA,LINETHICK1; DRAWTEXT(nn304,顶,''+NUMTOSTRN(顶,2)+''),COLORGreen,LINETHICK1; A0X显:=(L+H+C*2)/4; 工作:=EMA(A0X显,14); A1X:=(工作-REF(工作,1))/REF(工作,1)*100; 真妖:IF(H>=REF(A0X显,BARSLAST(CROSS(A1X,0)))*1.3, REF(A0X显,BARSLAST(CROSS(A1X,0)))*1.3,0),PRECIS2,LINETHICK0,Color0080FF; STICKLINE(H>=REF(A0X显,BARSLAST(CROSS(A1X,0)))*1.3, REF(A0X显,BARSLAST(CROSS(A1X,0)))*1.3, REF(A0X显,BARSLAST(CROSS(A1X,0)))*1.3,15, 0),Color0080FF,LINETHICK2; {下跌三角形：绿色三角形画完介入} StickLine(VV0304,顶,底,0,0),ColorD56A00,linethick2,LAYER2; DRAWLINE(VV20304,H,VV0304,L,0),ColorD56A00,linethick2,LAYER2;{斜} DRAWLINE(VV20304,H,VV0304,顶,0),ColorD56A00,linethick2,LAYER2; {上涨三角形：红色三角形画完出局} StickLine(VV20304 ,顶,底,0,0),COLORred,linethick2,LAYER2; DRAWLINE(VV0304,L,VV20304,H,0),COLORred,linethick2,LAYER2;{斜} DRAWLINE(VV0304,L,VV20304,底,0),COLORred,linethick2,LAYER2; {压力斜线} DRAWLINE(H>=HHV(H,20),H,L<=LLV(L,8),HHV(H,8),1),COLORWHITE,LINETHICK1,dotline,LAYER1; {黄金跑道线} PARTLINE(A3,M55>REF(A3,1)),PRECIS2,colorYellow,LINETHICK1,LAYER0; {开天眼} PARTLINE(F3,CURRBARSCOUNT<CONST(F2+3)),PRECIS2,COLORred,LINETHICK2,LAYER0; STICKLINE(C>O OR (C=O AND C>REF(C,1)),H,L,0,0),COLOR5454FF; STICKLINE(C>O OR (C=O AND C>REF(C,1)),C,O,7.5,0),COLOR000000; STICKLINE(C>O OR (C=O AND C>REF(C,1)),C,O,7.5,1),COLOR5454FF,LAYER1; STICKLINE(C<O OR (C=O AND C<=REF(C,1)),H,L,0,0),COLORFFFF00; STICKLINE(C<O OR (C=O AND C<=REF(C,1)),C,O,7.5,0),COLORFFFF00; STICKLINE(C<O OR (C=O AND C<=REF(C,1)),C,O,7.5,1),COLORFFFF00,LAYER3; RS_VA:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100; KA:=SMA(RS_VA,5,1); DA:=SMA(KA,5,1); JA:=3*KA-2*DA; X:=REF(JA,1)<10 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1); X0:=REF(JA,1)>99 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1); K0:=REF(KA,1)>83 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1); {K1:=REF(KA,1)<11 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1);} STICKLINE(X,L,L,20,0),COLOR008888,LAYER0;{超跌} STICKLINE(X,C,O,4.5,0),COLORFF00FF,LAYER0;{粉色底部} STICKLINE(X0,O,C,4,0),COLORWHITE,LAYER0;{白色翻转} STICKLINE(K0,O,C,4,0),COLOR1880FF,LAYER0;{橘色加速} DRAWTEXTABS(15,10,'■所属板块：'+BKNAME),Color66cccc,linethick2; 流通盘大小:=FINANCE2(37)/1000000*100; DRAWTEXTABS(25,30,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,Color66cccc; 每股收益:=FINANCE2(3); 每股市盈率:=DYNAINFO(39); 销售毛利率:=FINANCE2(12); 主营收入同比:=FINANCE2(11); 净利润同比增长:=FINANCE2(10); DRAWTEXTABS(185,30,'收益:'+NUMTOSTRN(每股收益,2)+'元'),LINETHICK1,COLOR66cccc; DRAWTEXTABS(350,50,'市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),LINETHICK1,COLOR66cccc; DRAWTEXTABS(350,30,'销售毛利率：'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,COLOR66cccc; DRAWTEXTABS(185,50,'主营入同比增长：'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,Color66cccc; DRAWTEXTABS(25,50,'净利润同比增长：'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLOR66cccc; DRAWTEXTABS(20,70,'【复盘】：'+SELFSTRING('复盘')+' '),LINETHICK2,Colorwhite; DRAWTEXTABS(20,90,'【题材】：'+SELFSTRING('题材')+' '),LINETHICK2,Color66cccc; DRAWTEXTABS(26,112,'■解禁: '+SelfString('解禁')),LINETHICK2,COLORYELLOW; DRAWGBK(c>0,STRIP(RGB(0,110,0),RGB(0,0,0),1)),LAYER0; |