狂赚主图指标公式的K线复原版本[其他软件公式]

相关标签:

狂赚主图的K线复原版本
本人早些时候的拙作《狂赚主图》自在理想发布源码以来，受到众多朋友们的喜爱和肯定，很多新老朋友也在使用，非常欣慰！也有很多朋友因为种种原因问了很多问题，但因本人水平有限，时间有限无法一一作答，见谅！原本将每一根K线赋予色彩上的变化是因为可以表现当天的走势，但有些朋友喜欢原色原味的K线却要用背景美化桌面（真是萝卜白菜各有所爱，呵呵），我就代劳了吧！郊游刚回来很累了，就做飞狐的吧，大智慧的照葫芦画瓢应该也没问题。。。。。。本指标并非新东西，只是应会友要求帮助更改而已，操作思路想法不同，想要的也不一样，原狂赚主图参见原帖..........{狂赚主图--K线复原}

原理解析：
DRAWBKBMP(收盘价>=开盘价,'图片名称' ) DRAWBKBMP(收阴线,'图片名称' ) 赋值:(最高价+最低价+开盘价+2*收盘价)/5 ZL赋值:2*E-最低价 ZC赋值:2*E-最高价 FZ赋值:E-(最高价-最低价) E赋值:(最高价+最低价+开盘价+2*收盘价)/5 ZL赋值:2*E-最低价 ZC赋值:2*E-最高价 FZ赋值:E-(最高价-最低价) 输出MA5:收盘价的5日简单移动平均,COLORF4E202 输出MA13:收盘价的13日简单移动平均,画红色 MA30赋值:收盘价的30日简单移动平均 BALANCE赋值:收盘价的30日指数移动平均 UP赋值:BALANCE + 2*收盘价的30日估算标准差 DOWN赋值:BALANCE- 2*收盘价的30日估算标准差 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日前的收盘价 Y1赋值:1日前的以0.9为权重(((最高价+最低价)+(收盘价*2))/4.15)的动态移动平均的3日指数移动平均 VAR1W赋值:(100 - ((90 * (21日内最高价的最高值 - 收盘价)) / (21日内最高价的最高值 - 21日内最低价的最低值))) VAR2W赋值:(100 - ((90 * (21日内最高价的最高值 - 收盘价)) / (21日内最高价的最高值 - 21日内最低价的最低值))) VAR3W赋值:(100 - ((100*(6日内最高价的最高值-收盘价))/(6日内最高价的最高值-6日内最低价的最低值))的34日简单移动平均) VAR3P赋值:如果收盘价/1日前的收盘价>1.050ANDHIGH/收盘价<1.010ANDIF(收盘价>1日前的收盘价,88,0)>0,返回91,否则返回0 SS赋值:(最低价+最高价+收盘价)/3的5日简单移动平均>1日前的(最低价+最高价+收盘价)/3的5日简单移动平均 AND 1日前的(最低价+最高价+收盘价)/3的5日简单移动平均<2日前的(最低价+最高价+收盘价)/3的5日简单移动平均 SC赋值:最低价<13日内(最低价+最高价+收盘价)/3的5日简单移动平均的最高值 AND 最高价>13日内(最低价+最高价+收盘价)/3的5日简单移动平均的最高值 AND 收盘价>1日前的收盘价 AND 收阳线 MR赋值:SC AND 统计2日中满足SS的天数 买赋值:MR AND 取反 多方赋值:7*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*30的4日[1日权重]移动平均-3*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*30的4日[1日权重]移动平均的3日[1日权重]移动平均-(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*30的4日[1日权重]移动平均的3日[1日权重]移动平均的2日[1日权重]移动平均 VAR1赋值:(收盘价-24日内最低价的最低值)/(24日内最高价的最高值-24日内最低价的最低值)*1 VAR2赋值:VAR1的3日[1日权重]移动平均*100 趋势线赋值:(VAR2的3日[1日权重]移动平均*VAR1)的3日[1日权重]移动平均*1 VAR9赋值:趋势线上穿(VAR2的3日[1日权重]移动平均*VAR1) AND (VAR2的3日[1日权重]移动平均*VAR1)>8 AAX赋值:成交额(元)/成交量(手) BBX赋值:最低价<AAX*0.9 CCX赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100>1.2 DDX赋值:最低价<收盘价的5日简单移动平均*0.921 EEX赋值:成交量(手)<成交量(手)的5日简单移动平均*1.5 FFX赋值:BBX AND CCX AND DDX AND EEX A赋值:(3*收盘价+最低价+开盘价+最高价)/6 X赋值:(20*A+19*1日前的A+18*2日前的A+17*3日前的A+16*4日前的A+15*5日前的A+14*6日前的A+13*7日前的A+12*8日前的A+11*9日前的A+10*10日前的A+9*11日前的A+8*12日前的A+7*13日前的A+6*14日前的A+5*15日前的A+4*16日前的A+3*17日前的A+2*18日前的A+20日前的A)/210 MTM赋值:收盘价-1日前的收盘价 DX赋值:100*MTM的6日指数移动平均的6日指数移动平均/MTM的绝对值的6日指数移动平均的6日指数移动平均 CB赋值:X的13日指数移动平均 当满足条件(收盘价>BALANCE)时,在BALANCE和BALANCE位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为2,COLOR0000FF 当满足条件(BALANCE>收盘价)时,在BALANCE和BALANCE位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为2,COLORFF6600 当满足条件收阳线时,在开盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR5050FF 当满足条件收阳线时,在收盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR5050FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为6,1不为0则画空心柱. ,COLOR5050FF 当满足条件开盘价>=收盘价时,在收盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFF50 当满足条件开盘价>=收盘价时,在开盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFF50 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFFFF50 卖赋值:如果2日内DX的最高值=7日内DX的最高值ANDCOUNT(DX>50,2)ANDCROSS(DX的2日简单移动平均,DX),返回1,否则返回0 当满足条件卖=1的1日过滤时,在最高价*1.02位置书写文字,画蓝色 买赋值:如果2日内DX的最低值=7日内DX的最低值ANDCOUNT(DX<0,2)ANDCROSS(DX,DX的2日简单移动平均),返回1,否则返回0 当满足条件买=1的5日过滤时,在最低价-0.03位置书写文字,画红色 RSV赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100 K赋值:RSV的3日[1日权重]移动平均 D赋值:K的3日[1日权重]移动平均 J赋值:3*K-2*D BDGD赋值:2日内J的最高值=8日内J的最高值 AND J>80 注意赋值:如果1日前的J-0.01上穿JANDREF(BDGD,1),返回1,否则返回0 当满足条件注意AND卖不等于1时,在最高价*1.02位置书写文字,COLOR00FF00 加仓A赋值:(收盘价-1日前的收盘价)/1日前的收盘价的5日指数移动平均*100的3日[1日权重]移动平均*10 当满足条件(加仓A上穿0ORCROSS(收盘价,CB))AND买不等于1的3日过滤时,在最低价-0.03位置书写文字,COLOR0080FF 跟赋值:如果MA13>=3日前的MA13ANDCROSS(收盘价,MA13),返回1,否则返回0 当满足条件MA13>=3日前的MA13ANDCROSS(收盘价,MA13)时,在最低价*0.96位置书写文字,COLOR7F52AF 输出DRAWTEXTEX(收盘价,0,10,15,'上升阻力:' +NUMTOSTR(ZL,2)),画红色 输出DRAWTEXTEX(收盘价,0,10,35,'下跌支撑:' +NUMTOSTR(ZC,2)),画绿色 输出DRAWTEXTEX(收盘价,0,10,55,'下跌反转:' +NUMTOSTR(FZ,2)),画白色

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

源码：

DRAWBKBMP(close>=open,'图片名称' );
DRAWBKBMP(close<open,'图片名称' );//图片放在FmlDLL目录下，BMP格式
E:=(H+L+O+2*C)/5;
zl:=2*E-L;
zc:=2*E-H;
fz:=E-(H-L);
E:=(H+L+O+2*C)/5;
zl:=2*E-L;
zc:=2*E-H;
fz:=E-(H-L);
MA5:MA(C,5),COLORF4E202;
MA13:MA(CLOSE,13),colorRED;
MA30:=MA(CLOSE,30);
BALANCE:=EMA(C,30);
UP:=BALANCE + 2*STD(C,30);
DOWN:=BALANCE- 2*STD(C,30);
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);
Y1:=REF(EMA(DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9),3),1);
VAR1w:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2w:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3w:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
Var3p:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
Ss:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(Ss,2);
买:=MR AND NOT(REF(MR,1));
多方:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)
-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)
-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
Var1:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*1;
Var2:=SMA(Var1,3,1)*100;
趋势线:=SMA((SMA(Var2,3,1)*var1),3,1)*1;
Var9:=CROSS(趋势线,(SMA(Var2,3,1)*var1)) AND (SMA(Var2,3,1)*var1)>8;
AAx:=AMOUNT/VOL;
BBx:=L<AAx*0.9;
CCx:=(C-REF(C,1))/REF(C,1)*100>1.2;
DDx:=L<MA(C,5)*0.921;
EEx:=VOL<MA(V,5)*1.5;
FFx:=BBx AND CCx AND DDx AND EEx;
a:=(3*c+l+o+h)/6;
X:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+
14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=eMA(X,13);
STICKLINE((CLOSE >BALANCE),BALANCE,BALANCE,1,0),LINETHICK2,color0000ff;
STICKLINE((BALANCE > CLOSE),BALANCE,BALANCE,1,0),LINETHICK2,colorff6600;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,1) ,COLOR5050FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLORFFFF50;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLORFFFF50;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORFFFF50;卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(filter(卖=1,1),HIGH*1.02,'卖'),COLORBLUE;
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(filter(买=1,5),LOW-0.03,'买'),COLORRED;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
BDGD:=HHV(J,2)=HHV(J,8) AND J>80;
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0);
DRAWTEXT(注意 AND 卖<>1,HIGH*1.02,'减'),COLOR00FF00;
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND 买<>1,3),LOW-0.03,'加'),COLOR0080FF;
跟:=IF(MA13>=REF(MA13,3) AND CROSS(CLOSE,MA13),1,0);
DRAWTEXT(MA13>=REF(MA13,3) AND CROSS(CLOSE,MA13),LOW*0.96,'跟'),COLOR7F52AF;DRAWTEXTEX(C,0,10,15,'上升阻力:' +NUMTOSTR(zl,2)),colorred;
DRAWTEXTEX(C,0,10,35,'下跌支撑:' +NUMTOSTR(zc,2)),COLORGREEN;
DRAWTEXTEX(C,0,10,55,'下跌反转:' +NUMTOSTR(fz,2)),colorwhite;

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