1.南客
{南客大師}
{新三價(jià)線--很不錯(cuò)的趨勢(shì)指標(biāo)（錢龍的TBL指標(biāo)）}
一、基本概念
TBL指標(biāo)（Three Break Line）,中文名為新三價(jià)線指標(biāo),屬于圖表型指標(biāo),其原理是若三根K線持續(xù)上漲(或下跌)創(chuàng)短期新高(或新低),則發(fā)出紅色(或黑色)的柱狀買入(或賣出)信號(hào)。與平時(shí)常用指標(biāo)不同的是,該指標(biāo)在平時(shí)盤整時(shí)并不輕易出現(xiàn)信號(hào),是一類在大盤出現(xiàn)明顯單邊趨勢(shì)時(shí)提議追漲殺跌的指標(biāo)。它能有效地去除行情中無關(guān)緊要的盤整和波段上升中的震蕩回調(diào)干擾,更適合于做較大波段、做大趨勢(shì)的中長期投資中比較重勢(shì)的那種投資者。
二、應(yīng)用法則
1、新三價(jià)線由黑色變?yōu)榧t色時(shí),視為買入信號(hào)。
2、新三價(jià)線由紅色變?yōu)楹谏珪r(shí),視為賣出信號(hào)。
注意:新三價(jià)線如果持續(xù)上漲,則會(huì)由原新三價(jià)線向上延伸,下跌亦然。因此,
新三價(jià)線不會(huì)與K線在時(shí)間橫軸上相對(duì)稱。
三、實(shí)例說明
如次新股(600379)寶光股份的新三價(jià)線指標(biāo)。其上市第三天股價(jià)小創(chuàng)新低,指標(biāo)
在9.87元處有一支小綠柱,投資者暫不買入,而第五個(gè)交易日股價(jià)在三天內(nèi)見新高10.28元,三價(jià)線即翻紅,中線投資者可介入,此后該股震蕩上行,雖走勢(shì)反復(fù)較多,但始終沒有出現(xiàn)三天內(nèi)見新低的K線組合。故新三價(jià)線或紅柱延長、或再出現(xiàn)紅柱,提示投資者可一直持股至最高點(diǎn)。3月29日該股大幅回跌至14.33元,出現(xiàn)頭部信號(hào),指標(biāo)提示投資者賣出。此后,該股反彈不斷,但新三價(jià)線始終保持綠盤,提示下降通道,直至該股回跌到10.42元低點(diǎn),一直提示投資者不要買入。6月6日該股重新出現(xiàn)中陽,新三價(jià)線終于再次于11.02元處提示買入?？傮w看,該股上市半年多,股價(jià)上下變化復(fù)雜,現(xiàn)在股價(jià)較上市時(shí)也沒有明顯上升,按別的操作方法可能不會(huì)有明顯的收益。但按新三價(jià)線做波段者買2次賣1次,就有50%的獲利,可謂操作簡單但收益不低。
由于新三價(jià)線是一個(gè)重勢(shì)不重價(jià)、提示追漲殺跌做波段的指標(biāo),不可避免地具有明顯的滯后性,對(duì)一段行情勢(shì)必是棄兩頭、取中間。投資者不宜在行情中途加入,一定要在長時(shí)間綠柱后翻紅再介入比較安全。對(duì)于愛好短線搶反彈、或習(xí)慣低吸高拋?zhàn)龇ǖ耐顿Y者,該指標(biāo)應(yīng)慎用。
新三價(jià)線
有些股民在使用錢龍軟件的時(shí)候，往往覺得新三價(jià)線與寶塔線在圖形上有些相似，
以至于造成平時(shí)運(yùn)用沒有把握。接下來，我們就來談?wù)勊鼈兊漠愅c(diǎn)。
二者的相似點(diǎn)在于指標(biāo)顯示形式相同，買賣應(yīng)用規(guī)則都較接近。
指標(biāo)應(yīng)用法則：
1、新三價(jià)線由黑色變成紅色時(shí)，視為買進(jìn)信號(hào)；
2、新三價(jià)線由紅色變成黑色時(shí)，視為賣出信號(hào)；
3、新三價(jià)線如果持續(xù)上漲，則會(huì)由原新三價(jià)線向上延伸，因此，新三價(jià)線不會(huì)與K線相對(duì)稱，反之亦然。這一點(diǎn)請(qǐng)?zhí)貏e注意！
寶塔線
指標(biāo)應(yīng)用法則：
1、寶塔線由黑色變成紅色時(shí)，視為買進(jìn)信號(hào)；
2、寶塔線由紅色變成黑色時(shí)，視為賣出信號(hào)；
3、寶塔線如果持續(xù)上漲，則會(huì)由原寶塔線向上延伸，因此，寶塔線不會(huì)
與K 線相對(duì)稱，反之亦然。這一點(diǎn)請(qǐng)?zhí)貏e注意！
二者的不同點(diǎn)如下:
一、 盤整行情中，寶塔線會(huì)忽翻紅忽翻黑，其信號(hào)的效果會(huì)大幅降低。
因此現(xiàn)在用戶使用中也有如下的用法。
1、寶塔線三平底翻紅為買入時(shí)機(jī)，股價(jià)將會(huì)延伸一段上升行情；
2、寶塔線三平頂翻綠為賣出時(shí)機(jī)，股價(jià)將會(huì)繼續(xù)一段下跌行情；
3、盤局時(shí)寶塔線的小翻紅、小翻綠可不必理會(huì)。
二、 寶塔線的畫法是將當(dāng)前收盤價(jià)與前一根寶塔線做比較，而新三價(jià)線
則是與其前三根新三價(jià)線做比較。
三、 股民往往會(huì)覺得參照新三價(jià)線指標(biāo)的買入賣出不準(zhǔn)確，其實(shí)股民應(yīng)
注意新三價(jià)線每日的變化，而不是去追溯其歷史資料，因?yàn)?，新三價(jià)線并不是一天畫一根線，它與K線的漲跌走勢(shì)并不是一一對(duì)應(yīng)的?？幢P時(shí)，如
果今天的新三價(jià)線是一根陽線，那么，代表它正處于多頭的市況中，反之，則視為空頭市況。如果新三價(jià)線從昨日的陽線變成今日的陰線，則被視為賣出信號(hào)。
以個(gè)股滬昌特鋼（600665）為例，在它歷史上曾經(jīng)有過的周K線走
勢(shì)圖中，如果將圖縮小的話，會(huì)發(fā)現(xiàn)TBL和TOW指標(biāo)的形態(tài)與K線并不是一一對(duì)應(yīng)的，但TBL翻紅、TOW三平底翻紅還是顯示該股當(dāng)時(shí)正處于強(qiáng)
勢(shì)之中。
{三價(jià)線源碼}
input:m(2,2,9999); //參數(shù)M定位，第1根TBL柱線對(duì)應(yīng)K線的序號(hào)
if m<2 then exit;
up:=c>ref(c,1);
down:=c<ref(c,1);
fc:=close;
fo:=open;
a:=setlbound(up,1);
up[1]:=fc[1]>fo[1];
n:=m-1;
if up[n] then begin
B4:=fc[n];
B1:=fo[n];
b3:=B1;
B2:=B1;
tbl:=1;
end else begin
B4:=fo[n];
B1:=fc[n];
B2:=B4;
B3:=B4;
tbl:=0;
end;
tblcount:=1;
////////////////////////////////////
for i=n+1 to datacount do begin
if tbl=1 then begin
if up then begin
if fc>B4 then begin
tblcount:=tblcount+1;
tblc:=fc;
tblo:=B4;
if tblcount>2 then begin
tblcount:=3;
B1:=B2;
B2:=B3;
end;
B3:=B4;
B4:=fc;
end;
end
else if down then begin
if fc<B1 then begin
tblcount:=1;
tblc:=fc;
tblo:=B3;
B1:=fc;
B2:=B3;
tbl:=0;
end;
end;
end else begin
if down then begin
if fc<B1 then begin
tblcount:=tblcount+1;
tblc:=fc;
tblo:=B1;
if tblcount>2 then begin
tblcount:=3;
B4:=B3;
b3:=B2;
end;
B2:=B1;
B1:=fc;
end;
end
else if up then begin
if fc>B4 then begin
tblcount:=1;
tblc:=fc;
tblo:=B2;
B4:=fc;
B3:=B2;
tbl:=1;
end;
end;
end;
end;
stickline(tblc<>0 and up,tblc,tblo,7,1)colorred;
stickline(tblc<>0 and down,tblc,tblo,7,0),colorcyan;
ts:=barslast(tblc);
stickline(tblc=0 and ref(up,ts),ref(tblc,ts),ref(tblc,ts),3,1),colormagenta;
stickline(tblc=0 and ref(down,ts),ref(tblc,ts),ref(tblc,ts),3,1),colorblue;
cc:tblc,linethick0;
oo:tblo,linethick0;
-----------------------------------------------
{股票箱---南客}
fh:=high;
fl:=low;
sell:=0*fh;
buy:=sell;
signal:=sell;
boxh:sell,linethick0;
boxl:sell,linethick0;
variable:hc=0,lc=0,bt=fh[1],bb=fh[1];
for i=1 to datacount do begin
if hc>1 then begin
if lc>2 and bt<=fh then begin
buy:=1;
for j=i-1 downto i-hc do begin
boxh[j]:=fh[i-hc];
boxl[j]:=fl[i-lc];
end;
hc:=0;lc:=0;
end;
if bt>fh then begin
if lc>2 then begin
if bb>=fl then begin
sell:=1;
for j=i-1 downto i-hc do begin
boxh[j]:=fh[i-hc];
boxl[j]:=fl[i-lc];
end;
hc:=-1;lc:=0;
end else begin
boxh:=fh[i-hc];
boxl:=fl[i-lc];
end;
end;
hc:=hc+1;
if lc>1 then begin
if bb<fl then begin
lc:=lc+1;
if lc=3 then begin
signal[i-hc+1]:=1;
for j=i downto i-hc+1 do begin
boxh[j]:=fh[i-hc+1];
boxl[j]:=fl[i-lc+1];
end;
end;
end else lc:=0;
end else
if lc=1 then begin
if bb<fl then begin
lc:=lc+1;
end else lc:=0;
end;
if lc=0 and hc>1 then begin
bb:=fl;
lc:=lc+1;
end;
end else begin hc:=0; lc:=0; end;
end else
if hc=1 then begin
if bt>fh then
hc:=hc+1
else begin hc:=0;lc:=0; end;
end;
if hc=0 then begin
bt:=fh;
hc:=hc+1;
end;
end;
partline(boxh and boxh=ref(boxh,1),boxh),coloryellow,pointdot;
partline(boxl and boxl=ref(boxl,1),boxl),coloryellow,pointdot;
stickline((signal||refx(buy||sell,1))&&boxh,boxh,boxl,0.1,0),pointdot,coloryellow;
drawicon(buy,low*0.98,4);
drawicon(sell,high*1.02,5);
------------------------------------------------------------------------------------------------------
2.
{小天風(fēng)暴---珍藏版}
input:nn(20,2,30),n(6,1,10),m(3,2.8,3.1);
AAA:=CHECKUSER(0);
{MA(C,BARSCOUNT(C));}
周K:=STKINDI(STKLABEL,'kdj.k',0,7),colorred;
周D:=STKINDI(STKLABEL,'kdj.d',0,7),COLORCYAN;
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(j,j24),L,REF(L,BARSLAST(CROSS(j,j24)))),COLORYELLOW;
壓力:IF(CROSS(j24,j),H,REF(H,BARSLAST(CROSS(j24,j)))),COLorred;
{以下作背離時(shí)研判的RSI值，如上所述}
U2L:=IF(C>=MA(C,NN),80,50);
L2L:=IF(C>=MA(C,NN),50,20);
RH1:=IF(j<U2L AND REF(j,1)>=U2L,HHV(REF(H,1),BARSLAST(j>=U2L AND REF(j,1)<U2L)-1),
REF(HHV(REF(H,1),BARSLAST(j>=U2L AND REF(j,1)<U2L)-1),BARSLAST(j<U2L AND REF(j,1))));
RH4:=IF(H>RH1,L,REF(L,BARSLAST(H>RH1)));
RH42:=IF(H>RH1,j,REF(j,BARSLAST(H>RH1)));
強(qiáng)壓:IF(H>RH4 AND j<RH42 AND j<j24,H,REF(H,BARSLAST(H>RH4 AND j<RH42 AND j<j24))),COLORgreen;
RL1:=IF(j>L2L AND REF(j,1)<=L2L,LLV(REF(L,1),BARSLAST(j<=L2L AND REF(j,1)>L2L)-1),
REF(LLV(REF(L,1),BARSLAST(j<=L2L AND REF(j,1)>L2L)-1),BARSLAST(j>L2L AND REF(j,1))));
RL4:=IF(L<RL1,H,REF(H,BARSLAST(L<RL1)));
RL42:=IF(L<RL1,j,REF(j,BARSLAST(L<RL1)));
強(qiáng)撐:IF(L<RL4 AND j>RL42 AND j>j24,L,REF(L,BARSLAST(L<RL4 AND j>RL42 AND j>j24))),COLORMAGENTA;
ZF:(c-壓力)*100/壓力,LINETHICK0;
x1:=if(BarsCount(Close)=1 , (Open+High+Low+Close)/4 , Close) , linethick1;
x2:=if(BarsCount(Close)=1 , (Open+Close)/2 , Sma(ref(x1,1),2,1)) , linethick1;
x3:=High , linethick1;
x4:=Low , linethick1;
STICKLINE( x2<x1,x3,x4,0.1,0 ),ColorRed ;
STICKLINE( x2<x1,x1,x2,7,1 ),ColorRed ;
STICKLINE( x2>x1,x3,x4,0.1,0 ),COLORCYAN;
STICKLINE( x2>x1,x1,x2,7,0 ),COLORCYAN;
//Open=Close，價(jià)揚(yáng)，紅色上下影線
StickLine( x2=x1 and x1>=Ref(x1,1),x3,x4,0.1,0),ColorRed ;
//Open=Close，價(jià)揚(yáng)，紅色實(shí)體K棒
StickLine( x2=x1 and x1>=Ref( x1,1),x1,x2,7,0),ColorRed ;
//Open=Close，價(jià)跌，紅色上下影線
StickLine( x2=x1 and x1<Ref( x1,1),x3,x4,0.1,0),Colorblue ;
//Open=Close，價(jià)跌，紅色實(shí)體K棒
StickLine( x2=x1 and x1<Ref( x1,1),x1,x2,7,0),Colorblue ;
//第一個(gè)交易日open=close的K線，
StickLine( x2=x1 and Barscount(Close),x3,x4,0.1,0),COLORMAGENTA;
StickLine( x2=x1 and Barscount(Close),x2,x1,7,0),COLORMAGENTA;
cb:=amount/v/100;
cd:=cb>h or cb<l;
//STICKLINE(cd<1,cb-0.002,cb+0.002,8,1),COLORYELLOW;
AA:=IF(C>200,182.6,1.826);
BB:=IF(C>200,91.3,0.913);
大下箱:INTPART(c/AA )*AA,pointdot,linethick1,colorcyan,linethick3;
大上箱:大下箱+AA,pointdot,linethick1,colorred,linethick3;
小下箱:INTPART(c/BB )*BB,pointdot,linethick1,colormagenta;
小上箱:小下箱+BB,pointdot,linethick1,COLORYELLOW;
{EXPLAIN(vol>0,STKLABEL);
EXPLAIN(vol>0,STKNAME),colorFF00FF;}
{PARTLINE(1,C*2-ref(C,3)),shift3,LineThick1,COLORGRAY;
wl3:(C*2-ref(C,3)),shift3,LINETHICK1,COLORGREEN;
wl2:(ref(C,1)*2-ref(C,4)),shift2,LINETHICK1,colorred;
wl1:(ref(C,2)*2-ref(C,5)),shift1,LINETHICK1,COLORGRAY;}
Explain(1,STKLABEL+STKNAME+'\n所屬板塊:'+BLKNAME);
AAA:=CHECKUSER(0);
Var1:=(CLOSE+HIGH+LOW)/3;
Var2:=HIGH-LOW;
Var4:=VAR1+VAR2;
Var5:=VAR1-VAR2;
Var6:=2*VAR1-LOW;
Var7:=2*VAR1-HIGH;
【明天最高】:=Var6,shift1;
【明天最低】:=Var7,shift1;
Var9:=ISLASTBAR;
{DRAWTEXT(Var9>0 AND Var1,Var1,' 【明天預(yù)測(cè)】'),COLORRED,shift1;}
STICKLINE(Var9>0 ,Var4,Var5,0,0 ),COLORYELLOW,shift1;
STICKLINE(Var9>0 ,Var6,Var7,8,0 ),COLORYELLOW,shift1;
{c*1.03,COLORBLACK,shift1;c*0.97,COLORBLACK,shift1;}
{【明天最高】,COLORBLACK,shift1;【明天最低】,COLORBLACK,shift1;}
Var11:=(CLOSE+HIGH+LOW)/3;
Var12:=HIGH-LOW;
Var14:=VAR11+VAR12;
Var15:=VAR11-VAR12;
Var16:=2*VAR11-LOW;
Var17:=2*VAR11-HIGH;
明日轉(zhuǎn):=(ref(C,2)*2-ref(C,5)),shift1,LINETHICK1,COLORBLUE;
EXPLAINEX(vol>0,'★★【明天生命】=',明日轉(zhuǎn),1,0),COLORWHITE;
EXPLAINEX(vol>0,'【明天最高】=',var14,1,0),COLORYELLOW;
EXPLAINEX(vol>0,'【范圍上限】=',var16,1,0),COLORMAGENTA;
EXPLAINEX(vol>0,'【范圍下限】=',var17,1,0),COLORCYAN;
EXPLAINEX(vol>0,'【明天最低】=',var15,1,0),COLORGREEN;
var1:=splitdata(1)+splitdata(2);
cap:=c;
cap[datacount]:=1;
for i=datacount downto 2 do cap[i-1]:=cap/(1+var1/10);
capi:=cap*capital/100;
hs:=vol/capi,LINETHICK0;
歷史流通盤{萬股}:=capi,LINETHICK0;
ZF:=(h-l)*100/l;
stZF:=(c-o)*100/o;
spZF:=(c-l)*100/l;
stZFb:=stZF/ZF;
spZFb:=spZF/ZF;
最大震幅:=ref(hhv(ZF,5),1);
最小震幅:=ref(llv(ZF,5),1);
xZFb:=ZF/最大震幅;
dZFb:=ZF/最小震幅;
xh臥石透綠:=hs/ref(hhv(hs,4),1);
dh臥石透綠:=hs/ref(llv(hs,4),1);
dy1:=-5*(stZFb>=0.48 and spZFb>0.5 and dZFb>2 and dh臥石透綠>2 and c>o),colorred;
dy2:=-5*(stZFb>=0.8 and dZFb>1.5 and dh臥石透綠>1.5 and c>o),colorred;
dy3:=-5*(stZFb>=0.82 and xZFb>0.9 and dZFb>1.5 and xh臥石透綠>0.9 and dh臥石透綠>1.5 and c>o),colorred;
單陽:=FILTER((dy1 or dy2 or dy3) and 周K>周D,n);
vv:=單陽*l;
ts:=(barslast(單陽>0)+1>=1 and barslast(單陽>0)<=13);
單陽高:=ref(hhv(h,barslast(單陽>0)),1);
單陽攻擊:=cross(c,單陽高) and ts;
強(qiáng)勢(shì)攻擊:=if(單陽=1 and 單陽攻擊=1,1,0);
單陽低點(diǎn):=REF(L,BARSLAST(VV)),COLOR99FF66;
單陽不破:=(ts and l>=單陽低點(diǎn));
時(shí)間:=if(l>=單陽低點(diǎn),barslast(單陽<0),0);
單陽啟穩(wěn):=(cross(hs,ZF) and c>o and ts );
aa:ma(1.05*h,21),COLORBLUE;
//PARTLINE(x2<x1,aa),LineThick1,colorred;
bb:ma(0.85*l,21),COLORCYAN;
PARTLINE(單陽不破=1,bb),LineThick1,COLORred;
STICKLINE(單陽=1,bb,1.04*bb,0,0),COLORYELLOW;
STICKLINE(單陽=1,bb*1.01,1.03*bb,8,0),COLORYELLOW;
DRAWTEXT(單陽=1 and 周K<50,bb*0.97,'弱'),COLORYELLOW;
{參數(shù):NN= 20, 1, 30, N= 6, 1,10, M= 3, 2.8, 3.1}
DRAWTEXT(單陽=1 and cross(周K,周D) and 周K<50,bb*1.08,'啟'),COLORYELLOW;
DRAWTEXT(單陽=1 and 周K>50 and 周K<80,bb*0.97,'強(qiáng)'),COLORYELLOW;
DRAWTEXT(單陽=1 and 周K>=80 ,bb*0.97,'沖'),COLORYELLOW;
STICKLINE(單陽啟穩(wěn)=1,bb,bb*1.03,0,0),ColorD36F3E;
STICKLINE(單陽啟穩(wěn)=1,BB*1.02,bb*1.02,8,0),ColorD36F3E;
DRAWTEXT(單陽啟穩(wěn)=1,bb,'穩(wěn)'),ColorD36F3E;
STICKLINE(單陽攻擊=1,BB,BB*1.05,0,1),ColorA400FF;
STICKLINE(單陽攻擊=1,bb*1.01,BB*1.04,8,1),ColorA400FF;
DRAWTEXT(單陽攻擊=1,bb*1.08,'攻'),COLORred;
----------------------------------------------------------------------
3.清揚(yáng)
{清揚(yáng)老師}
AA:=REF(H,N)=HHV(H,2*N+1);
AAA:=FILTER(AA,N);
BB:=BACKSET(AAA,N+1);
CC:=FILTER(BB,N);
DRAWICON(CC,H*1.02,10);
AA2:=REF(L,N)=LLV(L,2*N+1);
AAA2:=FILTER(AA2,N);
BB2:=BACKSET(AAA2,N+1);
CC2:=FILTER(BB2,N);
DRAWICON(CC2,L*0.99,11);
DrawIcon(↑Var2,1.01*H,4);
DrawIcon(↓Var2,1.01*L,5);
DRAWLINE(↑Var2,H,↓Var2,L,0),COLORGREEN;
DRAWLINE(↓Var2,L,↑Var2,H,0),COLORRED;
----------------------------------------------------------------------
4.
鉆心蟲--作
{簡單缺口指示源碼，加入主圖指標(biāo)中，缺口一個(gè)也跑不了。缺口是研究K線形態(tài)的重要參考..........
//缺口}
DRAWTEXT(l>REF(H,1),REF(H,1),'←＜'),COLORRED;//上漲缺口
DRAWTEXT(h<REF(L,1),REF(L,1),'←＜'),COLORGREEN;//下跌缺口
---------------------------------------------------------------------
5.
{ＯＡＭＶ 活籌指數(shù)--飛狐用的指南針ＯＡＭＶ指標(biāo)}
Var1:=SMA(O*AMOUNT/10000000,10,1);
C0:=INTPART(Var1*1000)/1000;
B1:=REF(C0,1);B2:=REF(C0,2);B3:=REF(C0,3);B4:=REF(C0,4);B5:=REF(C0,5);B6:=REF(C0,6);B7:=REF(C0,7);
B8:=REF(C0,8);B9:=REF(C0,9);B10:=REF(C0,10);B11:=REF(C0,11);B12:=REF(C0,12);B13:=REF(C0,13);B14:=REF(C0,14);
B15:=REF(C0,15);B16:=REF(C0,16);B17:=REF(C0,17);B18:=REF(C0,18);B19:=REF(C0,19);B20:=REF(C0,20);
B21:=REF(C0,21);B22:=REF(C0,22);B23:=REF(C0,23);B24:=REF(C0,24);B25:=REF(C0,25);B26:=REF(C0,26);
B27:=REF(C0,27);B28:=REF(C0,28);B29:=REF(C0,29);B30:=REF(C0,30);B31:=REF(C0,31);B32:=REF(C0,32);
B33:=REF(C0,33);B34:=REF(C0,34);B35:=REF(C0,35);B36:=REF(C0,36);B37:=REF(C0,37);B38:=REF(C0,38);
B39:=REF(C0,39);B40:=REF(C0,40);B41:=REF(C0,41);B42:=REF(C0,42);B43:=REF(C0,43);B44:=REF(C0,44);
B45:=REF(C0,45);B46:=REF(C0,46);B47:=REF(C0,47);B48:=REF(C0,48);B49:=REF(C0,49);B50:=REF(C0,50);
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0<B1 AND B1<=B2,-1,IF(C0>B2 AND B2>B1,2,IF(C0<B2 AND B2<B1,-2,0))));
HG:=IF(B1>B2 AND B1>B3,1,IF(B1<B2 AND B1<B3,-1,IF(B2>B3 AND B2>B4,2,IF(B2<B3 AND B2<B4,-2,
IF(B3>B4 AND B3>B5,3,IF(B3<B4 AND B3<B5,-3,IF(B4>B5 AND B4>B6,4,IF(B4<B5 AND B4<B6,-4,
IF(B5>B6 AND B5>B7,5,IF(B5<B6 AND B5<B7,-5,IF(B6>B7 AND B6>B8,6,IF(B6<B7 AND B6<B8,-6,
IF(B7>B8 AND B7>B9,7,IF(B7<B8 AND B7<B9,-7,IF(B8>B9 AND B8>B10,8,IF(B8<B9 AND B8<B10,-8,
IF(B9>B10 AND B9>B11,9,IF(B9<B10 AND B9<B11,-9,IF(B10>B11 AND B10>B12,10,IF(B10<B11 AND B10<B12,-10,
IF(B11>B12 AND B11>B13,11,IF(B11<B12 AND B11<B13,-11,IF(B12>B13 AND B12>B14,12,IF(B12<B13 AND B12<B14,-12,
IF(B13>B14 AND B13>B15,13,IF(B13<B14 AND B13<B15,-13,IF(B14>B15 AND B14>B16,14,IF(B14<B15 AND B14<B16,-14,
IF(B15>B16 AND B15>B17,15,IF(B15<B16 AND B15<B17,-15,IF(B16>B17 AND B16>B18,16,IF(B16<B17 AND B16<B18,-16,
IF(B17>B18 AND B17>B19,17,IF(B17<B18 AND B17<B19,-17,IF(B18>B19 AND B18>B20,18,IF(B18<B19 AND B18<B20,-18,
IF(B19>B20 AND B19>B21,19,IF(B19<B20 AND B19<B21,-19,IF(B20>B21 AND B20>B22,20,IF(B20<B21 AND B20<B22,-20,
IF(B21>B22 AND B21>B23,21,IF(B21<B22 AND B21<B23,-21,IF(B22>B23 AND B22>B24,22,IF(B22<B23 AND B22<B24,-22,
IF(B23>B24 AND B23>B25,23,IF(B23<B24 AND B23<B25,-23,IF(B24>B25 AND B24>B26,24,IF(B24<B25 AND B24<B26,-24,
IF(B25>B26 AND B25>B27,25,IF(B25<B26 AND B25<B27,-25,IF(B26>B27 AND B26>B28,26,IF(B26<B27 AND B26<B28,-26,
IF(B27>B28 AND B27>B29,27,IF(B27<B28 AND B27<B29,-27,IF(B28>B29 AND B28>B30,28,IF(B28<B29 AND B28<B30,-28,
IF(B29>B30 AND B29>B31,29,IF(B29<B30 AND B29<B31,-29,IF(B30>B31 AND B30>B32,30,IF(B30<B31 AND B30<B32,-30,
IF(B31>B32 AND B31>B33,31,IF(B31<B32 AND B31<B33,-31,IF(B32>B33 AND B32>B34,32,IF(B32<B33 AND B32<B34,-32,
IF(B33>B34 AND B33>B35,33,IF(B33<B34 AND B33<B35,-33,IF(B34>B35 AND B34>B36,34,IF(B34<B35 AND B34<B36,-34,
IF(B35>B36 AND B35>B37,35,IF(B35<B36 AND B35<B37,-35,IF(B36>B37 AND B36>B38,36,IF(B36<B37 AND B36<B38,-36,
IF(B37>B38 AND B37>B39,37,IF(B37<B38 AND B37<B39,-37,IF(B38>B39 AND B38>B40,38,IF(B38<B39 AND B38<B40,-38,
IF(B39>B40 AND B39>B41,39,IF(B39<B40 AND B39<B41,-39,IF(B40>B41 AND B40>B42,40,IF(B40<B41 AND B40<B42,-40,
IF(B41>B42 AND B41>B43,41,IF(B41<B42 AND B41<B43,-41,IF(B42>B43 AND B42>B44,42,IF(B42<B43 AND B42<B44,-42,
IF(B43>B44 AND B43>B45,43,IF(B43<B44 AND B43<B45,-43,IF(B44>B45 AND B44>B46,44,IF(B44<B45 AND B44<B46,-44,
IF(B45>B46 AND B45>B47,45,IF(B45<B46 AND B45<B47,-45,IF(B46>B47 AND B46>B48,46,IF(B46<B47 AND B46<B48,-46,
IF(B47>B48 AND B47>B49,47,IF(B47<B48 AND B47<B49,-47,IF(B48>B49 AND B48>B50,48,IF(B48<B49 AND B48<B50,-48,
0))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))));
MA5:EMA(Var1,5),COLORCYAN;
個(gè)股生命線: EMA(Var1,10);
MA34: EMA(Var1,23);
B1,POINTDOT,COLORBLACK;
B2,POINTDOT,COLORBLACK;
STICKLINE(HL=1 OR HG>=1 AND HL=0,B1,C0,5,0),COLORRED;
STICKLINE(HL=-1 OR HG<=-1 AND HL=0,B1,C0,5,0),COLORGREEN;
STICKLINE(HL=2,B2,C0,5,0),COLORRED;
STICKLINE(HL=-2,B2,C0,5,0),COLORGREEN;
STICKLINE((HL=-1 OR HL=-2) AND HG>0,B2,B1,5,0),COLORRED;
STICKLINE((HL=1 OR HL=2) AND HG<0,B2,B1,5,0),COLORGREEN;
------------------------------------------------------------------------
{以下為《證券交易新空間》一書中的全部指標(biāo)源碼。}
{鱷魚線：}
Var1:=(H+L)/2;
上唇:REF(SMA(Var1,5,1),3),COLORGREEN;
牙齒:REF(SMA(Var1,8,1),5),COLORRED;
下顎:REF(SMA(Var1,13,1),8),COLORBLUE;
{顎魚分形：}
Var1:=(H+L)/2;
上唇1:REF(SMA(Var1,5,1),3),COLORGREEN;
牙齒1:REF(SMA(Var1,8,1),5),COLORRED;
下顎1:REF(SMA(Var1,13,1),8),COLORBLUE;
Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
Var2:=CROSS(Var1,0.9);
Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
Var4:=CROSS(Var3,0.9);
drawicon(Var2,HIGH*1.01,4),Color00E40E;
drawicon(Var4,LOW*0.99,5),Color00E40E;
Var5:=IF(Var2,HIGH,IF(Var4,LOW,0));
Var6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
Var7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
Var8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
Var9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
上向分形: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),COLORMAGENTA;
向下分形: REF(LOW,BARSLAST(Var4)), POINTDOT,Color3791B5;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),COLORYELLOW;
{AO：}
Var1:=(H+L)/2;
AO:SMA(Var1,5,1)-SMA(Var1,34,1),COLOR6699CC;
STICKLINE(AO>=REF(AO,1),0,AO,6,1),COLORRED;
STICKLINE(AO<=REF(AO,1),0,AO,6,1),COLORGREEN;
AO,COLOR000000;
{AC：}
Var1:=(H+L)/2;
AO:=SMA(Var1,5,1)-SMA(Var1,34,1);
AC:SMA((AO-SMA(AO,5,1)),5,1),COLOR6699CC;
STICKLINE(AC>=REF(AC,1),0,AC,6,1),COLORRED;
STICKLINE(AC<=REF(AC,1),0,AC,6,1),COLORGREEN;
AC,COLOR000000;
{區(qū)域：}
Var1:=(H+L)/2;
AO:=SMA(Var1,5,1)-SMA(Var1,34,1);
AC:=SMA((AO-SMA(AO,5,1)),5,1);
AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;
AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;
AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;
AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;
{OSC：}
Var1:=(H+L)/2;
AO:=SMA(Var1,5,1)-SMA(Var1,34,1);
AC:=SMA((AO-SMA(AO,5,1)),5,1);
AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;
AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;
AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;
AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;
----------------------------------------------------------------------
真正全套混沌操作法源碼全公布?。w狐版）——感謝 原作者提供！
所有公式均為本人在網(wǎng)上收集所得并按書上內(nèi)容請(qǐng)人做過小幅修改，經(jīng)過反復(fù)對(duì)照，已與”投資者之夢(mèng)“軟件使用效果相當(dāng)?？偟脕碚f是這是一套有獲利潛能的方法，但請(qǐng)各位朋友切記一點(diǎn)，任何方法都只是一種武器，武器的好壞固然有別，可關(guān)鍵要看用的人是誰。（若您覺得指標(biāo)哪里稍有不符，可自行修。）
以下為《證券混沌操作法——低風(fēng)險(xiǎn)獲利指南》一書中的全部指標(biāo)源碼。
1.分形圖：
Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
Var2:=CROSS(Var1,0.9);
Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
Var4:=CROSS(Var3,0.9);
STICKLINE(Var2,HIGH,HIGH*1.01,5,0),Color00E40E;
STICKLINE(Var4,LOW,LOW*0.99,5,0),Color00E40E;
Var5:=IF(Var2,HIGH,IF(Var4,LOW,0));
POLYLINE(Var5,Var5),Colorff00ff;
Var6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
Var7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
Var8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
Var9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
堅(jiān)定: STICKLINE(CROSS(Var6,0.9),HIGH,HIGH*1.01,5,0),Color0000FF;
STICKLINE(CROSS(Var9,0.9),LOW,LOW*0.99,5,0),Color0000FF;
猶豫: STICKLINE(CROSS(Var7,0.9),HIGH,HIGH*1.01,5,0),Color00E5E9;
STICKLINE(CROSS(VarA,0.9),LOW,LOW*0.99,5,0),Color00E5E9;
等待: STICKLINE(CROSS(Var8,0.9),HIGH,HIGH*1.01,5,0),ColorFF4100;
STICKLINE(CROSS(VarB,0.9),LOW,LOW*0.99,5,0),ColorFF4100;
壓力: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),ColorEA91B5;
支撐: REF(LOW,BARSLAST(Var4)), POINTDOT,Color3791B5;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),Color3791B5;
現(xiàn)價(jià):CLOSE,POINTDOT,Color000F89;
2.{MFI：
參數(shù)名：N 14 2 300}
TYP := (HIGH + LOW + CLOSE)/3;
SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),N)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),N)
3.{MACD：}
ma(c,5)-ma(c,34) COLORSTICK ;
ma(ma(c,5)-ma(c,34),5);
s:=EMA((ma(c,5)-ma(c,34)),3);
s1:=s<ref(s,1)and s>0;
s2:=s<ref(s,1)and s<0;
STICKLINE(s>=0,0,s,8,1),COLORRED;
STICKLINE(s1,0,s,5,0),COLOR00ffff;
STICKLINE(s2,0,s,4,0),COLORffffff;
4.{四種視窗：}
MFI:(H-L)*100000/V;
MA5:MA(MFI,5);
A1:MFI>=REF(MFI,1)*1.1 AND V>=REF(V,1)*1.1;
A2:MFI<=REF(MFI,1)*0.9 AND V<=REF(V,1)*0.9;
A3:MFI>=REF(MFI,1)*1.1 AND V<=REF(V,1)*0.9;
A4:MFI<=REF(MFI,1)*0.9 AND V>=REF(V,1)*1.1;
DRAWTEXT(A2,4,'衰退'),linethick3;
DRAWTEXT(A1,1,'綠燈'),linethick3;
DRAWTEXT(A3,3,'偽裝'),linethick3;
DRAWTEXT(A4,2,'蟄伏'),linethick3;
0.1
本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)
點(diǎn)擊舉報(bào)。
