相關(guān)標(biāo)簽: 通達(dá)信真實(shí)資金流指標(biāo) 、 企業(yè)資金流分析 、 資金流 、 最好的資金流指標(biāo)公式 、 物流 信息流 資金流 、 資金流分析 、 資金在線資金流 、 金豐投資資金流 、 企業(yè)資金流 、

真資金流指標(biāo)公式源碼

//☆背景設(shè)置//
DRAWGBK(C=C,COLORRGB(30,30,30),COLORRGB(130,130,130),1);

//☆資金流向//

ZLCM:=EMA(WINNER(CLOSE)*70,3);//主力籌碼估算
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);//散戶籌碼估算
ZSHTL:=SHCM/(ZLCM+SHCM)*100;//散戶套牢籌碼比率
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;//主力控盤(pán)籌碼比率
ZCMZL:=MA(ZLCM+SHCM,13);//市場(chǎng)籌碼總量
ZZNTS:=BARSLAST(ZSHTL<90 AND ref(ZSHTL,1)>90);//走牛天數(shù)
ZSHJJ:=EMA(ZSHTL,89);//散戶警戒
ZZLJJ:=EMA(ZZLKP,89);//主力警戒
ZJLRQD:=ROUND(ZZLKP-ZZLJJ);//資金流入強(qiáng)度
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-ref(ZZLKP,1)>ZSHTL-ref(ZSHTL,1),1,0);
散戶套牢系數(shù):ROUND(ZSHTL),LINETHICK0,COLORWHITE;
主力控盤(pán)系數(shù):ROUND(ZZLKP),LINETHICK0,COLORCYAN;
資金流入強(qiáng)度:ZJLRQD,LINETHICK0,COLORRED;
市場(chǎng)籌碼總量:ROUND(ZCMZL),LINETHICK0,COLORGREEN; //本文來(lái)至程序化交易網(wǎng) cxh99.com//
//神祕(mì)黑洞//
FILLRGN(ref(ZSHTL,1)>90 AND ZSHTL<90,ZSHTL,0),COLOR9966FF;
//散戶套牢籌碼//
STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;
//散戶籌碼警戒//
STICKLINE(ZSHJJ>ref(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORCARY;
//散戶線//
PARTLINE(C>0,ZSHTL),LINEDOT,COLORYELLOW;
//主力控盤(pán)籌碼//
STICKLINE(C>0,ZZLKP,0,7,0),COLORBLUE;
//鑄頂風(fēng)險(xiǎn)區(qū)//
STICKLINE(ZZLKP>75,ZZLKP,0,7,0),COLORFFFFFF;
//主力籌碼警戒//
STICKLINE(ZZLJJ>ref(ZZLJJ,1),ZZLKP,ZZLJJ,7,0),COLORRED;
//築底散兵坑//
STICKLINE(ZSHTL>=90,ZZLKP,0,7,0),COLOR66FFCC;
//籌碼總量//
PARTLINE(C>0,ZCMZL),COLORGREEN;
//籌碼總量上昇//
PARTLINE(ZCMZL>ref(ZCMZL,1),ZCMZL),COLOR0066FF;
//增量資金//
DRAWTEXT(ZCMZL>ref(ZCMZL,1) AND SH8<ref(SH8,1) AND ISLASTBAR,ZCMZL,'←增量資金'); //內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM//
EXPLAIN(C>ref(C,1),'§'+STKNAME+' №:'+STKLABEL),COLORRED;
EXPLAIN(C<=ref(C,1),'§'+STKNAME+' №:'+STKLABEL),COLORGREEN;
//走牛天數(shù)判斷//
EXPLAINEX(C>0,'走牛天數(shù)判斷：',ZZNTS,0,0),COLORWHITE;
//主力動(dòng)向監(jiān)控//
EXPLAIN(ZCMZL>ref(ZCMZL,1) AND DKB=1,'主力動(dòng)向監(jiān)控：主力增倉(cāng)'),COLORRED;
EXPLAIN(ZCMZL>ref(ZCMZL,1) AND DKB=0,'主力動(dòng)向監(jiān)控：主力減倉(cāng)'),COLORMAGENTA;
EXPLAIN(ZCMZL=ref(ZCMZL,1),'主力動(dòng)向監(jiān)控：多空平衡'),COLORGRAY;
EXPLAIN(ZCMZL<ref(ZCMZL,1) AND DKB=1,'主力動(dòng)向監(jiān)控：主力回補(bǔ)'),COLORFF9933;
EXPLAIN(ZCMZL<ref(ZCMZL,1) AND DKB=0,'主力動(dòng)向監(jiān)控：主力出逃'),COLORGREEN;
//特別信號(hào)提示//
EXPLAIN(ZSHTL>90,'特別信號(hào)提示：築底散兵坑'),COLOR66FFCC;
EXPLAIN(ZZLKP>75,'特別信號(hào)提示：鑄頂風(fēng)險(xiǎn)區(qū)'),COLORCYAN;
EXPLAIN(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>ref(ZZLJJ,1) AND ZCMZL>ref(ZCMZL,1),'特別信號(hào)提示：穿越警戒'),COLORRED;
EXPLAIN(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>ref(ZZLJJ,1) AND ZCMZL>ref(ZCMZL,1),'特別信號(hào)提示：穿越主力'),COLORYELLOW;
EXPLAIN(CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>ref(ZCMZL,1),'特別信號(hào)提示：穿越散戶'),COLORGREEN;
EXPLAIN(CROSS(ZCMZL,100) AND ZCMZL>ref(ZCMZL,1),'特別信號(hào)提示：全盤(pán)穿越'),COLOR3399FF;
EXPLAIN(ref(ZSHTL,1)>90 AND ZSHTL<90,'特別信號(hào)提示：神祕(mì)黑洞'),COLOR9966FF;
//內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM//

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

源碼解析：

//☆背景設(shè)置//填充背景
ZLCM賦值:以收盤(pán)價(jià)計(jì)算的獲利盤(pán)比例*70的3日指數(shù)移動(dòng)平均
M賦值:(以收盤(pán)價(jià)*1.1計(jì)算的獲利盤(pán)比例-以收盤(pán)價(jià)*0.9計(jì)算的獲利盤(pán)比例)*80的3日指數(shù)移動(dòng)平均
TL賦值:SHCM/(ZLCM+SHCM)*100
蔤ZLKP賦值:ZLCM/(ZLCM+SHCM)*100
蔤CMZL賦值:ZLCM+SHCM的13日簡(jiǎn)單移動(dòng)平均
TS賦值:上次ZSHTL<90ANDREF(ZSHTL,1)>90距今天數(shù)
走牛天數(shù)ZSHJJ賦值:ZSHTL的89日指數(shù)移動(dòng)平均
散戶警戒ZZLJJ賦值:ZZLKP的89日指數(shù)移動(dòng)平均
主力警戒ZJLRQD賦值:對(duì)ZZLKP-ZZLJJ(進(jìn)行)四舍五入ZZLKP-ZZLJJ關(guān)于?的四舍五入
賦值:ZSHTL的8日指數(shù)移動(dòng)平均
DKB賦值:如果ZZLKP-昨日Z(yǔ)ZLKP>ZSHTL-昨日Z(yǔ)SHTL,返回1,否則返回0
輸出散戶套牢系數(shù):對(duì)ZSHTL(進(jìn)行)四舍五入ZSHTL關(guān)于?的四舍五入,線寬為0,畫(huà)白色
輸出主力控盤(pán)系數(shù):對(duì)ZZLKP(進(jìn)行)四舍五入ZZLKP關(guān)于?的四舍五入,線寬為0,畫(huà)青色
輸出資金流入強(qiáng)度:ZJLRQD,線寬為0,畫(huà)紅色
輸出市場(chǎng)籌碅總量:對(duì)ZCMZL(進(jìn)行)四舍五入ZCMZL關(guān)于?的四舍五入,線寬為0,畫(huà)綠色
 //本文來(lái)至程序化交易網(wǎng) CXH99.COM////神礪黑洞//FILLRGN(昨日Z(yǔ)SHTL>90 AND ZSHTL<90,ZSHTL,0),COLOR9966FF
//散戶套牢籌碅//當(dāng)滿足條件收盤(pán)價(jià)>0時(shí),在ZSHTL和ZZLKP位置之間畫(huà)柱狀線,寬度為0,0不為0則畫(huà)空心柱.,COLOREEEEEE
//散戶籌碅警戒//當(dāng)滿足條件ZSHJJ>昨日Z(yǔ)SHJJ時(shí),在ZSHTL和ZSHJJ位置之間畫(huà)柱狀線,寬度為1,0不為0則畫(huà)空心柱.,COLORCARY
//散戶線//PARTLINE(收盤(pán)價(jià)>0,ZSHTL),LINEDOT,畫(huà)黃色
//主力控盤(pán)籌碅//當(dāng)滿足條件收盤(pán)價(jià)>0時(shí),在ZZLKP和0位置之間畫(huà)柱狀線,寬度為7,0不為0則畫(huà)空心柱.,畫(huà)藍(lán)色
//鑄頂風(fēng)險(xiǎn)區(qū)//當(dāng)滿足條件ZZLKP>75時(shí),在ZZLKP和0位置之間畫(huà)柱狀線,寬度為7,0不為0則畫(huà)空心柱.,COLORFFFFFF
//主力籌碅警戒//當(dāng)滿足條件ZZLJJ>昨日Z(yǔ)ZLJJ時(shí),在ZZLKP和ZZLJJ位置之間畫(huà)柱狀線,寬度為7,0不為0則畫(huà)空心柱.,畫(huà)紅色
//築底散兵坑//當(dāng)滿足條件ZSHTL>=90時(shí),在ZZLKP和0位置之間畫(huà)柱狀線,寬度為7,0不為0則畫(huà)空心柱.,COLOR66FFCC
//籌碅總量//PARTLINE(收盤(pán)價(jià)>0,ZCMZL),畫(huà)綠色
//籌碅總量上昇//PARTLINE(ZCMZL>昨日Z(yǔ)CMZL,ZCMZL),COLOR0066FF
//增量資金//當(dāng)滿足條件ZCMZL>昨日Z(yǔ)CMZLANDSH8<昨日SH8ANDISLASTBAR時(shí),在ZCMZL位置書(shū)寫(xiě)文字
輸出 //內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM//EXPLAIN(收盤(pán)價(jià)>昨收,'§'+股票名稱+' №:'+STKLABEL),畫(huà)紅色
輸出EXPLAIN(收盤(pán)價(jià)<=昨收,'§'+股票名稱+' №:'+STKLABEL),畫(huà)綠色
//走牛天數(shù)判斷//EXPLAINEX(收盤(pán)價(jià)>0,'走牛天數(shù)判斷：',ZZNTS,0,0),畫(huà)白色
//主力動(dòng)向監(jiān)控//EXPLAIN(ZCMZL>昨日Z(yǔ)CMZL AND DKB=1,'主力動(dòng)向監(jiān)控：主力增倉(cāng)'),畫(huà)紅色
EXPLAIN(ZCMZL>昨日Z(yǔ)CMZL AND DKB=0,'主力動(dòng)向監(jiān)控：主力淧倉(cāng)'),畫(huà)洋紅色
EXPLAIN(ZCMZL=昨日Z(yǔ)CMZL,'主力動(dòng)向監(jiān)控：多空平衡'),畫(huà)深灰色
EXPLAIN(ZCMZL<昨日Z(yǔ)CMZL AND DKB=1,'主力動(dòng)向監(jiān)控：主力回袮'),COLORFF9933
EXPLAIN(ZCMZL<昨日Z(yǔ)CMZL AND DKB=0,'主力動(dòng)向監(jiān)控：主力出逃'),畫(huà)綠色
//特凟信號(hào)提示//EXPLAIN(ZSHTL>90,'特凟信號(hào)提示：築底散兵坑'),COLOR66FFCC
EXPLAIN(ZZLKP>75,'特凟信號(hào)提示：鑄頂風(fēng)險(xiǎn)區(qū)'),畫(huà)青色
EXPLAIN(ZCMZL上穿ZZLJJ AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>昨日Z(yǔ)ZLJJ AND ZCMZL>昨日Z(yǔ)CMZL,'特凟信號(hào)提示：穿越警戒'),畫(huà)紅色
EXPLAIN(ZCMZL上穿ZZLKP AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>昨日Z(yǔ)ZLJJ AND ZCMZL>昨日Z(yǔ)CMZL,'特凟信號(hào)提示：穿越主力'),畫(huà)黃色
EXPLAIN(ZCMZL上穿ZSHTL AND ZSHTL>ZZLKP AND ZCMZL>昨日Z(yǔ)CMZL,'特凟信號(hào)提示：穿越散戶'),畫(huà)綠色
EXPLAIN(ZCMZL上穿100 AND ZCMZL>昨日Z(yǔ)CMZL,'特凟信號(hào)提示：全盤(pán)穿越'),COLOR3399FF
EXPLAIN(昨日Z(yǔ)SHTL>90 AND ZSHTL<90,'特凟信號(hào)提示：神礪黑洞'),COLOR9966FF
//內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM//