金钱摸鬼公式源码[通达信公式]

相关标签:

{金钱摸鬼}

原理解析：
输出VAR2:如果收盘价的5日指数移动平均/收盘价的9日指数移动平均的16日指数移动平均<=0.85ANDCLOSE/1日前的收盘价>0.905ANDCLOSE/1日前的收盘价<1.05ANDVOL/当前流通股本(手)*100<5,返回50,否则返回0 VAR3赋值:(-100)*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值)+100 VAR4赋值:(-100)*(50日内最高价的最高值-收盘价)/(50日内最高价的最高值-50日内最低价的最低值)+100 VAR5赋值:(-100)*(70日内最高价的最高值-收盘价)/(70日内最高价的最高值-70日内最低价的最低值)+100 VAR6赋值:((收盘价-收盘价的34日简单移动平均)/收盘价的34日简单移动平均*100+10)*5 VAR7赋值:((收盘价-收盘价的50日简单移动平均)/收盘价的50日简单移动平均*100+10)*5 VAR8赋值:((收盘价-收盘价的70日简单移动平均)/收盘价的70日简单移动平均*100+10)*5 VAR9赋值:(VAR3+VAR4+VAR5+VAR6+VAR7+VAR8)/6 VARA赋值:VAR9的3日指数移动平均 VARB赋值:VAR6-VAR8的绝对值 VARC赋值:(VAR9+VARB)/2 VARD赋值:(-1)*(100*(1-以收盘价计算的获利盘比例)的1日指数移动平均-50)+50 VARE赋值:VARD+VARC 输出VARF:如果VAR2>0ANDVARE<0,返回200,否则返回0 输出VAR10:如果VARC<0ANDCLOSE=5日内收盘价的最低值ANDCLOSE/1日前的收盘价>0.905ANDCLOSE/1日前的收盘价<1.05ANDVOL/当前流通股本(手)*100<5,返回-50,否则返回0 输出VAR11:如果VARE<0ANDVAR10=-50,返回100,否则返回0 VAR12赋值:收盘价的3日简单移动平均 VAR13赋值:2日前的收盘价*0.865 VAR14赋值:13日前的收盘价*0.772 VAR15赋值:VAR13和VAR14的较小值 VAR16赋值:100*成交量(手)/当前流通股本(手) VAR17赋值:收盘价的13日简单移动平均 输出VAR18:如果(收盘价-VAR15)/收盘价<0.03ANDSUM(VAR16,5)/5<1.8,返回1,否则返回0 输出VAR19:如果VAR18>0AND(VAR10<0ORVAR2>0),返回100,否则返回0 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

VAR2:IF(EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
VAR3:=(-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
VAR4:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
VAR5:=(-100)*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
VAR6:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
VAR7:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
VAR8:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
VAR9:=(VAR3+VAR4+VAR5+VAR6+VAR7+VAR8)/6;
VARA:=EMA(VAR9,3);
VARB:=ABS(VAR6-VAR8);
VARC:=(VAR9+VARB)/2;
VARD:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
VARE:=VARD+VARC;
VARF:IF(VAR2>0 AND VARE<0,200,0);
VAR10:IF(VARC<0 AND CLOSE=LLV(CLOSE,5) AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,-50,0);
VAR11:IF(VARE<0 AND VAR10=-50,100,0);
VAR12:=MA(CLOSE,3);
VAR13:=REF(CLOSE,2)*0.865;
VAR14:=REF(CLOSE,13)*0.772;
VAR15:=MIN(VAR13,VAR14);
VAR16:=100*VOL/CAPITAL;
VAR17:=MA(CLOSE,13);
VAR18:IF((CLOSE-VAR15)/CLOSE<0.03 AND SUM(VAR16,5)/5<1.8,1,0);
VAR19:IF(VAR18>0 AND (VAR10<0 OR VAR2>0),100,0);
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】