射击之星[其他软件公式]

相关标签:

原理解析：
填充背景 MA6赋值:收盘价的6日简单移动平均 MA18赋值:收盘价的18日简单移动平均 输出MA3:(3)*(MA18) - (2)*(MA6),线宽为2,POINTDOT,COLORD39D91 输出MA4:(3)*(MA6) - (2)*(MA18),线宽为2,POINTDOT,COLORFF00 输出M1:((收盘价+最低价)/(2)的2日指数移动平均)/(2.98)的3日累和,POINTDOT,COLOR00CCFF 输出M21:M1的21日指数移动平均,COLORFF00FF 输出M30:收盘价的30日简单移动平均,线宽为1,COLORFF VAR1赋值:(2)*((8日内(收盘价+最低价)/(2)的最低值)*(1.1)的13日简单移动平均) - (收盘价+最低价)/(2)的3日指数移动平均 - ((收盘价 + 最低价)/(2))*(0.1) VAR2赋值:如果(((收盘价+最低价)/(2)的3日指数移动平均-VAR1)*(5)>0),返回(((收盘价+最低价)/(2)的3日指数移动平均-VAR1)*(5)的2乘幂)/(10),否则返回(((-1))*(((收盘价+最低价)/(2)的3日指数移动平均-VAR1)*(5)的2乘幂))/(10) VAR3赋值:如果(VAR2>0),返回VAR2-0,否则返回(-1) 当满足条件VAR3上穿0AND((收盘价+最低价)/(2)>(收盘价+最低价)/(2)的8日简单移动平均)时,在(M21)*(1.01)位置书写文字,线宽为2,画白色 当满足条件VAR3上穿0AND((收盘价+最低价)/(2)>(收盘价+最低价)/(2)的8日简单移动平均)时,在(最低价)*(0.99)和(最低价)*(0.95)位置之间画柱状线,宽度为4,0不为0则画空心柱.,画黄色 ZZ赋值:(开盘价+最高价+最低价)/3 输出买:ZZ的4日指数移动平均,COLOR00CCFF,线宽为1 YC赋值:(最高价+最低价)/2 YCHJX赋值:(ZZ的4日指数移动平均)+(YC-3日前的ZZ)/4 当满足条件BARPOS=SYSPARAM(2)时,在收盘价位置书写文字ALIGN4,线宽为2,画红色 当满足条件BARPOS=SYSPARAM(2)时,在最低价位置书写文字PXDN40,ALIGN4,线宽为2,画绿色 当满足条件BARPOS=SYSPARAM(2)时,在收盘价位置书写文字ALIGN4,线宽为2,画红色 X1赋值:(收盘价+最低价+最高价)/3 X2赋值:X1的6日指数移动平均 X3赋值:X2的5日指数移动平均 当满足条件X2上穿X3时,在最低价-0.1位置画10号图标 当满足条件X3上穿X2时,在最高价+0.1位置画12号图标 当满足条件X2>=X3时,在最低价和最高价位置之间画柱状线,宽度为0.1,1不为0则画空心柱.,COLOR0000DD 当满足条件X2>=X3时,在收盘价和开盘价位置之间画柱状线,宽度为9,2不为0则画空心柱.,COLOR0000DD 当满足条件X2>=X3时,在收盘价和开盘价位置之间画柱状线,宽度为9,8不为0则画空心柱.,COLORFF 当满足条件X2<X3时,在最低价和最高价位置之间画柱状线,宽度为0.1,1不为0则画空心柱.,画绿色 当满足条件X2<X3时,在收盘价和开盘价位置之间画柱状线,宽度为9,2不为0则画空心柱.,画绿色 当满足条件X2上穿X3时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,COLOR00CCFF 当满足条件X3上穿X2时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,画蓝色 VARC赋值:收盘价-1日前的收盘价和0的较大值的6日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的6日[1日权重]移动平均*100 当满足条件82上穿VARC时,在最高价位置画2号图标 VAR6赋值:1日前的收盘价 VAR7赋值:收盘价-VAR6和0的较大值的6日[1日权重]移动平均/收盘价-VAR6的绝对值的6日[1日权重]移动平均*100 当满足条件84上穿VAR7时,在最高价*1.01位置书写文字,画绿色 输出A:收盘价的14日简单移动平均,COLORFF00FF,线宽为0 A1赋值:(收盘价+最高价+最低价)/(3) B赋值:A1的21日指数移动平均 B2赋值:1日前的B MA55赋值:收盘价的55日指数移动平均 当满足条件(B>B2)时,在MA55位置书写文字,画黄色 当满足条件(B<B2)时,在MA55位置书写文字,COLORFF00 赋值:'星期六' 赋值:'星期日' 赋值:'星期一' 赋值:'星期二' 赋值:'星期三' 赋值:'星期四' 赋值:'星期五' FY赋值:年份 FM赋值:月份 FD赋值:日 LFY赋值:LYEAR LFM赋值:LMONTH LFD赋值:LDAY WD赋值:星期 P赋值:SYSPARAM(1) STR1赋值:'今天是：'+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日(农历：'+NUMTOSTR(LFY[P],0)+'年'+NUMTOSTR(LFM[P],0)+'月'+NUMTOSTR(LFD[P],0)+'日) '+WDAY[WD[P]+1]+'' DRAWTEXTEX(收盘价,1,230,80,STR1),COLOR0098FF 当满足条件SYSPARAM(2)=BARPOS时,在收盘价位置书写文字,COLOR00CCFF,ALIGN4

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

源码：

{射击之星}
DRAWGBK(1,COLORRGB(0,0,20),COLORRGB(0,60,50),1);
MA6:=MA(CLOSE,6);
MA18:=MA(CLOSE,18);
MA3:(3)*(MA18) - (2)*(MA6),LINETHICK2,POINTDOT,COLORD39D91;
MA4:(3)*(MA6) - (2)*(MA18),LINETHICK2,POINTDOT,colorFF00;
M1:SUM((EMA((CLOSE + LOW)/(2),2))/(2.98),3),POINTDOT,COLOR00CCFF;
M21:EMA(M1,21),COLORFF00FF;
M30:MA(CLOSE,30),LINETHICK1,colorFF;
VAR1:=(2)*(MA((LLV((CLOSE + LOW)/(2),8))*(1.1),13)) - EMA((CLOSE + LOW)/(2),3) - ((CLOSE + LOW)/(2))*(0.1);
VAR2:=IF(((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5) > 0),(POW((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5),2))/(10),(((-1))*(POW((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5),2)))/(10));
VAR3:=IF((VAR2 > 0),VAR2 - 0,(-1));
DRAWTEXT(CROSS(VAR3,0) AND ((CLOSE + LOW)/(2) > MA((CLOSE + LOW)/(2),8)),(M21)*(1.01),'射击'),LINETHICK2,COLORWHITE;
STICKLINE(CROSS(VAR3,0) AND ((CLOSE + LOW)/(2) > MA((CLOSE + LOW)/(2),8)),(LOW)*(0.99),(LOW)*(0.95),4,0),COLORYELLOW;
zz:=(o+h+l)/3;
买:EMA(zz,4),COLOR00CCFF,LINETHICK1;
yc:=(h+l)/2;
ychjx:=(EMA(zz,4))+(yc-ref(zz,3))/4;
DRAWTEXT(BARPOS=SYSPARAM(2),c,'\n \n 昨测买点：'+NUMTOSTR(ref(ychjx,1),2))align4,LINETHICK2,colorred;
DRAWTEXT(BARPOS=SYSPARAM(2),l,'\n \n \n 今日买点：'+NUMTOSTR(买,2 ))PXDN40,align4,LINETHICK2,colorgreen;
DRAWTEXT(BARPOS=SYSPARAM(2),c,'\n \n \n \n 买点：'+NUMTOSTR(ychjx,2))align4,LINETHICK2,colorred;
x1:=(C+L+H)/3;
x2:=EMA(x1,6);
x3:=EMA(x2,5);
DRAWICON(CROSS(X2,X3),L-0.1,10);
DRAWICON(CROSS(X3,X2),H+0.1,12);
stickline(x2>=x3,low,high,0.1,1),COLOR0000dd;
stickline(x2>=x3,close,open,9,2),COLOR0000dd;
stickline(x2>=x3,close,open,9,8),colorFF;
stickline(x2<x3,low,high,0.1,1),colorGREEN;
stickline(x2<x3,close,open,9,2),colorGREEN;
stickline(CROSS(X2,X3),open,close,6,1),COLOR00CCFF;
stickline(CROSS(X3,X2),open,close,6,1),colorBLUE;
varC:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,varC),HIGH,2);
var6:=REF(C,1);
var7:=SMA(MAX(C-var6,0),6,1)/SMA(ABS(C-var6),6,1)*100;
DRAWTEXT(CROSS(84,var7),H*1.01,'↓'),COLORGREEN ;
A:MA(CLOSE,14),ColorFF00FF,LINETHICK0;
A1:=(CLOSE+HIGH+LOW)/(3);
B:=EMA(A1,21);
B2:=REF(B,1);
MA55:=EMA(CLOSE,55);
DRAWTEXT((B>B2),ma55,'*'),Coloryellow;
DRAWTEXT((B<B2),ma55,'*'),colorFF00;
variable:
wday[7]:='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
lfy:=LYEAR;
lfm:=LMONTH;
lfd:=LDAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:='今天是：'+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日(农历：'+NUMTOSTR(lfy[p],0)+'年'+NUMTOSTR(lfm[p],0)+'月'+NUMTOSTR(lfd[p],0)+'日) '+wday[wd[p]+1]+'';
DRAWTEXTEX(c,1,230,80,str1),Color0098FF;
DRAWTEXT(sysparam(2)=BARPOS,c,'所属板块:'+BLKNAME),COLOR00CCFF,ALIGN4;

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