通达信主图公式：博庄
主线:=(MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)+MA(CLOSE,36))/4,COLORFF00FF,LINETHICK2;
股价重心:=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;
中势线:=(-1)*(EMA(VAR22,1)-50)+42,COLORYELLOW,LINETHICK2;
TZ:=(CLOSE-LLV(LOW,331))/(HHV(HIGH,331)-LLV(LOW,331))*100;
强势线:=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);
买入信号1:=VAR1>A AND VAR2>B;
买入信号2:=B>A AND 1>B AND A<1 AND H=HHV(H,21);
BUY:=COUNT(背离,20)>1 AND 买入信号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,'做趋势'), COLORYELLOW;
DRAWTEXT(CROSS(短波,HZ2),C,'♂');
DRAWTEXT(CROSS ( 中波,HZ4),C,'♂');
DRAWTEXT(CROSS ( 中波,MA120),C,'♂');
DRAWTEXT(CROSS (HZ4,MA120),C,'♂');
高手 发表于 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;
风:IF(超跌=反弹 AND CYS13<=-10 AND 筹码超跌=30,-30,0),COLORYELLOW,STICK,LINETHICK3;
云:IF(超跌=反弹 AND CYS13<=-16 AND 筹码超跌=30 AND 短中长线超跌=40,-20,0),COLORRED,STICK,LINETHICK3;
高手 发表于 2009-4-6 14:28
{筹码运动}
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;
量价背离:VAR6*30,STICK,COLORGRAY,LINETHICK2;
高手 发表于 2009-4-6 14:28
{筹码最高值线}
{黄色为最高值 我认为 N=13 或者N=75 比较好. 蓝色为布林线..看看把最高值改为最低值，将是很好的抄底指标}
{N(13,13,13);}
Var1m:=AMOUNT/(100*v);
日趋势:=MA(Var1m,5);
最高值日日:HHV(日趋势,N),COLORYELLOW,linethick2;
黄日趋势: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;
趋势:MA(Var1m,135);
高手 发表于 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,'饱和度');
高手 发表于 2009-4-6 14:33
input:p(99,1,300,1);
{开盘既知今天高低价}
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:=' 开盘测最高:'+NUMTOSTR(Vg[SYSPARAM(1)],2)+jt10;
SZ2:='\n \n 开盘测最低:'+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));
//点位: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;
**************************************************************
由于通达信股软对函数使用的限制，现在字符串，光标等函数暂无法使用。所以，第一部分难以实现。
我没有飞狐股软，也没有看见过此公式图片。
从公式内容来看，第一部分是预测明日价格。
第二，第三部分比较简单，只是两条均线，部分K线和文字标示而已，
发一图片你看看效果与飞狐对比一下，若有不妥之处再改。
p(99,1,300,1);
{开盘既知今天高低价}
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:=' 开盘测最高:'+NUMTOSTR(VG,2)+JT10;
SZ2:='\N \N 开盘测最低:'+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));
点位:WM3,LINETHICK1,COLOR0089FF;
K1:=BACKSET(点位<REF(点位,1),2);
IF(K1,点位,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;
高手 发表于 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);
趋势:EMA(VAR3,3)-10,COLORRED,LINETHICK2;
K1:=BACKSET(趋势<REF(趋势,1),2);
IF(K1,趋势,DRAWNULL),COLORGREEN,LINETHICK2;
机构建仓区:=0,LINETHICK0,COLORFFFF00;
VAR4:=(趋势-REF(趋势,1))/REF(趋势,1)*100;
STICKLINE(趋势<=13 AND VAR4>13,0,50,1,0),COLOR0099FF;
VAR5:=FILTER((趋势<=13 AND VAR4>13),10);
DRAWTEXT(VAR5,60,'买入'),COLOR0099FF;
STICKLINE(趋势>=90 AND VAR4,0,30,2,0),COLORGRAY;
VAR6:=FILTER((趋势>=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,'险'),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 趋势<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;
趋势线:= 趋势,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(趋势线,8),COLOR00FFFF,LINETHICK1;
高手 发表于 2009-4-6 14:35
交易系统指示公式
X9:=FORCAST(C,9);
LLX:=LLV(FORCAST(C,9),2);
{多头买入} ENTERLONG:FILTER(X9>LLX,7);
{多头卖出} EXITLONG: FILTER(X9=LLX,5);
高手 发表于 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));
黑马趋势:=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(黑马趋势,RL5) AND ((黑马趋势 - REF(黑马趋势,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;
高手 发表于 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}
高手 发表于 2009-4-6 14:40
天天买到最低价
引差: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;
高手 发表于 2009-4-6 14:41
一阳穿四线(主图指标)
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);
高手 发表于 2009-4-6 14:41
{大智慧公式 一阳穿N线指标}
投资收益（万）:FINANCE(24)/10000,NODRAW,COLORGREEN;
营业利润（万）:FINANCE(23)/10000,NODRAW,COLORMAGENTA;
每股净资产: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,'坚决买'),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;
高手 发表于 2009-4-6 14:43
价值连城
VAR1:=REF(CLOSE,2);
会员专用: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(会员专用< REF(会员专用,1) AND 会员专用>79,会员专用,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,'★<--极品绝底初现'),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);
特殊会员专用: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(特殊会员专用, 8) AND Q10<-13,20,'*大底来'),COLORYELLOW,LINETHICK5;
DRAWTEXT(CROSS(特殊会员专用, 93) AND Q10<-13,40,'*大底'),LINETHICK5;
DRAWTEXT(CROSS(跨越, 特殊会员专用) AND REF(特殊会员专用,1)>80, REF(特殊会员专用,3), '*顶'),COLORRED,LINETHICK5;
VAR12:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
机构做空能量线: SMA(VAR12,3,1),COLORGREEN,LINETHICK2;
大底来: 0,POINTDOT;
大底: 0,POINTDOT;
DRAWTEXT(CROSS(跨越,机构做空能量线) ,大底+40,'进入强势'),COLORYELLOW,LINETHICK1;
DRAWTEXT(CROSS(特殊会员专用,跨越) ,大底+20,'进入拉升'),LINETHICK1;
{DRAWTEXT(CROSS(跨越,特殊会员专用) ,大底+70,'注意调整'),COLORFFAA66,LINETHICK1;}
{●注意买入点: DRAWTEXT(REF(CROSS(机构做空能量线,跨越),25) AND 机构做空能量线>1.005*跨越,跨越,'●<-注意买入点'),COLORBLUE,LINETHICK1;
★逢低买入: DRAWTEXT(REF(CROSS(跨越,特殊会员专用),82) AND 跨越>1.3*特殊会员专用,特殊会员专用,'★<<-逢低买入'),LINETHICK1;}
★低买: DRAWTEXT(REF(CROSS(特殊会员专用,跨越),1) AND 特殊会员专用>1.3*跨越,跨越,'★低买'),COLORRED,LINETHICK1;
高手 发表于 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;
底部吸筹指标: (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, , color00ff00;
STICKLINE(CROSS(底部吸筹指标,-24),100,0,6,0), , colorffffff;
先知: (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100, , colorff00ff;
可能放量拉升: IF(CROSS(底部吸筹指标,-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;
趋势线: 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(波段鬼,趋势线) or CROSS(波段王,趋势线) ) 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);
买点准备:IF(趋势线<=10,0,10), colorff9933,linethick3;
STICKLINE( CROSS(趋势线,10),0,73,6,0), COLOR3366ff,;
DRAWTEXT(IF(CROSS(趋势线,10),100,0),68,'抄底'),COLORWHITE ;
DRAWTEXT(IF(CROSS(10,趋势线),1,0), 10,'$备钱'),COLOR33ffcc,;
{目前位置：
对当前股票所处的技术位置进行评价，可对是否介入作出辅助判断}
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;
技术低位:20;
技术中位:50,POINTDOT;
技术高位:80;
