 | |  |  |
飞狐+通达信决策曲线源码公式：
邱一平所著的《机会交易法》里决策曲线指标的采样有两种，一是选用27种指标采样，二是选用10种指标采样，总分都是36分。采样指标可以依据自己的标准选，采样的广度和多少决定指标的精确度。
27种指标采样
3日及5日平均线 向上交叉加1分，向下交叉扣-1分
5日及10日平均线 向上交叉加1分，向下交叉扣-1分
12日及50日平均线 向上交叉加1分，向下交叉扣-1分
KD 向上交叉加1分，向下交叉扣-1分
MACD 向上交叉加1分，向下交叉扣-1分
TRIX 向上交叉加1分，向下交叉扣-1分
DMI 涨势ADX转折加3分，跌势ADX转折扣-3分
RSI 80以上加1分，20以下扣-1分
CCI 180以上加2分，-180以下扣-2分
W%R 80以上加1分，20以下扣-1分
OSC 0轴以上加1分，0轴以下扣-1分
MOM 0轴以上加1分，0轴以下扣-1分
DPO 0轴以上加1分，0轴以下扣-1分
布林线 布林线上限以上加1分，布林线下限以下扣-1分
BRAR BR>350加3分<45扣-3分，AR>180加3分<45扣-3分
VR VR>350加3分<45扣-3分
WVAD 0轴以上加1分，0轴以下扣-1分
EMV 0轴以上加1分，0轴以下扣-1分
OBV >24日EMA加1分，<24日EMA扣-1分
PVI >24日EMA加1分，<24日EMA扣-1分
NVI >24日EMA加2分，<24日EMA扣-2分
MASS 涨势>26.5加2分，跌势>26.5扣-2分
VCI 涨势出现凸出加1分，跌势出现凸出扣-1分
VHF VHF>0.3加1分，<0.3扣-1分
CSI >24日EMA加1分，<24日EMA扣-1分
逆时钟曲线 向右上方移动加1分，向左下方移动扣-1分
麟龙决策曲线
MA01:=MA(CLOSE,5);
MA02:=MA(CLOSE,8);
P01:=IF(CROSS(MA01,MA02),1,0);
P02:=IF(CROSS(MA02,MA01),-1,0);
P0:=P01+P02;
MA11:=MA(CLOSE,8);
MA12:=MA(CLOSE,21);
P11:=IF(CROSS(MA11,MA12),1,0);
P12:=IF(CROSS(MA12,MA11),-1,0);
P1:=P11+P12;
RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;
K:=SMA(RSV,12,1);
D:=SMA(K,24,1);
J:=3*K-2*D;
P21:=IF(CROSS(K,D)AND D<20,1,0);
P22:=IF(CROSS(D,K)AND K>80,-1,0);
P23:=IF(CROSS(J,0),0.5,0);
P24:=IF(CROSS(100,J),-0.5,0);
P2:=P21+P22+P23+P24;
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
P31:=IF(CROSS(DIFF,DEA)AND DEA<0,1,0);
P32:=IF(CROSS(DEA,DIFF)AND DIFF>0,-1,0);
P3:=P31+P32;
WR1:=100*(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,113));
P41:=IF(WR1>80,1,0);
P42:=IF(WR1<20,-1,0);
P4:=P41+P42;
OB:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
P51:=IF(OBV>REF(EMA(OBV,24),1),1.5,0);
P52:=IF(OBV<REF(EMA(OBV,24),1),-1.5,0);
P5:=P51+P52;
BR:=SUM(MAX(0,HIGH-REF(CLOSE,1)),26)/SUM(MAX(0,REF(CLOSE,1)-LOW),26)*100;
AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
P61:=IF(BR>350,3,0);
P62:=IF(BR<45,-3,0);
P63:=IF(AR>180,3,0);
P64:=IF(AR<45,-3,0);
P6:=P61+P62+P63+P64;
TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),26);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),26);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26);
VR:=100*(TH*2+TQ)/(TL*2+TQ);
P71:=IF(VR>350,3,0);
P72:=IF(VR<45,-3,0);
P7:=P71+P72;
MASS:=SUM(MA(HIGH-LOW,9)/MA(MA(HIGH-LOW,9),9),25);
MAMASS:=MA(MASS,6);
P81:=IF(MASS<27 AND CROSS(MASS,26.5),2,0);
P82:=IF(MASS>27 AND CROSS(MASS,26.5),-2,0);
P8:=P81+P82;
WVAD:=SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,24)/10000;
MAWVAD:=MA(WVAD,6);
P91:=IF(WVAD>0,1,0);
P92:=IF(WVAD<0,-1,0);
P9:=P91+P92;
VOLUME:=MA(VOL,10)/VOL;
MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW);
EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,14),14);
Q11:=IF(EMV>0,1.5,0);
Q12:=IF(EMV<0,-1.5,0);
Q1:=Q11+Q12;
TR:=EMA(EMA(EMA(CLOSE,13),13),13);
TRIX:=(TR-REF(TR,1))/REF(TR,1)*100;
Q21:=IF( CROSS(TRIX,TR),1.5,0);
Q22:=IF( CROSS(TR,TRIX),-1.5,0);
Q2:=Q21+Q22;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
Q31:=IF(RSI>80,1,0);
Q32:=IF(RSI<20,-1,0);
Q3:=Q31+Q32;
OSC:=100*(CLOSE-MA(CLOSE,20));
MAOSC:=EXPMEMA(OSC,6);
Q41:=IF(CROSS(OSC,MAOSC),1,0);
Q42:=IF(CROSS(MAOSC,OSC),-1,0);
Q4:=Q41+Q42;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,13))/(0.015*AVEDEV(TYP,13));
Q51:=IF(CCI>180,2,0);
Q52:=IF(CCI<-180,-2,0);
Q5:=Q51+Q52;
TR1:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/TR1;
MDI:=DMM*100/TR1;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=EXPMEMA(ADX,6);
Q61:=IF(CROSS(PDI,MDI),2,0);
Q62:=IF(CROSS(DMI,PDI),-2,0);
Q6:=Q61+Q62;
DPO:=CLOSE-REF(MA(CLOSE,21),21/2+1);
MADPO:=MA(DPO,6);
Q71:=IF(DPO>0,1,0);
Q72:=IF(DPO<0,-1,0);
Q7:=Q71+Q72;
MTM:CLOSE-REF(CLOSE,12);
MAMTM:=MA(MTM,6);
Q81:=IF(CROSS(MTM,MAMTM),1,0);
Q82:=IF(CROSS(MAMTM,MTM),-1,0);
Q8:=Q81+Q82;
MID1:=SUM(VOL*(2*CLOSE-HIGH-LOW)/(HIGH+LOW),0);
CHO:=MA(MID,10)-MA(MID,20);
MACHO:=MA(CHO,6);
Q91:=IF((CLOSE>MA(CLOSE,90))AND CROSS(CLOSE,0), 1.5,0);
Q92:= IF((CLOSE<MA(CLOSE,90))AND CROSS(0,CLOSE), -1.5,0);
Q9:=Q91+Q92;
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
PSYMA:=MA(PSY,6);
R11:=IF(PSY>75,1.5,0);
R12:=IF(PSY<25,-1.5,0);
R1:=R11+R12;
MID2 := MA(CLOSE,20);
UPPER:= MID2+2*STD(CLOSE,20);
LOWER:= MID2-2*STD(CLOSE,20);
R21:=IF(CROSS(CLOSE,LOWER),2,0);
R22:=IF(CROSS(UPPER,CLOSE),-2,0);
R2:=R21+R22;
TYP1 := (HIGH + LOW + CLOSE)/3;
V1:=SUM(IF(TYP1>REF(TYP1,1),TYP1*VOL,0),14)/SUM(IF(TYP1<REF(TYP1,1),
TYP1*VOL,0),14);
MFI:=100-(100/(1+V1));
R31:=IF(MFI>80,1,0);
R32:=IF(MFI<20,-1,0);
R3:=R31+R32;
VARA:=R1+R2+R3+Q1+Q2+Q3+Q4+Q5+Q6+Q7+Q8+Q9+P0+P1+P2+P3+P4+P5+P6+P7+P8+P9;
决策曲线:VARA;
0912110037c621e208f7ce0ead.png
飞狐版本
MA01:=MA(CLOSE,3);
MA02:=MA(CLOSE,5);
P01:=IF(MA01>MA02,1,0);
P02:=IF(MA02>MA01,-1,0);
P011:=P01+P02;
MA11:=MA(CLOSE,5);
MA12:=MA(CLOSE,12);
P03:=IF(MA11>MA12,1,0);
P04:=IF(MA12>MA11,-1,0);
P012:=P03+P04;
MA21:=MA(CLOSE,12);
MA22:=MA(CLOSE,50);
P05:=IF(MA21>MA22,1,0);
P06:=IF(MA22>MA21,-1,0);
P013:=P05+P06;
pp01:=p011+p012+p013;
{KDJ02}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
pp02:=if(k>d,3,if(k<d,-3,0));
{NACD03}
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:= EMA(DIFF,9);
MACD:= 2*(DIFF-DEA);
pp03:=if(macd>0,3,if(macd<0,-3,0));
{MASS04}
MASS:=SUM(EMA((HIGH-LOW),9)/EMA(EMA((HIGH-LOW),9),9),25);
pp04:=if(mass>27 and c>ema(c,3),3,if(mass>27 and c<ema(c,3),-3,0));
{PSY05}
PSY20:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
pp05:=if(psy20>75,3,if(psy20<25,-3,0));
{VR06}
LC:=REF(CLOSE,1);
cdp:=(h+l+2*c)/4;
VR:=(SUM(IF(CLOSE>LC,VOL*cdp,0),24)+sum(if(c=lc,cdp*vol,0),24)/2)/
(SUM(IF(CLOSE<=LC,cdp*VOL,0),24)+sum(if(c=lc,cdp*vol,0),24)/2)*100;
pp06:=if(vr>350,3,if(vr<45,-3,0));
{MOM07}
MOM12:=c-ref(c,12);
pp07:=if(mom12>0,3,if(mom12<0,-3,0));
{DPO08}
DPO20:=C - REF(MA(CLOSE,11),20);
pp08:=if(dpo20>0,3,if(dpo20<0,-3,0));
{BOLL09}
MID:=MA(CLOSE,20);
UPPER:=MID + 2*STD(CLOSE,20);
LOWER:=MID - 2*STD(CLOSE,20);
bljx:=(c-lower)/(upper-lower)*100;
pp09:=if(bljx>100,3,if(bljx<0,-3,0));
{CCI11}
TYP:= (HIGH + LOW + CLOSE)/3;
cci14:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
pp11:=if(cci14>180,3,if(cci14<-180,-3,0));
{SOBV10}
sobv:=SUM(IF(ISUP,VOL,IF(ISDOWN,-VOL,0)),0);
ms:=ema(sobv,24);
pp10:=if(sobv>ms,3,if(sobv<ms,-3,0));
{ARBR12}
AR:= SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
BR:= SUM(MAX(0,HIGH-REF(CLOSE,1)),26)/SUM(MAX(0,REF(CLOSE,1)-LOW),26)*100;
pp12:=if(ar>180 or br>350,3,if(ar<45 or br<45,-3,0));
qq:=pp01+pp02+pp03+pp04+pp05+pp06+pp07+pp08+pp09+pp10+pp11+pp12;
ctv:=36+qq;
决策线:ctv,colorwhite,linethick2;
stickline(c>0,36,36,10,0),color00ff00,LINEDOT;
stickline(c>0,56,56,10,0),colorff00ff,LINEDOT;
stickline(c>0,71,71,10,0),colorred,LINEDOT;
stickline(c>0,44,44,10,0),coloryellow,LINEDOT;
stickline(决策线>63,70,决策线,4,0),colorred;
partline(决策线>=ref(决策线,1),决策线),colorred,linethick2;
DRAWTEXTEX(c,1,980,0,'顶部'),colorred;
DRAWTEXTEX(c,1,980,220,'中期'),colorff00ff;
DRAWTEXTEX(c,1,980,420,'短期'),coloryellow;
DRAWTEXTEX(c,1,980,570,'底部'),color00ff00;
0912110037ead7332c526b1924.png
|
| |  | |  |
|
