您现在的位置:程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

我的自用主图指标公式代码源码[其他软件公式]

相关标签:西点自用指标公式 、 通达信主图指标公式 、 黄金柱主图指标公式 、 金钻指标公式主图 、 获利盘主图指标公式 、 绝密主图指标公式 、 macd主图指标公式 、 波段主图指标公式 、 恒者主图指标公式 、 分时主图指标公式 、 股票主图指标公式 、 主图指标公式源码 、 妖股启动指标公式主图 、

 

{我的自用主图
今天俺的中关村涨停,特将我的自用主图拿出来分享。
本公式是我将各个公式组合而成,并非原创,如果喜欢请顶帖,加分,嘿嘿!}

原理解析:

填充背景
S赋值:('股票代码:' + STKLABEL)
当满足条件(SYSPARAM(2)=BARPOS)时,在收盘价位置书写文字,ALIGN4,画黄色
当满足条件(BARPOS=SYSPARAM(2))时,在最高价位置书写文字,ALIGN4,画黄色
VARC赋值:((收盘价-10日内最低价的最低值)/(10日内最高价的最高值-10日内最低价的最低值))*(100)的4日[1日权重]移动平均
VARD赋值:((收盘价-11日内最低价的最低值)/(11日内最高价的最高值-11日内最低价的最低值))*(100)的4日[1日权重]移动平均
VARE赋值:((收盘价-12日内最低价的最低值)/(12日内最高价的最高值-12日内最低价的最低值))*(100)的4日[1日权重]移动平均
VARF赋值:((收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR10赋值:((收盘价-14日内最低价的最低值)/(14日内最高价的最高值-14日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR11赋值:((收盘价-15日内最低价的最低值)/(15日内最高价的最高值-15日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR12赋值:((收盘价-16日内最低价的最低值)/(16日内最高价的最高值-16日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR13赋值:((收盘价-17日内最低价的最低值)/(17日内最高价的最高值-17日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR14赋值:((收盘价-18日内最低价的最低值)/(18日内最高价的最高值-18日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR17赋值:((收盘价-20日内最低价的最低值)/(20日内最高价的最高值-20日内最低价的最低值))*(100)的4日[1日权重]移动平均
VAR18赋值:(最高价+最低价+收盘价)/(3)
VAR19赋值:(VAR18-VAR18的14日简单移动平均)/((0.015)*(VAR18的14日平均绝对偏差))
VAR1A赋值:(VAR18-VAR18的70日简单移动平均)/((0.015)*(VAR18的70日平均绝对偏差))
VAR1B赋值:如果(VAR19>=150)AND(VAR19<200)AND(VAR1A>=150)AND(VAR1A<200),返回(-10),否则返回0
VAR1C赋值:如果(VAR19<=(-150))AND(VAR19>(-200))AND(VAR1A<=(-150))AND(VAR1A>(-200)),返回10,否则返回0
VAR1D赋值:((收盘价-收盘价的13日简单移动平均)/(收盘价的13日简单移动平均))*(100)
VAR1E赋值:100-VAR1D的绝对值
趋势赋值:((VAR11-50)*(2)的3日[1日权重]移动平均+(VARD-50)*(2)的3日[1日权重]移动平均)/(2),画红色,线宽为2
D赋值:((3)*(VAR17-50))*(2)-(2)*((VAR17-50)*(2)的3日[1日权重]移动平均),COLOR00FFFF
当满足条件D上穿趋势时,在(最低价*0.99)位置书写文字
长下影赋值:(收盘价和开盘价的较小值-最低价)/(最高价-最低价)>0.38
最新价赋值:最低价,线宽为0
新价赋值:收盘价,线宽为0
高价赋值:最高价,线宽为0
输出出货:1.36*收盘价的2日线性回归预测值的40日简单移动平均,COLOR08FFFF,POINTDOT,PRECISION2,线宽为3
输出高抛:1.16*收盘价的2日线性回归预测值的40日简单移动平均,COLORFF82FF,POINTDOT,PRECISION2,线宽为3
输出低吸:0.82*收盘价的2日线性回归预测值的40日简单移动平均,COLORF7E300,POINTDOT,PRECISION2,线宽为3
输出满仓:0.72*收盘价的2日线性回归预测值的40日简单移动平均,COLOR0000FF,POINTDOT,PRECISION2,线宽为3
输出平衡:(高抛+低吸)/2,画白色,PRECISION2,,POINTDOT,线宽为0
关注1赋值:满仓>最新价 AND 长下影 AND 最新价<1日前的最新价,线宽为0
关注2赋值:低吸>最新价 AND 长下影 AND 最新价<1日前的最新价,线宽为0
M3赋值:收盘价的3日简单移动平均,线宽为0
M8赋值:收盘价的8日简单移动平均线宽为0
M21赋值:收盘价的21日简单移动平均线宽为0
BB赋值:BARPOS=SYSPARAM(1)
输出VARIABLE:WDAY[7]='星期六'
 

源码:

 

DRAWGBK(v>1,colorRGB(10,160,0),colorRGB(25,15,0),70);
S:=('股票代码:' + STKLABEL);
DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,S),ALIGN4,colorYELLOW;
DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,((((((((((((((((((((((((((((((((((' 所属板块:' + BLKNAME) + '\n') + '发行价') + NUMTOSTR(FINANCE(51),2)) + '元') + ' 发行量') + NUMTOSTR(FINANCE(52),2)) + '万股') + '\n') + '总股本') + NUMTOSTR(FINANCE(1),0)) + '万股') + ' 流通A股') + NUMTOSTR(FINANCE(7),0)) + '万股') + ' 净资产') + NUMTOSTR(FINANCE(35),2)) + '亿元') + ' 每股收益') + NUMTOSTR(FINANCE(33),2)) + '元') + ' 每股未分配') + NUMTOSTR(FINANCE(32),2)) + '元') + '\n') + '市盈率') + NUMTOSTR(DYNAINFO(39),2)) + '%') + ' 投资收益') + NUMTOSTR(FINANCE(24),2)) + '元') + ' 股东总数') + NUMTOSTR(FINANCE(50),0)) + '户')),ALIGN4,colorYELLOW;
{分析家公式网 http://www..com}
VARC:=SMA(((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100),4,1);
VARD:=SMA(((CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11)))*(100),4,1);
VARE:=SMA(((CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12)))*(100),4,1);
VARF:=SMA(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*(100),4,1);
VAR10:=SMA(((CLOSE-LLV(LOW,14))/(HHV(HIGH,14)-LLV(LOW,14)))*(100),4,1);
VAR11:=SMA(((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100),4,1);
VAR12:=SMA(((CLOSE-LLV(LOW,16))/(HHV(HIGH,16)-LLV(LOW,16)))*(100),4,1);
VAR13:=SMA(((CLOSE-LLV(LOW,17))/(HHV(HIGH,17)-LLV(LOW,17)))*(100),4,1);
VAR14:=SMA(((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18)))*(100),4,1);
VAR17:=SMA(((CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20)))*(100),4,1);
VAR18:=(HIGH+LOW+CLOSE)/(3);
VAR19:=(VAR18-MA(VAR18,14))/((0.015)*(AVEDEV(VAR18,14)));
VAR1A:=(VAR18-MA(VAR18,70))/((0.015)*(AVEDEV(VAR18,70)));
VAR1B:=IF((VAR19>=150) AND (VAR19<200) AND (VAR1A>=150) AND (VAR1A<200),(-10),0);
VAR1C:=IF((VAR19<=(-150)) AND (VAR19>(-200)) AND (VAR1A<=(-150)) AND (VAR1A>(-200)),10,0);
VAR1D:=((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100);
VAR1E:=100-ABS(VAR1D);趋势:=(SMA((VAR11-50)*(2),3,1)+SMA((VARD-50)*(2),3,1))/(2),COLORRED,LINETHICK2;
D:=((3)*(VAR17-50))*(2)-(2)*(SMA((VAR17-50)*(2),3,1)),COLOR00FFFF;
DRAWTEXT(CROSS(D,趋势),(LOW * 0.99),'买进');
{}
长下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.38;
最新价:=LOW,LINETHICK0;
新价:=CLOSE,LINETHICK0;
高价:=HIGH,LINETHICK0;
出货:1.36*MA(FORCAST(CLOSE,2),40),COLOR08ffff,POINTDOT,PRECISION2,LINETHICK3;
高抛:1.16*MA(FORCAST(CLOSE,2),40),COLORff82ff,POINTDOT,PRECISION2,LINETHICK3;
低吸:0.82*MA(FORCAST(CLOSE,2),40),COLORf7e300,POINTDOT,PRECISION2,LINETHICK3;
满仓:0.72*MA(FORCAST(CLOSE,2),40),COLOR0000ff,POINTDOT,PRECISION2,LINETHICK3;
平衡:(高抛+低吸)/2,ColorWHITE,PRECISION2,,POINTDOT,LINETHICK0;关注1:=满仓>最新价 AND 长下影 AND 最新价<REF(最新价,1),linethick0;
关注2:=低吸>最新价 AND 长下影 AND 最新价<REF(最新价,1),linethick0;{}M3:=MA(CLOSE,3),linethick0;
M8:=MA(CLOSE,8)linethick0;
M21:=MA(CLOSE,21)linethick0;
BB:=BARPOS=SYSPARAM(1);
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=year;
fm:=month;
fd:=day;
wd:=weekday;
p:=sysparam(1);
str1:='今天是:'+numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'
+numtostr(fd[p],0)+'日, '+wday[wd[p]+1];
explain(barpos=p,str1),colorRED;
DRAWTEXT(barpos=p,H*1.12,str1),ALIGN2,coloryellow,;
买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,13)*20+C,40);
BU:=cross(买线,卖线);
SEL:=cross(卖线,买线);
drawtext(bu,LOW*0.996,'B'),colorred,linethick3;
买入:bu AND LOW*0.996,LINETHICK0,COLORRED;
drawtext(sel,HIGH*1.028,'S'),colorffff00,linethick3;
stickline(买线>=卖线,low,high,1,0),colorred;
stickline(买线>=卖线,close,open,4.5,0),color0000aa;
stickline(买线>=卖线,close,open,4,0),color0000cc;
stickline(买线>=卖线,close,open,3,0),color0000cc;
stickline(买线>=卖线,close,open,2,0),color0000ee;
stickline(买线<卖线,close,open,4.5,0),coloraaaa00;
stickline(买线<卖线,close,open,4,0),colorbbbb00;
stickline(买线<卖线,close,open,3,0),colorcccc00;
stickline(买线<卖线,close,open,2,0),coloreeee00;
stickline(买线<卖线,low,high,1,0),colorffff00;
stickline(cross(买线,卖线) or cross(卖线,买线),open,close,3,0),color00ffff;
v1:=ema(close,5);
v2:=ema(ema(close,90)*1.01,10),;
DRAWTEXT(cross(v1,v2),v1+0.01,'牛起步'),color00ff00,LINETHICK2;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWICON(cross(v1,v2),v2,1);
DRAWTEXT(关注1,(LOW * 0.99),'○牛窝'),colorYELLOW;
牛窝:关注1,LINETHICK0;
牛起步:cross(v1,v2),LINETHICK0;
黑马扫荡:=满仓>最新价 AND 满仓<高价,LINETHICK0;
黑马:关注1 OR 关注2 OR 黑马扫荡,LINETHICK0,COLORYELLOW;input:n(4,1,255);
wN:=N;{原码 N:=3;}
wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN);
wC1:=BACKSET(wB1,wN+1);
wD1:=FILTER(wC1,wN);{高点}
wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN);
wC2:=BACKSET(wB2,wN+1);
wD2:=FILTER(wC2,wN);{低点}
wR1:=BACKSET(BARSTATUS=2,BARSLAST(wD1)+1); wS1:=wR1>REF(wR1,1); {前一高}
wT1:=BACKSET(BARSTATUS=2,BARSLAST(wD2)+1); wU1:=wT1>REF(wT1,1); {前一低}
wR2:=BACKSET(wS1,REF(BARSLAST(wD1),1)+2); wS2:=wR2>REF(wR2,1); {前二高}
wT2:=BACKSET(wU1,REF(BARSLAST(wD2),1)+2); wU2:=wT2>REF(wT2,1); {前二低}
wR3:=BACKSET(wS2,REF(BARSLAST(wD1),1)+2); wS3:=wR3>REF(wR3,1); {前三高}
wT3:=BACKSET(wU2,REF(BARSLAST(wD2),1)+2); wU3:=wT3>REF(wT3,1); {前三低}
wR4:=BACKSET(wS3,REF(BARSLAST(wD1),1)+2); wS4:=wR4>REF(wR4,1); {前四高}
wT4:=BACKSET(wU3,REF(BARSLAST(wD2),1)+2); wU4:=wT4>REF(wT4,1); {前四高}
DRAWLINE(wS2,H,wS1,H,1),Color0000Ff,LINETHICK1; {压力1:}
DRAWLINE(wU2,L,wU1,L,1),ColorWHITE,LINETHICK1;{支撑1:}
DRAWLINE(wS3,H,wS2,H,1),Color0000Ff,LINETHICK0; {压力2:}
DRAWLINE(wU3,L, wU2,L,1),ColorWHITE,LINETHICK0;{支撑2:}
DRAWLINE(wS4,H,wS3,H,1),Color0000Ff,LINETHICK0;{压力3:}
DRAWLINE(wU4,L, wU3,L,1),ColorWHITE,LINETHICK0;{支撑3;}提示:公式有未来函数

 

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

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容