通達(dá)信主圖公式：博莊
主線:=(MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)+MA(CLOSE,36))/4,COLORFF00FF,LINETHICK2;
股價(jià)重心:=DMA(AMOUNT/VOL/100,VOL/CAPITAL),COLORGREEN,LINETHICK2;
MA14:=EMA(CLOSE,14);
MA34:=EMA(CLOSE,26);
MA54:=EMA(CLOSE,54);
MA90:=EMA(CLOSE,90);
MA120:EMA(CLOSE,120),POINTDOT,LINETHICK2,COLORWHITE;
年線:EMA(C,250),COLORYELLOW,LINETHICK2;
{中短波}
HZ:=EMA(CLOSE,13);
短波:EMA(HZ,1),COLOR00DD00,LINETHICK1;
中波:EMA(HZ,26),COLORRED,LINETHICK1;
均線148天:=EMA(C,148),POINTDOT,LINETHICK1,COLORGREEN;
成本:=SUM(AMOUNT,0)/SUM(VOL,0)/100,COLORYELLOW ,LINETHICK2 ;
HZ2:EMA(HZ,8),COLORGREEN,LINETHICK2;
HZ4:EMA(HZ,39),COLORFF00FF,LINETHICK2;
A1:STICKLINE(HZ2<HZ4,短波,HZ4,0.1,0),COLORBLUE ;
A2:STICKLINE(短波>HZ2,短波,HZ2,0.1,0),COLORGREEN;
A3:STICKLINE(中波>HZ4,中波,HZ4,0.1,0),COLORFF00FF;
{慢速KDJ}
RSV:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
FASTK:=SMA(RSV,12,1);
K:=SMA(FASTK,9,1),COLORYELLOW;
D:=SMA(K,3,1),LINETHICK2,COLORBLUE;
J:=3*K-2*D,LINETHICK1,COLORGREEN;
{中波}
VAR11:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))
/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR22:=100-VAR11;
中勢(shì)線:=(-1)*(EMA(VAR22,1)-50)+42,COLORYELLOW,LINETHICK2;
TZ:=(CLOSE-LLV(LOW,331))/(HHV(HIGH,331)-LLV(LOW,331))*100;
強(qiáng)勢(shì)線:=SMA(TZ,5,1),LINETHICK2,COLORRED;
大盤線:=70*(HHV(HIGH,39)-CLOSE)/(HHV(HIGH,39)-LLV(LOW,39)),COLOR009900,LINETHICK1;
{量選}
AA:=VOL/SUM(VOL,13);
BB:=DMA(C,AA);
CC:=VOL/SUM(VOL,34);
DD:=DMA(C,CC);
{背離}
VAR00:=WINNER(CLOSE);
VAR1:=FORCAST(VAR00,10);
VAR2:=MA(VAR1,3);
VAR3:=MA(VAR2,12);
VAR4:=MA(VAR3,16);
VAR5:=MA(VAR4,31);
VAR6:=MA(VAR5,55);
VAR7:=VAR5;
VAR8:=VAR4>VAR2*1.11 AND VAR3>VAR2*1.095;
A:=VAR4/VAR2;
B:=VAR3/VAR2;
VAR9:=VAR2>VAR1*0.95;
TD:=VAR2/VAR1;
VAR1H:=INDEXC;
VAR2H:=MA(VAR1H,6);
VAR3H:=MA(VAR1H,24);
VAR4H:=MA(VAR1H,32);
VAR5H:=MA(VAR1H,62);
VAR6H:=MA(VAR1H,105);
VAR7H:=VAR5H;
VAR8H:=VAR4H>VAR2H*1.11 AND VAR3H>VAR2H*1.095;
VAR9H:=VAR2H>VAR1H*0.95;
PT:=(IF(H=L AND C=O AND L=C AND C>0 AND REF(H,1)=REF(L,1) AND REF(C,1)=REF(O,1)
AND REF(H,1)=REF(C,1) AND REF(C,1)>0,0,1))>0;
G:=(VAR7H AND VAR8H AND VAR9H AND CLOSE/COST(8)<=0.7985
AND (COUNT(C=L,4)<3 OR C>REF(C,1)))AND PT OR
VAR7 AND VAR8 AND VAR9 AND CLOSE/COST(5)<=0.8 AND
((VAR1>OPEN OR VAR1>REF(OPEN,1) OR
REF(VAR1,1)));
背離:=VAR2<REF(VAR2,1) AND A>REF(A,1);
買入信號(hào)1:=VAR1>A AND VAR2>B;
買入信號(hào)2:=B>A AND 1>B AND A<1 AND H=HHV(H,21);
BUY:=COUNT(背離,20)>1 AND 買入信號(hào)2=1 AND C>O OR CROSS(BB,DD);
DRAWICON(CROSS(短波,HZ2),中波-0.08,9);
DRAWTEXT(CROSS(短波,HZ2) AND C>O AND J>K AND J>D AND 大盤線<36 AND C>HZ4,L*1.09,'●'),COLORYELLOW;
DRAWTEXT(CROSS(短波,HZ2) AND C>O AND J>K AND J>D AND 大盤線<36 AND C>HZ4,L*1.12,'做趨勢(shì)'), COLORYELLOW;
DRAWTEXT(CROSS(短波,HZ2),C,'♂');
DRAWTEXT(CROSS ( 中波,HZ4),C,'♂');
DRAWTEXT(CROSS ( 中波,MA120),C,'♂');
DRAWTEXT(CROSS (HZ4,MA120),C,'♂');

高手 發(fā)表于 2009-4-6 14:28

{籌碼超跌原碼}

VARAA:=AMOUNT/(100*VOL);
CYC13:=MA(VARAA,13);
CYC34:=MA(VARAA,34);
CYCMAX:=DMA(C,VOL/CAPITAL);
CYS13:=(C-CYC13)/CYC13*100;
CYS34:=(C-CYC34)/CYC34*100;
CYSMAX:=(C-CYCMAX)/CYCMAX*100;
虧損程度:
IF(CYS13<=-7,7,0),COLORWHITE,STICK,LINETHICK3;
IF(CYS13<=-10,10,0),COLORFFFF33,STICK,LINETHICK3;
IF(CYS13<=-16,16,0),COLORBLUE,STICK,LINETHICK3;
IF(CYS13<=-20,20,0),COLOR00FF77,STICK,LINETHICK3;
IF(CYS13<=-25,25,0),COLORYELLOW,STICK,LINETHICK3;
IF(CYS13<=-30,30,0),COLORFF00FF,STICK,LINETHICK3;
VAR1:=COST(10)*0;
VAR2:=REF(HIGH,1)*1.1;
VAR3:=HIGH*1.1;
VAR4:=(VAR3*VOL+VAR2*(CAPITAL-VOL))/CAPITAL;
VAR5:=REF(LOW,1)*0.9;
VAR6:=LOW*0.9;
VAR7:=(VAR6*VOL+VAR5*(CAPITAL-VOL))/CAPITAL;
VAR8:=EMA(VAR7,30);
VAR9:=EMA(VAR4,30);
VARA:=VAR9-2;
VARB:=IF(CLOSE<=VAR8,VARA,VAR9);
超跌: VARB*2.5,COLOR00FF00;
TAO:=100*(1-WINNER(C));
A:=1.1*C;
B:=0.9*C;
ASR:=100*(WINNER(A)-WINNER(B));
籌碼超跌:IF((ASR<10) AND (TAO>90),30,0),COLOR0099FF;
短中長線超跌:IF((CYS13<(-16)) AND (CYS13>(-100)) AND (CYS34<(-20)) AND (CYS34>(-100)),40,0),COLOR00FF00;
IF((CYS34<(-20)) AND (CYS34>(-100)) AND (CYSMAX<(-30)) AND (CYSMAX>(-100)),50,0),COLORFFCC00;
反彈:VARA*2.5,COLORFF00FF;
風(fēng):IF(超跌=反彈 AND CYS13<=-10 AND 籌碼超跌=30,-30,0),COLORYELLOW,STICK,LINETHICK3;
云:IF(超跌=反彈 AND CYS13<=-16 AND 籌碼超跌=30 AND 短中長線超跌=40,-20,0),COLORRED,STICK,LINETHICK3;

高手 發(fā)表于 2009-4-6 14:28

{籌碼運(yùn)動(dòng)}
VAR1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,1);
主籌:EMA(WINNER(C)*70,1),COLORRED,LINETHICK1;
主籌月均:EMA(主籌,21),COLORWHITE;
主籌長期成本:EMA(EMA(主籌,5),89),COLOR009500;
籌差值:VAR1-主籌,COLORYELLOW;
VAR2:=IF(C>=O,H,0);
VAR3:=IF(C<=O,REF(H,1),VAR2);
VAR4:=IF(C>=O,V,0);
VAR5:=IF(C<=O,REF(V,1),VAR4);
VAR6:=COUNT(VAR3>REF(VAR3,1) AND VAR5<REF(VAR5,1),3)>=2 AND C>O;
量價(jià)背離:VAR6*30,STICK,COLORGRAY,LINETHICK2;

高手 發(fā)表于 2009-4-6 14:28

{籌碼最高值線}
{黃色為最高值   我認(rèn)為 N=13 或者N=75 比較好.  藍(lán)色為布林線..看看把最高值改為最低值，將是很好的抄底指標(biāo)}

{N(13,13,13);}
Var1m:=AMOUNT/(100*v);
日趨勢(shì):=MA(Var1m,5);
最高值日日:HHV(日趨勢(shì),N),COLORYELLOW,linethick2;
黃日趨勢(shì):MA(Var1m,9),COLORYELLOW;
a:=AMOUNT/(100*v);
a1:=ma(a,3);
a21:=ma(a,6);
a31:=ma(a,12);
a41:=ma(a,24);
BBI:=(a1+a21+a31+a41)/4;
a11:=ema(a,3);
上軌:BBI+3*STD(BBI,18),COLORBLUE,linethick2;
下軌:BBI-3*STD(BBI,18),COLORBLUE,linethick2;
趨勢(shì):MA(Var1m,135);

高手 發(fā)表于 2009-4-6 14:29

{N(20,1,100);}



量能飽和度（原分析家)
SAT:IF((AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100),COLOR0000FF,LINETHICK2;
STICKLINE(((CLOSE > 0) AND ISLASTBAR ),20,121,4,1),COLORFFFFFF;
STICKLINE(((SAT <= 5) AND ISLASTBAR ),21,(20 + SAT),3,0),COLOR00FFFF;
STICKLINE((((SAT > 5) AND (SAT <= 20)) AND ISLASTBAR ),21,(20 + SAT),3,0),COLORCCFF88;
STICKLINE((((SAT > 20) AND (SAT <= 40)) AND ISLASTBAR ),21,(20 + SAT),3,0),COLORFF00FF;
STICKLINE(((SAT > 40) AND ISLASTBAR ),21,(20 + SAT),3,0),COLOR0000FF;
{IF CURRBARSCOUNT  AND (SAT) THEN BEGIN DRAWTEXTREL(700,800,'量能飽和度：'+NUMTOSTRN(SAT,0)),LINETHICK6,COLORCCFFCC;END;}
100,POINTDOT,COLORFFFF00;
K2:=BACKSET(SAT<REF(SAT,1),2);
Y:IF(K2,SAT,DRAWNULL),COLOR33FF33,LINETHICK2,LINETHICK2;
DRAWTEXT(Y=SAT AND ISLASTBAR AND BACKSET(CLOSE,3),50,'飽和度');

高手 發(fā)表于 2009-4-6 14:33

input:p(99,1,300,1);
{開盤既知今天高低價(jià)}
Vg:=MA(REF(H,1)/REF(C,2),27)*REF(C,1);
Vd:=MA(REF(L,1)/REF(C,2),27)*REF(C,1);
A5:=Vd[SYSPARAM(1)];
RA5:=Vd[SYSPARAM(1)-1];
A10:=Vg[SYSPARAM(1)];
RA10:=Vg[SYSPARAM(1)-1];
jt5:=if(A5>RA5,'↑','↓');
jt10:=if(A10>RA10,'↑','↓');
SZ1:=' 開盤測(cè)最高:'+NUMTOSTR(Vg[SYSPARAM(1)],2)+jt10;
SZ2:='\n  \n 開盤測(cè)最低:'+NUMTOSTR(Vd[SYSPARAM(1)],2)+jt5;
DRAWTEXT(BARPOS=SYSPARAM(2),c,SZ1),align4,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),c,SZ2),align4,COLORCYAN;


{XL}
XL1:=C;
XL2:=MA(H,5);
XL3:=MA(L,3);
KH:=H;
KL:=L;
FOR I=5+1 TO DATACOUNT DO BEGIN
IF XL1[I]>XL2[I-1] THEN B[I]:=1 ELSE
IF XL1[I]<XL3[I-1] THEN B[I]:=-1 ELSE
B[I]:=B[I-1];
END;
Wm1:=(B=1 AND REF(B,1)=1) or (B=1 AND REF(B,1)=-1);
Wm2:=(B=-1 AND REF(B,1)=-1) or (B=-1 AND REF(B,1)=1);
Wm3:=IF(B=-1,MA(H,3),MA(L,3));
//點(diǎn)位:Wm3,LINETHICK,PRECISION3,Color0089FF;
PARTLINE(Wm1,Wm3),Color0089FF,LINETHICK2;
PARTLINE(Wm2,Wm3),colorff8918,LINETHICK2;

底:ema(C,p),PRECISION2,COLORMAGENTA;
A1:=ema(C,13);
A2:=ema(C,77);
A3:=ema(C,99);
A6:=(A1+A2+A3)/3;
A7:=A6*(1/100)+A6;
A8:=A6-A6*(1/100);
SA:=COUNT(BETWEEN(A1,A7,A8) and BETWEEN(A2,A7,A8) and BETWEEN(A3,A7,A8),10);
SA1:=SA>8;
STICKLINE(SA>8,O,C,8,0),COLORGREEN;
STICKLINE(SA>8,H,L,0.5,0),COLORGREEN;
DRAWTEXT(FILTER(SA>8,20),L*0.98,'注意！')ALIGN0,COLORYELLOW;
**************************************************************
由于通達(dá)信股軟對(duì)函數(shù)使用的限制，現(xiàn)在字符串，光標(biāo)等函數(shù)暫無法使用。所以，第一部分難以實(shí)現(xiàn)。
我沒有飛狐股軟，也沒有看見過此公式圖片。
從公式內(nèi)容來看，第一部分是預(yù)測(cè)明日價(jià)格。
第二，第三部分比較簡單，只是兩條均線，部分K線和文字標(biāo)示而已，
發(fā)一圖片你看看效果與飛狐對(duì)比一下，若有不妥之處再改。

p(99,1,300,1);
{開盤既知今天高低價(jià)}
VG:=MA(REF(H,1)/REF(C,2),27)*REF(C,1);
VD:=MA(REF(L,1)/REF(C,2),27)*REF(C,1);
A5:=VD;
RA5:=VD-1;
A10:=VG;
RA10:=VG-1;
JT5:=IF(A5>RA5,'↑','↓');
JT10:=IF(A10>RA10,'↑','↓');
{SZ1:=' 開盤測(cè)最高:'+NUMTOSTR(VG,2)+JT10;
SZ2:='\N  \N 開盤測(cè)最低:'+NUMTOSTR(VD,2)+JT5;
DRAWTEXT(BARPOS,C,SZ1),COLORYELLOW;
DRAWTEXT(BARPOS,C,SZ2),COLORCYAN;}


{XL}
XL1:=C;
XL2:=MA(H,5);
XL3:=MA(L,3);
KH:=H;
KL:=L;
B:=(C,1) ;

{IF( XL1>XL2,-1,1),COLORRED ;
IF (XL1<XL3,-1,1 );}
BI:=B-1;

WM1:=(B=1 AND REF(B,1)=1) OR (B=1 AND REF(B,1)=-1);
WM2:=(B=-1 AND REF(B,1)=-1) OR (B=-1 AND REF(B,1)=1);
WM3:=IF(B=-1,MA(H,3),MA(L,3));
點(diǎn)位:WM3,LINETHICK1,COLOR0089FF;
K1:=BACKSET(點(diǎn)位<REF(點(diǎn)位,1),2);
IF(K1,點(diǎn)位,DRAWNULL),COLOR00CC33,LINETHICK2;


{IF(WM1,WM3,1),COLOR0089FF,LINETHICK2;
IF(WM2,WM3,1),COLORFF8918,LINETHICK2;}

底:EMA(C,P),COLORMAGENTA;
A1:=EMA(C,13);
A2:=EMA(C,77);
A3:=EMA(C,99);
A6:=(A1+A2+A3)/3;
A7:=A6*(1/100)+A6;
A8:=A6-A6*(1/100);
SA:=COUNT(BETWEEN(A1,A7,A8) AND BETWEEN(A2,A7,A8) AND BETWEEN(A3,A7,A8),10);
SA1:=SA>8;
STICKLINE(SA>8,O,C,2,0),COLORGREEN;
STICKLINE(SA>8,H,L,0.1,0),COLORGREEN;
DRAWTEXT(FILTER(SA>8,20),L*0.98,'注意！'),COLORYELLOW;

高手 發(fā)表于 2009-4-6 14:34

跟莊建倉
A01:=DYNAINFO(7);
A03:=BARSCOUNT(CLOSE);
A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100);
A05:=IF((A03 > 20),A04,0);
A06:=IF((LOW > A01),0,IF((HIGH < A01),1,(((A01 - LOW) + 0.009) / ((HIGH - LOW) + 0.009))));
A07:=DMA(A06,(VOL / CAPITAL)) * 60;
A09:=IF((((A07 > 0) AND (A07 > REF(A07,1))) AND (A05 <= 88)),A07,0);
VAR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
VAR2:=EMA(VAR1,1);
VAR3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趨勢(shì):EMA(VAR3,3)-10,COLORRED,LINETHICK2;
K1:=BACKSET(趨勢(shì)<REF(趨勢(shì),1),2);
IF(K1,趨勢(shì),DRAWNULL),COLORGREEN,LINETHICK2;
機(jī)構(gòu)建倉區(qū):=0,LINETHICK0,COLORFFFF00;
VAR4:=(趨勢(shì)-REF(趨勢(shì),1))/REF(趨勢(shì),1)*100;
STICKLINE(趨勢(shì)<=13 AND VAR4>13,0,50,1,0),COLOR0099FF;
VAR5:=FILTER((趨勢(shì)<=13 AND VAR4>13),10);
DRAWTEXT(VAR5,60,'買入'),COLOR0099FF;
STICKLINE(趨勢(shì)>=90 AND VAR4,0,30,2,0),COLORGRAY;
VAR6:=FILTER((趨勢(shì)>=90 AND VAR4),10);
DRAWTEXT(VAR6,40,'清倉'),COLORGRAY;
VAR7:=LLV(LOW,30);
VAR8:=HHV(HIGH,30);
VAR9:=EMA((CLOSE-VAR7)/(VAR8-VAR7)*4,4)*25;
STICKLINE(VAR9>90,100,105,5,2),COLOR00FF00;
VAR10:=(VAR9-LLV(VAR9,4))/(HHV(VAR9,4)-LLV(VAR9,4))*100;
DRAWTEXT(IF(CROSS(VAR9,VAR10) AND VAR9>87,95,0),88,'險(xiǎn)'),COLOR00FF00,;
VAR11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;
VAR12:=HHV(VAR11,30)*8;
火焰山:EMA(IF(LOW<=VAR7 AND 趨勢(shì)<40,(VAR11+VAR12),0),3)/618,COLORRED,LINETHICK2;
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLORRED;
VAR13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
VAR14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
趨勢(shì)線:= 趨勢(shì),COLOR00FF00;
VAR16:=MAX(EMA(VAR13,2)-EMA(VAR14,5),0)*200;
VAR17:=EMA(VAR16,5);
波浪峰:VAR17,STICK,COLORFF66FF;
STICKLINE(VAR17<REF(VAR17,1),0,VAR17,1,0),COLOR00FF00;
VAR18:MA(趨勢(shì)線,8),COLOR00FFFF,LINETHICK1;

高手 發(fā)表于 2009-4-6 14:35

交易系統(tǒng)指示公式
X9:=FORCAST(C,9);
LLX:=LLV(FORCAST(C,9),2);
{多頭買入} ENTERLONG:FILTER(X9>LLX,7);
{多頭賣出} EXITLONG: FILTER(X9=LLX,5);

高手 發(fā)表于 2009-4-6 14:36

黑馬全息圖（原分析家公式）
上:=(SMA(HIGH,21,2) * 1.05);
下軌道:(SMA(LOW,21,2) * 0.969),POINTDOT,COLOR00FFFF;
BMA:=MA(CLOSE,118);
阻擋:=(SMA(HIGH,21,2) * 1.05);
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),LOW,REF(LOW,BARSLAST(CROSS(J,J24))));
壓力位:IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))),COLOR00FF00;
U2L:=IF((CLOSE >= MA(CLOSE,20)),80,50);
L2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);
RH1:=IF(((J < U2L) AND (REF(J,1) >= U2L)),HHV(REF(HIGH,1),(BARSLAST(((J >= U2L) AND (REF(J,1) < U2L))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((J >= U2L) AND (REF(J,1) < U2L))) - 1)),BARSLAST(((J < U2L) AND REF(J,1)))));
RH4:=IF((HIGH > RH1),LOW,REF(LOW,BARSLAST((HIGH > RH1))));
RH42:=IF((HIGH > RH1),J,REF(J,BARSLAST((HIGH > RH1))));
RH5:=IF((((HIGH > RH4) AND (J < RH42)) AND (J < J24)),HIGH,REF(HIGH,BARSLAST((((HIGH > RH4) AND (J < RH42)) AND (J < J24)))));
RL1:=IF(((J > L2L) AND (REF(J,1) <= L2L)),LLV(REF(LOW,1),(BARSLAST(((J <= L2L) AND (REF(J,1) > L2L))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((J <= L2L) AND (REF(J,1) > L2L))) - 1)),BARSLAST(((J > L2L) AND REF(J,1)))));
RL4:=IF((LOW < RL1),HIGH,REF(HIGH,BARSLAST((LOW < RL1))));
RL42:=IF((LOW < RL1),J,REF(J,BARSLAST((LOW < RL1))));
RL5:=IF((((LOW < RL4) AND (J > RL42)) AND (J > J24)),LOW,REF(LOW,BARSLAST((((LOW < RL4) AND (J > RL42)) AND (J > J24)))));
CB:=((AMOUNT / VOL) / 100);
CD:=((CB > HIGH) OR (CB < LOW));
黑馬趨勢(shì):=MA(CLOSE,3);
MAP:=MA(CLOSE,8);
AA5:=MA(CLOSE,21);
AA10:MA(CLOSE,8),COLOR0000FF;
AA12:MA(CLOSE,12),COLOR0000FF;
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
DRAWTEXT(FILTER(((((((CLOSE / OPEN) > 1.04) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (CLOSE > 下軌道)) AND ((AA10 - REF(AA10,1)) > 0)) AND (CLOSE < 上)),3),(LOW - 0.07),''追擊''),COLORD1E768;
VARD:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);
支撐:=EMA(VARD,5);
短期底部:=LLV(OPEN,30);
X1:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);
X2:=EMA(X1,10);
X3:=REF(X2,1);
X4:=((REF(HIGH,1) + REF(LOW,1)) / 2);
X5:=(MA(CLOSE,21) + (2 * STD(CLOSE,21)));
X6:=REF(CLOSE,1);
X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);
X8:=CROSS(79,X7);
X9:=FILTER(X8,4);
MAP1:=MA(CLOSE,60);
均線30:=MA(CLOSE,30);
均線89:=MA(CLOSE,89);
均線:=MA(CLOSE,16);
均線34:=MA(CLOSE,34);
均線55:=MA(CLOSE,55);
VAR1:=EMA(CLOSE,8);
VAR2:=EMA(VAR1,20);
VAR3:=CROSS(VAR1,VAR2);
VAR4:=(VAR1 < MA(CLOSE,60));
VAR5:=(((HHV(HIGH,36) - CLOSE) / (HHV(HIGH,36) - LLV(LOW,36))) * 100);
VAR6:=SMA(VAR5,5,1);
VAR7:=SMA(VAR6,8,1);
VAR8:=(CROSS(VAR6,VAR7) AND (VAR7 < 16));
VAR9:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR8);
VARA:=IF((CLOSE > 1000),VAR8,VAR9);
黑馬起步:=(VAR3 AND VAR4);
逃遁:=VARA;
均線20:=MA(CLOSE,20);
均線120:=MA(CLOSE,120);
牛熊線:=MA(CLOSE,250);
VA:=CROSS(MA(CLOSE,19),MA(CLOSE,120));
VB:=(MA(CLOSE,20) > MA(CLOSE,120));
VC:=CROSS(MA(CLOSE,120),MA(CLOSE,89));
VD:=(MA(CLOSE,20) < MA(CLOSE,120));
VE:=CROSS(MA(CLOSE,20),MA(CLOSE,250));
VF:=(MA(CLOSE,20) > MA(CLOSE,250));
VG:=CROSS(MA(CLOSE,250),MA(CLOSE,20));
DRAWTEXT((((((均線 - REF(均線,1)) > 0) AND CROSS(均線20,均線120)) AND (LOW <= 均線120)) AND (CLOSE >= 均線120)),LOW,'三線開花'),COLORFFFFFF;
短期底部2:LLV(HIGH,30),LINETHICK2,COLOR0000FF;
上軌:(SMA(HIGH,21,2) * 1.092),POINTDOT,COLORFFFFFF;
中軌道:(SMA(HIGH,21,2) * 1.017),POINTDOT,COLORFFFFFF;
DRAWTEXT(FILTER(((((LOW < 下軌道) AND (CLOSE > MA(CLOSE,15))) AND (CLOSE > 短期底部2)) AND (HIGH < 壓力位)),10),LOW-0.08,'★短線5%'),COLOR9DC522;
DRAWTEXT(((((((HIGH >= 均線120) AND (CLOSE < REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 上)) AND (CLOSE < 上)) AND (CLOSE < 均線120)),(HIGH + 0.05),'減倉'),COLOR00FF00;
DRAWTEXT(FILTER(((HIGH > 阻擋) AND (CLOSE < 阻擋)),5),(HIGH*1.03),'逃命'),COLORRED;
DRAWTEXT(((VE > VG) AND (HIGH < 阻擋)),(LOW - 0.65),'★黑馬短線'),COLOR00FFFF;
DRAWTEXT(FILTER(((((((((((OPEN < X2) AND (CLOSE > X2)) AND ((支撐 - REF(支撐,1)) > 0)) AND ((支撐 - REF(支撐,1)) > 0)) AND (CLOSE < 阻擋)) AND ((均線 - REF(均線,1)) > 0)) AND (CLOSE >= 均線)) AND (HIGH < 阻擋)) AND ((AA10 - REF(AA10,1)) > 0)) AND ((阻擋 - REF(阻擋,2)) > 0)),11),(LOW - 0.15),'★快馬加鞭'),COLORCYAN;
DRAWTEXT((((((((CROSS(黑馬趨勢(shì),RL5) AND ((黑馬趨勢(shì) - REF(黑馬趨勢(shì),1)) > 0)) AND (HIGH < 壓力位)) AND (LOW <= 短期底部)) AND (CLOSE > 支撐位)) AND (CD < 1)) AND (CLOSE > OPEN)) AND (CLOSE > RL5)),LOW,'←短買'),COLOR00FF00;
DRAWTEXT(FILTER((((((((LOW <= 短期底部) AND ((CLOSE - REF(CLOSE,1)) > CLOSE)) AND ((MA(CLOSE,10) - REF(MA(CLOSE,10),1)) > 0)) AND (WINNER(CLOSE) < 0.05)) AND (短期底部 = RL5)) AND (LOW <= RL5)) AND (HIGH < 壓力位)),3),LOW,'★'),COLORFFFFFF;

高手 發(fā)表于 2009-4-6 14:39

黃金分割線【主圖】
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
頂:REFDATE(高1,DATE),COLORWHITE;
一:REFDATE(H1,DATE),COLORYELLOW;
二:REFDATE(H2,DATE),COLORMAGENTA;
三:REFDATE(H3,DATE),COLORLIGRAY;
四:REFDATE(H4,DATE),COLORRED;
五:REFDATE(H5,DATE),COLORWHITE;
低:REFDATE(低1,DATE),COLORYELLOW;
{日 10 10000 150;昨前 1 100 3}

高手 發(fā)表于 2009-4-6 14:40

天天買到最低價(jià)

引差:REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE;
今最高:HIGH,LINETHICK1,COLORRED,NODRAW;
今最低:LOW,LINETHICK1,COLORGREEN,NODRAW;
STICKLINE(引跌幅<=2,0,引跌幅,0,0),COLORCYAN;
STICKLINE(引跌幅>2 AND 引跌幅<=3,0,引跌幅,0,0),COLORYELLOW;
STICKLINE(引跌幅>3 AND 引跌幅<=4,0,引跌幅,0,0),COLORMAGENTA;
STICKLINE(引跌幅>4 ,0,引跌幅,0,0),COLORGREEN;
2,COLORCYAN,POINTDOT;
3,COLORCYAN,POINTDOT;
4,COLORCYAN,POINTDOT;

高手 發(fā)表于 2009-4-6 14:41

一陽穿四線(主圖指標(biāo))

M1:MA(C,5),COLORYELLOW;
M2:MA(C,10),COLORCYAN;
M3:MA(C,20),COLORGREEN;
M4:MA(C,30),COLORRED,LINETHICK2;
最大值:=MAX(MAX(M1,M2),MAX(M3,M4));
最小值:=MIN(MIN(M1,M2),MIN(M3,M4));
DRAWICON((O<=最小值 AND C>=最大值 ),L-0.02,9);

高手 發(fā)表于 2009-4-6 14:41

{大智慧公式    一陽穿N線指標(biāo)}
投資收益（萬）:FINANCE(24)/10000,NODRAW,COLORGREEN;
營業(yè)利潤（萬）:FINANCE(23)/10000,NODRAW,COLORMAGENTA;
每股凈資產(chǎn):FINANCE(34),NODRAW,COLORWHITE;
年收益:FINANCE(33),NODRAW,COLORRED;

三線:=C>REF(C,1) AND CROSS(C,MA(C,5)) AND CROSS(C,MA (C,10)) AND CROSS(C,MA(C,20)),COLORGREEN;
四線:=C>REF(C,1) AND CROSS(C,MA(C,5)) AND CROSS(C,MA (C,10)) AND CROSS(C,MA(C,20)) AND CROSS(C,MA(C,30)),COLORYELLOW;
五線:=C>REF(C,1) AND CROSS(C,MA(C,5)) AND CROSS(C,MA (C,10)) AND CROSS(C,MA(C,20)) AND CROSS(C,MA(C,30)) AND CROSS(C,MA(C,40)),COLORRED;
六線:=C>O AND CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10)) AND CROSS(C,MA(C,20)) AND CROSS(C,MA(C,30))AND CROSS(C,MA(C,40)) AND CROSS(C,MA(C,60)) AND SLOPE(MA(C,60),2)>0,COLORFFFF00;
S1:=DRAWTEXT(三線>=1,LOW-0.02,'買1'),COLORMAGENTA;
S2:=DRAWTEXT(四線>=1,H-0.02,'買2'),COLOR00FFFF;
S3:=DRAWTEXT(五線>=1,LOW-0.1,'買3'),COLORFF66FF;
S4:=DRAWTEXT(六線>=1,H+0.1,'買4'),COLOR0033FF;
S5:=(S1+S2+S3+S4);
DRAWTEXT(S5>=1,L-0.02,'堅(jiān)決買'),COLORCYAN;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE((S1-REF(C,1))/REF(C,1)>=0.098,C,O,3,0),COLORMAGENTA;
STICKLINE((S2-REF(C,1))/REF(C,1)>=0.098,C-0.05,O,2,1),COLOR33FF33;
STICKLINE((S3-REF(C,1))/REF(C,1)>=0.098,C,O,1,1),COLOR00FFFF;
STICKLINE((S4-REF(C,1))/REF(C,1)>=0.098,C,O,4,0),COLOR0033FF;
STICKLINE((S5-REF(C,1))/REF(C,1)>=0.098,C-0.05,O,1,1),COLOR00FFFF;

高手 發(fā)表于 2009-4-6 14:43

價(jià)值連城
VAR1:=REF(CLOSE,2);
會(huì)員專用:SMA(MAX(CLOSE-VAR1,0),7,1)/SMA(ABS(CLOSE-VAR1),7,1)*100,COLORFFAA66;
VAR2:=REF(CLOSE,1);
VAR3:=SMA(MAX(CLOSE-VAR2,0),7,1)/SMA(ABS(CLOSE-VAR2),7,1)*100;
極品逃亡:IF(會(huì)員專用< REF(會(huì)員專用,1) AND 會(huì)員專用>79,會(huì)員專用,0);
DRAWTEXT(極品逃亡 ,70 ,'★<-極品逃亡'),COLORYELLOW,LINETHICK1;
DRAWTEXT(88>0 AND REF(O,1)/REF(C,1)>1.04 AND REF(L,1)<=688 AND O>REF(C,1)AND C<REF(O,1)AND C/O>=1.01,L-L*0.02,'★<--極品絕底初現(xiàn)'),LINETHICK1;
DRAWTEXT(C-O>=0 AND O/L>1.05 AND L<=LLV(L,20),L,'★<--極品絕底'),COLORBLUE, LINETHICK1;
Q2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;
Q3:=SMA(Q2, 9, 1);
Q4:=SMA(Q3, 3, 1);
特殊會(huì)員專用:3*Q3-2*Q4,COLORWHITE,LINETHICK2;
Q8:=HHVBARS(HIGH, 50);  
Q10:=(CLOSE-REF(OPEN, Q8))/REF(OPEN, Q8)*100;
跨越:EMA(Q3, 3),COLORRED;
DRAWTEXT(CROSS(特殊會(huì)員專用, 8) AND Q10<-13,20,'*大底來'),COLORYELLOW,LINETHICK5;
DRAWTEXT(CROSS(特殊會(huì)員專用, 93) AND Q10<-13,40,'*大底'),LINETHICK5;
DRAWTEXT(CROSS(跨越, 特殊會(huì)員專用) AND REF(特殊會(huì)員專用,1)>80, REF(特殊會(huì)員專用,3), '*頂'),COLORRED,LINETHICK5;
VAR12:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
機(jī)構(gòu)做空能量線: SMA(VAR12,3,1),COLORGREEN,LINETHICK2;
大底來: 0,POINTDOT;
大底: 0,POINTDOT;
DRAWTEXT(CROSS(跨越,機(jī)構(gòu)做空能量線) ,大底+40,'進(jìn)入強(qiáng)勢(shì)'),COLORYELLOW,LINETHICK1;
DRAWTEXT(CROSS(特殊會(huì)員專用,跨越) ,大底+20,'進(jìn)入拉升'),LINETHICK1;
{DRAWTEXT(CROSS(跨越,特殊會(huì)員專用) ,大底+70,'注意調(diào)整'),COLORFFAA66,LINETHICK1;}
{●注意買入點(diǎn): DRAWTEXT(REF(CROSS(機(jī)構(gòu)做空能量線,跨越),25) AND 機(jī)構(gòu)做空能量線>1.005*跨越,跨越,'●<-注意買入點(diǎn)'),COLORBLUE,LINETHICK1;
★逢低買入: DRAWTEXT(REF(CROSS(跨越,特殊會(huì)員專用),82) AND 跨越>1.3*特殊會(huì)員專用,特殊會(huì)員專用,'★<<-逢低買入'),LINETHICK1;}
★低買: DRAWTEXT(REF(CROSS(特殊會(huì)員專用,跨越),1) AND 特殊會(huì)員專用>1.3*跨越,跨越,'★低買'),COLORRED,LINETHICK1;

高手 發(fā)表于 2009-4-6 14:45

買了就賺

Var1:=(CLOSE+HIGH+LOW+OPEN)/4;
Var2:=SUMBARS(VOL,CAPITAL);
Var3:=HHV(Var1,Var2);
Var4:=LLV(Var1,Var2);
Var5:=(2*Var1-Var4-REF(Var4,1))/(Var3-Var4);
Var6:=(Var1-Var4)/(Var3-Var4);
Var7:=IF(Var1<=Var4,Var5*60,Var6*60);
Var8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
Var9:=EMA(Var8,7);
VarA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VarB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
波段買入: IF(VarA+VarB<7 AND CROSS(Var8,Var9) AND Var9<-18 AND Var9<VarB,60,50),coloryellow , ;
DRAWICON(波段買入=60,70,1),colorred;
VarC:=HHV(HIGH,9)-LLV(LOW,9);
VarD:=HHV(HIGH,9)-CLOSE;
VarE:=CLOSE-LLV(LOW,9);
VarF:=VarD/VarC*100-70;
Var10:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var11:=(2*CLOSE+HIGH+LOW)/4;
Var12:=SMA(VarE/VarC*100,3,1);
Var13:=LLV(LOW,34);
Var14:=SMA(Var12,3,1)-SMA(VarF,9,1);
Var15:=IF(Var14>100,Var14-100,0);
Var16:=HHV(HIGH,34);
Var17:EMA((Var11-Var13)/(Var16-Var13)*100,8);
巫修全制: Var17, ,coloryellow ;
Var18:=EMA(Var17,5);
STICKLINE(Var17>0 AND Var17-Var18>=0,79,80,6,0), ,colorred ;
STICKLINE(Var17>0 AND Var17-Var18<0,79,80,6,1), ,color00ff00 ;
STICKLINE(Var17>0 AND Var17-Var18>=0,19,20,6,0),colorred, ;
STICKLINE(Var17>0 AND Var17-Var18<0,19,20,6,1), ,color00ff00 ;
STICKLINE(Var17-Var18>0,Var17,Var18,8,1), ,colorred ;
STICKLINE(Var17-Var18<0,Var17,Var18,8,1), ,color00ff00 ;



Var22:=REF(LOW,1);
Var23:=SMA(ABS(LOW-Var22),3,1)/SMA(MAX(LOW-Var22,0),3,1)*100;
Var24:=EMA(IF(CLOSE*1.3,Var23*10,Var23/10),3);
Var25:=LLV(LOW,30);
Var26:=HHV(Var24,30);
Var27:=IF(MA(CLOSE,58),1,0);
Var28:=EMA(IF(LOW<=Var25,(Var24+Var26*2)/2,0),3)/618*Var27;
Var29:=IF(Var28>100,100,Var28);
STICKLINE(Var29>-150,0,Var29,3,0), , colorff00ff;
底部吸籌指標(biāo): (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, , color00ff00;
STICKLINE(CROSS(底部吸籌指標(biāo),-24),100,0,6,0), , colorffffff;
先知: (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100, , colorff00ff;
可能放量拉升: IF(CROSS(底部吸籌指標(biāo),-24),1,0), , colorffffff;
Vark1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
Vark2:=REVERSE(Vark1);
Vark3:=SMA(Vark1,3,1);
波段王:=SMA(Vark3,3,1), , COLORRED,linethick2;
波段鬼:=SMA(波段王,2.5,1),coloryellow,linethick2;
趨勢(shì)線: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1), ,COLORff6666,linethick2;
賣:IF((CROSS(波段鬼,波段王) or CROSS(波段鬼,趨勢(shì)線) or CROSS(波段王,趨勢(shì)線) ) AND 波段鬼>65,90,0),stick, ,colorffff00 ,linethick3;



RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV9,3,1);
DK1:=K1-REF(K1,1),COLORSTICK;
出手就贏:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORyellow;
DRAWICON(出手就贏>0,50 ,1);
買點(diǎn)準(zhǔn)備:IF(趨勢(shì)線<=10,0,10), colorff9933,linethick3;
STICKLINE( CROSS(趨勢(shì)線,10),0,73,6,0), COLOR3366ff,;
DRAWTEXT(IF(CROSS(趨勢(shì)線,10),100,0),68,'抄底'),COLORWHITE ;
DRAWTEXT(IF(CROSS(10,趨勢(shì)線),1,0), 10,'$備錢'),COLOR33ffcc,;
{目前位置：
對(duì)當(dāng)前股票所處的技術(shù)位置進(jìn)行評(píng)價(jià)，可對(duì)是否介入作出輔助判斷}



RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DRAWTEXT(REF(J,1)<0 AND J>0,50,'短買'),colorred ;
短線獲利:STICKLINE(REF(J,1)<0 AND J>0,60,0,2,0),color0000ff;
目前位置:K;
技術(shù)低位:20;
技術(shù)中位:50,POINTDOT;
技術(shù)高位:80;