通達信三源主圖主圖指標劃線指標原始碼

{ 通達信三源主圖主圖指標劃線指標原始碼 }


DRAWGBK(O>C,RGB(0,30,0),RGB(0,0,60),0,'01',0);
DRAWKLINE(H,O,L,C);
MV10:=MA(V,10);
AVG_V:=(V-MV10)/MV10*100;
量差:=AVG_V-REF(AVG_V,1);
假陰:=C>REF(C,1) AND C<o; <br="">高開:=(O-REF(C,1))/REF(C,1)*100;
倍量:=V>REF(V,1)*1.69 AND V>REF(HHV(V,20),1);
振幅:=(H-L)/REF(C,1)*100;
ZF:=(C-REF(C,1))/REF(C,1)*100;
漲停:=C/REF(C,1)>1.095 ;
三元:=EVERY(漲停,3) OR EVERY(漲停,2);
XG1:=REF(三元,1) AND 倍量;
XG2:=三元 AND 倍量;
XG0610:=三元 AND 量差>REF(HHV(量差,20),1);
XG2265:=REF(EVERY(漲停,2),1) AND 振幅>15 AND ZF>0.5 AND 倍量;
XG600352:=高開>=6 AND 假陰 AND REF(EVERY(漲停,2),1) AND 倍量;
XG3:=XG2 OR XG1 OR XG0610 OR XG2265 OR XG600352;
XGOK:=FILTER(XG3,2);


DRAWICON(XGOK>0,L*0.98,4);


T:BARSLAST(XGOK),NODRAW;


支撐1:REF(C,T+1),NODRAW;
支撐2:REF(C,T+2),NODRAW;
支撐:REF(C,T),NODRAW;
STICKLINE(O,支撐1,支撐1,5,-1),COLOR22B4EE


;
STICKLINE(O,支撐2,支撐2,5,-1),COLOR0000FF


;
STICKLINE(O,支撐,支撐,5,-1),COLORGREEN;




V1:=BARSLAST(XGOK>0);V2:=REF(C,V1);
V12:=CROSS(C,V2);
V13:=C>V2 AND REF(L,1)

V15:=REF(C,V1+1); V16:=REF(C,V1+2);
V11:=C>REF(C,1) AND L<ref(c,1) and="" xgok="0" ref(xgok,1)="">0;
V14:=V12>0 OR V13>0 OR V11>0;


X11:=V1>0 AND C/REF(C,1)>1.085 AND V14>0;
X12:=V11>0 OR X11>0;


買3:=FILTER(X12>0,2);
DRAWTEXT(買3>0,L*0.97,'3'),COLORGREEN;


買2:=V1>0 AND C/REF(C,1)>1.01 AND CROSS(C,V15) AND V1<9;
DRAWTEXT(買2>0,L*0.95,'2'),COLORGREEN;
買1:=V1>0 AND C/REF(C,1)>1.01 AND CROSS(C,V16) AND V1<9;
DRAWTEXT(買1>0,L*0.90,'1'),COLORGREEN;






Z1:=BARSLAST(CROSS(C,REF(C,T)));


PZ:=Z1>0 AND COUNT(MAX(C,O)>REF(C,T),Z1)=Z1 AND Z1<20 AND C/REF(C,1)>1.085;


PZ1:=FILTER(PZ>0,10);


PZ2:=FILTER(T>1 AND COUNT(MAX(C,O)>REF(C,T),T)=T AND T<20 AND C/REF(C,1)>1.085,10);


P3:=PZ1 OR PZ2;


DRAWICON(P3>0,L*0.98,23);


流通市值:FINANCE(40)/100000000,NODRAW,COLORYELLOW;


XA8:=REF(C,1)/REF(C,3)>=1.2 AND O/REF(C,1)<=1.01 AND L<ref(c,1) and="" c="" ref(c,1)="">1.05;
啟動8:=XA8 AND COUNT(XA8,4)=1;


DRAWTEXT(啟動8,L*1.06,'風'),COLORGREEN;
A11111:=O>C AND C>REF(C,1) AND O/REF(C,1)>1.03;
A21111:=REF(HHV(V,15),1);
A31111:=A11111 AND V>A21111;
STICKLINE(A31111,O,C,2.5,0),COLORGREEN;


N2:=14;
A17:=(VOL=HHV(VOL,N2));
K0:=CURRBARSCOUNT=CONST(SUMBARS(A17,1));
K17:=BARSLAST(A17);
K27:=REF(MAX(C,O),K17);
K21:=REF(L,K17);
K3:=CURRBARSCOUNT=CONST(SUMBARS(A17,2));
K4:=BARSLAST(K3);
K5:=REF(MAX(C,O),K4);
NOTEXT1:=IF(CURRBARSCOUNT<const(sumbars(a17,1)),const(k27),drawnull), colorred;="" <br="">NOTEXT2:=IF(CURRBARSCOUNT<const(sumbars(a17,2)),const(k5),drawnull),colorred; <br="">NOTEXT3:IF(CURRBARSCOUNT<const(sumbars(a17,1)),const(k21),drawnull),colorgreen,linethick1; <br="">{梯量3}
漲幅:=(C-REF(C,1))/REF(C,1)*100;
梯量9:=EVERY(C>O,3) AND EVERY(C>REF(C,1),2) AND EVERY(V>REF(V,1),2) AND SUM(漲幅,3)<15;
梯量4:=REF(梯量9,1) AND C>=REF(C,1);
DRAWTEXT(FILTER(梯量9,2),H,'T3'),COLOR888888;
BK5:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(FILTER(梯量9,2)))+1),COLORD355BA;
T35:REF(H,BK5),LINETHICK1,COLORD355BA;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.9,0.1,1,EXTERNSTR(0,9997)); { 漲停原因}
DRAWTEXT_FIX(1,0.01,0.05,0,'板塊：')COLOR0066BB;
DRAWTEXT_FIX(1,0.03,0.05,0,STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,'_____'),GNBLOCK),'__'),DYBLOCK))COLOR0066BB; {板塊資訊}
DRAWTEXT_FIX(1,0.01,0.10,0,'同花：')COLORLIGREEN; {同花順}
DRAWTEXT_FIX(1,0.03,0.10,0,EXTERNSTR(0,9886))COLORYELLOW;


DRAWTEXT_FIX(1,0.03,0.25,0,EXTERNSTR(0,9601))COLOR70DB93 ;
DRAWTEXT_FIX(1,0.01,0.15,0,'遊資：')COLOR0000FF;
DRAWTEXT_FIX(1,0.03,0.15,0,EXTERNSTR(0,9701))COLOR0000FF; {遊資協戰席位};




U11:=5;
U21:=11;
U31:=9;
UPPER:=(1+U21/100)*MA(CLOSE,U11);
LOWER:=(1-U31/100)*MA(CLOSE,U11);
ENE1:=(UPPER+LOWER)/2;
出軌:=CROSS(C,UPPER) AND H=C COLORCYAN;


{競價龍頭副圖}
A14:=FINANCE(7)<120000000;
B14:=FINANCE(7)<300000000 AND FINANCE(7)>120000000;
C14:=FINANCE(7)<500000000 AND FINANCE(7)>300000000;
D14:=FINANCE(7)<800000000 AND FINANCE(7)>500000000;
E19:=FINANCE(7)<1300000000 AND FINANCE(7)>800000000;
A88:=DYNAINFO(14)<0.03 AND DYNAINFO(14)>0.006 AND DYNAINFO(17)>10 AND V*200/FROMOPEN/REF(MA(V,5),1)>3;
B:=DYNAINFO(9);
S19:=LOW>(REF(HIGH,2)+0.001) AND C>REF(C,1) AND C>MA(C,20)*1.20 AND V*200/FROMOPEN/REF(MA(V,5),1)>3;
競價龍頭:=S19 OR (A14 AND A88=1 AND B>1200) OR (B14 AND A88=1 AND B>3000)OR (C14 AND A88=1 AND B>5000)OR (D14 AND A88=1 AND B>8000)OR (E19 AND A88=1 AND B>13000) COLORRED;
GK1:=O>REF(C,1);
FD:=O/REF(C,1);
ZT33:=C/REF(C,1)>1.09 OR C/REF(C,1)>1.19;
GK2:=IF(GK1>0 AND FD>REF(FD,1) AND REF(ZT33,1)>0 AND REF(GK1,1)>0,1,0);
GK3:=GK2>0 AND GK1>0 AND ZT33>0 AND COUNT(ZT33>0,4)<4;
競換達標:=1; {原公式沒有提供這行，所以測試不透過。}


墨軒尋牛:=出軌 AND (競價龍頭 OR GK3);
墨軒尋牛1:=出軌 AND 競換達標;
DRAWICON(墨軒尋牛,L*0.96,25);
DRAWICON(墨軒尋牛1,L*0.94,24);