奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- [分享] 分筆成交圖 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=12997)

[分享] 分筆成交圖

分筆成交圖

x6:=EMA(H,3);
x7:=EMA(x6,5);
STICKLINE(x6>=x7,x6,x7,10,1),Color00A6F6;
STICKLINE(x6<x7,x6,x7,10,1), COLORBLUE;

x4:=EMA(L,3);
x5:=EMA(x4,5);
STICKLINE(x4>=x5,x4,x5,10,1),Color00A6F6;
STICKLINE(x4<x5,x4,x5,10,1), COLORBLUE;

x1:=(C+L+H)/3;
x2:=EMA(x1,3);
x3:=EMA(x2,5);
STICKLINE(x2>=x3,x2,x3,10,1),Color00A6F6;
STICKLINE(x2<x3,x2,x3,10,1), COLORBLUE;


C89:=FORCAST(c ,89),LINETHICK2,COLORWHITE;
(1.0004*C89),COLORYELLOW,LINETHICK1;
(0.9996*C89),COLORYELLOW,LINETHICK1;

謝謝大大的分享

大大你好,,可否分享你圖上的源碼,,(兩條趨勢線),,謝謝大大

C89:=FORCAST(c ,89),LINETHICK2,COLORWHITE;
(1.0004*C89),COLORYELLOW,LINETHICK1;
(0.9996*C89),COLORYELLOW,LINETHICK1;

謝謝大大的分享

5分鐘圖

5分鐘圖

1分鐘圖

1分鐘圖

HL:=EMA(HIGH,3);
LL:=EMA(LOW,3);
CH:=CROSS(CLOSE,HL);
CL:=-CROSS(LL,CLOSE);
TF:=IF(CH,CH,IF(CROSS(LL,CLOSE),CL,0));
UD:=REF(TF,BARSLAST(TF));
AA:=IF(UD>0,LL,HL);
PARTLINE(1,AA),LINETHICK2,colorFFFF;
PARTLINE(UD=1 AND REF(UD,1)=1,LL),LINETHICK2,colorFF00FF;
PARTLINE(UD=-1 AND REF(UD,1)=-1,HL),LINETHICK2,colorFF00;
DRAWNUMBER(ISLASTBAR,AA,AA,2),SHIFT2,colorFF00;

GGG:=HHV(MA(((HIGH + LOW) / 2),1),2),COLORMAGENTA,linethick1;
HHH:=LLV(MA(((HIGH + LOW) / 2),1),2),COLORMAGENTA,linethick1;
GGG*1.001,COLORMAGENTA;
HHH*0.999,COLORMAGENTA;

REF(HHV(H,3),1),COLORGREEN;
REF(LLV(L,3),1),COLORGREEN;

JJ:=(O+H+L)/3;
A:=EMA(JJ,3);
B:REF(A,1),POINTDOT,coloryellow,LINETHICK3;
NN:A,coloryellow,LINETHICK1;

input:n(13,1,100);
AA2:=REF(EMA(H,N),1);
A1X2:=(EMA(H,N)-AA2)/AA2*100;
BB2:=(H-AA2)/AA2*100;
CC2:IF(A1X2>=0,REF(EMA(H,N),BARSLAST(CROSS(A1X2,0))+1),L),COLORBLUE;
DD2:IF(A1X2<0,REF(EMA(H,N),BARSLAST(CROSS(0,A1X2))+1),L),COLORRED;

謝謝分享！感恩！

__________________
永保安康

A1:HHV(CLOSE,17),linethick1,colorffcccc;
A2:LLV(CLOSE,17),linethick1,colorffcccc;
MA(A1,3),linethicK1,color00FF00;
MA(A2,3),linethicK1,color00FF00;

AAA:REF(HHV(HHV(H,1),6),1),COLORBLUE;
BBB:REF(LLV(LLV(L,1),6),1),COLORBLUE;

中:MA(C,20),LINETHICK2,COLORFF00FF;
上:=中 + 2*STD(CLOSE,20),LINETHICK2,COLORRED;
下:=中 - 2*STD(CLOSE,20),LINETHICK2,COLORFF00FF;
上軌:EMA(上,2),LINETHICK2,COLOR4080FF;
下軌:EMA(下,2),LINETHICK2,COLOR69E072;

抓起漲點
抓起跌點

單一K線圖較難

取---多圖同列---多周期組合圖-較容易

A:=REF(H,2)<REF(H,1) AND REF(H,1)>=H;
B:IF(A,REF(H,1),REF(REF(H,1),BARSLAST(A))),LINETHICK1,Color38B0DE;
A1:=REF(L,2)>REF(L,1) AND REF(L,1)<= L;
B1:IF(A1,REF(L,1),REF(REF(L,1),BARSLAST(A1))),LINETHICK1,Color38B0DE;

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);
A:REF(C,BARSLAST(HD)),COLOR00FF20,LINETHICK;
B:REF(C,BARSLAST(LD)),COLORFF00FF,LINETHICK;

MA(A,3),linethicK1,COLORMAGENTA;
MA(B,3),linethicK1,COLORMAGENTA;

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
PARTLINE(T1>=1,A),COLOR00FF20;
PARTLINE(T1<1,A),POINTDOT,COLOR00FF20;
STICKLINE(T1<1,A,A,0.1,0),POINTDOT,COLOR00FF20;
PARTLINE(T2>=1,B),COLORFF00FF;
PARTLINE(T2<1,B),POINTDOT,COLORFF00FF;
STICKLINE(T2<1,B,B,0.1,0),POINTDOT,COLORFF00FF;

input:A(13,1,2000),B(8,1,2000),D(5,1,2000);

M13:=MA(CLOSE,A),COLORRED,LINETHICK0;
PARTLINE(M13>REF(M13,1),M13),COLORMAGENTA,LINETHICK2;
PARTLINE(M13<REF(M13,1),M13),COLORGREEN,LINETHICK2;
PARTLINE(M13=REF(M13,1),M13),COLORYELLOW,LINETHICK2;

M13L:=MA(LOW,B),COLORRED,LINETHICK0;
PARTLINE(M13L>REF(M13L,1),M13L),COLORMAGENTA,LINETHICK2;
PARTLINE(M13L<REF(M13L,1),M13L),COLORGREEN,LINETHICK2;
PARTLINE(M13L=REF(M13L,1),M13L),COLORYELLOW,LINETHICK2;

M13H:=MA(HIGH,D),COLORRED,LINETHICK0;
PARTLINE(M13H>REF(M13H,1),M13H),COLORMAGENTA,LINETHICK2;
PARTLINE(M13H<REF(M13H,1),M13H),COLORGREEN,LINETHICK2;
PARTLINE(M13H=REF(M13H,1),M13H),COLORYELLOW,LINETHICK2;

Input:N(600,1,10000),M(40,1,1000),P(20,1,1000);

TT:HHV(HHV(H,3),N);
KK:LLV(LLV(L,3),N);
H1:=MA(TT,M);
H2:=MA(TT,P);
L1:=MA(KK,M);
L2:=MA(KK,P);
partline(TT>ref(TT,1),TT),colorred;
partline(TT<ref(TT,1),TT),colorgreen;
partline(TT=ref(TT,1),TT),colormagenta,linethick1;
partline(KK>ref(KK,1),KK),colorred;
partline(KK<ref(KK,1),KK),colorgreen;
partline(KK=ref(KK,1),KK),colormagenta,linethick1;
partline(H1>ref(H1,1),H1),pointdot,coloryellow;
partline(H1<ref(H1,1),H1),linedot,coloryellow;
partline(H2>ref(H2,1),H2),colorred;
partline(H2<ref(H2,1),H2),colorcyan;
partline(L1>ref(L1,1),L1),pointdot,coloryellow;
partline(L1<ref(L1,1),L1),,coloryellow;
partline(L2>ref(L2,1),L2),colorred;
partline(L2<ref(L2,1),L2),colorcyan;