龙听期货论坛's Archiver

龙听 发表于 2019-3-8 14:39

会说话的副图指标公式源码[同花顺公式]

源码:
[code]
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2:=2*ABS(VAR1);
VAR3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR4:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR5:=(HIGH+LOW+CLOSE)/3;
VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14));
VAR7:=(VAR5-MA(VAR5,70))/(0.015*AVEDEV(VAR5,70));
VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);
VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);
VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VARB:=100-ABS(VARA);
VARC:=3*SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);
VARD:=3*SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);
VARE:=REF(LOW,1)*0.9;
VARF:=LOW*0.9;
VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
VAR11:=EMA(VAR10,30);
VAR12:=VAR11-CLOSE;
VAR13:=REF(CLOSE,1);
VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100;
VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100;
VAR16:=BARSCOUNT(CLOSE);
VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;
VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1A:=(SMA(VAR19,4,1)-50)*2;
VAR1B:=SMA(VAR1A,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0);
情报:VAR3;
天线:IF(VARB<90,VARB,100);
红军:=IF(VAR1>0,VAR1,0),colorred, LINESTICK;
绿军:=IF(VAR1<0,VAR2,0),colorgreen,LINESTICK;
预警系统:IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND VAR6<=-150,-15,VAR9))+50;
VAR21:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
VAR22:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);
VAR23:=红军>50 AND 预警系统>60 AND 天线=100;
VAR24:=红军>48 AND 预警系统>60 AND 天线<100;
VAR25:=绿军>38 AND 预警系统<55;
VAR26:=VAR20>50 AND 天线<90;
VAR27:=VAR3<REF(VAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
VAR28:=VAR3>=REF(VAR4,1) AND CLOSE<REF(CLOSE,1) AND 预警系统=60 AND VAR20=0 AND 绿军>=REF(绿军,1) AND VARC<REF(VARD,1);
DRAWTEXT(VAR21 AND COUNT(VAR21,30)=1,90,'上升通道,持股待长或高抛低吸!');
DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,80,'下降通道,小心无量阴跌! ');
DRAWTEXT(VAR23 AND COUNT(VAR23,30)=1,60,'上涨过急,需要调整,短线先抛出! ');
DRAWTEXT(VAR24 AND COUNT(VAR24,30)=1,70,'庄家出货,大跌在即,中线抛出! ');
DRAWTEXT(VAR25 AND COUNT(VAR25,30)=1,40,'不必杀跌,应有小反弹 ,跌停除外!');
DRAWTEXT(VAR26 AND COUNT(VAR26,30)=1,20,'坚决抢反弹,但巨量封跌停除外 ');
DRAWTEXT(VAR27 AND COUNT(VAR27,30)=1,30,'有大资金进场迹象,关注!');
DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,10,'见顶回落');
买入:IF(VAR27 AND COUNT(VAR27,30)=1,80,0),LINETHICK2,colorblue;
[/code]

龙听 发表于 2019-3-8 14:40

VAR1赋值:100*(收盘价-34日内收盘价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的5日简单移动平均-20
VAR2赋值:2*VAR1的绝对值
VAR3赋值:100-3*(收盘价-75日内最低价的最低值)/(75日内最高价的最高值-75日内最低价的最低值)*100的20日[1日权重]移动平均+2*(收盘价-75日内最低价的最低值)/(75日内最高价的最高值-75日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均
VAR4赋值:100-3*(开盘价-75日内最低价的最低值)/(75日内最高价的最高值-75日内最低价的最低值)*100的20日[1日权重]移动平均+2*(开盘价-75日内最低价的最低值)/(75日内最高价的最高值-75日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均
VAR5赋值:(最高价+最低价+收盘价)/3
VAR6赋值:(VAR5-VAR5的14日简单移动平均)/(0.015*VAR5的14日平均绝对偏差)
VAR7赋值:(VAR5-VAR5的70日简单移动平均)/(0.015*VAR5的70日平均绝对偏差)
VAR8赋值:如果VAR6>=150ANDVAR6<200ANDVAR7>=150ANDVAR7<200,返回10,否则返回0
VAR9赋值:如果VAR6<=-150ANDVAR6>-200ANDVAR7<=-150ANDVAR7>-200,返回-10,否则返回VAR8
VARA赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
VARB赋值:100-VARA的绝对值
VARC赋值:3*(大盘的收盘价-75日内大盘的最低价的最低值)/(75日内大盘的最高价的最高值-75日内大盘的最低价的最低值)*100的20日[1日权重]移动平均-2*(大盘的收盘价-75日内大盘的最低价的最低值)/(75日内大盘的最高价的最高值-75日内大盘的最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均
VARD赋值:3*(大盘的开盘价-75日内大盘的最低价的最低值)/(75日内大盘的最高价的最高值-75日内大盘的最低价的最低值)*100的20日[1日权重]移动平均-2*(大盘的开盘价-75日内大盘的最低价的最低值)/(75日内大盘的最高价的最高值-75日内大盘的最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均
VARE赋值:1日前的最低价*0.9
VARF赋值:最低价*0.9
VAR10赋值:(VARF*成交量(手)+VARE*(当前流通股本(手)-成交量(手)))/当前流通股本(手)
VAR11赋值:VAR10的30日指数移动平均
VAR12赋值:VAR11-收盘价
VAR13赋值:1日前的收盘价
VAR14赋值:收盘价-VAR13和0的较大值的7日[1日权重]移动平均/收盘价-VAR13的绝对值的7日[1日权重]移动平均*100
VAR15赋值:收盘价-VAR13和0的较大值的13日[1日权重]移动平均/收盘价-VAR13的绝对值的13日[1日权重]移动平均*100
VAR16赋值:收盘价的有效数据周期数
VAR17赋值:收盘价-1日前的收盘价和0的较大值的6日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的6日[1日权重]移动平均*100
VAR18赋值:((-100)*(60日内最高价的最高值-收盘价)/(60日内最高价的最高值-60日内最低价的最低值)+50)*2
VAR19赋值:(收盘价-15日内最低价的最低值)/(15日内最高价的最高值-15日内最低价的最低值)*100
VAR1A赋值:(VAR19的4日[1日权重]移动平均-50)*2
VAR1B赋值:VAR1A的3日[1日权重]移动平均
VAR1C赋值:(大盘的收盘价-14日内大盘的最低价的最低值)/(14日内大盘的最高价的最高值-14日内大盘的最低价的最低值)*100
VAR1D赋值:VAR1C的4日[1日权重]移动平均
VAR1E赋值:VAR1D的3日[1日权重]移动平均
VAR1F赋值:(30日内最高价的最高值-收盘价)/收盘价*100
VAR20赋值:如果VAR17<=25ANDVAR18<-95ANDVAR1F>20ANDVAR1B<-30ANDVAR1E<30ANDVAR12>=-0.25ANDVAR14<22ANDVAR15<28ANDVAR16>50,返回80,否则返回0
输出情报:VAR3
输出天线:如果VARB<90,返回VARB,否则返回100
红军赋值:如果VAR1>0,返回VAR1,否则返回0,画红色, LINESTICK
绿军赋值:如果VAR1<0,返回VAR2,否则返回0,画绿色,LINESTICK
输出预警系统:如果VAR7>=200ANDVAR6>=150,返回15,否则返回如果VAR7<=-200ANDVAR6<=-150,返回-15,否则返回VAR9+50
VAR21赋值:收盘价>收盘价的20日简单移动平均 AND 收盘价的20日简单移动平均>=1日前的收盘价的20日简单移动平均
VAR22赋值:收盘价<收盘价的20日简单移动平均 AND 收盘价的20日简单移动平均<1日前的收盘价的20日简单移动平均
VAR23赋值:红军>50 AND 预警系统>60 AND 天线=100
VAR24赋值:红军>48 AND 预警系统>60 AND 天线<100
VAR25赋值:绿军>38 AND 预警系统<55
VAR26赋值:VAR20>50 AND 天线<90
VAR27赋值:VAR3<1日前的VAR4 AND 成交量(手)>1日前的成交量(手) AND 收盘价>1日前的收盘价
VAR28赋值:VAR3>=1日前的VAR4 AND 收盘价<1日前的收盘价 AND 预警系统=60 AND VAR20=0 AND 绿军>=1日前的绿军 AND VARC<1日前的VARD
当满足条件VAR21ANDCOUNT(VAR21,30)=1时,在90位置书写文字
当满足条件VAR22ANDCOUNT(VAR22,30)=1时,在80位置书写文字
当满足条件VAR23ANDCOUNT(VAR23,30)=1时,在60位置书写文字
当满足条件VAR24ANDCOUNT(VAR24,30)=1时,在70位置书写文字
当满足条件VAR25ANDCOUNT(VAR25,30)=1时,在40位置书写文字
当满足条件VAR26ANDCOUNT(VAR26,30)=1时,在20位置书写文字
当满足条件VAR27ANDCOUNT(VAR27,30)=1时,在30位置书写文字
当满足条件VAR28ANDCOUNT(VAR28,30)=1时,在10位置书写文字
输出买入:如果VAR27ANDCOUNT(VAR27,30)=1,返回80,否则返回0,线宽为2,画蓝色
TIPTEXT(ISNULL(1日后的&收盘价),0,' [url]WWW.CXH99.COM[/url] '),画红色
TIPTEXT(ISNULL(1日前的收盘价),0,'同花顺程序化交易')

页: [1]