您現(xiàn)在的位置：程序化交易>> 股票公式>> 其他>> 其他軟件公式>>正文內(nèi)容

極品立莊量主圖指標(biāo)公式，抓主升立竿見(jiàn)影（公式、源碼）[其他軟件公式]

作者：飛狐來(lái)源：cxh99.com 發(fā)布時(shí)間：2020年11月18日點(diǎn)擊數(shù)：　【收藏到本網(wǎng)的會(huì)員中心】

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

源碼：
N:=20; DRAWGBKLAST(DATE>900101,STRIP(RGB(75,75,75),RGB(0,0,0),0)); DRAWTEXTABS(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF; STICKLINE(C>=O,C,O,8,0),COLOR000055; STICKLINE(C>=O,C,O,6.5,0),COLOR000075; STICKLINE(C>=O,C,O,5,0),COLOR000095; STICKLINE(C>=O,C,O,3.5,0),COLOR0000B5; STICKLINE(C>=O,C,O,2,0),COLOR0000D5; STICKLINE(C>=O,H,L,0.5,0),COLOR0000F5; STICKLINE(C<O,C,O,8,0),COLOR303000; STICKLINE(C<O,C,O,6.5,0),COLOR404000; STICKLINE(C<O,C,O,5,0),COLOR505000; STICKLINE(C<O,C,O,3.5,0),COLOR606000; STICKLINE(C<O,C,O,2,0),COLOR707000; STICKLINE(C<O,H,L,0.5,0),COLOR808000; 總股本（億）:FINANCE2(35)/10000,COLORYELLOW,LINETHICK0; 流通（億）:FINANCE2(37)/10000,COLORFFFFFF,LINETHICK0; 均價(jià):=(3*C+H+L+O)/6; VAR1:=(8*均價(jià)+7*REF(均價(jià),1)+6*REF(均價(jià),2)+5*REF(均價(jià),3)+4*REF(均價(jià),4)+3*REF(均價(jià),5)+2*REF(均價(jià),6)+REF(均價(jià),8))/36; VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; FILLRGN(VAR1,VAR2,VAR1>VAR2,(RGB(255,0,0))); 短趨:VAR1,ColorFFFFFF; 中趨:VAR2,COLORYELLOW; PARTLINE(中趨,中趨<REF(中趨,1)),COLORGREEN; SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1; SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1; SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1; SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSE<VAR1; SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);; SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2; XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2); XD2:=VAR1=VAR2 AND CLOSE>VAR1; SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N)); 量能飽和度:=IF(SAT>1,1,SAT)*100; IF BARSTATUS=2 AND SZ1 THEN BEGIN DRAWTEXTABS(320,25,'調(diào)整結(jié)束短線介入'),COLORRED; END ELSE IF BARSTATUS=2 AND SZ2 THEN BEGIN DRAWTEXTABS(320,25,'上升通道走勢(shì)良好'),COLORRED; END ELSE IF BARSTATUS=2 AND SZ3 THEN BEGIN DRAWTEXTABS(320,25,'股價(jià)偏離注意調(diào)整'),COLORRED; END ELSE IF BARSTATUS=2 AND SZ4 THEN BEGIN DRAWTEXTABS(320,25,'上升通道調(diào)整洗盤'),COLORGREEN; END ELSE IF BARSTATUS=2 AND SZ5 THEN BEGIN DRAWTEXTABS(320,25,'轉(zhuǎn)向特征注意離場(chǎng)'),COLORGREEN; END ELSE IF BARSTATUS=2 AND SZ6 THEN BEGIN DRAWTEXTABS(320,25,'通道改變堅(jiān)決離場(chǎng)'),COLORGREEN; END ELSE IF BARSTATUS=2 AND XD1 THEN BEGIN DRAWTEXTABS(320,25,'下跌通道只宜觀望'),COLORGREEN; END ELSE IF BARSTATUS=2 AND XD2 THEN BEGIN DRAWTEXTABS(320,25,'短期底部準(zhǔn)備進(jìn)入'),COLORYELLOW; END; AB1:=COST(0.33); AB2:=COST(5); AB3:=COST(15); AB4:=COST(55); AB5:=COST(97); AA1:=COST(90); AA2:=COST(70); AA3:=COST(30); AA4:=COST(10); 獲利:=WINNER(CLOSE)*100; 套牢:=100-WINNER(CLOSE)*100; DRAWTEXTABS(15,25,'量能飽和度:'+NUMTOSTRN(量能飽和度,2)+'%'),COLOR00FFFF; DRAWTEXTABS(15,40,'90成本:'+NUMTOSTRN(AA1,2)),COLOR00FFFF; DRAWTEXTABS(15,55,'70成本:'+NUMTOSTRN(AA2,2)),COLOR00FFFF; DRAWTEXTABS(15,70,'30成本:'+NUMTOSTRN(AA3,2)),COLOR00FFFF; DRAWTEXTABS(15,85,'10成本:'+NUMTOSTRN(AA4,2)),COLOR00FFFF; DRAWTEXTABS(15,100,'底出擊:'+NUMTOSTRN(AB1,2)),COLOR00FFFF; DRAWTEXTABS(520,25,'建倉(cāng):'+NUMTOSTRN(AB2,2)),COLOR00FFFF; DRAWTEXTABS(600,25,'快刀:'+NUMTOSTRN(AB3,2)),COLOR00FFFF; DRAWTEXTABS(675,25,'升浪:'+NUMTOSTRN(AB4,2)),COLOR00FFFF; DRAWTEXTABS(520,40,'獲利:'+NUMTOSTRN(獲利,2)+'%'),COLOR00FFFF; DRAWTEXTABS(600,40,'套牢:'+NUMTOSTRN(套牢,2)+'%'),COLOR00FFFF; DRAWTEXTABS(675,40,'預(yù)測(cè):'+NUMTOSTRN(AB5,2)),COLOR00FFFF; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1; 立樁量:=FILTER(TJ1,5); TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破:=TJ2=1; STICKLINE(CLOSE,REF(HIGH,BARSLAST(立樁量)),REF(HIGH,BARSLAST(立樁量)),6,0),COLORCYAN; STICKLINE(CLOSE,REF(LOW,BARSLAST(立樁量)),REF(LOW,BARSLAST(立樁量)),6,0),COLORYELLOW; TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法則:=TJ3=1; 成立:=三天法則 AND 突破; 條件成立:=FILTER(成立,3); DRAWTEXT(條件成立,L*0.99,'成立'),COLORYELLOW; DRAWRECTREL(0,85,15,380,RGB(30,30,30)),COLORWHITE; AAA:=量能飽和度<=10; BBB:=量能飽和度>10 AND 量能飽和度<=20; CCC:=量能飽和度>20 AND 量能飽和度<=30; DDD:=量能飽和度>30 AND 量能飽和度<=50; EEE:=量能飽和度>50 AND 量能飽和度<=70; FFF:=量能飽和度>70 AND 量能飽和度<=80; GGG:=量能飽和度>80 AND 量能飽和度<=90; HHH:=量能飽和度>90; IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(0,350,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0)); END ELSE IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0)); END;

?來(lái)源:程序化99（ www.tumamayizhan.com ）

原理解析：

N賦值:20

DRAWGBKLAST(日期>900101,STRIP(自定色,自定色,0))

DRAWTEXTABS(10,10,STKLABEL+' '+品種名稱+' '+BKNAME),COLOR00FFFF

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR000055

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為6.5,0不為0則畫空心柱.,COLOR000075

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR000095

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為3.5,0不為0則畫空心柱.,COLOR0000B5

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000D5

當(dāng)滿足條件收盤價(jià)>=開(kāi)盤價(jià)時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000F5

當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR303000

當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為6.5,0不為0則畫空心柱.,COLOR404000

當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR505000

當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為3.5,0不為0則畫空心柱.,COLOR606000

當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開(kāi)盤價(jià)位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR707000

當(dāng)滿足條件收陰線時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR808000

輸出總股本（億）:FINANCE2(35)/10000,畫黃色,線寬為0

輸出流通（億）:FINANCE2(37)/10000,COLORFFFFFF,線寬為0

均價(jià)賦值:(3*收盤價(jià)+最高價(jià)+最低價(jià)+開(kāi)盤價(jià))/6

VAR1賦值:(8*均價(jià)+7*1日前的均價(jià)+6*2日前的均價(jià)+5*3日前的均價(jià)+4*4日前的均價(jià)+3*5日前的均價(jià)+2*6日前的均價(jià)+8日前的均價(jià))/36

VAR2賦值:(2日內(nèi)VAR1的最低值+4日內(nèi)VAR1的最低值+6日內(nèi)VAR1的最低值)/3

FILLRGN(VAR1,VAR2,VAR1>VAR2,(自定色))

輸出短趨:VAR1,COLORFFFFFF

輸出中趨:VAR2,畫黃色

PARTLINE(中趨,中趨<1日前的中趨),畫綠色

SZ1賦值:1日前的VAR1=1日前的VAR2 AND VAR1>VAR2 AND 收盤價(jià)>VAR1

SZ2賦值:VAR1>VAR2 AND VAR1>1日前的VAR1 AND VAR2>1日前的VAR2 AND 最高價(jià)/VAR1<1.1 AND 最低價(jià)>VAR2 AND 收盤價(jià)>VAR1

SZ3賦值:VAR1>VAR2 AND VAR1>1日前的VAR1 AND VAR2>=1日前的VAR2 AND 最高價(jià)/VAR1>1.1

SZ4賦值:VAR1>VAR2 AND VAR1>1日前的VAR1 AND VAR2>1日前的VAR2 AND 收盤價(jià)>VAR2 AND 收盤價(jià)<VAR1

SZ5賦值:(VAR1>VAR2 AND VAR2>1日前的VAR2 AND VAR1不等于1日前的VAR1 AND 收盤價(jià)<VAR2) OR (VAR1>VAR2 AND VAR1<1日前的VAR1 AND VAR2<1日前的VAR2 AND 收盤價(jià)<VAR2)

SZ6賦值:1日前的VAR1>1日前的VAR2 AND VAR1=VAR2 AND 收盤價(jià)<VAR2

XD1賦值:VAR1=VAR2 AND 收盤價(jià)<VAR2 OR (VAR1<1日前的VAR1 AND VAR2<1日前的VAR2 AND 1日前的VAR1=1日前的VAR2 AND 收盤價(jià)<VAR2)

XD2賦值:VAR1=VAR2 AND 收盤價(jià)>VAR1

SAT賦值:(成交額(元)/收盤價(jià))/(N日內(nèi)成交額(元)的最高值/N日內(nèi)收盤價(jià)的最高值)

量能飽和度賦值:如果SAT>1,返回1,否則返回SAT*100

條件判斷數(shù)據(jù)位置狀態(tài)=2 AND SZ1 THEN BEGINDRAWTEXTABS(320,25,'調(diào)整結(jié)束短線介入'),畫紅色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND SZ2 THEN BEGINDRAWTEXTABS(320,25,'上升通道走勢(shì)良好'),畫紅色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND SZ3 THEN BEGINDRAWTEXTABS(320,25,'股價(jià)偏離注意調(diào)整'),畫紅色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND SZ4 THEN BEGINDRAWTEXTABS(320,25,'上升通道調(diào)整洗盤'),畫綠色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND SZ5 THEN BEGINDRAWTEXTABS(320,25,'轉(zhuǎn)向特征注意離場(chǎng)'),畫綠色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND SZ6 THEN BEGINDRAWTEXTABS(320,25,'通道改變堅(jiān)決離場(chǎng)'),畫綠色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND XD1 THEN BEGINDRAWTEXTABS(320,25,'下跌通道只宜觀望'),畫綠色

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND XD2 THEN BEGINDRAWTEXTABS(320,25,'短期底部準(zhǔn)備進(jìn)入'),畫黃色

END

AB1賦值:獲利盤為0.33%的成本分布

AB2賦值:獲利盤為5%的成本分布

AB3賦值:獲利盤為15%的成本分布

AB4賦值:獲利盤為55%的成本分布

AB5賦值:獲利盤為97%的成本分布

AA1賦值:獲利盤為90%的成本分布

AA2賦值:獲利盤為70%的成本分布

AA3賦值:獲利盤為30%的成本分布

AA4賦值:獲利盤為10%的成本分布

獲利賦值:以收盤價(jià)計(jì)算的獲利盤比例*100

套牢賦值:100-以收盤價(jià)計(jì)算的獲利盤比例*100

輸出DRAWTEXTABS(15,25,'量能飽和度:'+NUMTOSTRN(量能飽和度,2)+'%'),COLOR00FFFF

輸出DRAWTEXTABS(15,40,'90成本:'+NUMTOSTRN(AA1,2)),COLOR00FFFF

輸出DRAWTEXTABS(15,55,'70成本:'+NUMTOSTRN(AA2,2)),COLOR00FFFF

輸出DRAWTEXTABS(15,70,'30成本:'+NUMTOSTRN(AA3,2)),COLOR00FFFF

輸出DRAWTEXTABS(15,85,'10成本:'+NUMTOSTRN(AA4,2)),COLOR00FFFF

輸出DRAWTEXTABS(15,100,'底出擊:'+NUMTOSTRN(AB1,2)),COLOR00FFFF

輸出DRAWTEXTABS(520,25,'建倉(cāng):'+NUMTOSTRN(AB2,2)),COLOR00FFFF

輸出DRAWTEXTABS(600,25,'快刀:'+NUMTOSTRN(AB3,2)),COLOR00FFFF

輸出DRAWTEXTABS(675,25,'升浪:'+NUMTOSTRN(AB4,2)),COLOR00FFFF

輸出DRAWTEXTABS(520,40,'獲利:'+NUMTOSTRN(獲利,2)+'%'),COLOR00FFFF

輸出DRAWTEXTABS(600,40,'套牢:'+NUMTOSTRN(套牢,2)+'%'),COLOR00FFFF

輸出DRAWTEXTABS(675,40,'預(yù)測(cè):'+NUMTOSTRN(AB5,2)),COLOR00FFFF

TJ1賦值:成交量(手)=10日內(nèi)成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盤價(jià)>VAR1

立樁量賦值:TJ1的5日過(guò)濾

TJ2賦值:如果上次立樁量距今天數(shù)=1ANDCLOSE>1日前的最高價(jià),返回1,否則返回如果上次立樁量距今天數(shù)=2ANDCLOSE>2日前的最高價(jià),返回1,否則返回如果上次立樁量距今天數(shù)=3ANDCLOSE>3日前的最高價(jià),返回1,否則返回0

突破賦值:TJ2=1

當(dāng)滿足條件收盤價(jià)時(shí),在上次立樁量距今天數(shù)日前的最高價(jià)和上次立樁量距今天數(shù)日前的最高價(jià)位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫青色

當(dāng)滿足條件收盤價(jià)時(shí),在上次立樁量距今天數(shù)日前的最低價(jià)和上次立樁量距今天數(shù)日前的最低價(jià)位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫黃色

TJ3賦值:如果上次立樁量距今天數(shù)=1ANDCLOSE>1日前的最低價(jià),返回1,否則返回如果上次立樁量距今天數(shù)=2ANDCLOSE>2日前的最低價(jià),返回1,否則返回如果上次立樁量距今天數(shù)=3ANDCLOSE>3日前的最低價(jià),返回1,否則返回0

三天法則賦值:TJ3=1

成立賦值:三天法則 AND 突破

條件成立賦值:成立的3日過(guò)濾

當(dāng)滿足條件條件成立時(shí),在最低價(jià)*0.99位置書寫文字,畫黃色

相對(duì)位置上畫矩形,畫白色

AAA賦值:量能飽和度<=10

BBB賦值:量能飽和度>10 AND 量能飽和度<=20

CCC賦值:量能飽和度>20 AND 量能飽和度<=30

DDD賦值:量能飽和度>30 AND 量能飽和度<=50

EEE賦值:量能飽和度>50 AND 量能飽和度<=70

FFF賦值:量能飽和度>70 AND 量能飽和度<=80

GGG賦值:量能飽和度>80 AND 量能飽和度<=90

HHH賦值:量能飽和度>90

條件判斷數(shù)據(jù)位置狀態(tài)=2 AND AAA THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND BBB THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND CCC THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND DDD THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND EEE THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND FFF THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND GGG THEN BEGIN 相對(duì)位置上畫矩形

ENDELSEIF 數(shù)據(jù)位置狀態(tài)=2 AND HHH THEN BEGIN 相對(duì)位置上畫矩形

END

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

有思路，想編寫各種指標(biāo)公式，交易模型，選股公式，還原公式的朋友

可聯(lián)系技術(shù)人員 QQ: 262069696 或微信：cxhjy888 進(jìn)行有償收費(fèi) 編寫！(注：由于人數(shù)限制，QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行，加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求，否則無(wú)法通過(guò)。謝謝您！)

（怎么收費(fèi)，代編流程等詳情請(qǐng)點(diǎn)擊查閱！）

(注：由于人數(shù)限制，QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行，加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求，否則無(wú)法通過(guò)。謝謝您！)

【字體：小大】【打印文章】【查看評(píng)論】

極品立莊量主圖指標(biāo)公式，抓主升立竿見(jiàn)影（公式、源碼）[其他軟件公式]

相關(guān)文章

欄目導(dǎo)航

本月熱門排行

用戶常看內(nèi)容

會(huì)員登錄/注冊(cè)