打印本文
關閉窗口
?
?
電腦版本的源碼：
?
?
{私暮趨勢操盤主圖}
DIR2:=ABS(CLOSE-REF(CLOSE,30));VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),30);ER2:=DIR2/VIR2;CS2:=ER2*(0.8-2/24)+2/24;CQ2:=CS2*CS2;M熊:=EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK1;FF1:=C>M熊 AND M熊>REF(M熊,1),NODRAW;FF2:=C<M熊 AND M熊<=REF(M熊,1);Q1:=CONST(IF(FF1,200,IF(FF2,0,DRAWNULL)));Q2:=CONST(IF(FF1,0, IF(FF2,20,DRAWNULL)));Q3:=CONST(IF(FF1,00, IF(FF2,0,DRAWNULL)));{DRAWGBK(C>0,RGB(Q1,Q2,Q3),RGB(0,120,120),0,' ',0);}牛熊分界線:EMA(DMA(CLOSE,CQ2),2),COLOR0050FF,LINETHICK0;牛熊:=M熊;M震:=IF(M熊/REF(M熊,1)>0.997,M熊,DRAWNULL),COLORBLUE,LINETHICK2;M牛:=IF(M熊/REF(M熊,1)>1.001,M熊,DRAWNULL),COLORRED,LINETHICK2;XX1:=C>牛熊 AND 牛熊>REF(牛熊,1);DRAWTEXT_FIX(ISLASTBAR AND XX1,0.76,0.00,0,'【處于牛區】'),COLORRED;XX2:=C<牛熊 AND 牛熊<=REF(牛熊,1);DRAWTEXT_FIX(ISLASTBAR AND XX2,0.76,0.00,0,'【處于熊區】'),COLOR33AAAA;{鉆石}AQ1:=REF(V,1);AQ2:=DVOL;AQ3:=AQ2/AQ1;LNX:=AQ3-REF(AQ3,1);E1:=REF(C,1);E2:=DCLOSE;E3:=(E2-E1)/E1*100;QMX:=E3-REF(E3,1);XG:=CROSS(LNX,500) AND CROSS(QMX,10);DRAWTEXT(XG=1,L*0.995,' '),COLORFFCC88;DRAWICON(XG=1,L*0.993,25);VAR1:=(C+H+O+L)/4;賣出:XMA(VAR1,20)*(1+80/1000),COLORGREEN,LINETHICK2;買入:XMA(VAR1,32)*(1-100/1000),COLORRED,LINETHICK2;幅度:100*(賣出-買入)/買入,NODRAW;MA1:=MA(VAR1,3);STICKLINE(賣出>LOW AND 賣出<HIGH,賣出,MAX(賣出,MAX(OPEN,CLOSE)),3,0),COLORGREEN;STICKLINE(賣出>MIN(C,O) AND 賣出<MAX(C,O),賣出,MAX(OPEN,CLOSE),3,0),COLORGREEN;STICKLINE(賣出>LOW AND 賣出<HIGH,賣出,HIGH,0,0),COLORGREEN;STICKLINE(賣出<LOW,OPEN,CLOSE,3,0),COLORGREEN;STICKLINE(賣出<LOW,HIGH,LOW,0,0),COLORGREEN;STICKLINE(買入>LOW AND 買入<HIGH,買入,MIN(MIN(OPEN,CLOSE),買入),3,0),COLORRED;STICKLINE(買入>MIN(C,O) AND 買入<MAX(C,O),買入,MIN(OPEN,CLOSE),3,0),COLORRED;STICKLINE(買入>LOW AND 買入<HIGH,買入,LOW,0,0),COLORRED;STICKLINE(買入>HIGH,OPEN,CLOSE,3,0),COLORRED;STICKLINE(買入>HIGH,HIGH,LOW,0,0),COLORRED;DRAWTEXT(CROSS(LOW,買入),LOW*0.95,'←流入'),COLORMAGENTA,LINETHICK2;DRAWTEXT(CROSS(賣出,HIGH),HIGH*1.02,'←流出'),COLORYELLOW;EXP1:EXPMA(CLOSE,10),NODRAW;EXP2:EXPMA(CLOSE,60),NODRAW;ZT:=C/REF(C,1)>1.097;DRAWTEXT(ZT,L*0.98,'漲停'),COLOR00FFFF;DRAWICON(ZT,L*0.99,1);STICKLINE(ZT,OPEN,CLOSE,3,0),COLORRED;STICKLINE(ZT,H,L,0,0),COLORRED;XH:=FILTER(ZT,13);BH:=BARSLAST(ZT);CZ:=REF(H,BH)-REF(L,BH);陽漲幅:=4;陽倍量:=2;單陽:=C>O*(1+陽漲幅/100) AND VOL>REF(VOL,1)*陽倍量 AND C/REF(C,1)<1.097;DRAWTEXT(單陽,L*0.98,'大陽'),COLORFF00FF;STICKLINE(單陽,O,C,1.5,0),COLORFF00FF;生命線:=MA(C,60);牛熊線:=MA(C,120);V1:=(C+H+L)/3;MA3:=MA(V1,2);MA5:=MA(V1,5);DRAWBAND(MA2,RGB(200,50,55),MA5,RGB(0,100,50));{天使主圖}VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORBLUE;洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE;高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA;地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORGREEN;DRAWKLINE(H,O,L,C);TY:=C;A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3;前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3;STICKLINE(加倉,O,C,1,0),COLORRED;STICKLINE(洗盤,O,C,1,0),COLORWHITE;STICKLINE(減倉,O,C,1,0),COLORBLUE;STICKLINE(高拋,O,C,1,0),COLORMAGENTA;STICKLINE(地量,O,C,1,0),COLORGREEN;JJ:=(3*C+H+L+O)/6;VARB1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VARB1 AND C>REF(C,1);LJL:=FILTER(TJ1,5);STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORRED;STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORYELLOW;STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;DRAWTEXT_FIX(1,0.0,0.0,0,'藍芯-主力低位深度洗盤或高位出貨堅決'),COLORBLUE,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力輕度洗盤'),COLORWHITE,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出現了近期相對地量'),COLORGREEN,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高拋低吸或低吸高拋'),COLORFF00FF,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.24,0,'紅芯-主力吸籌進貨積極主動'),COLORRED,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.3,0,'黃芯-主力吸籌進貨強并且成交量出現黃金柱'),COLORYELLOW,LINETHICK1;EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);PL10:=ZIG(3,10);走強2:=BARSLAST(PL10<REF(PL10,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強2),0);追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;DRAWTEXT(追2 OR 追4,LOW*0.978,'追'),COLORYELLOW;PL5:=ZIG(3,5);EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);PL20:=ZIG(3,20);
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?