免费高清特黄a大片,九一h片在线免费看,a免费国产一级特黄aa大,国产精品国产主播在线观看,成人精品一区久久久久,一级特黄aa大片,俄罗斯无遮挡一级毛片

分享

【技術(shù)分析】

 大漢 2018-02-23

畫線(注:功能只在選擇K線功能的時(shí)候才會(huì)顯示) 

1.直線:

使用方法是按下鼠標(biāo)選取直線的起點(diǎn),然后移動(dòng)鼠標(biāo)(注意不要松開鼠標(biāo))直到直線的終點(diǎn),松開鼠標(biāo)即可。

2.平行線:

使用方法是按照畫直線的方法先畫一條直線,然后移動(dòng)鼠標(biāo),此時(shí)有一根平行的虛線始終跟隨鼠標(biāo),移動(dòng)該線到你想要的位置,然后點(diǎn)擊鼠標(biāo)。

3.柵形線:

使用方法和平行線類似。

4.通道線:

使用方法是選取您想要畫通道的起始位置,用鼠標(biāo)拉出一個(gè)范圍,然后松開鼠標(biāo)即可。

5.箱體線:

使用方法和通道線類似。

6.黃金分割線:

使用方法和通道線類似。

7.周期線:

使用方法是選取周期的起始天,按住鼠標(biāo)到周期的結(jié)束日后松開鼠標(biāo)即可。

8.神秘?cái)?shù)字線:

使用方法是點(diǎn)取神秘?cái)?shù)字的起始天就可以了。

9.經(jīng)典江恩線:

使用方法和通道線類似。

10. CY江恩線:

使用方法和經(jīng)典江恩線相同。

11. 拋物線:

使用方法是先畫一條直線,然后在移動(dòng)鼠標(biāo)的過程中拋物線跟隨變化,到滿意的位置點(diǎn)擊鼠標(biāo)即可。

12. 正弦線:

使用方法和拋物線類似。

13. “文字工具”項(xiàng):

此功能為提供在K線圖中任意一根K線上添加說明性文字的作用。點(diǎn)擊此按鈕后,找到要添加說明性文字的K線,在此K線上單擊一下,就會(huì)彈出“文字工具”項(xiàng)的提示窗口,在窗口中輸入提示語句,點(diǎn)擊“設(shè)置字體”可以修改字體及大小,點(diǎn)擊“確定”即可在K線中顯示出文字的提示。

14.水平線:

水平線是直線的一種,其特點(diǎn)是只能畫水平的直線。平時(shí)我們畫水平支撐線的時(shí)候,經(jīng)常畫不平,水平線就徹底解決了這個(gè)問題。水平線,可以用于捕捉雙底形態(tài)、三重底形態(tài)等,是一種比較有用的工具。

15. 垂直線:

垂直線也是直線的一種,其特點(diǎn)是只能畫垂直的直線。

16. 直線段:

直線段也是直線的一種,其特點(diǎn)是畫兩點(diǎn)之間的線段。

17. 單向箭頭、雙向箭頭:

單向箭頭和雙向箭頭,解決了在K線上畫圖的部分功能,這樣使一些簡(jiǎn)單的畫圖,不必使用其他的畫圖軟件,在插件本身就可以實(shí)現(xiàn)了。

18. 百分比線:

在上、下兩點(diǎn)之間畫百分比分割線。從上到下,百分比比率依次是:12.5%、25%、33.33%、37.5%、50%、62.5%、66.67%、75%、87.5%。

19. 橢圓:

在鼠標(biāo)指定的一個(gè)矩形里面畫橢圓。

20. 連續(xù)折線:

畫連續(xù)折線方法:按下鼠標(biāo)左鍵,拖動(dòng)鼠標(biāo)到第二個(gè)點(diǎn)時(shí)松開鼠標(biāo);移動(dòng)鼠標(biāo)到第三個(gè)點(diǎn),點(diǎn)一下鼠標(biāo)左鍵;移動(dòng)到第四個(gè)點(diǎn)……到最后一個(gè)點(diǎn)的時(shí)候,雙擊鼠標(biāo)左鍵就可以完成畫線了。如果雙擊鼠標(biāo)右鍵,折線的第一個(gè)點(diǎn)就會(huì)和最后一個(gè)點(diǎn)連起來,形成閉環(huán)。

21. 速阻線:

所謂速阻線,就是畫一根直線的三分之一和三分之二斜率的直線。

22. 上箭頭、下箭頭:

這兩個(gè)畫線工具也是方便我們直接在插件上進(jìn)行畫圖。

23. 帶回歸線的通道線:

帶回歸線的通道線與普通的通道線的畫法相同,只是上下通道線中間多了一條回歸直線,也即是通道的中軌。

24. 甘氏線:

甘氏線,是時(shí)間和空間的統(tǒng)一,其橫坐標(biāo)是時(shí)間,縱坐標(biāo)是空間。甘氏線中間的一條線是時(shí)間和空間1比1的關(guān)系,其他的線依次是2比1、3比1、4比1、5比1或1比2、1比3、1比4、1比5的關(guān)系,并且,這些線會(huì)跟隨1比1直線的移動(dòng)而按照一定的比率移動(dòng)。

25. 勻加速線:

勻加速線是在指定的兩點(diǎn)畫平底拋物線。

26. 音階線:

音階線是模仿音樂音階設(shè)計(jì)的。十二聲音階巧妙的把整比關(guān)系和等比關(guān)系結(jié)合在一起。音階線一共有8條線,最下面的線是基準(zhǔn)線,其他線與基準(zhǔn)線都接近一個(gè)整比關(guān)系,分別為:1比1、9比8、5比4、4比3、3比2、5比3、17比9。這些線對(duì)于把握股票炒作的節(jié)奏有一定的幫助。

27. 螺旋歷法線:

螺旋歷法線是按照自然日計(jì)算,從基準(zhǔn)日開始計(jì)算,畫月球周期的1倍、1.41、1.73、2.24、2.83等倍數(shù)的時(shí)間點(diǎn)上,每個(gè)數(shù)都是費(fèi)波南列的開方。

只要起點(diǎn)找對(duì)了,其他計(jì)算出來的點(diǎn),都代表時(shí)間上的敏感點(diǎn)位,股市容易產(chǎn)生變盤。

28. 時(shí)間黃金分割線:

傳統(tǒng)的黃金分割線只能在空間上畫上下兩點(diǎn)的黃金分割,時(shí)間黃金分割線能夠在時(shí)間上畫左右兩點(diǎn)的黃金分割。

29. 等換手變周期線:

即每隔一定的換手率畫線,兩根線之間的換手率大致相等。

首先找到股價(jià)在下跌前創(chuàng)新高的地方。記住是下跌前,畫一橫線,此時(shí)不是買入點(diǎn)。切記,如股價(jià)繼續(xù)下跌,在途中又創(chuàng)高。然后又下跌,抹掉第一畫線,在第二下跌前畫線。如此反復(fù)畫,反復(fù)畫,至到有一天,股價(jià)上穿此線,此點(diǎn)就是買點(diǎn),在上升中此理同上,看下圖,可直觀一些。。

這就是向下推阻力,看突破。反思惟方法
股不漲就跌,道理就這么簡(jiǎn)單,要想漲,只有突破,不突破,根本談不上漲。
很多人一直夢(mèng)想找到萬靈的公式,很多高手夢(mèng)想做出不敗的指標(biāo),偶對(duì)這些人,只能笑一笑,因?yàn)槭菈?mèng)想嘛,偶敢斷言,將來有一天,你也會(huì)放棄機(jī)內(nèi)的公式,簡(jiǎn)單的看看畫線。因?yàn)椋阋呀?jīng)是一代天驕了!!!!!!!
使用:

方法1:

1。最好結(jié)合大盤,順勢(shì)而為。

2,建議做形成上升通道的個(gè)股(樓梯股,即形成45度左右攀升的個(gè)股)和股性活躍的個(gè)股,不做ST股PT股。

3,量?jī)r(jià)結(jié)合。(注意是底部還是頭部,頭部放量要小心,如何判斷頭部或底部就要憑個(gè)人修為了,呵呵)

4。陰線突破,不入,觀察。

方法2:

1。超短線1-2日買賣,突破壓力位馬上進(jìn)入,次日出現(xiàn)十字星逃或跌破這壓力位逃,成交量跟不上逃。

(這方法風(fēng)險(xiǎn)大,不穩(wěn)健,而且需要洞悉熱惆蹇?,矄鲸议耻]д哂?,用时可选择流通?000-8000左右,活躍性較強(qiáng),有題材和想象空間的個(gè)股做,尤其可選當(dāng)日漲幅大于2,量比大于1?!兑魂柎┤€以上,KDJ相對(duì)低位或金叉,MACD低背離或二次金叉等指標(biāo)輔助可提高安全度》)
超短壓力線(加入主圖即可)

STICKLINE(CLOSEref(OPEN,1),ref(close,1),ref(close,1),20,0),COLORFFFFFF;

平常常用的壓力支持線

RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV12:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K12:=SMA(RSV12,3,1);
D12:=SMA(K12,3,1);
J12:=3*K12-2*D12;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
壓力位:IF(CROSS(j24,j),H,REF(H,BARSLAST(CROSS(j24,j)))),COLORred,LINETHICK2;
支撐位:IF(CROSS(j,j24),L,REF(L,BARSLAST(CROSS(j,j24)))),COLOR77AAFF,,LINETHICK2;

上升通道強(qiáng)勢(shì)股(樓梯股)(源碼,加入主圖)

AA10:=MA(C,10);
BB10:=atan((aa10-ref(aa10,1)))*180/3.1416;
STICKLINE(BB10>1 and AA10>ref(AA10,1), AA10,REF(AA10,1),8,0),colorred;
STICKLINE(BB10<1 and AA10
AA20:=MA(C,20);
BB20:=atan((aa20-ref(aa20,1)))*180/3.1416;
STICKLINE(BB20>1,AA20,REF(AA20,1),8,0),COLORYELLOW;
STICKLINE(BB20<1,AA20,REF(AA20,1),8,1),COLORbbcccc;

CZW-G

input.:p1(3,0,30),p2(6,1,300),p3(18,1,300),p4(250,0,300);
Var1:=(C+L+H)/3;
Var2:=eMA(Var1,6);
Var3:=eMA(Var2,5);
Var4:=eMA(Var3,12);
Var5:=eMA(Var4,5);
生命線:eMA(Var3,30),COLORRED,POINTDOT;
DRAWICON(C>=生命線,生命線,10);
DRAWICON(C<生命線,生命線,11);
a:=HHV(MA((L+H+C)/3,3),3);
b:=llv(MA((L+H+C)/3,3),10);
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),a,a,20,0),Coloryellow,linethick3,shift1;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),a,a,3),shift3,colorYELLOW;
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),b,b,20,0),ColorDB3FDD,linethick3,shift1;
DRAWNUMBER(BARSCOUNT(C)=SYSPARAM(1),b,b,3),shift3,ColorDB3FDD;

DRAWTEXT(sysparam(2)=BARPOS,c,' '+BLKNAME),COLORccffcc,ALIGN4;//板塊

a1:=cost(95);
a2:=cost(5);
ly:=(a1-a2)*100/(a1+a2);
drawicon(ly>ref(ly,1), l*0.98,8)ALIGN5;


input.:N(3);

A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N);{高點(diǎn)}
A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N);{低點(diǎn)}
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2;{高低點(diǎn)出現(xiàn)在同一K線上時(shí)可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1),LINETHICK0;{過濾后低點(diǎn)}
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1),LINETHICK0;{過濾后高點(diǎn)}

///HD:="jgb.HD"(N);LD:="jgb.LD"(N);
R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); S1:=R1>REF(R1,1); {前一高}
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); U1:=T1>REF(T1,1); {前一低}
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1); {前二高}
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2>REF(T2,1); {前二低}
T3:=BACKSET(U2,REF(BARSLAST(LD),1)+2); U3:=T3>REF(T3,1); {前三低}
T4:=BACKSET(U3,REF(BARSLAST(LD),1)+2); U4:=T4>REF(T4,1); {前四低}
R3:=BACKSET(S2,REF(BARSLAST(HD),1)+2); S3:=R3>REF(R3,1); {前三高}
R4:=BACKSET(S3,REF(BARSLAST(HD),1)+2); S4:=R4>REF(R4,1); {前四高}
★壓力1:DRAWLINE(S2,H,S1,H,1),Color80FFFF;
★支撐1:DRAWLINE(U2,L,U1,L,1),POINTDOT,Color00FFFF,linethick2;
★壓力2:DRAWLINE(S3,H,S2,H,1),ColorFF8000;
★支撐2:DRAWLINE(U3,L,U2,L,1),POINTDOT,ColorFF8000;
★壓力3:DRAWLINE(S4,H,S3,H,1),Color0000FF;
★支撐3:DRAWLINE(U4,L,U3,L,1)POINTDOT,Color0000FF;
DRAWICON(S2,H*1.01,10); DRAWICON(S3,H*1.01,10);
DRAWNUMBER(S2,H*1.02,H,2),COLORMAGENTA;
DRAWNUMBER(S1,H*1.02,H,2),COLORMAGENTA;
DRAWNUMBER(S3,H*1.02,H,2),COLORMAGENTA;
DRAWICON(U1,L*0.99,11); DRAWICON(U2,L*0.99,11);
DRAWICON(U3,L*0.99,11);DRAWICON(U4,L*0.99,11);
DRAWNUMBER(U1,L*0.98,L,2),COLORCYAN;
DRAWNUMBER(U2,L*0.98,L,2),COLORCYAN;
DRAWNUMBER(U3,L*0.98,L,2),COLORCYAN;
DRAWNUMBER(U4,L*0.98,L,2),COLORCYAN;
STICKLINE(open>=close ,close ,open,0,0 ),COLOR00FF00;
STICKLINE(open>=close ,close ,open,8,0 ),COLOR008800;
STICKLINE(open>=close ,close ,open,7,0 ),COLOR009900;
STICKLINE(open>=close ,close ,open,6,0 ),COLOR00AA00;
STICKLINE(open>=close ,close ,open,5,0 ),COLOR00BB00;
STICKLINE(open>=close ,close ,open,4,0 ),COLOR00CC00;
STICKLINE(open>=close ,close ,open,3,0 ),COLOR00DD00;
STICKLINE(open>=close ,close ,open,2,0 ),COLOR00EE00;
STICKLINE(open>=close ,close ,open,1,0 ),COLOR00FF00;

STICKLINE(close>open,close,open,0,0) ,COLORFFBBFF;
STICKLINE(close>open,close,open,8,0) ,COLORFF00FF;
STICKLINE(close>open,close,open,7,0) ,COLORFF22FF;
STICKLINE(close>open,close,open,6,0) ,COLORFF44FF;
STICKLINE(close>open,close,open,5,0) ,COLORFF66FF;
STICKLINE(close>open,close,open,4,0) ,COLORFF88FF;
STICKLINE(close>open,close,open,3,0) ,COLORFF99FF;
STICKLINE(close>open,close,open,2,0) ,COLORFFAAFF;
STICKLINE(close>open,close,open,1,0) ,COLORFFBBFF;
KDTP
input.:n(9),m(3);

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M,1);
D:=BARSLAST(CROSS(K,80));
KH:=REF(H,D);
PARTLINE(C

預(yù)警:CROSS(C,KH);
DRAWTEXT(CROSS(C,KH),L*0.995,'預(yù)警'),COLORGREEN;

KD指標(biāo)K值上穿80時(shí)(條件),取當(dāng)日最高價(jià),向右畫線,直到某日收盤價(jià)突破該價(jià)格(突破該線),畫線結(jié)束。1、作出主圖指標(biāo);2突破時(shí)條件選股(預(yù)警)。


XH-Zzig-分段信號(hào)

INPUT.:N(20,1,100);
M:=(SYSPARAM(4)-SYSPARAM(5))/SYSPARAM(5)*100,LINETHICK0;{確定高低點(diǎn)差}
M1:=IF(DATATYPE>5,M/6,IF(DATATYPE>3,M/8,M/10)),LINETHICK0;{確定ZIG轉(zhuǎn)向參數(shù)}
M1:IF(M1>1,FLOOR(M1),CEILING(M1)),LINETHICK0;

z:=zig(4,M1); f:=z-ref(z,1);
d:=FILTER(refx(f>0 and ref(f,1)<0,1)or BARPOS=1,2);{低點(diǎn)}
wd:=barslast(d);{低點(diǎn)位置}
g:=FILTER(refx(f<0 and ref(f,1)>0,1)or BARPOS=1,2);{高點(diǎn)}
wg:=barslast(g);{高點(diǎn)位置}
xwd:=if(sum(wd=0,2)>1,1,wd)linethick0;//低點(diǎn)位置確認(rèn)
xwg:=if(sum(wg=0,2)>1,1,wg)linethick0;//高點(diǎn)位置確認(rèn)
fd:=hhv(h,xwd)/ref(L,xwd)-1>M1/100;//低點(diǎn)鞏固系數(shù)
fg:=1-LLv(L,xwg)/ref(h,xwg)>M1/100;//高點(diǎn)鞏固系數(shù)
dqz:=BACKSET(ISLASTBAR and wd
gqz:=BACKSET(ISLASTBAR and wg
{以下輸出信號(hào)}
dd:dqz*d or BARPOS=1;{輸出低點(diǎn)}
gg:gqz*g or BARPOS=1;{輸出高點(diǎn)}


畫圓弧
ng\d均為16

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
gg:="xh-z.gg";//(ng);
dd:="xh-z.dd";//(nd);
p:=SYSPARAM(1);
z:=gg*h+dd*L;
sd:=sum(dd,0);
sdd:=sd[p]-sd+1;
wx1:=barssince(sdd=3);
wx2:=barssince(sdd=2);
wx3:=barssince(sdd=1);
ry1:=hhv((wx1=0)*z,0);
ry2:=hhv((wx2=0)*z,0);
ry3:=hhv((wx3=0)*z,0);
rx2:=hhv((wx2=0)*wx1,wx1+1);
rx3:=hhv((wx3=0)*wx1,wx1+1);
x2:=rx2[p];
x3:=rx3[p];
y1:=ry1[p];
y2:=(ry2[p]-ry1[p]);
y3:=(ry3[p]-ry1[p]);
xy:=POW(x2,2)+POW(y2,2);
e:=(x3*xy/x2-(x3*x3+y3*y3))/(y3-x3*y2/x2);
d:=-(y2*e+xy)/x2;
y1:=POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
y2:=-POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
c1:=ref(L,wx1)-ref(y1,wx1);
yy:=(y1+c1);
c2:=ref(L,wx1)+ref(y1,wx1);
ye:=(y2+c2);
wyy:=abs(ref(yy,wx3)-ref(z,wx3))<0.01;
wye:=abs(ref(ye,wx3)-ref(z,wx3))<0.01;
if wyy[datacount] then
yy,LINETHICK2,COLORMAGENTA;
ELSE
ye,LINETHICK2,COLORMAGENTA;


sg:=sum(gg,0);
sgg:=sg[p]-sg+1;
wxg1:=barssince(sgg=3);
wxg2:=barssince(sgg=2);
wxg3:=barssince(sgg=1);
ryg1:=hhv((wxg1=0)*z,0);
ryg2:=hhv((wxg2=0)*z,0);
ryg3:=hhv((wxg3=0)*z,0);
rxg2:=hhv((wxg2=0)*wxg1,wxg1+1);
rxg3:=hhv((wxg3=0)*wxg1,wxg1+1);
xg2:=rxg2[p];
xg3:=rxg3[p];
yg1:=ryg1[p];
yg2:=(ryg2[p]-ryg1[p]);
yg3:=(ryg3[p]-ryg1[p]);
xyg:=POW(xg2,2)+POW(yg2,2);
eg:=(xg3*xyg/xg2-(xg3*xg3+yg3*yg3))/(yg3-xg3*yg2/xg2);
g:=-(yg2*eg+xyg)/xg2;
yg1:=POW((g*g+eg*eg)/4-POW((wxg1+g/2),2),0.5);
yg2:=-POW((g*g+eg*eg)/4-POW((wxg1+g/2),2),0.5);
cg1:=ref(z,wxg1)-ref(yg1,wxg1);
yyg:=(yg1+cg1);
cg2:=ref(z,wxg1)+ref(yg1,wxg1);
yeg:=(yg2+cg2);
wyyg:=abs(ref(yyg,wxg3)-ref(z,wxg3))<0.01;
wyeg:=abs(ref(yeg,wxg3)-ref(z,wxg3))<0.01;
if wyyg[datacount] then
yyg,LINETHICK2,COLORGREEN;
ELSE
yeg,LINETHICK2,COLORGREEN;
DRAWICON(dd,z,11);
DRAWICON(gg,z,10);

波段畫線

input.:n(5,5,30);
fh:=high; fl:=low;
///以下找歷史最高點(diǎn),hh1表示最高價(jià),phh1表示最高點(diǎn)位置///
hh1:=fh[1]; phh1:=1;
for i=1 to datacount do //從第1條K線開始,循環(huán)執(zhí)行下面3條復(fù)合語句,直到K線結(jié)束
if hh1
hh1:=fh; phh1:=i; //用hh1單值變量記錄歷史最高價(jià),phh1記錄位置
end;

///以下找phh1之后的最低點(diǎn),ll表示最低價(jià),pll最低點(diǎn)位置
if phh1
ll:=fl[phh1+1];
for i=phh1 to datacount do
if ll>fl then begin
ll:=fl; pll:=i;
end;
end;

///以下用zig轉(zhuǎn)折模擬波段,通過參數(shù)n來調(diào)整波的分布///
///找歷史最高后的波峰最高點(diǎn),hh2次高價(jià),phh2位置///
tj:=peakbars(high,n,1)=0;
nstart:=max(lbound(tj),phh1+1);
if nstart<=datacount then begin
hh2:=0;
for i=nstart to datacount do
if tj then begin
if hh2
hh2:=fh;
phh2:=i;
end;
end;
end;

//////以下畫線///////////
drawline(barpos=phh1,high,barpos=phh2,high,1),colormagenta;
drawline(barpos=phh1,high,barpos=pll,low,1),coloryellow;



波浪+趨勢(shì)

{以下語句為新結(jié)構(gòu)波浪}
A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高點(diǎn)}
A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低點(diǎn)}
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低點(diǎn)出現(xiàn)在同一K線上時(shí)可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT(D1 AND E1=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{過濾后低點(diǎn)}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{過濾后高點(diǎn)}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
{以上語句為新結(jié)構(gòu)波浪}

A3:=H
B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部長(zhǎng)期高點(diǎn)}
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1)
D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部長(zhǎng)期低點(diǎn)}
DRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面進(jìn)行過濾,方法同前。只是不用考慮高低點(diǎn)出現(xiàn)在同一K線}
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1);I3:=BACKSET(G3,2);LZ:=I3>REF(I3,1),LINETHICK0; {長(zhǎng)期低點(diǎn),也可供引用}
L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1);I4:=BACKSET(G4,2);HZ:=I4>REF(I4,1),LINETHICK0;{長(zhǎng)期高點(diǎn),也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{長(zhǎng)期連線}
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的長(zhǎng)期連線,連在收盤價(jià)上}

{以下是兩條趨勢(shì)線原碼}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;

{以下語句是大盤趨勢(shì)疊加}
常數(shù):=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
疊1:INDEXC/常數(shù),COLORGRAY,LINETHICK0;
PARTLINE(1,疊1),COLORGRAY;
常數(shù)2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
疊2:INDEXC/常數(shù)2,COLORGRAY,LINETHICK0;
PARTLINE(1,疊2),COLORGRAY;

DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;

DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
波浪結(jié)構(gòu)

input.:n(20),n1(7),n2(69);

A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高點(diǎn)}
A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低點(diǎn)}
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低點(diǎn)出現(xiàn)在同一K線上時(shí)可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
H2:=D1 AND NOT(D2 AND E1>=E2);
L1:=D2 AND NOT(D1 AND E1=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,1000000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{過濾后低點(diǎn)}
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{過濾后高點(diǎn)}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部長(zhǎng)期高點(diǎn)}
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部長(zhǎng)期低點(diǎn)}
DRAWICON(HH,H,5),ALIGN1;DRAWICON(LL,L,4),ALIGN1;
H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; {后面進(jìn)行過濾,方法同前。只是不用考慮高低點(diǎn)出現(xiàn)在同一K線}
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1);I3:=BACKSET(G3,2);LZ:=I3>REF(I3,1); {長(zhǎng)期低點(diǎn),也可供引用}
L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1);I4:=BACKSET(G4,2);HZ:=I4>REF(I4,1);{長(zhǎng)期高點(diǎn),也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{長(zhǎng)期連線}
K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1; {最后的長(zhǎng)期連線,連在收盤價(jià)上}
UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
短高:=REF(H,BARSLAST(VV2));
短低:=REF(L,BARSLAST(VV));
短比: (C-短低)/(短高-短低),LINETHICK0;
常數(shù):=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
疊1:INDEXC/常數(shù),COLORGRAY,LINETHICK0;
PARTLINE(疊1,1),COLORGRAY;
常數(shù)2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
疊2:INDEXC/常數(shù)2,COLORGRAY,LINETHICK0;
PARTLINE(疊2,1),COLORGRAY;
{
s:=NUMTOSTRN(DAYS1970-DATETOD1970(REF( DATE,BARSLAST(LD) ) ),0 );
s1:=NUMTOSTRN(DAYS1970-DATETOD1970(REF( DATE,BARSLAST(HD) ) ),0 );
s2:=NUMTOSTRN(H,2 );
s3:=NUMTOSTRN(L,2 );
DRAWTEXT(HD,1.02*H,s),COLORCYAN;
DRAWTEXT(LD,0.98*L,s1),COLORCYAN;
DRAWTEXT(HD,H*(1+0.002),s2),COLORBLUE,ALIGN0;
DRAWTEXT(LD,L*(1.001-0.002),s3),COLORBLUE,ALIGN0;}

{以下語句為三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形:藍(lán)色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形:紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};
SYSPARAM(6),colorwhite;
M3: EMA(CLOSE,3);
M8: EMA(CLOSE,8),COLORGREEN;
M13: EMA(M8,13),COLORRED;
M62: EMA(M8,62),COLORCYAN;
Var1:=EMA(M13,62);
M81: EMA(M62,81),COLORYELLOW;
M144: EMA(Var1,144),LINETHICK2 , COLORRED;
M250: EMA(Var1,250),LINETHICK2 , COLORMAGENTA;
Var2:=(CLOSE+HIGH+LOW)/3;
Var3:=EMA(Var2,10);
Var4:=REF(Var3,1);
STICKLINE(Var3>Var4,Var3,Var4,15,0),COLORYELLOW;
STICKLINE(Var3< Var4,Var3,Var4,20,0),COLOR00ff00;
Var5:=(REF(HIGH,1)+REF(LOW,1))/2;
Var6:=MA(CLOSE,N)+2*STD(CLOSE,N);
DRAWICON(CROSS(Var5,Var6),HIGH*1.035,1);
DRAWTEXT(CROSS(Var5,Var6),HIGH*1.04,'賣出'),COLORGREEN;
Var7:=REF(CLOSE,1);
Var8:=SMA(MAX(CLOSE-Var7,0),N1,1)/SMA(ABS(CLOSE-Var7),N1,1)*100;
Var9:=CROSS(N2,Var8);
VarA:=FILTER(Var9,4);
DRAWICON(VarA,HIGH*1.035,1);
DRAWTEXT(VarA,HIGH*1.04,'賣出'),COLORWHITE;
VarB:=(2*CLOSE+HIGH+LOW)/4;
VarC:=LLV(LOW,34);
VarD:=HHV(HIGH,34);
VarE:=EMA((VarB-Var1)/(Var5-Var1)*100,7);
VarF:=EMA(0.667*REF(VarE,1)+0.333*VarE,5);
DRAWTEXT(IF(COUNT(CLOSE< REF(CLOSE,1),8)/8>0.6 AND VOL>=1.5*MA(VOL,5) AND COUNT(VarE>=VarF,3) AND REF(LOW,1)<=LLV(LOW,120),1,0),LOW,'●買進(jìn)'),colorred;
DRAWTEXT(IF(COUNT(CLOSE< REF(CLOSE,1),13)/13>0.6 AND COUNT(VarE>VarF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0),LOW,'●買進(jìn)'),COLORYELLOW;
Var10:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE< Var10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE< MA(CLOSE,13)*1.3,1,0),LOW,'●抄底'),COLORRED;
大鯊魚形態(tài)-畫線預(yù)警

SFF:=H/REF(H,1)<1 AND REF(h,1)/REF(h,2)<1AND L/REF(L,1)>1 and REF(L,1)/REF(L,2)>1 ;
STICKLINE(BACKSET(SFF,3),C,O,7,1),COLORYELLOW;
DRAWTEXT(SFF,L*0.97,'大鯊魚'),COLORYELLOW;
w:=barslast(FILTER(BACKSET(SFF,3),3));
預(yù)警:cross(c,ref(h,w))LINETHICK0;
DRAWLINE(FILTER(BACKSET(SFF,3),3),h,cross(c,ref(h,w)),ref(h,w),0);

頂?shù)桩嬀€
DRAWLINE(l=sysparam(5),l,barpos=SYSPARAM(3)-1,l,1),Colorgreen;
DRAWLINE(h=sysparam(4),h,barpos=SYSPARAM(3)-1,h,1),Coloryellow;

x:=ma(c,5);
n1:=sysparam(3);
n:=n1-sysparam(2)+1;
hh:=hhv(x,n);
ll:=llv(x,n);
tsh:=hhvbars(x,n);
tsl:=llvbars(x,n);
最高:hh[n1],POINTDOT;
最低:ll[n1],POINTDOT;
drawicon(barpos=n1-tsh[n1],l,5);
drawicon(barpos=n1-tsl[n1],l,4);
drawtext(barpos=n1-tsh[n1],h*1.02,'大頂')colorred;
drawtext(barpos=n1-tsl[n1],l*0.99,'大底')colorgreen;

dx:=ma(indexc,5);
dn1:=sysparam(3);
dn:=dn1-sysparam(2)+1;
dhh:=hhv(dx,dn);
dll:=llv(dx,dn);
dtsh:=hhvbars(dx,dn);
dtsl:=llvbars(dx,dn);
d最高:=dhh[dn1];
d最低:=dll[dn1];
drawicon(barpos=dn1-dtsh[dn1],l,11);
drawicon(barpos=dn1-dtsl[dn1],l,10);
drawtext(barpos=dn1-dtsh[dn1],h*1.02,'頂')colorblue;
drawtext(barpos=dn1-dtsl[dn1],l,'底')coloryellow;

{K線}
stickline(c=o and c>ref(c,1),c,o,8,0),Colorred;
stickline(c=o and c
stickline(c=o and c>ref(c,1),h,l,0,0),Colorred;
stickline(c=o and c<=ref(c,1),h,l,0,0)Colorcyan;
stickline(c=o and c<=ref(c,1),c,o,8,0)Colorcyan;

stickline(c>o,h,l,0,0),Colorred;
stickline(c
stickline(c>o,c,o,8,0),Colorred;
stickline(c
高低飛翔

input.:n(5),峰(1),開始時(shí)(1010101,9000101,1341231);

//1、高點(diǎn)——高點(diǎn)之后的波峰 畫紅線;2、高點(diǎn)——最低點(diǎn) 畫黃線或綠線;
FC:=C;FZ:=if(ZIG(C,n)>ref(ZIG(C,n),1) and ZIG(C,n)>refx(ZIG(C,n),1),ZIG(C,n),0);//序列變量賦值
KS:=DATACOUNT-BARSSINCE(DATE>開始時(shí));//設(shè)定參數(shù)選擇開始時(shí)間
n1:=SORT(FC,0,KS[DATACOUNT],DATACOUNT); //排序
高:FC[datacount],LINETHICK0;
GS:=DATACOUNT-BARSLAST(高=C)+30;//限制波段次高點(diǎn)(峰)在高點(diǎn)之后(右邊)
n2:=SORT(FZ,0,GS[DATACOUNT],DATACOUNT);//排序
中:FZ[datacount+1-峰],COLORMAGENTA,LINETHICK0;//設(shè)定參數(shù)選擇第幾個(gè)次高點(diǎn)(峰)
低:FC[ks[DATACOUNT]],COLORYELLOW,LINETHICK0;//這個(gè)低點(diǎn)可能在高點(diǎn)之前
//畫線
drawline(高=C AND DATE>開始時(shí),C,低=C,C,1),COLORYELLOW;
drawline(低=C AND DATE>開始時(shí),C,高=C,C,0),COLORGREEN;
drawline(高=C AND DATE>開始時(shí),C,中=C,C,1),COLORMAGENTA,LINEDOT;

1、高點(diǎn)——高點(diǎn)之后的波峰 畫紅線;
2、高點(diǎn)——最低點(diǎn) 畫黃線或綠線;
紅藍(lán)三角

A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高點(diǎn)}
A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低點(diǎn)}
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低點(diǎn)出現(xiàn)在同一K線上時(shí)可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
H2:=D1 AND NOT(D2 AND E1>=E2);
L1:=D2 AND NOT(D1 AND E1=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{過濾后低點(diǎn)}
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{過濾后高點(diǎn)}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部長(zhǎng)期高點(diǎn)}
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部長(zhǎng)期低點(diǎn)}
DRAWICON(HH,H,5),ALIGN1;DRAWICON(LL,L,4),ALIGN1;
H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; {后面進(jìn)行過濾,方法同前。只是不用考慮高低點(diǎn)出現(xiàn)在同一K線}
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1); {長(zhǎng)期低點(diǎn),也可供引用}
L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);{長(zhǎng)期高點(diǎn),也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{長(zhǎng)期連線}
K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1; {最后的長(zhǎng)期連線,連在收盤價(jià)上}
UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
短高:=REF(H,BARSLAST(VV2));
短低:=REF(L,BARSLAST(VV));
短比: (C-短低)/(短高-短低),LINETHICK0;

{以下語句為三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形:藍(lán)色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形:紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};



劃線指標(biāo)

M:=(SYSPARAM(4)-SYSPARAM(5))/(SYSPARAM(3)-SYSPARAM(2));
DRAWSL(BARPOS=SYSPARAM(1),LOW,15*M/50,0,0),COLORWHITE;
DRAWSL(BARPOS=SYSPARAM(1),LOW,30*M/50,0,0),COLORGREEN;
DRAWSL(BARPOS=SYSPARAM(1),LOW,45*M/50,0,0),COLORMAGENTA;
DRAWSL(BARPOS=SYSPARAM(1),LOW,75*M/50,0,0),COLORCYAN;
DRAWSL(BARPOS=SYSPARAM(1),HIGH,-75*M/50,0,0),COLORWHITE;
DRAWSL(BARPOS=SYSPARAM(1),HIGH,-60*M/50,0,0),COLORGREEN;
DRAWSL(BARPOS=SYSPARAM(1),HIGH,-45*M/50,0,0),COLORMAGENTA;
DRAWSL(BARPOS=SYSPARAM(1),HIGH,-15*M/50,0,0),COLORCYAN;
畫拋物線

input.:nd(16),ng(16);

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
dd:="xh-z.dd"(nd);
gg:="xh-z.gg"(ng);
sd:=sum(dd,0);
p:=SYSPARAM(1);
q:=SYSPARAM(3);
sdd:=sd[p]-sd+1;
wx0:=barssince(sdd=4);
wx1:=barssince(sdd=3);
wx2:=barssince(sdd=2);
wx3:=barssince(sdd=1);
rx2:=hhv((wx2=0)*wx1,0);X2:=rx2[p];
rx3:=hhv((wx3=0)*wx1,0);X3:=rx3[p];
ry1:=hhv((wx1=0)*L,0);Y1:=ry1[p];
ry2:=hhv((wx2=0)*L,0);Y2:=ry2[p]-y1;
ry3:=hhv((wx3=0)*L,0);Y3:=ry3[p]-y1;
XS:=POW(X3,0.5);XE:=POW(X2,0.5);
K:=(XS*Y2-XE*Y3)/(XS*X2-XE*X3);
d:=POW(Y2-K*X2,2)/X2;
YY1:=POW(D*WX1,0.5)+K*WX1;
R1:=Y1-REF(YY1,WX1);
YY:=(YY1+R1);
YY2:=-POW(D*WX1,0.5)+K*WX1;
R2:=Y1-REF(YY2,WX1);
YE:=(YY2+R2);
wyy:=abs(ref(yy,wx3)-ref(L,wx3))<0.01;
wye:=abs(ref(ye,wx3)-ref(L,wx3))<0.01;
if wyy[p] then
低:yy,LINETHICK2,COLORMAGENTA;
ELSE
低1:ye,LINETHICK2,COLORMAGENTA;
sg:=sum(gg,0);
sgg:=sg[p]-sg+1;
wxg0:=barssince(sgg=4);
wxg1:=barssince(sgg=3);
wxg2:=barssince(sgg=2);
wxg3:=barssince(sgg=1);
rxg2:=hhv((wxg2=0)*wxg1,0);Xg2:=rxg2[p];
rxg3:=hhv((wxg3=0)*wxg1,0);Xg3:=rxg3[p];
ryg1:=hhv((wxg1=0)*h,0);Yg1:=ryg1[p];
ryg2:=hhv((wxg2=0)*h,0);Yg2:=ryg2[p]-yg1;
ryg3:=hhv((wxg3=0)*h,0);Yg3:=ryg3[p]-yg1;
XSg:=POW(Xg3,0.5);XEg:=POW(Xg2,0.5);
Kg:=(XSg*Yg2-XEg*Yg3)/(XSg*Xg2-XEg*Xg3);
g:=POW(Yg2-Kg*Xg2,2)/Xg2;
YYg1:=POW(g*WXg1,0.5)+Kg*WXg1;
Rg1:=Yg1-REF(YYg1,WXg1);
YYg:=(YYg1+Rg1);
YYg2:=-POW(g*WXg1,0.5)+Kg*WXg1;
Rg2:=Yg1-REF(YYg2,WXg1);
YEg:=(YYg2+Rg2);
wyyg:=abs(ref(yyg,wxg3)-ref(h,wxg3))<0.01;
wyeg:=abs(ref(yeg,wxg3)-ref(h,wxg3))<0.01;
if wyyg[p] then
高:yyg,LINETHICK2,Color89FF50;
ELSE
高1:yeg,LINETHICK2,Color89FF50;
DRAWICON(wx0>=0 and (dd or gg),dd*L+gg*h,12);
DRAWICON(wx3=0 or wxg3=0,dd*L+gg*h,10);
tt:='高 '+NUMTOSTR(if(wyyg[p],yyg[q],yeg),3)+' 低 '+NUMTOSTR(if(wyy[p],yy[q],ye[q]),3);
DRAWTEXT(BARPOS=q-5,h,tt)SHIFT1,ALIGN4;
畫趨勢(shì)線

input.:n(16),m(0);

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
z:=zig(4,n);p:=SYSPARAM(1);
dd:="xh-z.dd"(n);wd:=barslast(dd);
sd:=sum(dd,0);di:=sd[p]-sd+1;id:=(di
gg:="xh-z.gg"(n);wg:=barslast(gg);
sg:=sum(gg,0);gi:=sg[p]-sg+1;ig:=(gi
td0:=barslast(di[p]=id);
td1:=barslast(1+di[p]=id);
td2:=barslast(2+di[p]=id);
x:ref(z,td0),POINTDOT;
k1:(x-ref(z,td1))/ref(td1,td0)*100,LINETHICK0,COLORGREEN;
k3:(ref(z,td1)-ref(z,td2))/ref(td2,td1)*100,LINETHICK0,Color5E7159;
x1:x+td0*k1/100,LINETHICK0,COLORGREEN;
x2:ref(z,td1)+td1*k3/100,LINETHICK0,Color5E7159;
DRAWLINE(1+di[p]=id,z,di[p]=id,z,1),COLORGREEN;
DRAWLINE(2+di[p]=id,z,1+di[p]=id,z,1),Color5E7159,POINTDOT;
tg0:=barslast(gi[p]=ig);
tg1:=barslast(1+gi[p]=ig);
tg2:=barslast(2+gi[p]=ig);
s:ref(z,tg0),POINTDOT;
k2:(s-ref(z,tg1))/ref(tg1,tg0)*100,LINETHICK0,COLORMAGENTA;
k4:(ref(z,tg1)-ref(z,tg2))/ref(tg2,tg1)*100,LINETHICK0,Color546C82;
s1:s+tg0*k2/100,LINETHICK0,COLORMAGENTA;
s2:ref(z,tg1)+tg1*k4/100,LINETHICK0,Color546C82;
DRAWLINE(1+gi[p]=ig,z,gi[p]=ig,z,1),COLORMAGENTA;
DRAWLINE(2+gi[p]=ig,z,1+gi[p]=ig,z,1),Color546C82,POINTDOT;
DRAWICON((dd and di<5) or (gg and gi<5),z,12);
DRAWICON(di[p]=id or gi[p]=ig,z,10);
畫速阻線

input.:n(16);

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
dd:="xh-z.dd"(n);
gg:="xh-z.gg"(n);
z:=dd*L+gg*h;
gd:=gg+dd;
DRAWICON(dd,z,12);
p:=SYSPARAM(1);
sgd:=sum(gd,0);
gds:=sgd[p]-sgd+1;
sb:=if(gds<1,1,gds);
sa:=(sb
hb:=hhv((sa=1)*BARPOS,0);
q:=hb[p];
wgd:=ref(barslast(gd),1)+1;
DRAWICON(gd,dd*L+gg*h,12);
hgd:=if(gg,h,if(dd,L,0));
Lgd:=if(gg,ref(L,wgd),if(dd,ref(h,wgd),0));
yhL:=(hgd-Lgd)/4;
oo:=CROSS(BACKSET(q=BARPOS,wgd[q]+1),0.5);{定點(diǎn)}
qz:=(wgd[q])*4/3;{畫斜線1}
w:=sumbars(gd,2)-1;
K1:=(hgd[q]-Lgd[q])/qz*4/3,LINETHICK0;
d1:ref(z,w)+k1*w,LINETHICK0,ColorFF6FB7;
K2:=(hgd[q]-Lgd[q])/qz/1.123,LINETHICK0;
d2:ref(z,w)+k2*w,LINETHICK0,ColorFF6FB7;
K3:=(hgd[q]-Lgd[q])/qz/2.246,LINETHICK0;
d3:ref(z,w)+k3*w,LINETHICK0,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k1,0,0),LINETHICK1,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k2,0,0),POINTDOT,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k3,0,0),POINTDOT,ColorFF6FB7;
{畫斜線2}
b1:=(Lgd[q]-hgd[q])/qz*4/3,LINETHICK0;
g1:ref(hgd[q],w)+b1*w,LINETHICK0,Color74AFFF;
b2:=(Lgd[q]-hgd[q])/qz/1.132,LINETHICK0;
g2:ref(hgd[q],w)+b2*w,LINETHICK0,Color74AFFF;
b3:=(Lgd[q]-hgd[q])/qz/2.246,LINETHICK0;
g3:ref(hgd[q],w)+b3*w,LINETHICK0,Color74AFFF;
DRAWSL(oo,hgd[q],b1,0,0),Color74AFFF,LINETHICK1;
DRAWSL(oo,hgd[q],b2,0,0),POINTDOT,Color74AFFF;
DRAWSL(oo,hgd[q],b3,0,0),POINTDOT,Color74AFFF;
i1:='斜率k1'+'±'+NUMTOSTR(abs(k1)*100,3)+'k2'+'±'
+NUMTOSTR(abs(k2)*100,3)+'k3'+'±'+NUMTOSTR(abs(k3)*100,3);
DRAWTEXT(BARPOS=SYSPARAM(3)-15,h,i1),ALIGN4,SHIFT1,Color74AFFF;
畫線

A:=HHVBARS(HIGH,0)+1;
T:=SUM(BACKSET(ISLASTBAR,HHVBARS(HIGH,0)),0);
B:=ISLASTBAR;
HH:LINEVALUE(A=1 ,H,B,H,0,0);
CC:ALL(HH>H,T);

TT:=SUM(BACKSET(ISLASTBAR,HHVBARS(HIGH,0)),0);
AA:=HHVBARS(HIGH,TT)+1;
T1:=SUM(BACKSET(ISLASTBAR,HHVBARS(HIGH,TT)),0);;
BB:=ISLASTBAR;
HH1:LINEVALUE(AA=1 ,H,BB,H,0,0);
CCCC:ALL(HH1>H,T1);
1。
A:歷史最高點(diǎn);
B:今日最高點(diǎn);
畫AB線;
CC:從A對(duì)應(yīng)日期至今日,中間所有K線的最高點(diǎn)小于AB線;

2。
AA:歷史最高點(diǎn)向右數(shù)第二高點(diǎn);
BB:今日最高點(diǎn);
畫AABB線;
CCCC:從A對(duì)應(yīng)日期至今日,中間所有K線的最高點(diǎn)小于AABB線;

畫線性回歸通道

input.:t(60);
drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
p:=if(SYSPARAM(1)
Ax:=p=BARPOS;//A點(diǎn)橫坐標(biāo)
yk:=slope(c,t+1);//通道斜率
yc:=forcast(c,t+1);
Ay:=yc[p+t]-yk[p+t]*t;//A點(diǎn)縱坐標(biāo)
Bx:=ref(Ax,t);//B點(diǎn)橫坐標(biāo)
By:=yc[p+t];//B點(diǎn)縱坐標(biāo)
中:LINEVALUE(Ax,Ay,Bx,By,0,0);
js:=hhv(h-中,t+1);
jq:=hhv(中-L,t+1);
上:LINEVALUE(Ax,Ay+js[p+t],Bx,By+js[p+t],0,0);
下:LINEVALUE(Ax,Ay-jq[p+t],Bx,By-jq[p+t],0,0);
STICKLINE(Ax or Bx,上,下,0.01,0)COLORGRAY,POINTDOT;
K:=(中-ref(中,t))/t;//(refx(中,t)-中)/中/t*100;
斜y:k,linethick0;
斜%:K[p+t]/中*100,linethick0;
寬%:((上-下)*cos(atan(K[p+t]))/下[p+t])*100,linethick0;//相對(duì)寬度
寬y:(上-下)*cos(atan(K[p+t])),linethick0;//絕對(duì)寬度
畫線性回歸通道1
n=16

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
dd:="xh-z.dd";//(n);
gg:="xh-z.gg";//(n);
gd:=FILTER(dd+gg,4);
dg:=barslast(gd);
p:=SYSPARAM(1);
Sgd:=sum(gd,0);
gdS:=Sgd[p]-Sgd+1;
W1:=barssince(gdS=gdS[p]);
if w1[p]>1 then begin
Bx:=p=BARPOS;
By:=forcast(c,W1[p]+1);
Ax:=W1=0;
Ay:=By[p]-refx(SLOPE(c,W1[p]+1),W1[p])*W1[p];
zx:LINEVALUE(Ax,Ay,Bx,By,0,0)COLORYELLOW;
sh:=hhv(h-zx,w1+1);
sL:=hhv(zx-L,w1+1);
sx:LINEVALUE(Ax,Ay+sh[p],Bx,By+sh,0,0)COLORMAGENTA;
xx:LINEVALUE(Ax,Ay-sL[p],Bx,By-sL,0,0)COLORGREEN;
STICKLINE(Ax or Bx,xx,sx,0.1,0)POINTDOT,ColorD9FF76;end;
K:=(by[p]-ay[p-w1[p]])/W1[p];
斜:k*100,LINETHICK0;
寬:abs((sx-xx)*cos(ATAN(k)*5.73)),LINETHICK0;
寬%:寬/zx[p]*100,LINETHICK0;
DRAWICON(w1=0,dd*L+gg*h,12);

價(jià)量時(shí)空

INPUT.:N(5);
DRAWGBK(C, COLORRGB(50,50,0), COLORRGB(50,100,0),1);
a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/10;
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+0.05),colorgray;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+0.05),colorgray;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+0.05),colorgray;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+0.05),colorgray;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+0.05),colorgray;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+0.05),colorgray;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+0.05),colorgray;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+0.05),colorgray;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,a4-8*hh1,a4-9*hh1+0.05),colorgray;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,a4-9*hh1,a4-10*hh1+0.05),colorgray;

hh:=SYSPARAM(4);ll:=SYSPARAM(5);
x:=ll-(hh-ll+MINDIFF)/n;
y:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2)+1);
yvb:=y[SYSPARAM(3)]/(ll-x+MINDIFF);
z:=VOL/yvb+x;
STICKLINE(CLOSE>REF(CLOSE,1),x,z,7,1),Color0000FF;
STICKLINE(CLOSE<=REF(CLOSE,1),x,z,7,0),ColorEAE000;
五日:MA(z,5),SHIFT5;
十日:MA(z,10),SHIFT5;


DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,{STKNAME+''+STKLABEL+''+}BLKNAME)align4,COLORGREEN;


STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLORB0B0FF;
STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
STICKLINE(C<=O,C,O,2,0),COLORCYAN;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;


博弈線:=WMA(CLOSE,8),linethick3;
byx:=WMA(CLOSE,8),linethick3;
FILLRGN(byx>ref(byx,1),byx,ref(byx,1)),COLORRED;
FILLRGN(byx
ma21:ma(c,21),SHIFT5,color00ff00;


Var1:=SYSPARAM(3)-SYSPARAM(2)+1;
Var2:=SYSPARAM(3)-BARPOS;
Var3:=HHV(HIGH,Var1);
Var4:=LLV(LOW,VaR1);
Var5:=REFX(Var3,Var2); //主圖最高價(jià)
Var5:IF(SYSPARAM(3)<>SYSPARAM(1),SYSPARAM(6),Var5),COLORRED,POINTDOT;
Var6:REFX(Var4,Var2),COLORWHITE,POINTDOT;//主圖最低價(jià)
黃191:(Var5-Var6)*0.191+Var6,COLORYELLOW,POINTDOT;
黃382:(Var5-Var6)*0.382+Var6,COLORYELLOW,POINTDOT;
黃500:(Var5-Var6)*0.500+Var6,COLORGREEN,POINTDOT;
黃618:(Var5-Var6)*0.618+Var6,COLORYELLOW,POINTDOT;
黃809:(Var5-Var6)*0.809+Var6,COLORYELLOW,POINTDOT;
A:=LOW=LLV(LOW,240);
A1:=BARSLAST(A);
VERTLINE(A1=30);
VERTLINE(A1=60);
VERTLINE(A1=90);
VERTLINE(A1=120);
VERTLINE(A1=150);
VERTLINE(A1=180);
VERTLINE(A1=210);
VERTLINE(A1=240);
DRAWTEXT(A1=30,HIGH,'第一時(shí)間');
DRAWTEXT(A1=60,HIGH,'第二時(shí)間');
DRAWTEXT(A1=90,HIGH,'第三時(shí)間');
DRAWTEXT(A1=120,HIGH,'第四時(shí)間');
DRAWTEXT(A1=150,HIGH,'第五時(shí)間');
DRAWTEXT(A1=180,HIGH,'第六時(shí)間');
DRAWTEXT(A1=210,HIGH,'第七時(shí)間');
DRAWTEXT(A1=240,HIGH,'第八時(shí)間');
Varr1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
DRAWICON(CROSS(82,Varr1),HIGH+0.108,2);VERTLINE(CROSS(82,varr1)),POINTDOT;
DRAWSL(CROSS(82,varr1),HHV(HIGH,1),0,8,1),colormagenta,POINTDOT;
DRAWICON(COUNT(CROSS(Varr1,18),5) and CROSS(WMA(CLOSE,5),ref(WMA(CLOSE,5),1)),l-0.108,1);


b1:=(SYSPARAM(4)-SYSPARAM(5))/(SYSPARAM(3)-SYSPARAM(2));
DRAWSL(BARPOS=SYSPARAM(1),LOW,378*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,188*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,141*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,95*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,48*b1/100,0,0),COLORgreen,;
DRAWSL(BARPOS=SYSPARAM(1),LOW,24.5*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,16.5*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,13*b1/100,0,0),COLORwhite,POINTDOT;
DRAWSL(BARPOS=SYSPARAM(1),LOW,7*b1/100,0,0),COLORwhite,POINTDOT;
m1:=barslast(month<>ref(month,1));
w1:=barslast(weekday
wO:ref(O,w1),colorff00ff;//周開盤,
mO:ref(O,m1),colorwhite;//月開盤,
以今日收盤價(jià)向后畫一條線

{3種寫法,任選一句就可}

STICKLINE(c<>0 and ISLASTBAR=1,c,c,1000,1);

drawsl(C<>0 AND ISLASTBAR,C,0,0,3),colorred;

PARTLINE(BACKSET(ISLASTBAR,30),DYNAINFO(7)),SHIFT30;




趨勢(shì)線1

input.:n(16),m(90);

drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
z:=zig(4,n);p:=SYSPARAM(1);
dd:="xh-z.dd"(n);wd:=barslast(dd);
sd:=sum(dd,0);di:=sd[p]-sd+1;id:=(di
gg:="xh-z.gg"(n);wg:=barslast(gg);
sg:=sum(gg,0);gi:=sg[p]-sg+1;ig:=(gi
td0:=barslast(di[p]=id);
td1:=barslast(1+di[p]=id);
td2:=barslast(2+di[p]=id);
x:ref(z,td0),POINTDOT;
k1:(x-ref(z,td1))/ref(td1,td0)*100,LINETHICK0,COLORGREEN;
k3:(ref(z,td1)-ref(z,td2))/ref(td2,td1)*100,LINETHICK0,Color5E7159;
x1:x+td0*k1/100,LINETHICK0,COLORGREEN;
x2:ref(z,td1)+td1*k3/100,LINETHICK0,Color5E7159;
DRAWLINE(1+di[p]=id,z,di[p]=id,z,1),COLORGREEN;
DRAWLINE(2+di[p]=id,z,1+di[p]=id,z,1),Color5E7159,POINTDOT;
tg0:=barslast(gi[p]=ig);
tg1:=barslast(1+gi[p]=ig);
tg2:=barslast(2+gi[p]=ig);
s:ref(z,tg0),POINTDOT;
k2:(s-ref(z,tg1))/ref(tg1,tg0)*100,LINETHICK0,COLORMAGENTA;
k4:(ref(z,tg1)-ref(z,tg2))/ref(tg2,tg1)*100,LINETHICK0,Color546C82;
s1:s+tg0*k2/100,LINETHICK0,COLORMAGENTA;
s2:ref(z,tg1)+tg1*k4/100,LINETHICK0,Color546C82;
DRAWLINE(1+gi[p]=ig,z,gi[p]=ig,z,1),COLORMAGENTA;
DRAWLINE(2+gi[p]=ig,z,1+gi[p]=ig,z,1),Color546C82,POINTDOT;
DRAWICON((dd and di<5) or (gg and gi<5),z,12);
DRAWICON(di[p]=id or gi[p]=ig,z,10);
三點(diǎn)定乾坤

aad:=BACKSET(tjd,peakBARS(m,n,2));
ad:=aad
bbd:=BACKSET(tjd,peakBARS(m,n,1));
bd:=bbd
v2:=if(bd,1,0);
abd:LINEVALUE(ad,h,bd,h,0,0),linethick0;
kkad:=refx(abd,1)-abd;
DRAWSL(vv=abd and ad,h,kkad,la,0),colorgreen,linethick2;
ccd:=sum(abd>vv and ref(abd,1)=ref(abd,peakBARS(m,n,2));
cd:=ccd>ref(ccd,1);
bcd:=LINEVALUE(bd,h,cd,h,0,0),linethick0;
kkbd:=refx(bcd,1)-bcd;
DRAWSL(vv=abd and v2,h,kkbd,lb,0),COLORblue,linethick2;
DRAWSL(cd,h,0,lc,0),COLORWHITE,linethick2;
DRAWTEXT(vv=abd and ad,h*1.05,'A'),COLORWHITE;
DRAWTEXT(vv=abd and v2,h*1.05,'B'),COLORWHITE;
DRAWTEXT(cd,h*1.05,'C'),COLORWHITE;


上升(下降)通道
INPUT.:N(240,0,999);
hh:=hhv(h,N);
hhh:=h;
aa:=BARSLAST(h=hh[datacount]);
ba:datacount-aa,LINETHICK0;
ja:=1;
tm1:=999999;
for i1=ba[datacount]+1 to datacount do begin
k1:=(hh[datacount]-hhh[i1])/ja;
if k1then begin
tm1:=k1;
ts1:=ja;
end;
ja:=ja+1;
end;
A1:LINEVALUE(h=hh[datacount] and aa=0,h,BARPOS=datacount-aa[datacount]+ts1,h,0,0),colorffff54;
cha:=hhv(abs(l-a1),aa);
A2:a1-cha[datacount],colorffff54;
AI:a1-cha[datacount]/2,colorffff54,LINEDASH;

ll:=llv(l,N);
lll:=l;
a3:=BARSLAST(l=ll[datacount]);
b3:=datacount-a3;
j3:=1;
tm3:=999999;
for i3=b3[datacount]+1 to datacount do begin
k3:=(lll[i3]-ll[datacount])/j3;
if k3then begin
tm3:=k3;
ts3:=j3;
end;
j3:=j3+1;
end;
B1:LINEVALUE(l=ll[datacount] and a3=0,l,BARPOS=datacount-a3[datacount]+ts3,l,0,0),color5454ff;
chb:=hhv(abs(h-b1),a3);
b2:b1+chb[datacount],color5454ff;
bi:b1+chb[datacount]/2,color5454ff,LINEDASH;



上升下降通道

hh:=hhv(h,0);
hhh:=h;
aa:=BARSLAST(h=hh[datacount]);
ba:=datacount-aa;
ja:=1;
tm1:=999999;
for i1=ba[datacount]+1 to datacount do begin
k1:=(hh[datacount]-hhh[i1])/ja;
if k1then begin
tm1:=k1;
ts1:=ja;
end;
ja:=ja+1;
end;
A1:LINEVALUE(h=hh[datacount] and aa=0,h,BARPOS=datacount-aa[datacount]+ts1,h,0,0),colorffff54;
cha:=hhv(abs(l-a1),aa);
A2:a1-cha[datacount],colorffff54;
AI:a1-cha[datacount]/2,colorffff54,LINEDASH;

ll:=llv(l,0);
lll:=l;
a3:=BARSLAST(l=ll[datacount]);
b3:=datacount-a3;
j3:=1;
tm3:=999999;
for i3=b3[datacount]+1 to datacount do begin
k3:=(lll[i3]-ll[datacount])/j3;
if k3then begin
tm3:=k3;
ts3:=j3;
end;
j3:=j3+1;
end;
B1:LINEVALUE(l=ll[datacount] and a3=0,l,BARPOS=datacount-a3[datacount]+ts3,l,0,0),color5454ff;
chb:=hhv(abs(h-b1),a3);
b2:b1+chb[datacount],color5454ff;
bi:b1+chb[datacount]/2,color5454ff,LINEDASH;
速阻線
n=16
drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
dd:="xh-z.dd"(n);
gg:="xh-z.gg"(n);
z:=dd*L+gg*h;
gd:=gg+dd;
DRAWICON(dd,z,12);
p:=SYSPARAM(1);
sgd:=sum(gd,0);
gds:=sgd[p]-sgd+1;
sb:=if(gds<1,1,gds);
sa:=(sb
hb:=hhv((sa=1)*BARPOS,0);
q:=hb[p];
wgd:=ref(barslast(gd),1)+1;
DRAWICON(gd,dd*L+gg*h,12);
hgd:=if(gg,h,if(dd,L,0));
Lgd:=if(gg,ref(L,wgd),if(dd,ref(h,wgd),0));
yhL:=(hgd-Lgd)/4;
oo:=CROSS(BACKSET(q=BARPOS,wgd[q]+1),0.5);{定點(diǎn)}
qz:=(wgd[q])*4/3;{畫斜線1}
w:=sumbars(gd,2)-1;
K1:=(hgd[q]-Lgd[q])/qz*4/3,LINETHICK0;
d1:ref(z,w)+k1*w,LINETHICK0,ColorFF6FB7;
K2:=(hgd[q]-Lgd[q])/qz/1.123,LINETHICK0;
d2:ref(z,w)+k2*w,LINETHICK0,ColorFF6FB7;
K3:=(hgd[q]-Lgd[q])/qz/2.246,LINETHICK0;
d3:ref(z,w)+k3*w,LINETHICK0,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k1,0,0),LINETHICK1,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k2,0,0),POINTDOT,ColorFF6FB7;
DRAWSL(oo,Lgd[q],k3,0,0),POINTDOT,ColorFF6FB7;
{畫斜線2}
b1:=(Lgd[q]-hgd[q])/qz*4/3,LINETHICK0;
g1:ref(hgd[q],w)+b1*w,LINETHICK0,Color74AFFF;
b2:=(Lgd[q]-hgd[q])/qz/1.132,LINETHICK0;
g2:ref(hgd[q],w)+b2*w,LINETHICK0,Color74AFFF;
b3:=(Lgd[q]-hgd[q])/qz/2.246,LINETHICK0;
g3:ref(hgd[q],w)+b3*w,LINETHICK0,Color74AFFF;
DRAWSL(oo,hgd[q],b1,0,0),Color74AFFF,LINETHICK1;
DRAWSL(oo,hgd[q],b2,0,0),POINTDOT,Color74AFFF;
DRAWSL(oo,hgd[q],b3,0,0),POINTDOT,Color74AFFF;
i1:='斜率k1'+'±'+NUMTOSTR(abs(k1)*100,3)+'k2'+'±'
+NUMTOSTR(abs(k2)*100,3)+'k3'+'±'+NUMTOSTR(abs(k3)*100,3);
DRAWTEXT(BARPOS=SYSPARAM(3)-3,h,i1),ALIGN4,SHIFT1,Color74AFFF;

圓弧

ngnd=16


drawtext(sysparam(2)=barpos,c,'板塊:'+blkname),colorccffff,align4;
gg:="xh-z.gg"(ng);
dd:="xh-z.dd"(nd);
p:=SYSPARAM(1);
z:=gg*h+dd*L;
sd:=sum(dd,0);
sdd:=sd[p]-sd+1;
wx1:=barssince(sdd=3);
wx2:=barssince(sdd=2);
wx3:=barssince(sdd=1);
ry1:=hhv((wx1=0)*z,0);
ry2:=hhv((wx2=0)*z,0);
ry3:=hhv((wx3=0)*z,0);
rx2:=hhv((wx2=0)*wx1,wx1+1);
rx3:=hhv((wx3=0)*wx1,wx1+1);
x2:=rx2[p];
x3:=rx3[p];
y1:=ry1[p];
y2:=(ry2[p]-ry1[p]);
y3:=(ry3[p]-ry1[p]);
xy:=POW(x2,2)+POW(y2,2);
e:=(x3*xy/x2-(x3*x3+y3*y3))/(y3-x3*y2/x2);
d:=-(y2*e+xy)/x2;
y1:=POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
y2:=-POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
c1:=ref(L,wx1)-ref(y1,wx1);
yy:=(y1+c1);
c2:=ref(L,wx1)+ref(y1,wx1);
ye:=(y2+c2);
wyy:=abs(ref(yy,wx3)-ref(z,wx3))<0.01;
wye:=abs(ref(ye,wx3)-ref(z,wx3))<0.01;
if wyy[datacount] then
yy,LINETHICK2,COLORMAGENTA;
ELSE
ye,LINETHICK2,COLORMAGENTA;


sg:=sum(gg,0);
sgg:=sg[p]-sg+1;
wxg1:=barssince(sgg=3);
wxg2:=barssince(sgg=2);
wxg3:=barssince(sgg=1);
ryg1:=hhv((wxg1=0)*z,0);
ryg2:=hhv((wxg2=0)*z,0);
ryg3:=hhv((wxg3=0)*z,0);
rxg2:=hhv((wxg2=0)*wxg1,wxg1+1);
rxg3:=hhv((wxg3=0)*wxg1,wxg1+1);
xg2:=rxg2[p];
xg3:=rxg3[p];
yg1:=ryg1[p];
yg2:=(ryg2[p]-ryg1[p]);
yg3:=(ryg3[p]-ryg1[p]);
xyg:=POW(xg2,2)+POW(yg2,2);
eg:=(xg3*xyg/xg2-(xg3*xg3+yg3*yg3))/(yg3-xg3*yg2/xg2);
g:=-(yg2*eg+xyg)/xg2;
yg1:=POW((g*g+eg*eg)/4-POW((wxg1+g/2),2),0.5);
yg2:=-POW((g*g+eg*eg)/4-POW((wxg1+g/2),2),0.5);
cg1:=ref(z,wxg1)-ref(yg1,wxg1);
yyg:=(yg1+cg1);
cg2:=ref(z,wxg1)+ref(yg1,wxg1);
yeg:=(yg2+cg2);
wyyg:=abs(ref(yyg,wxg3)-ref(z,wxg3))<0.01;
wyeg:=abs(ref(yeg,wxg3)-ref(z,wxg3))<0.01;
if wyyg[datacount] then
yyg,LINETHICK2,COLORGREEN;
ELSE
yeg,LINETHICK2,COLORGREEN;
DRAWICON(dd,z,11);
DRAWICON(gg,z,10);
前幾日有漲停收盤,今日漲幅大于3%

w:=barslast(ref(c,1)*1.1-c<0.01);
DRAWLINE(w=0,c,c/ref(c,1)>1.03,c,0);
DRAWLINE(w=0,o,c/ref(c,1)>1.03,o,0);
1:今天收盤前的某一天有一漲停板;
2:今天收盤漲幅大于3%;
在漲停板的開盤價(jià)和今天的開盤價(jià)處畫連線
在漲停板的收盤價(jià)和今天的收盤價(jià)處畫連線
趨勢(shì)線2

gz1:=PEAKBARS(1,10,1);
gg1:=BACKSET(ISLASTBAR,gz1+1);
gz2:=PEAKBARS(1,5,2);
gg2:=BACKSET(ISLASTBAR,gz2+1);
dz1:=TROUGHBARS(2,10,1);
dz3:=TROUGHBARS(2,10,2);
dz7:=TROUGHBARS(2,5,2);
dg1:=BACKSET(ISLASTBAR,dz1+1);
dg4:=BACKSET(ISLASTBAR,dz3+1);
dg8:=BACKSET(ISLASTBAR,dz7+1);
MACD背離畫線

DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA), COLORSTICK;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,0,0.3,8,0),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.2,8,0),COLORff80ff;
DRAWICON(二次金叉,dea*0.9,1) ;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背離,0,0.1,8,0),COLORRED;
DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,linethick2;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
頂背離:=REF(CLOSE,A2+1)DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORGREEN,linethick2;
支撐'壓力

DRAWICON(((CLOSE > 0) AND (ISLASTBAR = 1)),CLOSE,'一休哥1'),ALIGN4,SHIFT2;
VAR1:=(EMA(VOL,12) - EMA(VOL,26));
VAR2:=EMA(VAR1,9);
VAR3:=(((EMA(CLOSE,30) * 2) + MA(CLOSE,60)) / 3);
A3:=(((EMA(CLOSE,10) * 2) + MA(CLOSE,20)) / 3);
VAR4:=(VOL * CLOSE);
VAR5:=(EMA(VAR4,13) / EMA(VOL,13));
VAR6:=(EMA(VAR4,60) / EMA(VOL,60));
VAR7:=EMA(((VAR5 + VAR6) / 2),3);
A5:=(EMA(VAR4,5) / EMA(VOL,5));
A6:=(EMA(VAR4,20) / EMA(VOL,20));
A7:=EMA(((A5 + A6) / 2),3);
A:=MA(((A3 + A7) / 2),1);
A1:=REF(A,1);
A8:=MA(((VAR3 + VAR7) / 2),1);
A22:=MA(((VAR3 + VAR7) / 2),1);
【中線強(qiáng)弱線】:A22,LINETHICK0,colorFF;
DRAWICON((A8 < REF(A8,1)),REF(A8,2),11),LINETHICK2,colorFFFFFF;
DRAWICON((A8 >= REF(A8,1)),REF(A8,2),10),LINETHICK2,colorFF;
VAR11:=(((((2 * CLOSE) + OPEN) + HIGH) + LOW) / 5);
VAR12:=VOL;
【短期強(qiáng)弱線】:(SUM((VAR11 * VAR12),13) / SUM(VAR12,13)),LINETHICK1,colorFFFF;
PARTLINE((【短期強(qiáng)弱線】 > REF(【短期強(qiáng)弱線】,1)),【短期強(qiáng)弱線】),colorFF00FF;
AM:=DMA(MA(DMA(CLOSE,VAR2),6),(VOL / SUM(VOL,89)));
【牛熊線】:AM,LINETHICK2,color9900;
VARA:=IF((CLOSE > 150),91.3,0.913);
【下沿】:=(INTPART((CLOSE / VARA)) * VARA);
【上沿】:=(【下沿】 + VARA);
【中線】:=((【下沿】 + 【上沿】) / 2);
STICKLINE(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中線】)),【下沿】,【下沿】,50,0),LINETHICK3,colorFF9900;
STICKLINE(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中線】)),【上沿】,【上沿】,50,0),LINETHICK3,color99FF;
STICKLINE(((SYSPARAM(1) = BARPOS) AND 【中線】),【中線】,【中線】,50,0),LINETHICK3,colorFFFFFF;
【藍(lán)色】:【下沿】,LINETHICK0,colorFF9900;
【棕色】:【上沿】,LINETHICK0,color99FF;
【白色】:【中線】,LINETHICK0,colorFFFFFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中線】)),【下沿】,'支撐'),SHIFT3,colorFF00;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中線】)),【中線】,'壓力'),SHIFT3,colorFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中線】)),【上沿】,'壓力'),SHIFT3,colorFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中線】)),【中線】,'支撐'),SHIFT3,colorFF00;

黃金八分

input.:n(1400,1,9999),m(700,1,9999);
Var1:LLV(LOW,5000),colorblue;
Var2:HHV(HIGH,5000),colorblue;
L382:LLV(LOW,5000)*1.382,colorblue;
L618:LLV(LOW,5000)*1.618,colorblue;
H382:HHV(HIGH,5000)*0.382,colorblue;
H618:HHV(HIGH,5000)*0.618,colorblue;
HL382:(Var2-Var1)*0.382+Var1,colorbrown;
HL618:(Var2-Var1)*0.618+Var1,colorred;
HL33:(Var2-Var1)*0.33+Var1,colorbrown;
HL66:(Var2-Var1)*0.66+Var1,colorred;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N),N-1)),COLORRED;
VERTLINE(FILTER(BACKSET(ISLASTBAR,M),M-1)),COLORRED;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8),N-(N-M)/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*2),N-(N-M)/8*2-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*3),N-(N-M)/8*3-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*4),N-(N-M)/8*4-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*5),N-(N-M)/8*5-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*6),N-(N-M)/8*6-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*7),N-(N-M)/8*7-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*8),N-(N-M)/8*8-1)),COLORRED;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*9/8),N-(N-M)*9/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*10/8),N-(N-M)*10/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*9/8),N-(N-M)*9/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*10/8),N-(N-M)*10/8-1)),COLORYELLOW;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*11/8),N-(N-M)*11/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*12/8),N-(N-M)*12/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*13/8),N-(N-M)*13/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*14/8),N-(N-M)*14/8-1)),COLORYELLOW;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*15/8),N-(N-M)*15/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*16/8),N-(N-M)*16/8-1)),COLORYELLOW;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*2/3),N-(N-M)*2/3-1)),COLORWHITE;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*4/3),N-(N-M)*4/3-1)),COLORWHITE;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*5/3),N-(N-M)*5/3-1)),COLORWHITE;



黃金牛線

input.:var1(5,1,10000);

N: 1*Var1;
1.073*Var1, POINTDOT;
1.118*Var1, POINTDOT;
N1: 1.191*Var1;
1.264*Var1, POINTDOT;
1.309*Var1, POINTDOT;
N3: 1.382*Var1;
1.472*Var1, POINTDOT;
1.528*Var1, POINTDOT;
N4: 1.618*Var1;
1.691*Var1, POINTDOT;
瘋牛: 1.809*Var1;


黃金切割率

N:=SYSPARAM(3)-SYSPARAM(2);
A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:REF(H,BARSLAST(B)),COLORWHITE;
DRAWNUMBER(ISLASTBAR,前高,前高,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前高,'(前高)'),SHIFT7,COLORWHITE;
A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)),COLORWHITE;
DRAWNUMBER(ISLASTBAR,前低,前低,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前低,'(前低)'),SHIFT7,COLORWHITE;
F1:((前高-前低)*0.236)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F1,F1,2),aligno5,SHIFT3,COLORYELLOW;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F1,'(0.236)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F2:((前高-前低)*0.382)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F2,F2,2),aligno5,SHIFT3,COLORFF00FF;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F2,'(0.382)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F3:((前高-前低)*0.5)+前低,COLORFFFF00;
DRAWNUMBER(ISLASTBAR,F3,F3,2),aligno5,SHIFT3,COLORFFFF00;
DRAWTEXT(ISLASTBAR,F3,'(0.5)'),SHIFT7,COLORWHITE;
F4:((前高-前低)*0.618)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F4,F4,2),aligno5,SHIFT3,COLORFF00FF;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F4,'(0.618)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F5:((前高-前低)*0.764)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F5,F5,2),aligno5,SHIFT3,COLORYELLOW;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F5,'(0.764)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)


黃金切割率-1

N:=SYSPARAM(3)-SYSPARAM(1);
A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:IF(N>0,REF(H,BARSLAST(B)),0),COLORWHITE;
DRAWNUMBER(ISLASTBAR,前高,前高,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前高,'(前高)'),SHIFT7,COLORWHITE;
A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)),COLORWHITE;
DRAWNUMBER(ISLASTBAR,前低,前低,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前低,'(前低)'),SHIFT7,COLORWHITE;
F1:((前高-前低)*0.236)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F1,F1,2),aligno5,SHIFT3,COLORYELLOW;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F1,'(0.236)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F2:((前高-前低)*0.382)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F2,F2,2),aligno5,SHIFT3,COLORFF00FF;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F2,'(0.382)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F3:((前高-前低)*0.5)+前低,COLORFFFF00;
DRAWNUMBER(ISLASTBAR,F3,F3,2),aligno5,SHIFT3,COLORFFFF00;
DRAWTEXT(ISLASTBAR,F3,'(0.5)'),SHIFT7,COLORWHITE;
F4:((前高-前低)*0.618)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F4,F4,2),aligno5,SHIFT3,COLORFF00FF;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F4,'(0.618)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)
F5:((前高-前低)*0.764)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F5,F5,2),aligno5,SHIFT3,COLORYELLOW;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and ISLASTBAR,F5,'(0.764)'),SHIFT7,COLORWHITE;
DRAWTEXT(BARSLAST(B)



黃金切割率-2

前高:SYSPARAM(4),colorwhite;
DRAWNUMBER(ISLASTBAR,前高,前高,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前高,'(前高)'),SHIFT7,COLORWHITE;
前低:SYSPARAM(5),colorwhite;
DRAWNUMBER(ISLASTBAR,前低,前低,2),aligno5,SHIFT3,COLORWHITE;
DRAWTEXT(ISLASTBAR,前低,'(前低)'),SHIFT7,COLORWHITE;
F1:((前高-前低)*0.236)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F1,F1,2),aligno5,SHIFT3,COLORYELLOW;
F2:((前高-前低)*0.382)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F2,F2,2),aligno5,SHIFT3,COLORFF00FF;
F3:((前高-前低)*0.5)+前低,COLORFFFF00;
DRAWNUMBER(ISLASTBAR,F3,F3,2),aligno5,SHIFT3,COLORFFFF00;
F4:((前高-前低)*0.618)+前低,COLORFF00FF;
DRAWNUMBER(ISLASTBAR,F4,F4,2),aligno5,SHIFT3,COLORFF00FF;
F5:((前高-前低)*0.764)+前低,COLORYELLOW;
DRAWNUMBER(ISLASTBAR,F5,F5,2),aligno5,SHIFT3,COLORYELLOW;
黃金上升

input.:n(999,1,10000),p1(1,1,1000);

HH:=HHV(H,N)COLORWHITE;
LL:LLV(L,N)COLORWHITE;

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約