借道山指标

来源:百度文库 编辑:神马文学网 时间:2024/04/30 01:00:11
副图公式:精确控盘

{ 参数缺省值 SHORT: 26 1 100 LONG: 12 1 100 M: 9 1 100 }
DIF:=((EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)))*-1;
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
A4:=BARSLAST(REF(CROSS(DIF,DEA),1));
B1:=REF(C,A4+1)>C AND REF(DIF,A4+1)DRAWTEXT(FILTER(B1>0,5),DIF+0.2,'背离'),COLORYELLOW;

操盘:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,4,1),COLORRED{COLOR6058FF};
减仓:STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,4,0),COLORRED{COLOR6058FF};
反弹:STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,4,1),COLORYELLOW{COLORFFFF00};
寻底:STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,4,0),COLORFFFF00;
空仓:0,COLORWHITE;

IF(DIF<0,DIF,0),COLORYELLOW,LINETHICK2;
IF(DIF<0,0,DIF),COLORRED,LINETHICK2;
IF(DIFIF(DIF>DEA,DEA,DEA),COLORGREEN{COLORFF00FF},LINETHICK2;

高手 发表于 2009-4-6 14:16

副图公式:庄筹线
庄筹线:EMA(WINNER(C)*70,5), COLORRED ,LINETHICK2;
散筹线:EMA((WINNER(C*1.1)-WINNER(C*0.91))*80,3), COLORGREEN ,LINETHICK2;
KS13:=(C-SMA(C,13,1))/SMA(C,13,1)*(-100);
AAA:=REF(KS13,1)>13 AND REF(KS13,1)/KS13>1.23 AND C/REF(C,1)>1.03;
海底活鱼:IF(AAA AND REF(C,1)STICKLINE(庄筹线>散筹线,庄筹线-1,散筹线+1,1,0), COLOR00FFFF;
海底捞活鱼:=CROSS(5,庄筹线) AND 散筹线< 20;
AA1:=REF(庄筹线,30)> 40 OR REF(庄筹线,20)> 40;
BB1:=CROSS(28,庄筹线) AND 散筹线> 40 AND AA1=1;
CC:=REF(散筹线,1)> 散筹线 AND REF(庄筹线,1)< 庄筹线 AND 庄筹线> 30 AND 散筹线> 30 AND REF(庄筹线,1)-REF(庄筹线,2)> 3.535;
DD:=COUNT(REF(散筹线,1)> REF(庄筹线,1),5);
鸡雀升天:=CROSS(庄筹线,散筹线) AND CC=1 AND DD>=5;

高手 发表于 2009-4-6 14:17

副图公式:新庄见愁
庄筹估算值:EMA(WINNER(C)*70,3),COLORFFCC66, LINETHICK2;
散筹估算值:EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3),COLOR0099FF,LINETHICK2;
获利线:EMA(WINNER(C)*100,3),COLORWHITE;
庄筹线:=EMA(WINNER(C)*70,5),COLORRED,LINETHICK2;
散筹线:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,5),COLORYELLOW,LINETHICK2;
收:=WINNER(C)*100;
开:=WINNER(O)*100;
博弈K线长:MAX(ABS(收-开),ABS(收-REF(收,1))),POINTDOT,COLORWHITE{FF00FF};
STICKLINE(庄筹线>散筹线,庄筹线,散筹线,0,0),COLORWHITE;
STICKLINE(收>=REF(收,1),0,博弈K线长,0,0),COLORRED;
STICKLINE(收<=REF(收,1),0,博弈K线长,0,0),COLOR00FF00;
5,COLORWHITE,POINTDOT;
20,COLORYELLOW,POINTDOT;
40,COLORFFCC66,POINTDOT;
60,COLORFF00FF,POINTDOT;
CC:FILTER( (CROSS(5,庄筹线) AND 散筹线<20 )*60,10 ),COLORGREEN;
DRAWTEXT(CC ,60 ,'海底捞活鱼(抄底)' ),COLORFF00FF;
AA:= REF(庄筹线,30)>40 OR REF(庄筹线,20)>40;
AA1:=CROSS(庄筹线,散筹线);
DRAWTEXT(AA1,70,'鸡雀升天'),COLOR00FF00;
BB:=CROSS(28,庄筹线) AND 散筹线>40 AND AA=1 AND LLV(L ,60 )>LLV(L ,250 );
DRAWTEXT(BB,60,'决战诱空'),COLORWHITE;
IF(BB,30,60 ),COLORGREEN;

高手 发表于 2009-4-6 14:17

附图公式:稳赢剑     [原飞狐]
{稳赢剑 参数描述: N(1,100,12)M(1,100,20)}
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;
STICKLINE(REF(J,7)<0 AND J>1,10,0,10,0),COLOR00FF00;
VAR1:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
贵:=N,COLOR00FF00;
VAR4:=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);
VAR5:=CROSS(VAR4,10) AND VAR3抄底:IF(VAR5,90,1),COLORRED;
DRAWICON(VAR5,65,1);
DRAWTEXT(VAR5,30,'抄底'),COLORYELLOW;
备钱:IF(CROSS(10,VAR4),40,1),COLORFF00FF;
DRAWICON(CROSS(10,VAR4),45,1);
DRAWTEXT(IF(CROSS(10,VAR4),1,0),20,'$备钱'),COLORWHITE;
危机线: 80,COLORRED,POINTDOT,LINETHICK2;
中间线: 50,COLORFFCCCC,POINTDOT,LINETHICK2;
安全线: 10,COLORFF00FF,POINTDOT,LINETHICK2;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=LLV(LOW,M);
VAR8:=HHV(HIGH,M);
VAR9:=EMA((VAR6-VAR7)/(VAR8-VAR7)*100,13);
VARA:=EMA(0.667*REF(VAR9,1)+0.333*VAR9,2);
战术线: VAR9,COLORYELLOW,LINETHICK2;
战略线: EMA(0.382*REF(VAR9,2)+0.618*VAR9,12),COLORBLUE;
STICKLINE(VAR9>VARA,VAR9,VARA,6,0),COLORRED;
STICKLINE(VAR9<=VARA,VAR9,VARA,6,0),COLOR00FF00;
VARB:=SUM(IF(CLOSE>REF(CLOSE,7),VOL,IF(CLOSEVARC:=SUMBARS(VOL,CAPITAL);
VARD:=IF(CLOSE>LLV(CLOSE,VARC),1,-1);
VARE:=IF(VARB>LLV(VARB,VARC),1,-1);
VARF:=VARD*VARE;
VAR10:=IF(VARF=-1,1,0);
关注:IF(VAR10 AND CLOSE=LLV(CLOSE,20) AND VAR3A1:=EMA(CLOSE,5);
A2:=EMA(CLOSE,10);
A3:=EMA(CLOSE,20);
A4:=EMA(CLOSE,40);
A5:=EMA(CLOSE,60);
{上穿月线:IF({CROSS(A1,A2) AND }{CROSS(C,A3),50,0),COLORYELLOW,LINETHICK2;}
{上穿季线:IF({CROSS(A3,A4) AND }{CROSS(C,A5),50,0),COLORRED,LINETHICK2;}
I:=MA(BARSLAST(HIGH=HHV(HIGH,16))*IF(CLOSER:=MA(BARSLAST(LOW=LLV(LOW,18))*IF(CLOSE>OPEN,VOL,1),4);
短线逃顶:=IF(I,0,1),COLORGREEN;
DRAWICON(短线逃顶,90,2);

高手 发表于 2009-4-6 14:18

附图公式:蛟龙出水

蛟龙: 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),LINETHICK2 , COLORYELLOW;
龙宫: IF(CROSS(蛟龙,MA(蛟龙,10)) AND 蛟龙<=10,35,0),LINETHICK3 , COLORMAGENTA;
蛟龙出宫: IF(CROSS(蛟龙,MA(蛟龙,10)) AND 蛟龙<35,70,0),LINETHICK3 ,  COLORRED;
斩龙剑: IF(CROSS(MA(蛟龙,9),蛟龙) AND 蛟龙>70,110,72),LINESTICK ,  COLORCYAN;
Var1:=DRAWICON(CROSS(蛟龙,62),68,1);
Var2:=DRAWICON(CROSS(蛟龙,72),70,1);
Var3:=DRAWICON(CROSS(蛟龙,66),72,1);
Var4:=DRAWICON(CROSS(蛟龙,68),66,1);
Var5:=DRAWICON(CROSS(76,蛟龙),70,2);
Var6:=DRAWICON(CROSS(68,蛟龙),84,2);
Var7:=DRAWICON(CROSS(66,蛟龙),80,2);
Var8:=DRAWICON(CROSS(64,蛟龙),70,2);
买入警戒: IF(蛟龙<=10,30,0),STICK ,COLORFFA2AE,LINETHICK5;
买入信号: IF(CROSS(蛟龙,10),45,0),STICK ,COLORRED ,LINETHICK4;
DRAWTEXT(买入信号,40,'关注!!!') , COLORYELLOW;
卖出警戒: STICKLINE(蛟龙>=90,70,40,4,0) , COLORGREEN;
卖出信号: IF(CROSS(84,蛟龙),100,0),STICK ,COLOR77AAFF,LINETHICK5;
DRAWTEXT(卖出信号,98,'逃!') ,COLOR77AAFF ;
海面: 72 ,COLORCYAN ;
天空: 105;
海底: 10;
蛟龙二: MA(蛟龙,9),LINETHICK2 ,COLORFF0000;
IF(CROSS(蛟龙,MA(蛟龙,6)) AND 蛟龙二<45,蛟龙二,0),COLORCCB3E2 ,LINETHICK3 ;

高手 发表于 2009-4-6 14:18

主图公式:压力支撑

上市日期:FINANCE(42)/100, NODRAW ;
VAR1:=MA(CLOSE,5),COLOR00FFFF;
VAR2:MA(CLOSE,13),COLOR00FF33;
VAR5:MA(CLOSE,34),COLORFF9900;
VAR6:=MA(CLOSE,54),COLORFF9900;
VAR7:((EMA(CLOSE,5)*7+EMA(CLOSE,5)*3)/10),COLORBBBBBB;
VAR8:= DMA(EMA(CLOSE,12),SUM(VOL/CAPITAL,5)/3),LINETHICK2;
VARA:=REF(CLOSE,1);
VARE:=SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100;
DRAWTEXT(DATE>700101 AND CROSS(84,VARE),HIGH,'☆机构减仓'),COLORGREEN;
VARF:=(2*CLOSE+HIGH+LOW)/4;
VAR10:=LLV(LOW,34);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((VARF-VAR10)/(VAR11-VAR10)*100,6);
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,4);
VAR14:=LLV(LOW,120);
VAR15:=HHV(HIGH,120);
VAR16:=VAR15-VAR14;
DRAWTEXT(IF(COUNT(CLOSE0.3 AND COUNT(VAR12>VAR13,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),LOW,'★机构进场'),COLORYELLOW;
STICKLINE(VAR7>VAR2,VAR2,VAR7,0.01,1),COLORFF00FF;
STICKLINE(VAR7RSV:=(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)))),COLOR00FF33,LINETHICK1;
支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK1;
支撑价:LLV(LOW,19) , COLOR009900,LINETHICK2;
阻力价:HHV(HIGH,19),COLORFF9900, LINETHICK2;
VAR4:EMA(C,21),COLOR0000FF, LINETHICK2;

高手 发表于 2009-4-6 14:19

主图公式:【四线粘合】,一线金叉,
EMA30:EMA(C,30),COLORWHITE,LINETHICK2;
EMA60:EMA(C,60),COLORFF00FF;
EMA90:EMA(C,90),COLORYELLOW;
EMA120:EMA(C,120),COLORFFCC66;
EMA250:EMA(C,250),COLORBLUE;
SS:=CROSS(EMA30,EMA60) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA30,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA30,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 {AND CROSS(EMA30,EMA120)};
DRAWICON(SS,L-0.04,1);
DD:=CROSS(EMA60,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA250) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA90,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 AND CROSS(EMA30,EMA250);

高手 发表于 2009-4-6 14:20

副图公式: 暂无名[飞狐公式]
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORRED;{红1}
VARD:=CLOSEVARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1),COLORYELLOW;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),4,2),COLOR00FF00{98FD};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00D900;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR93FF22;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR24FF22;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2;
PMA:MA(C,5),COLORWHITE,LINETHICK2;
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;
{IF(PMA=REF(PMA,1),PMA,DRAWNULL),COLORRED;}
IF(PMAX:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORFF00FF,LINETHICK2;
{用法:黄托底买进,绿压顶买出。}
DD:=多空线IF(DD,多空线,DRAWNULL),COLOR00FFFF,LINETHICK2;
A:=(PMA>多空线);
IF(A,多空线,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;

高手 发表于 2009-4-6 14:20

副图公式:散户看盘[原分析家]
{INPUT:M(60,3,100),N(30,3,100);}
散户线: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M));
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
主力线:EMA(J,6),COLORYELLOW;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,30);
VAR6:=HHV(VAR4,30);
VAR7:=IF(MA(CLOSE,58),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8>100,100,VAR8);
吸筹:STICKLINE(VAR9>-120,0,VAR9,6,1),COLORMAGENTA;
AA3:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
AA4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
AA5:=SMA(AA4,13,8);
走势:CEILING(SMA(AA5,13,8)),COLORRED,LINETHICK2;
AA6:=SMA(AA3,21,8);
买观注: STICKLINE(走势-AA6<-65,0,7,15,1);
DRAWICON(FILTER(J>REF(J,1)AND 走势>=REF(走势,1)AND 走势<25 ,5),走势,1);
卖观注: STICKLINE(走势-AA6>85,98,90,15,1),COLORFFFF00;
DRAWICON(FILTER(J85 ,5),J,2);

高手 发表于 2009-4-6 14:21

副图公式:五星连珠
K2:=EMA(C,5),COLORFFFF00;
K3:=EMA(C,10),COLORFFFF00;
K5:=EMA(C,30),COLORFFFF00;KK5:=EMA(INDEXC,30),COLORFFFF00;
K6:=2*(K2-K5);K7:=2*(K2-K3);K8:=2*(K7+K6),COLORRED;
STICKLINE(CROSS(K8,0),0,50,8,0) ,COLORRED;
K1:=IF(K8>REF(K8,5) AND K3K21:=IF(K8>REF(K8,7) AND K3K31:=IF(K8>REF(K8,9) AND K3K4:=IF(K8>REF(K8,11) AND K3NDAY1 := 3;
DOWN := CLOSE/LLV(LOW,60)<=1.2;
PMA1 := MA(CLOSE,2);
PMA2 := MA(CLOSE,5);
DIF :=EMA(CLOSE,12) - EMA(CLOSE,26),COLORWHITE;
DEA :=EMA(DIF,9),COLORGREEN;
VMA1:=MA (VOL,2)/100000,COLORRED;
VMA2:=MA(VOL,5)/100000,COLORYELLOW;
PPDAY := BARSLAST(CROSS(PMA1,PMA2));
VVDAY := BARSLAST(CROSS(VMA1,VMA2));
MACDDAY := BARSLAST(CROSS(DIF,DEA));
A1:=BARSLAST(REF(CROSS("MACD.DIF"(5,12,9),"MACD.DEA"(5,12,9)),1));
背离、W底、金叉:REF(C,A1+1)>C AND REF("MACD.DIF"(5,12,9),A1+1)<"MACD.DIF"(5,12,9) AND
CROSS("MACD.DIF"(5,12,9),"MACD.DEA"(5,12,9)),,COLORRED;
SJCJD:= IF((PPDAY<=NDAY1 AND VVDAY<=NDAY1 AND MACDDAY<=NDAY1 ) AND (DIF<0),1,0);
STICKLINE(SJCJD,50,60,6,0),COLORWHITE,LINETHICK2;
MACD:= 2*(DIF-DEA), COLORSTICK;
短趋势:((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)-50)*1.032+50),COLORRED;
VARA2:=(2*CLOSE+HIGH+LOW+OPEN)/5;
VARA3:=LLV(LOW,34);
VARA4:=HHV(HIGH,34);
长趋势:EMA((VARA2-VARA3)/(VARA4-VARA3)*100,13),COLOR00FF00;
判断底:SQRT(SQRT(FLOOR(SQRT(MA(1/WINNER(CLOSE)*100,4)/10000))))*5;
VARA5:=CROSS(短趋势,长趋势)AND 长趋势<25;
VARA6:=CROSS(短趋势,长趋势)AND 长趋势<50;
STICKLINE(VARA5,60,70,8,0) ,COLORGREEN;
XX:=((((CLOSE - MA(CLOSE,34)) / MA(CLOSE,34)) * 100)* 5);
B001:=(((((CLOSE - MA(CLOSE,42)) / MA(CLOSE,42)) ) * 100) * 5);
B002:=(((((CLOSE - MA(CLOSE,67)) / MA(CLOSE,67)) ) * 100) * 5);
B003:=(((XX + B001) / 2) - (B002 ));
B004:=(((0 - 100) * (HHV(HIGH,34) - CLOSE)) / (HHV(HIGH,34) - LLV(LOW,34)));
B005:=(((0 - 100) * (HHV(HIGH,42) - CLOSE)) / (HHV(HIGH,42) - LLV(LOW,42)));
B006:=(((0 - 100) * (HHV(HIGH,72) - CLOSE)) / (HHV(HIGH,72) - LLV(LOW,72)));
B007:=EMA((((B004 + B005) / 2) - B006),6);
B008:=REF(CLOSE,1);
B009:=((((SMA(MAX((CLOSE - B008),0),19,1) / SMA(ABS((CLOSE - B008)),19,1)) * 100) - 50) * 1.25);
B010:=((((SMA(MAX((CLOSE - B008),0),34,1) / SMA(ABS((CLOSE - B008)),34,1)) * 100) - 50) * 1.25);
B011:=((((SMA(MAX((CLOSE - B008),0),72,1) / SMA(ABS((CLOSE - B008)),72,1)) * 100) - 50) * 1.25);
B012:=EMA(((((B009 + B010) / 2) - B011) * 5),6);
B013:=((((0 - 1) * ((B007 + B003) + B012)) / 3) * 1.5);
B014:=B012;
B015:=B013;
B016:=EMA(B012,4);
B017:=B012;
KKM1:=B013;
DPM1:=EMA(B013,4);
多头:=B017,COLOR0000FF;
空头:=KKM1,COLOR00FF00;
多均:=B016;
空均:=DPM1;
B018:=IF(CROSS(B017,KKM1),28,0);
XD:=5 ;
VARX:=B017;
C023:=KKM1;
C024:=B016;
C025:=DPM1;
C026:=WINNER(CLOSE);
W:=(DMA(C026,((VOL / CAPITAL) * 1)) * 100);
HWXWINNER:=W;
XD1:=EMA(W,6);
XWXMH:=XD1;
XD2:=MA(W,14);
庄家控盘:((HWXWINNER - XWXMH) * 10),COLORSTICK,LINETHICK2;
STICKLINE(CROSS(多头,空均),80,70,8,0) ,COLORYELLOW;
VARB1:=(2*CLOSE+HIGH+LOW)/4;
VARB2:=LLV(LOW,34);
VARB3:=HHV(HIGH,34);
VARB4:=MA(HIGH,8);
XX1:=EMA((VARB1-VARB2)/(VARB3-VARB2)*100,13);
YY:=EMA(0.667*REF(XX1,1)+0.333*XX1,2) , ;
STICKLINE(CROSS(XX1,20) AND YYREF(VARB4,1),80,90,6,0),COLORFF0000;
逃顶:IF(FILTER(CROSS(YY,XX) AND XX>80 ,3),60,90),COLORFF0000;

高手 发表于 2009-4-6 14:21

主图公式:指南针----飞越二号
{指南针___飞越二号}
HUO:=100*WINNER(C);
VAR1:AMOUNT/VOL/100,NODRAW;
VAR2:(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VAR3:=SUM(AMOUNT,5)/VAR1/100;
CYC5:DMA(VAR2,VOL/VAR3);
CYS5:=(CLOSE-CYC5)/CYC5*100;
CYF13:=100-(100/(1+SUM(VOL,13)/CAPITAL));
CYF34:=100-(100/(1+SUM(VOL,34)/CAPITAL));
出击:(HUO>50 AND CYS5>5 AND CYF13<25 AND C<10){MYP<30},COLOR0066FF,NODRAW;
DRAWTEXT(出击>0,L-0.08,'出击'),COLOR00FFFF;
DRAWICON(CROSS(HUO,CYF34),L-0.08,9);
六十:MA(C,60),COLOR00FFFF,LINETHICK2;
涨:IF(MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORRED,LINETHICK2;
平:IF(MA(CLOSE,60)=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLOR00FFFF,LINETHICK2;
跌:IF(MA(CLOSE,60)<=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORGREEN,LINETHICK2;

高手 发表于 2009-4-6 14:21

主图公式:上出下买+三背离
A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
分水岭:IF(MA(CLOSE,17)操作线:分水岭-(EMA(C,3)-分水岭),COLOR00FFFF,LINETHICK2;
DD:=分水岭IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2;
S:=(PMA>操作线);
IF(S,分水岭,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK4;
PM:MA(C,5),COLORWHITE,LINETHICK2;
IF(PM>REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2;
IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED;
IF(PMDRAWICON(CROSS(分水岭,操作线),分水岭-0.1,1);{买入红箭头}
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(B1>0,L-0.02,'★M'),COLOR00FFFF;{MACD底背离}
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
DRAWTEXT(B2,L-0.10,'◎K'),COLORFF00FF;{KDJ底背离}
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
DRAWTEXT(B3>0,L-0.18,'◆R'),COLOR0000FF;{RSI底背离}
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(C,C1+1)"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
DRAWTEXT(D1>0,H+0.16,'★M'),COLOR00FF00;{MACD顶背离}
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(C,C2+1)"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
DRAWTEXT(D2>0,H+0.08,'◎K'),COLORFFFFCC;{KDJ顶背离}
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(C,C3+1)"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
DRAWTEXT(D3>0,H+0.04,'◆R'),COLORFF9900;{RSI顶背离}

高手 发表于 2009-4-6 14:22

副图公式:万国二号
终止日:=(DATE<=8388608);
VAR2:=(HIGH+LOW+(CLOSE)*(2))/(4);
B: ((EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))*(38))*(终止日),COLOR0000FF,LINESTICK;
抄底1: ((((-1))*(EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))+0.01)*(38))*(终止日),COLOR339999,LINESTICK;
VAR22:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
VAR33:=EMA(VAR22,10);
VAR44:=EMA(VAR33,10);
VAR55:=(3)*(VAR33)-(2)*(VAR44);
VAR66:=EMA(VAR55,5);
桥: (EMA(VAR66,1))*(终止日),COLOR0000FF,LINETHICK2;
跨: (REVERSE(桥))*(终止日),COLORFFFFFF,LINETHICK2;
(0)*(终止日),COLORFFFF00,LINETHICK2;
趋势:=(5)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(3)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1))-SMA(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1),2,1);
底部:=5;
底:DRAWTEXT((CROSS(趋势,底部))*(终止日),0,'◥◤'),COLOR00FFFF;
DRAWTEXT(CROSS((趋势)*(终止日),底部),15,'◢◣'),COLOR00FFFF;
VARA1:=((CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)>=REF(CLOSE,2)) AND (REF(CLOSE,1)<=REF(CLOSE,3)) AND (REF(CLOSE,2)<=REF(CLOSE,3)) AND ((REF(CLOSE,4)>REF(CLOSE,2)) OR (REF(CLOSE,4)<=REF(CLOSE,2)) AND (REF(CLOSE,5)>=REF(CLOSE,3))) OR (CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)<=REF(CLOSE,2)) AND (CLOSE>=REF(CLOSE,2)) AND ((REF(CLOSE,3)>REF(CLOSE,1)) OR (REF(CLOSE,3)<=REF(CLOSE,1)) AND (REF(CLOSE,4)>=REF(CLOSE,2))));
VARA2:=LLV(LOW,5);
VARA3:=HHV(HIGH,5);
VARA4:=EMA(((CLOSE-VARA2)/(VARA3-VARA2))*(100),4);
VARA5:=EMA((0.66699999)*(REF(VARA4,1))+(0.333)*(VARA4),2);
VARA6:=(VARA5<24) AND (OPENVARA1 AND (VARA6)*(终止日),COLORFF0000;
STICKLINE(VARA1 AND (VARA6)*(终止日),-40,40,10,1),COLOR2894FF;
VARB2:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
VARB3:=EMA(VARB2,7);
VARB4:=EMA(VARB3,10);
VARB5:=(3)*(VARB3)-(2)*(VARB4);
VARB6:=EMA(VARB5,5);
桥1:=EMA(VARB6,1),COLORRED,LINETHICK2;
K1:=BACKSET(桥IF(K1,桥,DRAWNULL),COLORGREEN,LINETHICK2;
K2:=BACKSET(桥>REF(桥,1),2);
IF(K2,桥,DRAWNULL),POINTDOT,COLOR00FFFF,LINETHICK4;
美化:=IF(REF((COUNT((桥1<=REF(桥1,1)),5)=5),1) AND (桥1>REF(桥1,1)),10,0);
STICKLINE((美化)*(终止日),-20,20,15,1),COLORFF0000;

高手 发表于 2009-4-6 14:23

火龙戏珠     
VAR1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR2:=EMA(VAR1,10);
VAR3:=EMA(VAR2,5);
VAR4:=3*VAR2-2*VAR3;
龙珠: EMA(VAR4,5),COLOR00FFFF;
白云:= 50,COLORWHITE;
火龙: EMA(龙珠,9),COLORFFFFCC;
VAR5:=(INDEXC-LLV(INDEXL,9))/(HHV(INDEXH,9)-LLV(INDEXL,9))*100;
VAR6:=EMA(VAR5,10);
VAR7:=EMA(VAR6,5);
VAR8:=3*VAR6-2*VAR7;
青龙: EMA(VAR8,9), COLORCYAN ;
碧海:=10,COLORF0F000;
九霄:= 80,COLORBLUE;
HL1: 火龙, COLORSTICK;
VAR9:=(CLOSE-LLV(LOW,60.135))/(HHV(HIGH,60.135)-LLV(LOW,60))*80;
VARA:=SMA(VAR9,7,1);
VARB:=SMA(VARA,5,1);
买入:IF(CROSS(VARA,VARB) AND VARA<20,100,0),LINETHICK2 , COLORF00FF0;
VARC:=EMA(CLOSE,12)-EMA(CLOSE,26);
VARD:=EMA(VARC,9);
VARE:=CROSS(VARC,VARD);
MACD: IF(VARE,80,0),STICK ,  COLORWHITE;
VARF:=(CLOSE-REF(CLOSE,12))/REF(CLOSE,12)*100;
VAR10:=0;
VAR11:=CROSS(VARF,VAR10);
ROC1: IF(VAR11,50,0),STICK ,COLOR00FF00 ;
VAR12:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
VAR13:=VOL/CAPITAL;
VAR14:=(HIGH-CLOSE)/CLOSE;
VAR15:=VAR12/(VAR13+VAR14);
变盘信号: IF(VAR15,0,20),LINETHICK2 ,  COLORYELLOW;
DRAWICON(CROSS(龙珠,火龙),龙珠-0.08,1);
----------------------------------------------------
火龙戏珠               
底部信号:粉红色箭头。
变盘信号:黄色箭头。

高手 发表于 2009-4-6 14:24

新闪电手

VAR1:=CLOSE/REF(CLOSE, 1)>=1.062 AND HIGH/CLOSE<1.005 AND MA(CLOSE, 90)/CLOSE>=1.150;
VAR2:=VAR1 AND COUNT(VAR1, 20)=1;
VAR3:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
VAR4:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
VAR5:=IF(VAR3>0.010, 0.900, 1) AND IF(VAR3>(-0.025), 1, 1.200);
VAR6:=VAR5*(VAR4-VAR3)*100;
VAR7:=SUM(VAR6, 10);
VAR8:=VAR7>20;
VAR9:=CROSS(CLOSE, MA(CLOSE*1.055, 3)) AND CLOSE>OPEN*1.060 AND VOL>=REF(VOL, 1)*1.5 AND CLOSE>=MA(CLOSE, 10);
VAR10:=VAR8 AND VAR9;
VAR11:=(-100)*(HHV(HIGH, 3)-CLOSE)/(HHV(HIGH, 3)-LLV(LOW, 3));
VAR12:=CROSS(VAR11, (-87)) AND OPEN=1.090*REF(CLOSE, 1) AND INDEXC>0.980*REF(INDEXC, 1) AND CLOSE<=1.470*LLV(CLOSE, 58);
VAR13:=EMA(CLOSE, 12)-EMA(CLOSE, 26);
VAR14:=EMA(VAR13, 9);
VAR15:=(CLOSE-LLV(LOW, 9))/(HHV(HIGH, 9)-LLV(LOW, 9))*100;
VAR16:=SMA(VAR15, 3, 1);
VAR17:=SMA(VAR16, 3, 1);
VAR18:=EMA(IF(VAR14>REF(VAR14, 1), 1, (-1)), 14)*14;
VAR19:=EMA(IF(VAR17>REF(VAR17, 1), 1, (-1)), 14)*14*2;
VAR20:=(MA(CLOSE, 5)/MA(CLOSE, 70)-1)*100;
VAR21:=(VAR20+VAR19+VAR18)/3;
VAR22:=MA(CLOSE, 80)-MA(CLOSE,10)*4;
VAR23:=IF(CLOSEMA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.062 AND CLOSEVAR24:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<6 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VAR23>0, 91, 0);
VAR25:=IF(VAR21>REF(VAR21, 1) AND REF(VAR21, 1)0 OR VAR24>0, 85, 0);
高级:IF(VAR24>0 ,95,0), STICK,COLOR0000FF,LINETHICK2;
中级:IF(VAR23>0 OR VAR24>0,80,0), COLOR0099FF, STICK,LINETHICK4 ;
初级:IF(VAR25>0 OR VAR24>0 OR VAR23>0,60,0),STICK,LINETHICK2,COLOR00FFFF ;
闪电手:MAX(MAX(高级, 中级), 初级), CIRCLEDOT COLORFF00FF,LINETHICK2;
新闪电手:CROSS(VAR21,VAR22)*20,STICK,LINETHICK1,COLOR00FF33;
DRAWICON( CROSS(VAR21,VAR22),15 ,9 );

高手 发表于 2009-4-6 14:24

终结者
通达信:副图:终结者
源码由老版主yngs 提供

LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05  AND VOL/CAPITAL*100<5,50,0);
WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
BIAS1 := ((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2 := ((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3 := ((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6;
S2:=EMA(S1,3);
S3:=ABS(BIAS1-BIAS3);
SX:=(S1+S3)/2;
XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
CCC:=XC1+SX;
ZJZ:=IF( LGL>0 AND CCC<0,200,0);
LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05  AND VOL/CAPITAL*100<5,-50,0);
JBJ:=IF(CCC<0 AND LXL=-50,100,0);
MA3:= MA(C,3);
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
BOT:=MIN(C0,C1);
HSL:=100*VOL/CAPITAL;
MA13:=MA(C,13);
CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0);
VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),100,0);
V满仓:=VMC;
V半仓A:=IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR
(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND  (LXL<0 OR LGL>0)) AND VMC<10 ,50,0) ;
V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND  (LXL<0 OR LGL>0))   ;
V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902));
V半仓:=V93 OR V90;
XMM87:=V满仓 OR V半仓;
XMM91:=VMC;
G:=MA(CLOSE,80)-MA(CLOSE,10)/3;
初级:IF(XMM87>0,30,0),STICK, COLOR00FFFF,LINETHICK2;
中级:IF(XMM91>0,40,0),STICK, COLOR0099FF,LINETHICK2;
高级:IF(VMC>0 AND CLOSE终结者:MAX(MAX(高级,初级),中级),CIRCLEDOT,COLORYELLOW;
VAR2Q:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
神奇线:=MA((CLOSE-VAR2Q)/VAR2Q,1),COLORRED,LINETHICK2;
买点1:IF(CROSS(神奇线,0) AND LOW/REF(HIGH,1)<1.012,15,0),STICK,COLOR33FFCC;
稳赚:IF(COUNT(神奇线>REF(神奇线,1),30)<3 AND COUNT(神奇线<10,10)<0.5 AND REF(神奇线,3)=LLV(神奇线,10),10,0);
买点2: IF(REF(神奇线,2)=LLV(神奇线,20) AND REF(神奇线,2)<0.071 AND REF(神奇线,2)REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1),0.5,0)*20;
XA:=(EMA(神奇线,N)*0.9)*10;
XB:=(EMA(神奇线,M))*10;
底部将成:IF(LLV(XB-XA,12)>0,0,-2),COLOR00FF00;
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,9);
MACD := 2*(DIFF-DEA), COLORSTICK;
抄底:IF(底部将成<0 AND CROSS(MACD,0),20,0),COLORFF00FF,LINETHICK1;
DRAWICON( 抄底>0,16 ,9);
{DRAWICON( CROSS(XB,XA),L-0.05 ,9); };

高手 发表于 2009-4-6 14:24

主图:七剑下天山
E1:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
B0:=(AH-AL)/40;
KB1:=H+B0;
KB2:=L-B0;
STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-3*B0,1,0),COLORYELLOW,LINETHICK3;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-2*B0,'时间窗'),COLORWHITE;
{STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),COLORFF6C00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,4,0),COLORFF7B00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),COLORFF9C00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),COLORFFBE00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2.5,0),COLORFFCC00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.5,0),COLORFFFF00;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,6,0),COLOR070084;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,5,0),COLOR0000A3;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,4,0),COLOR0000B7;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,3,0),COLOR0000CD;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2,0),COLOR0000E9;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2,0),COLOR0754E9;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1.5,0),COLOR076EF3;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),COLOR077BF3;
STICKLINE((CLOSE > OPEN),OPEN,LOW,1,0),COLOR0726CA;
STICKLINE((CLOSE > OPEN),CLOSE,HIGH,1,0),COLOR0726CA;
STICKLINE((OPEN > CLOSE),CLOSE,LOW,1,0),COLORDE9100;
STICKLINE((OPEN > CLOSE),OPEN,HIGH,1,0),COLORDE9100;}
卖出线:=98;
阶段卖:=96;
趋势4:=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);
底部:=10;
买入信号:DRAWICON(CROSS(趋势4,底部),LOW,1);
卖出:DRAWICON(CROSS(卖出线,趋势4),HIGH,2);
顶压:HHV(MA(H,11),50),COLORFF9900,LINETHICK3;
短压:HHV(MA(H,11),15),COLOR0066FF,LINETHICK3;
XL1:=LLV(MA(H,11),1);
趋势3:IF(XL1>=短压,短压,XL1),COLORRED,LINETHICK2;
K1:=BACKSET(趋势3IF(K1,趋势3,DRAWNULL),COLOR00CC33,LINETHICK2;

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
KK1:=REF(RSV,1);KK2:=REF(RSV,2);KA:=RSV;KK3:=REF(RSV,3);KK4:=REF(RSV,4);KK5:=REF(RSV,5);
KK80:=3*80-(POW(2/3,1)*KK1+POW(2/3,2)*KK2+POW(2/3,3)*KK3+POW(2/3,4)*KK4+3*POW(2/3,5)*KK5);
KKK80:=SMA((KK80*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
交叉:=3*SMA(SMA(KA,3,1),3,1)-(POW(2/3,1)*KK1+POW(2/3,2)*KK2+POW(2/3,3)*KK3+POW(2/3,4)*KK4+3*POW(2/3,5)*KK5);
K转折:=3*SMA(KA,3,1)-(POW(2/3,1)*KK1+POW(2/3,2)*KK2+POW(2/3,3)*KK3+POW(2/3,4)*KK4+3*POW(2/3,5)*KK5);
K转折价0:=SMA((K转折*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
日交叉0:=SMA((交叉*(HHV(H,9)-LLV(L,9))/100)+LLV(L,9),3,1);
DRAWTEXT(K转折价0>=KKK80 AND K转折价0>=日交叉0,日交叉0,'◆'),COLORFF00FF;
趋势:= 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),
COLORYELLOW,LINETHICK2;
警戒:=趋势<=5 ;
D1:=C/L>1.05 AND COUNT(警戒,3)>=1 AND C/REF(C,1)>1.01;
DRAWTEXT(D1>0,L,'★长生剑'),COLOR00FF00;
趋势1:= MA(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),5);
买入1:= C/O>1.04 AND COUNT(趋势1<10,3)>=1;
D2:=(买入1);
DRAWTEXT(D2>0,L,'☆孔雀翎'),COLORFF00FF;
M1:=(CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100;
K:=SMA(M1,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DD:=M1<-300;
DA:=C/O>1.04 AND COUNT(M1<-300,3)>=1;
D3:=DA;
DRAWTEXT(D3>0,L,'★碧玉刀'),COLOR006EFF;
个股:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
D4:=COUNT(个股<-8,3)>=1 AND ( C/L>1.05 ) ;
DRAWTEXT(D4>0,L,'◎多情环'),COLORRED;
LCA:=REF(CLOSE,1);
E:=-100*(HHV(HIGH,84)-CLOSE)/(HHV(HIGH,84)-LLV(LOW,84));
底:=(( E<-98)*2000);
D5:=( C/L>1.04 AND C>REF(C,1)) AND COUNT(底,2)>=1;
DRAWTEXT(D5>0,L,'Ψ离别钩'),COLOR0090E0;
DIFFA:=(EMA(CLOSE,12) - EMA(CLOSE,26))*100+50;
DC:=C/L>1.05 AND DIFFA<40;
D6 :=FILTER(DC,5);
DRAWTEXT(D6>0,L,'↑霸王枪'),COLOR00FF00;
BB1:=LLV(LOW,5)=LLV(LOW,45) AND CLOSE>=OPEN*1.035 ;
BB2:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/2;
BB3:=(CLOSE-OPEN)/OPEN*100;
BB4:=REF(CLOSE,1);
BB5:=SMA(MAX(CLOSE-BB4,0),6,1)/SMA(ABS(CLOSE-BB4),6,1)*100;
BB6:=COUNT(BB5<20,20)>=1;
BB108:=BB3>9 AND BB6;
BB7:=(CLOSE-OPEN)/OPEN*100;
BB8:=REF(CLOSE,1);
BB9:=SMA(MAX(CLOSE-BB8,0),6,1)/SMA(ABS(CLOSE-BB8),6,1)*100;
BB10:=COUNT(BB9<20,20)>=1;
BB109:=BB7>9 AND BB10;
DRAWTEXT(BB108 OR BB109>0,L,'★拳头'),COLORWHITE;

高手 发表于 2009-4-6 14:25

关注买
HLM1:=MA(HHV(H,485),17);
HLM2:=MA(HHV(H,222),17);
HLM3:=MA(HHV(H,96),17);
HLM4:=MA(LLV(L,485),17);
HLM5:=MA(LLV(L,222),17);
HLM6:=MA(LLV(L,96),17);
HLM7:=MA((HLM1*0.558+HLM2*0.558+HLM3*0.558+HLM4*0.96+HLM5*0.96+HLM6*0.96)/6,17);
HLM8:=MA((HLM1*0.55+HLM2*0.55+HLM3*0.65+HLM4*1.25+HLM5*1.23+HLM6*1.2)/6,17);
HLM9:=MA((HLM1*0.68+HLM2*0.68+HLM3*0.68+HLM4*1.3+HLM5*1.3+HLM6*1.3)/6,17);
HLM10:=MA((HLM7*3+HLM8*2+HLM9)/6*1.738,17);
HLM11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;
HLM12:=MA(IF(C*1.35<=HLM10,HLM11*10,HLM11/10),3);
HLMH:=HHV(HLM12,30);
关注:MA(IF(L<=LLV(L,30),(HLMH+HLM11*2)/2,0),3)/200,COLORYELLOW;
DRAWTEXT(CROSS(关注,1.2),关注*0.5-6, '  ◣'),COLORRED;
DRAWTEXT(CROSS(关注,2.4),关注*0.5-6, '◢ '),COLORMAGENTA;
DRAWTEXT(CROSS(关注,3.6),关注*0.5-12,'  ◤'),COLORCYAN;
DRAWTEXT(CROSS(关注,4.2),关注*0.5-12,'◥ '),COLORGREEN;
{DRAWTEXT(CROSS(关注,4.5),关注,'关注买?'),COLOR9966FF; }
{DRAWICON(CROSS(关注,7.0),关注*0.5-20,14);};

高手 发表于 2009-4-6 14:25

主图:双线趋势
短线:=EMA(CLOSE,5);
趋势线:EMA(CLOSE,10),LINETHICK2,COLORRED;
重心线:EMA(CLOSE,30),LINETHICK2,COLORYELLOW;
强:IF(短线 > 趋势线,趋势线,DRAWNULL),LINETHICK2,COLORRED;
弱:IF(趋势线 > 短线 ,趋势线,DRAWNULL),LINETHICK2,COLORFFFF00;
抄底:IF(CLOSE / OPEN>1.07 AND 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10,C,DRAWNULL),COLORRED,NODRAW;
买涨:IF(FILTER(BARSLAST(COUNT(重心线>=REF(重心线,1),3)=3 AND CROSS(趋势线,重心线))<=5 AND L<=趋势线,5),C,DRAWNULL),COLORMAGENTA,NODRAW;
追进:IF(COUNT(重心线>=REF(重心线,1),3)=3 AND COUNT(趋势线>重心线,10)>8 AND REF(趋势线,1)=重心线*1.02,C,DRAWNULL),COLORBLUE,NODRAW;
VAR1:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));
VAR2:=CROSS(REF(CLOSE,2),VAR1);
VAR3:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),8,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),8,1)) * 100);
VAR4:=CROSS(79,VAR3);
减仓:IF(FILTER((VAR2 OR VAR4),5),C,DRAWNULL),COLORGREEN,NODRAW;
STICKLINE(抄底,L*0.992,L*0.98,6,0)COLORRED;
STICKLINE(买涨,L*0.992,L*0.98,6,0)COLORMAGENTA;
STICKLINE(追进,L*0.992,L*0.98,6,0)COLORBLUE;
STICKLINE(减仓,H*1.006,H*1.015,4,0)COLORGREEN;

高手 发表于 2009-4-6 14:27

通达信主图:拾金图

MMS:=MA(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(ABS((L+H+2*C)/4-REF((L+H+2*C)/4,1)),5,1)*100,1)+50;
G1:=IF(-MMS>95,0,20);
UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV(CLOSE,7))*100=100)>0 AND G1)+1);
明日均线:=REF(C,2)*2-REF(C,5),LINETHICK0,COLOR550055 ;
后日均线:=REF(C,1)*2-REF(C,4),LINETHICK0,COLOR008800;
大后天均线:=C*2-REF(C,3),LINETHICK0,COLOR008888;
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100);
趋势线:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
AA:= - 100 * (趋势线 - CLOSE) / 趋势线;
AC:=(EMA(AA,5) );
SSL:=EMA(CLOSE,5);
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
MM:=(IF(((DAY > 5) AND (DAY < 9)),MA(MMV,1),IF((DAY = 5),MA(MMV,4)
,IF((DAY = 4),MA(MMV,8),IF((DAY = 3),MA(MMV,16)
,IF((DAY = 2),MA(MMV,32),1))))) );
{STICKLINE(((SSL > MM) ),SSL,MM,0.1,0),COLORRED;}
SA:=(MM * 0.985);
SS:=(MA(CLOSE,18));
DD:=(MA(CLOSE,13));
GG:=(MA(CLOSE,21));
捞钱手:IF(((SSL>MM)),SS,SA),COLORFF00FF,LINETHICK2;
K1:=BACKSET(捞钱手IF(K1,捞钱手,DRAWNULL),COLORFFFFCC,LINETHICK2;
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
VAR4Y:=REF(CLOSE,1);
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);
VAR9Y:=SMA(VAR8Y,3,1);
VARAY:=SMA(VAR9Y,3,1);
VARBY:=((3 * VAR9Y) - (2 * VARAY));
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
DRAWICON(((CROSS(76,VAR5Y) AND (VAR3Y > 5)) ),(HIGH * 1.01),2),COLORFFFFFF;
VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);
DRAWICON((CROSS(VARFY,(0 - 9))),(LOW * 0.998),4);
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));
上开:=O;
上收:=C;
上高:=H;
上低:=L;
JJ:=(上开+上高+上低)/3;
A:=EMA(JJ,4);
B:REF(A,1),POINTDOT,COLORYELLOW,LINETHICK4;
虎门德哥仔:A,COLORYELLOW,LINETHICK1;

STICKLINE(虎门德哥仔>捞钱手,虎门德哥仔,捞钱手,0.01,1),COLOR0000FF;
STICKLINE(虎门德哥仔<捞钱手,虎门德哥仔,捞钱手,0.01,1),COLORCYAN;
VA1:=EMA(上收,8);
VA2:=EMA(上收,20);
DRAWTEXT(CROSS(VA2,VA1),H+0.12,'止\N损')COLORYELLOW;
DRAWTEXT(CROSS(VA1,VA2)AND(C>=O)AND 虎门德哥仔>REF(虎门德哥仔,1),VA1*0.98,'★买入'),COLOR00FF00;

选手A:=MA(上收,3);
箱顶A:=MA(REF(HHV(上收,6),1),3);
箱底A:=MA(REF(LLV(上收,3),1),3);
T1:=MA(上收,20)>=REF(MA(上收,20),1);
T2:=CROSS(选手A,箱底A) AND 箱顶A/箱底A>100/100 AND T1;
T3:=CROSS(箱顶A,选手A) AND 箱顶A/箱底A>100/100;
选手:=MA(上收,2);
箱顶:MA(REF(HHV(上收,30),1),2),COLOR0000FF,LINETHICK2;
箱底:MA(REF(LLV(上收,30),1),2),COLOR00FF00,LINETHICK2;

IF(A>REF(A,1),A,DRAWNULL),COLORYELLOW,LINETHICK5;
IF(A