|
论坛版主
   
指标公式版主 - 帖子
- 3110
- 积分
- 15986
- 注册时间
- 2007-4-11
|
98楼
大 中
小 发表于 2008-3-11 12:46 只看该作者
引用:转帖:飞狐大量原码!
{CDP买卖价格主图}
PT:=REF(H,1)-REF(L,1);
CDP:(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
AH:=(CDP+PT);AL:=(CDP-PT);NH:=(2*CDP-L);NL:=(2*CDP-H);
近高值:IF(AH>NH,NH,AH) ;
近低值:IF(AL<NL,NL,AL) ;
最高:IF(AH>NH,AH,NH) ;
最低:IF(AL<NL,AL,NL);
EXPLAINEX(BETWEEN(O,近高值,近低值),'盘局买入价参考:',近低值,2,0);
EXPLAINEX(BETWEEN(O,近高值,近低值),'盘局卖出价参考:',近高值,2,0);
EXPLAINEX(BETWEEN(O,最高,近高值)OR(O>最高),'盘局买入价参考:',最高,2,0);
EXPLAINEX(BETWEEN(O,最低,近低值)OR(O<最低),'盘局卖出价参考:',最低,2,0); 引用:{HZ慢速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;
IF(K<优化版D,J,优化版D),LINETHICK2,COLORCYAN;
stickline(j>k,优化版D,J-1,2,0),COLOR00CC00,LINETHICK2;
stickline(k<优化版D,优化版D,J,2,0),COLORBLUE,LINETHICK1;
VAR1:=70*(HHV(HIGH,39)-CLOSE)/(HHV(HIGH,39)-LLV(LOW,39)),LINETHICK1,color009900;
TT:=80*(HHV(HIGH,84)-CLOSE)/(HHV(HIGH,125)-LLV(LOW,84)),colorcyan,linethick1;
IF(TT<26,TT,26),COLORmagenta,LINETHICK2;
胡子强势区:stickline(TT<26,TT,26,2,0),COLORmagenta,LINETHICK1;
持仓区:STICKLINE(close>ema(c,36) OR VAR1<36,0,-13,20,0),COLOR00bb00, linethick1;
STICKLINE(VAR1>36,0,-13,20,0),COLORFF6611, linethick1;
黑马线:STICKLINE(C>0,48,48,1,1),COLORWHITE;
{天字底}
起步线:26,LINETHICK2,coloryellow;
天字底:if(FILTER(CROSS((c-EMA(CLOSE,6))*(2/(12+1))+EMA(CLOSE,6),
(c-EMA(CLOSE,50))*(2/(50+1))+EMA(CLOSE,50)),20 ),-13,-33),LINETHICK2,colorcyan;
HH1:DRAWTEXT(CROSS((c-EMA(CLOSE,6))*(2/(12+1))+EMA(CLOSE,6),
(c-EMA(CLOSE,50))*(2/(50+1))+EMA(CLOSE,50)) ,-13,'天字底'),linethick3 ,colorcyan; 引用:{猎杀大盘}
猎枪:sma(SMA((C-LLV(L,80))/(HHV(H,80)-LLV(L,80))*100,10,1),10,1) ;
收兵:SMA(猎枪,10,1) ;
W1:=SMA((HHV(H,80)-C)/(HHV(H,80)-LLV(L,80))*100,10,1);
瞄准:SMA(W1,10,1) ;
天空:stickline(c,85,85,5,1);
大地:stickline(c,9,9,5,1);
DRAWTEXT(CROSS(收兵,猎枪) and 收兵>20,猎枪,'杀呀'),COLORyellow;
DRAWTEXT(CROSS(收兵,猎枪) and 收兵<50 and 收兵>20,猎枪,' 留意'),COLORMAGENTA;
DRAWTEXT(CROSS(猎枪,收兵) and 收兵<20,猎枪,'开枪'),COLORMAGENTA;
DRAWTEXT(CROSS(瞄准,80),瞄准,'准备'),COLORRED;
DRAWTEXT(CROSS(瞄准,85),瞄准,'目标出现'),COLORWHITE; 引用:{最方便的买卖公式主图}
Var1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),M1,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),M1,1)*100;
多空线:(EMA(CLOSE,4)+EMA(CLOSE,8)+EMA(CLOSE,16))/3;
Var3:=(EMA(CLOSE,8.8)+EMA(CLOSE,17.6)+EMA(CLOSE,35.2))/3;
Var4:=(EMA(CLOSE,22.4)+EMA(CLOSE,44.8)+EMA(CLOSE,89.6))/3;
Var5:=(多空线+Var3+Var4)/3;
生死线:EMA(Var5,4);
STICKLINE(多空线<生死线 ,生死线,多空线,0,1), ;
STICKLINE(多空线>生死线 ,多空线,生死线,0,1),color1010ff,pointDOT;VARAA1:= DRAWTEXT(BARSSINCE(HHV(CLOSE,60))>35 AND CLOSE<HHV(CLOSE,50)*0.68 AND CLOSE/OPEN>1.01,LOW*0.95,'买1CG10-71%'), , ;
PARTLINE(多空线>生死线 ,多空线),;
PARTLINE(多空线<生死线 and c<多空线,多空线);
DRAWTEXT( CROSS(80,Var1),HIGH*1.02,'卖出'), , ;
DRAWICON(CROSS(80,Var1),HIGH*1.02,5), ;
DRAWICON(longcross(多空线,ref(Var3,1),3),多空线,1);
M=5 引用:MACD优化
DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),COLORYELLOW,LINETHICK2;
DEA1:=EMA(DIFF,9);0.10;
MACD: 2*(DIFF-DEA1),LINETHICK0;
STICKLINE(MACD>0,0,MACD,8,1),COLORRED;
STICKLINE(MACD<0,0,MACD,8,1),COLORCYAN;
DEA: EMA(DIFF,9),COLORGREEN;
PARTLINE(DIFF>DEA,DIFF),COLORff11cc,LINETHICK2;
PARTLINE(DIFF>DEA AND DIFF<0,DIFF),COLORred,LINETHICK2;
DRAWICON(CROSS(DIFF,DEA),DIFF-0.01,6);
DRAWICON(CROSS(DEA,DIFF),DIFF,11);
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势:=(-3)*(Var1-Var2), COLORSTICK;
EXPLAIN(趋势>0,'Z线趋势上升中\n');
EXPLAIN(趋势<0,'Z线趋势下降中\n');
EXPLAIN(cross(趋势,0),'Z线考虑买入\n');
EXPLAIN(cross(0,趋势),'Z线考虑卖出\n');
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);
Var44:=v/(h-l);
EXPLAIN(Var44<var11 AND Var33<ma(Var33,4),'资金无入场意愿,萎缩中\n');
EXPLAIN(Var44<var11 AND Var33>ma(Var33,4),'场内资金运作行为\n');
EXPLAIN(Var44>var11 AND Var33<ma(Var33,4),'多空双方激烈争夺中\n');
EXPLAIN(Var44>var11 AND Var33>ma(Var33,4),'场外资金介入(或出局)意愿强烈\n');
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(cross(pdi,mdi),'PDI线从下向上突破MDI线,显示有新多头进场,为买进信号\n');
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线,显示有新空头进场,为卖出信号\n');
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日,行情将维持原趋势\n');
EXPLAIN(adx<ref(adx,1) and adx<20,'ADX值递减,降到20以下,且横向行进时,市场气氛为盘整\n');
EXPLAIN(adx<ref(adx,1) and ref(adx,1)<ref(adx,2) and ref(adx,2)>ref(adx,3) and ref(adx,3)>ref(adx,4),'ADX值从上升倾向转为下降时,表明行情即将反转\n');
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;
EXPLAIN(1=1,'下面为:macd,KDJ,CCI,W&R,RSI,MTM等指标的判断:');
EXPLAINEX(1=1,'(中标)macd=',macd,2,1);
EXPLAIN(macd>0 and diff>0,'大势属多头市场\n');
EXPLAIN(macd>0.35,'超买中,随时有可能见顶回落\n');
EXPLAIN(macd<0 and diff<0,'大势属空头市场\n');
EXPLAIN(macd<-0.35,'超卖中,随时有可能反弹\n');
EXPLAIN(cross(diff,dea) and cross(macd,0),'上穿o轴,可考虑买入\n');
EXPLAIN(cross(j,k) and k<50,'KDJ金叉\n');
EXPLAIN(cross(k,d) and k>70,'KDJ死叉\n');
EXPLAIN(j>84,'KDJ指标高位');EXPLAIN(j<16,'KDJ指标低位\n');
TYP := (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-180,'CCI指标底位,买入机会\n');
EXPLAIN(cci>180,'CCI指标高位,卖出机会\n');
EXPLAINEX(1=1,'(短标)cci=',cci,2,1);
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1);
explain((vol/CAPITAl)>0.075,'换手过大,小心主力出逃,短期头部\n');
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAINEX(1=1,'威廉指标(短标)=',wr,2,1);
explain(wr>-20,'W&R超买,短线即将见顶,应及时卖出\n');
explain(wr<-80,'W&R超卖,短线即将见底,应伺机买进\n');
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA) and MTMMA<-0.8,'MTM从下向上突破MTMMA,买入信号\n');
EXPLAIN(CROSS(MTMMA,MTM) and MTMMA>0.8,'MTM从上向下跌破MTMMA,卖出信号\n');
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAINEX(1=1,'相对强弱RSI1=',RSI1,2,1);
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡\n');
EXPLAIN(RSI1>80,'6日RSI向上突破85,超买,考虑卖出\n');
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹\n');
EXPLAIN(RSI1<15,'6日RSI向下跌破15,超卖,考虑买入\n');
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15,买进信号\n');
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85,卖出信号\n');
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1);
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1);
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1);
Aa:=(EMA(C,30)*2+MA(C,60))/3;
Ra:=(VOL*CLOSE);
VL1a:=EMA(Ra,13)/EMA(VOL,13);
VL2a:=EMA(Ra,60)/EMA(VOL,60);
VLa:=EMA((VL1a+VL2a)/2,3);
分水岭:=ma((Aa+VLa)/2,1);
EXPLAINEX(1=1,'分水岭(中长标)=',分水岭,2,1);
EXPLAIN(close>分水岭,'股价在分水岭之上,大势属多头,可积极做多\n');
EXPLAIN(close<分水岭,'股价在分水岭之下,大势属空头,超跌只能抢反弹\n');
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
var55:=(UPR-DWN)/UPR<0.03;
var56:=(UPR-DWN)/UPR>0.18;
var57:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;
var58:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;
EXPLAIN(var55,'多空布林收敛中,有变盘的可能,上下自己分析\n');
EXPLAIN(var57 and var56 and c>o ,'布林上下乖离太大,有反弹的可能\n');
EXPLAIN(var58 and var56 and c<o ,'布林上下乖离太大,有回落的可能\n'); 引用:Var3:=LLV(LOW,33);
Var4:=HHV(HIGH,21);
Var5:=EMA((CLOSE-Var3)/(Var4-Var3)*100,20)*0.998;
目前个股趋势: EMA(0.667*REF(Var5,1)+0.333*Var5,1), CIRCLEDOT;
50; 引用:ZCHANGE:=IF(C>REF(C,1),C-REF(C,1),0);
FCHANGE:=IF(C<REF(C,1),C-REF(C,1),0);
ZCF:=IF(C>REF(C,1),ZCHANGE+REF(ZCHANGE,1),0);
FCF:=IF(C<REF(C,1),FCHANGE+REF(FCHANGE,1),0);
ZTCF:=SUM(ZCHANGE,N)-SUM(FCF,N)*(-1);
FTCF:=SUM(FCHANGE,N)*(-1)-SUM(ZCF,N);
STICKLINE(CLOSE>OPEN AND ZTCF>0 AND FTCF<0, OPEN, CLOSE, 7, 0),colorred;
STICKLINE(CLOSE>OPEN AND ZTCF>0 AND FTCF<0, HIGH, LOW, 0.5, 0),colorred;
STICKLINE(CLOSE<=OPEN AND ZTCF>0 AND FTCF<0, OPEN, CLOSE, 7, 1),colorred;
STICKLINE(CLOSE<=OPEN AND ZTCF>0 AND FTCF<0, CLOSE, LOW, 0.5, 0),colorred;
STICKLINE(CLOSE<=OPEN AND ZTCF>0 AND FTCF<0, HIGH, OPEN, 0.5, 0),colorred;
STICKLINE(CLOSE>OPEN AND ZTCF<0 AND FTCF>0, OPEN, CLOSE, 7, 0),colorgreen;
STICKLINE(CLOSE>OPEN AND ZTCF<0 AND FTCF>0, HIGH, LOW, 0.5, 0),colorgreen;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF>0, OPEN, CLOSE, 7, 1),colorgreen;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF>0, CLOSE, LOW, 0.5, 0),colorgreen;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF>0, HIGH, OPEN, 0.5, 0),colorgreen;
STICKLINE(CLOSE>OPEN AND ZTCF<0 AND FTCF<0, OPEN, CLOSE, 7, 0),colorbrown;
STICKLINE(CLOSE>OPEN AND ZTCF<0 AND FTCF<0, HIGH, LOW, 0.5, 0),colorbrown;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF<0, OPEN, CLOSE, 7, 1),colorbrown;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF<0, CLOSE, LOW, 0.5, 0),colorbrown;
STICKLINE(CLOSE<=OPEN AND ZTCF<0 AND FTCF<0, HIGH, OPEN, 0.5, 0),colorbrown;
骤雨过,琼珠乱撒,打遍新荷。
人生百年有几,念良辰美景,休放虚过。
穷通前定,何用苦张罗。
命友邀宾玩赏,对芳尊浅酌低歌。
且酩酊,任他两轮日月,来往如梭。
|