飞狐MACD趋势选股指标公式源码

飞狐MACD趋势选股指标公式源码

源码正文：

V1:=ema(CLOSE,34)-Ema(CLOSE,5){XG51};
V2:=EMA(V1,5){XG51};
趋势:(0-3)*(V1-V2),COLORWHITE{XG51};
长期趋势:EMA(V1,10)*(0-1),colorFF9900{XG51};
difF:EMA(CLOSE,12)-EMA(CLOSE,26),{XG51};
DEA:EMA(DIFF,9),{XG51};
macd:2*(DIFF-DEA),COLORstICK{XG51};
AA:=BArslAST(crOSS(DIFF,DEA) AND DEA<(0-0.1))<=8{XG51};
V3:=DEA<(0-0.1) AND CROSS(DIFF,DEA) AND AA=1,colorFF00FF{XG51};
DRAWICON(V3=1,0,10){XG51};
{VAR1:=(((((3 * CLOSE) + LOW) + OPEN) + HIGH) / 6){XG51};
VAR2:=(((((((((((((((((((((20 * VAR1) + (19 * REF(VAR1,1))) + (18 * REF(VAR1,2))) + (17 * REF(VAR1,3))) + (16 * REF(VAR1,4))) + (15 * REF(VAR1,5))) + (14 * REF(VAR1,6))) + (13 * REF(VAR1,7))) + (12 * REF(VAR1,8))) + (11 * REF(VAR1,9))) + (10 * REF(VAR1,10))) + (9 * REF(VAR1,11))) + (8 * REF(VAR1,12))) + (7 * REF(VAR1,13))) + (6 * REF(VAR1,14))) + (5 * REF(VAR1,15))) + (4 * REF(VAR1,16))) + (3 * REF(VAR1,17))) + (2 * REF(VAR1,18))) + REF(VAR1,20)) / 210){XG51};
VAR3:=MA(VAR2,9){XG51};
VAR4:=(((VAR2 - VAR3) / VAR3) * 100){XG51};
VAR5:=VAR4{XG51};
EXPLAINICON(((VAR4 > 0) AND (VAR4 > REF(VAR4,1))),4),{XG51};
VAR50:=(((VAR4 < 0) AND (VAR4 > (0 - 1.5))) AND (VAR4 > REF(VAR4,1))){XG51};
EXPLAINICON(VAR50,3),{XG51};
VAR51:=((VAR4 < (0 - 1.5)) AND (VAR4 > REF(VAR4,1))){XG51};
EXPLAINICON(VAR51,2),{XG51};
VAR52:=(VAR4 < REF(VAR4,1)){XG51};
EXPLAINICON(VAR52,1),{XG51};
EXPLAIN(AA,'MacD最佳买入时机'),,colorFFFF{XG51};
EXPLAIN((趋势 > 0),'Z线趋势上升中'),{XG51};
EXPLAIN((趋势 < 0),'Z线趋势下降中'),{XG51};
EXPLAIN(CROSS(趋势,0),'Z线考虑买入'),{XG51};
EXPLAIN(CROSS(0,趋势),'Z线考虑卖出'),{XG51};
VAR11:=MA((vol / (HIGH - LOW)),4){XG51};
VAR33:=Abs((CLOSE - OPEN)){XG51};
VAR44:=(VOL / (HIGH - LOW)){XG51};
EXPLAIN(((VAR44 < VAR11) AND (VAR33 < MA(VAR33,4))),'资金无入场意愿，萎缩中'),{XG51};
EXPLAIN(((VAR44 < VAR11) AND (VAR33 > MA(VAR33,4))),'场内资金运作行为'),{XG51};
EXPLAIN(((VAR44 > VAR11) AND (VAR33 < MA(VAR33,4))),'多空双方激烈争夺中'),{XG51};
EXPLAIN(((VAR44 > VAR11) AND (VAR33 > MA(VAR33,4))),'场外资金介入（或出局）意愿强烈'),{XG51};
TR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),14){XG51};
HD:=(HIGH - REF(HIGH,1)){XG51};
LD:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),14){XG51};
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),14){XG51};
pdi:=((DMP * 100) / TR){XG51};
mdi:=((DMM * 100) / TR){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),6){XG51};
ADXR:=((ADX + REF(ADX,6)) / 2){XG51};
EXPLAIN(CROSS(PDI,MDI),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号'),{XG51};
EXPLAIN(CROSS(MDI,PDI),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号'),{XG51};
EXPLAIN((ADX > REF(ADX,1)),'ADX值持续高于前一日，行情将维持原趋势'),{XG51};
EXPLAIN(((ADX < REF(ADX,1)) AND (ADX < 20)),'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整'),{XG51};
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'),{XG51};
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=((3 * K) - (2 * D)){XG51};
EXPLAIN((CROSS(J,K) AND (K < 50)),'kdj金叉'),{XG51};
EXPLAIN((CROSS(K,J) AND (K > 50)),'kdJ死叉'),{XG51};
EXPLAIN((J > 84),'KDJ指标高位'),{XG51};
EXPLAIN((J < 16),'KDJ指标低位'),{XG51};
TYP:=(((HIGH + LOW) + CLOSE) / 3){XG51};
cci:=((TYP - MA(TYP,14)) / (0.015 * AVEDEV(TYP,14))){XG51};
EXPLAIN((CCI < (0 - 100)),'CCI指标底位，买入机会'),{XG51};
EXPLAIN((CCI > 100),'CCI指标高位，卖出机会'),{XG51};
EXPLAIN(((VOL / CAPITAL) > 0.075),'换手过大，小心主力出逃，短期头部'),{XG51};
wr:=(0 - ((100 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
EXPLAIN((WR > (0 - 20)),'W&R超买，即将见顶，应及时卖出'),{XG51};
EXPLAIN((WR < (0 - 80)),'W&R超卖，即将见底，应伺机买进'),{XG51};
mtm:=(CLOSE - REF(CLOSE,6)){XG51};
MTMMA:=MA(MTM,6){XG51};
EXPLAIN(CROSS(MTM,MTMMA),'MTM从下向上突破MTMMA，买入信号'),{XG51};
EXPLAIN(CROSS(MTMMA,MTM),'MTM从上向下跌破MTMMA，卖出信号'),{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=((SMA(MAX((CLOSE - LC),0),6,1) / SMA(ABS((CLOSE - LC)),6,1)) * 100){XG51};
RSI2:=((SMA(MAX((CLOSE - LC),0),12,1) / SMA(ABS((CLOSE - LC)),12,1)) * 100){XG51};
EXPLAIN((RSI1 > 85),'6日RSI向上突破85，超买,考虑卖出'),{XG51};
EXPLAIN((RSI1 < 15),'6日RSI向下跌破15，超卖，考虑买入'),{XG51};
EXPLAIN(CROSS(RSI1,RSI2),'6日RSI向上突破12日RSI，买进信号'),{XG51};
EXPLAIN(CROSS(RSI2,RSI1),'6日RSI向下跌破12日RSI，卖出信号'),{XG51};
VAR001:=(((CLOSE + HIGH) + LOW) / 3){XG51};
VAR002:=(HIGH - LOW){XG51};
VAR004:=(VAR001 + VAR002){XG51};
VAR005:=(VAR001 - VAR002){XG51};
VAR007:=(CLOSE * 1.03){XG51};
VAR006:=(CLOSE * 0.97){XG51};
明天最高价估计:=VAR004{XG51};
EXPLAINEX((明天最高价估计 >= 0.01),'明天最高价估计: 元',明天最高价估计,2,0),,colorFF{XG51};
明天最低价估计:=VAR006{XG51};
EXPLAINEX((明天最低价估计 >= 0.01),'明天最低价估计: 元',明天最低价估计,2,0),,colorFFFFFF{XG51};
bbi:=((((MA(CLOSE,3) + MA(CLOSE,6)) + MA(CLOSE,12)) + MA(CLOSE,24)) / 4){XG51};
EXPLAIN(CROSS(BBI,CLOSE),'卖出信号'),,colorFF00{XG51};
EXPLAIN(CROSS(CLOSE,BBI),'买入信号'),,colorFF{XG51};
EXPLAIN(((CLOSE > BBI) AND (BBI > REF(BBI,1))),'多头势强'),,colorFFFF{XG51};
EXPLAIN(((CLOSE < BBI) AND (BBI < REF(BBI,1))),'空头势强'),,colorFFFFCC{X.G!5~1.C.N.{};