相關(guān)標(biāo)簽:

?

狂賺主圖的K線復(fù)原版本
本人早些時(shí)候的拙作《狂賺主圖》自在理想發(fā)布源碼以來，受到眾多朋友們的喜愛和肯定，很多新老朋友也在使用，非常欣慰！也有很多朋友因?yàn)榉N種原因問了很多問題，但因本人水平有限，時(shí)間有限無法一一作答，見諒！原本將每一根K線賦予色彩上的變化是因?yàn)榭梢员憩F(xiàn)當(dāng)天的走勢，但有些朋友喜歡原色原味的K線卻要用背景美化桌面（真是蘿卜白菜各有所愛，呵呵），我就代勞了吧！郊游剛回來很累了，就做飛狐的吧，大智慧的照葫蘆畫瓢應(yīng)該也沒問題。。。。。。本指標(biāo)并非新東西，只是應(yīng)會友要求幫助更改而已，操作思路想法不同，想要的也不一樣，原狂賺主圖參見原帖..........{狂賺主圖--K線復(fù)原}

?

原理解析：
DRAWBKBMP(收盤價(jià)>=開盤價(jià),'圖片名稱' ) DRAWBKBMP(收陰線,'圖片名稱' ) 賦值:(最高價(jià)+最低價(jià)+開盤價(jià)+2*收盤價(jià))/5 ZL賦值:2*E-最低價(jià) ZC賦值:2*E-最高價(jià) FZ賦值:E-(最高價(jià)-最低價(jià)) E賦值:(最高價(jià)+最低價(jià)+開盤價(jià)+2*收盤價(jià))/5 ZL賦值:2*E-最低價(jià) ZC賦值:2*E-最高價(jià) FZ賦值:E-(最高價(jià)-最低價(jià)) 輸出MA5:收盤價(jià)的5日簡單移動(dòng)平均,COLORF4E202 輸出MA13:收盤價(jià)的13日簡單移動(dòng)平均,畫紅色 MA30賦值:收盤價(jià)的30日簡單移動(dòng)平均 BALANCE賦值:收盤價(jià)的30日指數(shù)移動(dòng)平均 UP賦值:BALANCE + 2*收盤價(jià)的30日估算標(biāo)準(zhǔn)差 DOWN賦值:BALANCE- 2*收盤價(jià)的30日估算標(biāo)準(zhǔn)差 VAR9Q賦值:收盤價(jià)= 4日內(nèi)收盤價(jià)的最高值A(chǔ)ND (1日前的收盤價(jià)>=2日前的收盤價(jià) OR 1日前的收盤價(jià)>=3日前的收盤價(jià)) OR 1日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 收盤價(jià)>=2日前的收盤價(jià) OR 2日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 3日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 收盤價(jià)>=1日前的收盤價(jià) OR 3日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 收盤價(jià)>=1日前的收盤價(jià) AND 收盤價(jià)>=2日前的收盤價(jià) VARAQ賦值:收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 1日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 VARBQ賦值:收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND (1日前的收盤價(jià)<2日前的收盤價(jià) OR 1日前的收盤價(jià)<3日前的收盤價(jià)) OR 1日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 收盤價(jià)<2日前的收盤價(jià) OR 2日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 1日前的收盤價(jià)不等于4日內(nèi)收盤價(jià)的最高值 AND 收盤價(jià)<1日前的收盤價(jià) OR 3日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 收盤價(jià)<1日前的收盤價(jià) AND 收盤價(jià)<2日前的收盤價(jià) VARCQ賦值:1日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 收盤價(jià)>=2日前的收盤價(jià) OR 2日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最低值 AND 1日前的收盤價(jià)<=3日前的收盤價(jià) AND 2日前的收盤價(jià)<4日前的收盤價(jià) AND 收盤價(jià)>=1日前的收盤價(jià) VARDQ賦值:1日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 收盤價(jià)<2日前的收盤價(jià) OR (2日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 1日前的收盤價(jià)>3日前的收盤價(jià) OR 3日前的收盤價(jià)=4日內(nèi)收盤價(jià)的最高值 AND 1日前的收盤價(jià)>2日前的收盤價(jià)) AND 2日前的收盤價(jià)>=4日前的收盤價(jià) AND 收盤價(jià)<1日前的收盤價(jià) Y1賦值:1日前的以0.9為權(quán)重(((最高價(jià)+最低價(jià))+(收盤價(jià)*2))/4.15)的動(dòng)態(tài)移動(dòng)平均的3日指數(shù)移動(dòng)平均 VAR1W賦值:(100 - ((90 * (21日內(nèi)最高價(jià)的最高值 - 收盤價(jià))) / (21日內(nèi)最高價(jià)的最高值 - 21日內(nèi)最低價(jià)的最低值))) VAR2W賦值:(100 - ((90 * (21日內(nèi)最高價(jià)的最高值 - 收盤價(jià))) / (21日內(nèi)最高價(jià)的最高值 - 21日內(nèi)最低價(jià)的最低值))) VAR3W賦值:(100 - ((100*(6日內(nèi)最高價(jià)的最高值-收盤價(jià)))/(6日內(nèi)最高價(jià)的最高值-6日內(nèi)最低價(jià)的最低值))的34日簡單移動(dòng)平均) VAR3P賦值:如果收盤價(jià)/1日前的收盤價(jià)>1.050ANDHIGH/收盤價(jià)<1.010ANDIF(收盤價(jià)>1日前的收盤價(jià),88,0)>0,返回91,否則返回0 SS賦值:(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均>1日前的(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均 AND 1日前的(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均<2日前的(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均 SC賦值:最低價(jià)<13日內(nèi)(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均的最高值 AND 最高價(jià)>13日內(nèi)(最低價(jià)+最高價(jià)+收盤價(jià))/3的5日簡單移動(dòng)平均的最高值 AND 收盤價(jià)>1日前的收盤價(jià) AND 收陽線 MR賦值:SC AND 統(tǒng)計(jì)2日中滿足SS的天數(shù) 買賦值:MR AND 取反 多方賦值:7*(收盤價(jià)-27日內(nèi)最低價(jià)的最低值)/(27日內(nèi)最高價(jià)的最高值-27日內(nèi)最低價(jià)的最低值)*30的4日[1日權(quán)重]移動(dòng)平均-3*(收盤價(jià)-27日內(nèi)最低價(jià)的最低值)/(27日內(nèi)最高價(jià)的最高值-27日內(nèi)最低價(jià)的最低值)*30的4日[1日權(quán)重]移動(dòng)平均的3日[1日權(quán)重]移動(dòng)平均-(收盤價(jià)-27日內(nèi)最低價(jià)的最低值)/(27日內(nèi)最高價(jià)的最高值-27日內(nèi)最低價(jià)的最低值)*30的4日[1日權(quán)重]移動(dòng)平均的3日[1日權(quán)重]移動(dòng)平均的2日[1日權(quán)重]移動(dòng)平均 VAR1賦值:(收盤價(jià)-24日內(nèi)最低價(jià)的最低值)/(24日內(nèi)最高價(jià)的最高值-24日內(nèi)最低價(jià)的最低值)*1 VAR2賦值:VAR1的3日[1日權(quán)重]移動(dòng)平均*100 趨勢線賦值:(VAR2的3日[1日權(quán)重]移動(dòng)平均*VAR1)的3日[1日權(quán)重]移動(dòng)平均*1 VAR9賦值:趨勢線上穿(VAR2的3日[1日權(quán)重]移動(dòng)平均*VAR1) AND (VAR2的3日[1日權(quán)重]移動(dòng)平均*VAR1)>8 AAX賦值:成交額(元)/成交量(手) BBX賦值:最低價(jià)<AAX*0.9 CCX賦值:(收盤價(jià)-1日前的收盤價(jià))/1日前的收盤價(jià)*100>1.2 DDX賦值:最低價(jià)<收盤價(jià)的5日簡單移動(dòng)平均*0.921 EEX賦值:成交量(手)<成交量(手)的5日簡單移動(dòng)平均*1.5 FFX賦值:BBX AND CCX AND DDX AND EEX A賦值:(3*收盤價(jià)+最低價(jià)+開盤價(jià)+最高價(jià))/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賦值:收盤價(jià)-1日前的收盤價(jià) DX賦值:100*MTM的6日指數(shù)移動(dòng)平均的6日指數(shù)移動(dòng)平均/MTM的絕對值的6日指數(shù)移動(dòng)平均的6日指數(shù)移動(dòng)平均 CB賦值:X的13日指數(shù)移動(dòng)平均 當(dāng)滿足條件(收盤價(jià)>BALANCE)時(shí),在BALANCE和BALANCE位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,線寬為2,COLOR0000FF 當(dāng)滿足條件(BALANCE>收盤價(jià))時(shí),在BALANCE和BALANCE位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,線寬為2,COLORFF6600 當(dāng)滿足條件收陽線時(shí),在開盤價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR5050FF 當(dāng)滿足條件收陽線時(shí),在收盤價(jià)和最高價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR5050FF 當(dāng)滿足條件收陽線時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為6,1不為0則畫空心柱. ,COLOR5050FF 當(dāng)滿足條件開盤價(jià)>=收盤價(jià)時(shí),在收盤價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFFF50 當(dāng)滿足條件開盤價(jià)>=收盤價(jià)時(shí),在開盤價(jià)和最高價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFFF50 當(dāng)滿足條件開盤價(jià)>=收盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFFFF50 賣賦值:如果2日內(nèi)DX的最高值=7日內(nèi)DX的最高值A(chǔ)NDCOUNT(DX>50,2)ANDCROSS(DX的2日簡單移動(dòng)平均,DX),返回1,否則返回0 當(dāng)滿足條件賣=1的1日過濾時(shí),在最高價(jià)*1.02位置書寫文字,畫藍(lán)色 買賦值:如果2日內(nèi)DX的最低值=7日內(nèi)DX的最低值A(chǔ)NDCOUNT(DX<0,2)ANDCROSS(DX,DX的2日簡單移動(dòng)平均),返回1,否則返回0 當(dāng)滿足條件買=1的5日過濾時(shí),在最低價(jià)-0.03位置書寫文字,畫紅色 RSV賦值:(收盤價(jià)-9日內(nèi)最低價(jià)的最低值)/(9日內(nèi)最高價(jià)的最高值-9日內(nèi)最低價(jià)的最低值)*100 K賦值:RSV的3日[1日權(quán)重]移動(dòng)平均 D賦值:K的3日[1日權(quán)重]移動(dòng)平均 J賦值:3*K-2*D BDGD賦值:2日內(nèi)J的最高值=8日內(nèi)J的最高值 AND J>80 注意賦值:如果1日前的J-0.01上穿JANDREF(BDGD,1),返回1,否則返回0 當(dāng)滿足條件注意AND賣不等于1時(shí),在最高價(jià)*1.02位置書寫文字,COLOR00FF00 加倉A賦值:(收盤價(jià)-1日前的收盤價(jià))/1日前的收盤價(jià)的5日指數(shù)移動(dòng)平均*100的3日[1日權(quán)重]移動(dòng)平均*10 當(dāng)滿足條件(加倉A上穿0ORCROSS(收盤價(jià),CB))AND買不等于1的3日過濾時(shí),在最低價(jià)-0.03位置書寫文字,COLOR0080FF 跟賦值:如果MA13>=3日前的MA13ANDCROSS(收盤價(jià),MA13),返回1,否則返回0 當(dāng)滿足條件MA13>=3日前的MA13ANDCROSS(收盤價(jià),MA13)時(shí),在最低價(jià)*0.96位置書寫文字,COLOR7F52AF 輸出DRAWTEXTEX(收盤價(jià),0,10,15,'上升阻力:' +NUMTOSTR(ZL,2)),畫紅色 輸出DRAWTEXTEX(收盤價(jià),0,10,35,'下跌支撐:' +NUMTOSTR(ZC,2)),畫綠色 輸出DRAWTEXTEX(收盤價(jià),0,10,55,'下跌反轉(zhuǎn):' +NUMTOSTR(FZ,2)),畫白色

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

?

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,'下跌反轉(zhuǎn):' +NUMTOSTR(fz,2)),colorwhite;

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?