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

超级布林(艺术美主图指标公式) 用来分析主力做多或做空的心理状态[其他软件公式]

相关标签:

 

超级布林
本指标用来分析主力做多或做空的心理状态!

 

 

原理解析:

输出INPUT:N(26),N1(2),N2(31)
填充背景
WYY1赋值:星期,线宽为0
WWJ赋值:' 星期'
WWJJ赋值:如果WYY1=5,返回WWJ+'五',否则返回如果WYY1=4,返回WWJ+'四',否则返回如果WYY1=3,返回WWJ+'三',否则返回如果WYY1=2,返回WWJ+'二',否则返回如果WYY1=1,返回WWJ+'1',否则返回WWJ
WYY2赋值:LMONTH
WYY3赋值:LDAY
WWW赋值:如果数据位置状态=2,返回'农历'+NUMTOSTR(WYY2,0)+'月'+NUMTOSTR(WYY3,0)+'日',否则返回''
WWH赋值:如果数据位置状态=2,返回NUMTOSTR(日期+19000000,0),否则返回''
DRAWTEXTEX(1,1,120 ,30 ,' '+WWH+WWJJ+WWW),线宽为3,COLORFFFF80
A0赋值:收盘价的有效数据周期数
A3赋值:SYSPARAM(3)
A2赋值:SYSPARAM(2)
A4赋值:SYSPARAM(4)
A5赋值:SYSPARAM(5)
NN0赋值:A3-A2
NN赋值:A0-A2
HH1赋值:(A4-A5)/8
HH2赋值:HH1/4
LL1赋值:NN0日内最低价的最低值
LL2赋值:LL1[A3]
Y0赋值:A0>=A2
VV0赋值:如果Y0=1ANDSYSPARAM(1)>=A0,返回成交量(手),否则返回0
C1赋值:如果收盘价位于A4-0*HH1和A4-1*HH1之间,返回VV0,否则返回0
C2赋值:如果收盘价位于A4-1*HH1和A4-2*HH1之间,返回VV0,否则返回0
C3赋值:如果收盘价位于A4-2*HH1和A4-3*HH1之间,返回VV0,否则返回0
C4赋值:如果收盘价位于A4-3*HH1和A4-4*HH1之间,返回VV0,否则返回0
C5赋值:如果收盘价位于A4-4*HH1和A4-5*HH1之间,返回VV0,否则返回0
C6赋值:如果收盘价位于A4-5*HH1和A4-6*HH1之间,返回VV0,否则返回0
C7赋值:如果收盘价位于A4-6*HH1和A4-7*HH1之间,返回VV0,否则返回0
C8赋值:如果收盘价位于A4-7*HH1和A4-8*HH1之间,返回VV0,否则返回0
C9赋值:如果收盘价位于A4-8*HH1和A4-9*HH1之间,返回VV0,否则返回0
C10赋值:如果收盘价位于A4-9*HH1和A4-10*HH1之间,返回VV0,否则返回0
V1赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C1的NN0日累和,否则返回0,2)),线宽为0
V2赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C2的NN0日累和,否则返回0,2))
V3赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C3的NN0日累和,否则返回0,2))
V4赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C4的NN0日累和,否则返回0,2))
V5赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C5的NN0日累和,否则返回0,2))
V6赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C6的NN0日累和,否则返回0,2))
V7赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C7的NN0日累和,否则返回0,2))
V8赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C8的NN0日累和,否则返回0,2))
V9赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C9的NN0日累和,否则返回0,2))
V10赋值:STRTONUM(NUMTOSTR(如果是否最后一个周期,返回C10的NN0日累和,否则返回0,2))
AV0赋值:V1和V2和V3和V4和V5和V6和V7和V8和V9和V10的较大值的较大值的较大值的较大值的较大值的较大值的较大值的较大值的较大值
X1赋值:V1/AV0>=NN/NN0 AND NN>=0
X2赋值:V2/AV0>=NN/NN0 AND NN>=0
X3赋值:V3/AV0>=NN/NN0 AND NN>=0
X4赋值:V4/AV0>=NN/NN0 AND NN>=0
X5赋值:V5/AV0>=NN/NN0 AND NN>=0
X6赋值:V6/AV0>=NN/NN0 AND NN>=0
X7赋值:V7/AV0>=NN/NN0 AND NN>=0
X8赋值:V8/AV0>=NN/NN0 AND NN>=0
FILLRGN(V1/AV0>=NN/NN0 AND NN>=0,A4-0*HH1,A4-1*HH1+HH1*0.5),COLOR003CB7
FILLRGN(V2/AV0>=NN/NN0 AND NN>=0,A4-1*HH1,A4-2*HH1+HH1*0.5),COLOR808000
FILLRGN(V3/AV0>=NN/NN0 AND NN>=0,A4-2*HH1,A4-3*HH1+HH1*0.5),COLOR8B4D43
FILLRGN(V4/AV0>=NN/NN0 AND NN>=0,A4-3*HH1,A4-4*HH1+HH1*0.5),COLOR1B3D70
FILLRGN(V5/AV0>=NN/NN0 AND NN>=0,A4-4*HH1,A4-5*HH1+HH1*0.5),COLOR00AEAE
FILLRGN(V6/AV0>=NN/NN0 AND NN>=0,A4-5*HH1,A4-6*HH1+HH1*0.5),COLOR666666
FILLRGN(V7/AV0>=NN/NN0 AND NN>=0,A4-6*HH1,A4-7*HH1+HH1*0.5),COLOR666666
FILLRGN(V8/AV0>=NN/NN0 AND NN>=0,A4-7*HH1,A4-8*HH1+HH1*0.5),COLOR666666
当满足条件6日后的X1<1日前的X1ANDV1>0的10日过滤时,在A4位置书写数字,COLOR00FF00
当满足条件6日后的X2<1日前的X2ANDV2>0的10日过滤时,在(A4-1*HH1)位置书写数字,COLOR00FF00
当满足条件6日后的X3<1日前的X3ANDV3>0的10日过滤时,在(A4-2.7*3*HH2)位置书写数字,COLOR00FF00
当满足条件6日后的X4<1日前的X4ANDV4>0的10日过滤时,在(A4-12*HH2)位置书写数字,COLOR00FF00
当满足条件6日后的X5<1日前的X5ANDV5>0的10日过滤时,在(A4-16*HH2)位置书写数字,COLOR00FF00
当满足条件6日后的X6<1日前的X6ANDV6>0的10日过滤时,在(A4-20*HH2)位置书写数字,COLOR00FF00
当满足条件6日后的X7<1日前的X7ANDV7>0的10日过滤时,在(A4-24*HH2)位置书写数字,COLOR00FF00
当满足条件5日后的X8<1日前的X8ANDV8>0的10日过滤时,在LL2+1*4*HH2位置书写数字,COLOR00FF00
HH赋值:市盈(动)
DD赋值:总股本(股)
SS赋值:流通股本(股)
FF赋值:每股公积金
GG赋值:每股收益(全年折算)
ZZ赋值:每股股息(港股,美股)
JJ赋值:流通市值
MM赋值:JJ/SS
TH赋值:市盈(动)
换手率赋值:100*成交量(手)/当前流通股本(手),COLORFFFFFF
RH赋值:最高价-最低价
R赋值:振幅*100
输出输出DRAWTEXTEX(1,1,20,840,'当日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+'当前换手率:'+NUMTOSTR(换手率,2)+'%'),COLORFFFFFF
输出VAR100赋值:'所属板块:'
VAR100赋值:VAR100+' 电力'
VAR100赋值:VAR100+' 电脑'
VAR100赋值:VAR100+' 电器'
VAR100赋值:VAR100+' 电子信息'
VAR100赋值:VAR100+' 房地产'
VAR100赋值:VAR100+' 纺织服装'
VAR100赋值:VAR100+' 钢铁'
VAR100赋值:VAR100+' 工程建筑'
VAR100赋值:VAR100+' 供水供气'
VAR100赋值:VAR100+' 化工'
VAR100赋值:VAR100+' 化纤'
VAR100赋值:VAR100+' 机械'
VAR100赋值:VAR100+' 建材'
VAR100赋值:VAR100+' 交通工具'
VAR100赋值:VAR100+' 交通设施'
VAR100赋值:VAR100+' 教育传媒'
VAR100赋值:VAR100+' 金融'
VAR100赋值:VAR100+' 旅游酒店'
VAR100赋值:VAR100+' 煤炭石油'
VAR100赋值:VAR100+' 酿酒食品'
VAR100赋值:VAR100+' 农林牧渔'
VAR100赋值:VAR100+' 其他行业'
VAR100赋值:VAR100+' 汽车'
VAR100赋值:VAR100+' 汽配'
VAR100赋值:VAR100+' 商业连锁'
VAR100赋值:VAR100+' 石化'
VAR100赋值:VAR100+' 通信'
VAR100赋值:VAR100+' 外贸'
VAR100赋值:VAR100+' 医药'
VAR100赋值:VAR100+' 仪电仪表'
VAR100赋值:VAR100+' 有色金属'
VAR100赋值:VAR100+' 运输物流'
VAR100赋值:VAR100+' 造纸印刷'
VAR100赋值:VAR100+' 安徽'
VAR100赋值:VAR100+' 北京'
VAR100赋值:VAR100+' 福建'
VAR100赋值:VAR100+' 甘肃'
VAR100赋值:VAR100+' 广东'
VAR100赋值:VAR100+' 广西'
VAR100赋值:VAR100+' 贵州'
VAR100赋值:VAR100+' 海南'
VAR100赋值:VAR100+' 河北'
VAR100赋值:VAR100+' 河南'
VAR100赋值:VAR100+' 黑龙江'
VAR100赋值:VAR100+' 湖北'
VAR100赋值:VAR100+' 湖南'
VAR100赋值:VAR100+' 吉林'
VAR100赋值:VAR100+' 江苏'
VAR100赋值:VAR100+' 江西'
VAR100赋值:VAR100+' 辽宁'
VAR100赋值:VAR100+' 内蒙古'
VAR100赋值:VAR100+' 宁夏'
VAR100赋值:VAR100+' 青海'
VAR100赋值:VAR100+' 山东'
VAR100赋值:VAR100+' 山西'
VAR100赋值:VAR100+' 陕西'
VAR100赋值:VAR100+' 上海'
VAR100赋值:VAR100+' 深圳'
VAR100赋值:VAR100+' 四川'
VAR100赋值:VAR100+' 天津'
VAR100赋值:VAR100+' ***'
VAR100赋值:VAR100+' 新疆'
VAR100赋值:VAR100+' 云南'
VAR100赋值:VAR100+' 浙江'
VAR100赋值:VAR100+' 重庆'
VAR100赋值:VAR100+' 3G'
VAR100赋值:VAR100+' H股'
VAR100赋值:VAR100+' QFII持股'
VAR100赋值:VAR100+' ST'
VAR100赋值:VAR100+' 奥运'
VAR100赋值:VAR100+' 创投'
VAR100赋值:VAR100+' 次新股'
VAR100赋值:VAR100+' 大盘'
VAR100赋值:VAR100+' 股权改革'
VAR100赋值:VAR100+' 股权投资'
DRAWTEXTEX(1,1,20,960,VAR100),COLOR00FFFF
输出输出输出输出DRAWTEXTEX(1,1,20,900,'总股本:'+NUMTOSTR(DD,0)+'万股' +' 流通A股:'+NUMTOSTR(SS,0)+'万股'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'每股收益:'+NUMTOSTR(GG,3)),COLORBBFFFF
输出天:收盘价的N日简单移动平均+3*收盘价的N日估算标准差,COLOR66BBFF
输出地:收盘价的N日简单移动平均-3*收盘价的N日估算标准差,画绿色
A赋值:(收盘价+收盘价的N1日线性回归预测值)/2
输出心:A的N2日线性回归预测值的10日线性回归预测值,CIRCLEDOT,画白色
输出糡:如果A<心,返回A,否则返回心,线宽为2,COLORFF00FF
输出兰:如果A>心,返回A,否则返回心,线宽为2,COLORFF8800
VAR9Q赋值:收盘价= 4日内收盘价的最高值AND (1日前的收盘价>=2日前的收盘价 OR 1日前的收盘价>=3日前的收盘价) OR 1日前的收盘价=4日内收盘价的最高值 AND 收盘价>=2日前的收盘价 OR 2日前的收盘价=4日内收盘价的最高值 AND 3日前的收盘价=4日内收盘价的最低值 AND 收盘价>=1日前的收盘价 OR 3日前的收盘价=4日内收盘价的最高值 AND 收盘价>=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARAQ赋值:收盘价=4日内收盘价的最高值 AND 1日前的收盘价=4日内收盘价的最低值
VARBQ赋值:收盘价=4日内收盘价的最低值 AND (1日前的收盘价<2日前的收盘价 OR 1日前的收盘价<3日前的收盘价) OR 1日前的收盘价=4日内收盘价的最低值 AND 收盘价<2日前的收盘价 OR 2日前的收盘价=4日内收盘价的最低值 AND 1日前的收盘价不等于4日内收盘价的最高值 AND 收盘价<1日前的收盘价 OR 3日前的收盘价=4日内收盘价的最低值 AND 收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价
VARCQ赋值:1日前的收盘价=4日内收盘价的最低值 AND 收盘价>=2日前的收盘价 OR 2日前的收盘价=4日内收盘价的最低值 AND 1日前的收盘价<=3日前的收盘价 AND 2日前的收盘价<4日前的收盘价 AND 收盘价>=1日前的收盘价
VARDQ赋值:1日前的收盘价=4日内收盘价的最高值 AND 收盘价<2日前的收盘价 OR (2日前的收盘价=4日内收盘价的最高值 AND 1日前的收盘价>3日前的收盘价 OR 3日前的收盘价=4日内收盘价的最高值 AND 1日前的收盘价>2日前的收盘价) AND 2日前的收盘价>=4日前的收盘价 AND 收盘价<1日前的收盘价
当满足条件收阳线时,在开盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR0000FF
当满足条件收阳线时,在收盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR0000FF
当满足条件开盘价>=收盘价时,在收盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件开盘价>=收盘价时,在开盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLORFF7700
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF9900
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFFBB00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFFCC00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFDD00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFEE00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFFF00
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱. ,COLOR000055
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱. ,COLOR000066
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱. ,COLOR000077
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱. ,COLOR000099
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱. ,COLOR0000BB
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱. ,COLOR0000DD
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱. ,COLOR0000FF
红赋值:VAR9Q
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR000055
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR000066
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR000077
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR000099
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000BB
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000DD
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000FF
粉赋值:VARAQ
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLORFF11FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF33FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFF55FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFF77FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF99FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFBBFF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFDDFF
灰赋值:VARBQ
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR333333
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR555555
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR777777
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR999999
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORBBBBBB
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORDDDDDD
当满足条件VARBQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFFFFF
绿赋值:VARCQ
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR003300
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR005500
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR007700
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR009900
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00BB00
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DD00
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00
蓝赋值:VARDQ
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLORFF1100
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF3300
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFF5500
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFF7700
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF9900
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFBB00
当满足条件VARDQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFDD00
<!--++ PLUGIN_CODE QCOMIC BEGIN-->
 

源码:

 

 


{参数:N=26,N1=2,N2=31}INPUT:N(26),N1(2),N2(31);
DRAWGBK(1,colorrgb(0,0,100),colorrgb(0,0,0),1);
wyy1:=WEEKDAY,LINETHICK0;
wWj:=' 星期';
wWjj:=IF(wyy1=5 ,wWj+'五',IF(wyy1=4 ,wWj+'四',
IF(wyy1=3 ,wWj+'三',IF(wyy1=2 ,wWj+'二',IF(wyy1=1 ,wWj+'1',wWj)))));
wyy2:=LMONTH;
wyy3:=LDAY;
wWw:=IF( BARSTATUS=2 ,' 农历 '+NUMTOSTR(wyy2,0)+'月 '+NUMTOSTR(wyy3,0)+'日',' ');
wWh:=IF( BARSTATUS=2 ,NUMTOSTR(date+19000000,0),' ' );
DRAWTEXTEX(1,1,120 ,30 ,' '+wWh+wWjj+wWw),LINETHICK3,ColorFFFF80;
a0:=BARSCOUNT(c);
a3:=SYSPARAM(3);
a2:=SYSPARAM(2);
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/8;
hh2:=hh1/4;
ll1:=llv(l,nn0);ll2:=ll1[a3];
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2)),LINETHICK;
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
x1:=v1/av0>=nn/nn0 and nn>=0;
x2:=v2/av0>=nn/nn0 and nn>=0;
x3:=v3/av0>=nn/nn0 and nn>=0;
x4:=v4/av0>=nn/nn0 and nn>=0;
x5:=v5/av0>=nn/nn0 and nn>=0;
x6:=v6/av0>=nn/nn0 and nn>=0;
x7:=v7/av0>=nn/nn0 and nn>=0;
x8:=v8/av0>=nn/nn0 and nn>=0;
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+hh1*0.5),Color003CB7;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+hh1*0.5),Color808000;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+hh1*0.5),Color8B4D43;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+hh1*0.5),Color1B3D70;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+hh1*0.5),Color00AEAE;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+hh1*0.5),color666666;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+hh1*0.5),color666666;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+hh1*0.5),color666666;
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*hh1),a4-1*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*hh2),a4-2*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*hh2),a4-3*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*hh2),a4-4*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*hh2),a4-5*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*hh2),a4-6*hh1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and v8>0,5),10),ll2+1*4*hh2,a4-7*hh1,2),COLOR00FF00;
HH:=DYNAINFO(39);
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
TH:=DYNAINFO(39);
换手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXTEX(1,1,20,840,'当日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+'当前换手率:'+NUMTOSTR(换手率,2)+'%'),ColorFFFFFF;
var100:='所属板块:';
if inblock('电力')=1 then var100:=var100+' 电力';
if inblock('电脑')=1 then var100:=var100+' 电脑';
if inblock('电器')=1 then var100:=var100+' 电器';
if inblock('电子信息')=1 then var100:=var100+' 电子信息';
if inblock('房地产')=1 then var100:=var100+' 房地产';
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';
if inblock('钢铁')=1 then var100:=var100+' 钢铁';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供气')=1 then var100:=var100+' 供水供气';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纤')=1 then var100:=var100+' 化纤';
if inblock('机械')=1 then var100:=var100+' 机械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通设施')=1 then var100:=var100+' 交通设施';
if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';
if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';
if inblock('其他行业')=1 then var100:=var100+' 其他行业';
if inblock('汽车')=1 then var100:=var100+' 汽车';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外贸')=1 then var100:=var100+' 外贸';
if inblock('医药')=1 then var100:=var100+' 医药';
if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';
if inblock('有色金属')=1 then var100:=var100+' 有色金属';
if inblock('运输物流')=1 then var100:=var100+' 运输物流';
if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肃')=1 then var100:=var100+' 甘肃';
if inblock('广东')=1 then var100:=var100+' 广东';
if inblock('广西')=1 then var100:=var100+' 广西';
if inblock('贵州')=1 then var100:=var100+' 贵州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江苏')=1 then var100:=var100+' 江苏';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('辽宁')=1 then var100:=var100+' 辽宁';
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';
if inblock('宁夏')=1 then var100:=var100+' 宁夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山东')=1 then var100:=var100+' 山东';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陕西')=1 then var100:=var100+' 陕西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重庆')=1 then var100:=var100+' 重庆';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('奥运')=1 then var100:=var100+' 奥运';
if inblock('创投')=1 then var100:=var100+' 创投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盘')=1 then var100:=var100+' 大盘';
if inblock('股权改革')=1 then var100:=var100+' 股权改革';
if inblock('股权投资')=1 then var100:=var100+' 股权投资';
DRAWTEXTEX(1,1,20,960,var100),color00ffff;
DRAWTEXTEX(1,1,20,900,'总股本:'+NUMTOSTR(DD,0)+'万股' +' 流通A股:'+NUMTOSTR(SS,0)+'万股'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'每股收益:'+NUMTOSTR(GG,3)),COLORbbffff;
天:MA(C,n)+3*STD(C,n),COLOR66bbff;
地:MA(C,n)-3*STD(C,n),COLORGREEN;
a:=(c+FORCAST(c,n1))/2;
心:FORCAST(FORCAST(a,n2),10),CIRCLEDOT,COLORWHITE;
紅:IF(a<心,a,心),LINETHICK2,COLORff00ff;
兰:IF(a>心,a,心),LINETHICK2,COLORff8800;
var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
varbQ:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
红:=var9Q;
stickline(var9Q,c,(o+c)/2,7,0),color000055;
stickline(var9Q,c,(o+c)/2,6,0),color000066;
stickline(var9Q,c,(o+c)/2,5,0),color000077;
stickline(var9Q,c,(o+c)/2,4,0),color000099;
stickline(var9Q,c,(o+c)/2,3,0),color0000bb;
stickline(var9Q,c,(o+c)/2,2,0),color0000dd;
stickline(var9Q,c,(o+c)/2,1,0),color0000ff;
粉:=varaQ;
stickline(varaQ,c,(o+c)/2,7,0),colorff11ff;
stickline(varaQ,c,(o+c)/2,6,0),colorff33ff;
stickline(varaQ,c,(o+c)/2,5,0),colorff55ff;
stickline(varaQ,c,(o+c)/2,4,0),colorff77ff;
stickline(varaQ,c,(o+c)/2,3,0),colorff99ff;
stickline(varaQ,c,(o+c)/2,2,0),colorffbbff;
stickline(varaQ,c,(o+c)/2,1,0),colorffddff;
灰:=varbQ;
stickline(varbQ,c,(o+c)/2,7,0),color333333;
stickline(varbQ,c,(o+c)/2,6,0),color555555;
stickline(varbQ,c,(o+c)/2,5,0),color777777;
stickline(varbQ,c,(o+c)/2,4,0),color999999;
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1,0),colorffffff;
绿:=varcQ;
stickline(varcQ,o,(o+c)/2,7,0),color003300;
stickline(varcQ,o,(o+c)/2,6,0),color005500;
stickline(varcQ,o,(o+c)/2,5,0),color007700;
stickline(varcQ,o,(o+c)/2,4,0),color009900;
stickline(varcQ,o,(o+c)/2,3,0),color00bb00;
stickline(varcQ,o,(o+c)/2,2,0),color00dd00;
stickline(varcQ,o,(o+c)/2,1,0),color00ff00;
蓝:=vardQ;
stickline(vardQ,o,(o+c)/2,7,0),colorff1100;
stickline(vardQ,o,(o+c)/2,6,0),colorff3300;
stickline(vardQ,o,(o+c)/2,5,0),colorff5500;
stickline(vardQ,o,(o+c)/2,4,0),colorff7700;
stickline(vardQ,o,(o+c)/2,3,0),colorff9900;
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00;<!--++ plugin_code qcomic begin-->

{程序化交易 www.cxh99.com }

 

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

 

 

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

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

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

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

 


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

相关文章

    没有相关内容