您现在的位置：程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

叠加 月 半月 周量及分时叠加日量公式 指标 选股 源码[其他软件公式]

作者：飞狐 指标 公式 源码 来源：cxh99.com 发布时间：2024年03月17日 点击数： 　【收藏到本网的会员中心】

指标公式源码分析及使用说明参考:

 

这段代码看起来是针对股市或金融数据进行分析的指标公式。以下是我对代码的简要解释和指标的创建思路：
 
1. 月线指标：
   - 月天数计算：根据条件判断月初的位置，计算该月的天数。
   - 月线交易量：在月线上累积计算每日的成交量，以显示该月的总交易量。
   - 月线换手率：在月线上累积计算每日的换手率，以显示该月的平均换手率。
 
2. 半月线指标：
   - 半月天数计算：类似于月线指标，根据条件判断半月初的位置，计算半月的天数。
   - 半月线交易量：在半月线上累积计算每日的成交量，以显示半月的总交易量。
   - 半月线换手率：在半月线上累积计算每日的换手率，以显示半月的平均换手率。
 
3. 周线指标：
   - 星期天数计算：根据条件判断周初的位置，计算该周的天数。
   - 周线交易量：在周线上累积计算每日的成交量，以显示该周的总交易量。
   - 周线换手率：在周线上累积计算每日的换手率，以显示该周的平均换手率。
 
4. 日线指标：
   - 日线交易量：在日线上累积计算每日的成交量，以显示该日的交易量。
   - 日线换手率：在日线上累积计算每日的换手率，以显示该日的换手率。
 
指标创建思路：
- 根据每个时间段（月、半月、周、日）的特定要求和计算条件，编写相应的公式来计算交易量和换手率。
- 使用累积函数（如SUM）在特定时间段内对数据进行累积计算。
- 结合条件判断语句（如IF条件）来确定每个时间段的起始位置和相关参数的计算逻辑。
 
指标使用参考说明：
- 可以将这些指标应用于股票或金融数据的分析中，以了解不同时间段内的交易活动情况和换手率变化。
- 月线、半月线、周线和日线指标可以帮助投资者观察不同时间跨度下的交易趋势，发现潜在的买卖点。
- 可以将这些指标与其他技术分析指标结合使用，进一步分析市场走势和交易信号，做出更准确的决策。

 

源码：

 

input:月(0,0,1),半月(0,0,1),周(0,0,1),日(0,0,1);
TBS:=POW(10,ABS(LOG(MINDIFF)));
BY:=MONTH;YB:=BY-REF(BY,1)<>0 OR BARPOS=1;
w:=BARSLAST(YB),LINETHICK;
dg:=w=0 or ISLASTBAR;
wx:=0*C;
for P=datacount-1 downto lbound(dg) do
if dg[P] then
wx[P]:=0;
else
wx[P]:=wx[P+1]+1;
r:=BACKSET(ISLASTBAR,w+1)-ISLASTBAR;
wx:=refx(wx,1)+r,LINETHICK;
oo:=ref(o,w);
zq1:=BARSLAST(ref(wx,1)=0 or BARPOS=1)+1;//月天数
yt1:=if(zq1=1 and refx(zq1,2)=1,13,if(refx(zq1,1)=1 or zq1=1,7,14));
YEK:=ROUND(OO*TBS)/TBS;
YES:=ROUND(refx(c,wx)*TBS)/TBS;
f:=YES>YEK or (YES=YEK and YES>ref(YES,W));
j:=cross(w,wx);
AS:=月;
月量:=SUM(V,zq1),ColorFFff00,LINETHICK0;
月换手率:=SUM(vol/CAPITAL*100,ZQ1),linethick0,PRECISion2,colorffff00;
STICKLINE(YEK<YES AND AS,0,月量*0.25,YT1,0),COLOReeaaEE;
STICKLINE(YEK>YES AND AS,0,月量*0.25,YT1,0),Color6AA932;
R:=DAY;
RBY:=IF(R<=15,R,R-15);
TY:=RBY;TB:=DATEDIFF(REF(DATE,1),DATE)<>TY-REF(TY,1) OR BARPOS=1;
TW:=BARSLAST(TB),LINETHICK;
Tdg:=TW=0 or ISLASTBAR;
Twx:=0*c;
for P=datacount-1 downto lbound(Tdg) do
if Tdg[P] then
Twx[P]:=0;
else
Twx[P]:=Twx[P+1]+1;
TTr:=BACKSET(ISLASTBAR,Tw+1)-ISLASTBAR;
Twx:=refx(Twx,1)+TTr,LINETHICK;
TQ:=BARSLAST(ref(Twx,1)=0 or BARPOS=1)+1;//N天数
TTo:=ref(o,Tw);
YYK:=ROUND(TTO*TBS)/TBS;
YYS:=ROUND(refx(c,Twx)*TBS)/TBS;
YT:=if(TQ=1 and refx(TQ,2)=1,13,if(refx(TQ,1)=1 or TQ=1,7,14));
YYL:=SUM(V,TQ),ColorFFff00,LINETHICK0;
ss:=半月;
STICKLINE(YYK<=YYS and ss,0,YYL*0.30,YT,0),Color613076;//Color5261EB Color613076
STICKLINE(YYK>=YYS and ss,0,YYL*0.30,YT,0),ColorFA7D32;
BZ:=WEEKDAY;ZB:=DATEDIFF(REF(DATE,1),DATE)<>BZ-REF(BZ,1) OR BARPOS=1;
ZW:=BARSLAST(ZB),LINETHICK;
Zdg:=ZW=0 or ISLASTBAR;
Zwx:=0*c;
for P=datacount-1 downto lbound(Zdg) do
if Zdg[P] then
Zwx[P]:=0;
else
Zwx[P]:=Zwx[P+1]+1;
Zr:=BACKSET(ISLASTBAR,Zw+1)-ISLASTBAR;
Zwx:=refx(Zwx,1)+Zr,LINETHICK;
zq:=BARSLAST(ref(Zwx,1)=0 or BARPOS=1)+1; //星期天数
Zo:=ref(o,Zw);
ZZK:=ROUND(ZO*TBS)/TBS;
ZZS:=ROUND(refx(c,Zwx)*TBS)/TBS;
ZT:=if(zq=1 and refx(zq,2)=1,13,if(refx(zq,1)=1 or zq=1,7,14));
周量:=SUM(V,zq),ColorFFff00,LINETHICK0;
周换手率:=SUM(vol/CAPITAL*100,ZQ),ColorFFff00,LINETHICK0;
ss:=周;
STICKLINE(ZZK<ZZS and ss,0,周量*0.45,ZT,0),Color3547E8,LINEDOT;//Color3547E8//ColorB468FF
STICKLINE(ZZK>ZZS and ss,0,周量*0.45,ZT,0),ColorFDDD32,LINEDOT;
RRL:=DAY;
RRL:=RRL-REF(RRL,1)<>0 OR BARPOS=1;
Rw:=BARSLAST(RRL),LINETHICK;
Rdg:=Rw=0 or ISLASTBAR;
Rwx:=0*C;
for P=datacount-1 downto lbound(Rdg) do
if Rdg[P] then
Rwx[P]:=0;
else
Rwx[P]:=Rwx[P+1]+1;
Rr:=BACKSET(ISLASTBAR,Rw+1)-ISLASTBAR;
Rwx:=refx(Rwx,1)+Rr,LINETHICK;
Roo:=ref(o,Rw);
Rzq1:=BARSLAST(ref(Rwx,1)=0 or BARPOS=1)+1;//N天数
Ryt1:=if(Rzq1=1 and refx(Rzq1,2)=1,13,if(refx(Rzq1,1)=1 or Rzq1=1,7,14));
RRK:=ROUND(ROO*TBS)/TBS;
RRS:=ROUND(refx(c,Rwx)*TBS)/TBS;
AR:=日;
日量:SUM(V,Rzq1),ColorFFff00,LINETHICK0;
STICKLINE(RRK<=RRS AND AR,0,日量*0.5,RYT1,0),ColorD24A92,LINEDOT;//ColorD24A92 COLOReeaaEE
STICKLINE(RRK>=RRS AND AR,0,日量*0.5,RYT1,0),Color6AA932,LINEDOT;
//日量:V,ColorFFff00,LINETHICK0;
换手率:vol/CAPITAL*100,ColorFFff00,LINETHICK0;
半月量:=SUM(V,TQ),ColorFFff00,LINETHICK0;
半月换手率:=SUM(vol/CAPITAL*100,TQ),ColorFFff00,LINETHICK0;
TT2:=ISLASTBAR=1;
DRAWTEXTEX(TT2,0,371,1,'【创于2010.06.14 草根】'+''),ColorFFFFFF;
DRAWTEXTEX(TT2,0,4,1,'【一周期: '+NUMTOSTR(ZQ[SYSPARAM(1)],0)+''+'天 】'+''),Color00FFFF;
DRAWTEXTEX(TT2,0,125,1,'【周量: '+NUMTOSTR(周量[SYSPARAM(1)],0)+''+'】'+' 周换手率【'+NUMTOSTR(周换手率[SYSPARAM(1)],2)+'%】'),Color00FFFF;
DRAWTEXTEX(TT2,0,4,16,'【半月周期: '+NUMTOSTR(TQ[SYSPARAM(1)],0)+''+'天 】'+''),Color00FFFF;
DRAWTEXTEX(TT2,0,125,16,'【半月量: '+NUMTOSTR(半月量[SYSPARAM(1)],0)+''+'】'+''+' 半月换手率【'+NUMTOSTR(半月换手率[SYSPARAM(1)],2)+'%】'),Color00FFFF;
DRAWTEXTEX(TT2,0,4,31,'【月周期: '+NUMTOSTR(zQ1[SYSPARAM(1)],0)+''+'天 】'+''),Color00FFFF;
DRAWTEXTEX(TT2,0,125,31,'【月量: '+NUMTOSTR(月量[SYSPARAM(1)],0)+''+'】'+''+' 月换手率【'+NUMTOSTR(月换手率[SYSPARAM(1)],2)+'%】'),Color00FFFF;
input:n(5,0,100),na(13,0,100),nb(135,0,500);
量:=VOL,VOLSTICK;
HSL:=VOL/CAPITAL*100;
地量0_1:STICKLINE(HSL<1,0,量,0.1,0 ),coloreeeeee;
STICKLINE(HSL<1,0,量,5,0 ),colordddddd;
STICKLINE(HSL<1,0,量,3,0 ),coloreeeeee;
STICKLINE(HSL<1,0,量,1,0 ),colorffffff;
低靡1_2:STICKLINE(HSL>=1 and HSL<2,0,量,0.1,0 ),coloreeee00;
STICKLINE(HSL>=1 and HSL<2,0,量,5,0 ),coloraaaa00;
STICKLINE(HSL>=1 and HSL<2,0,量,3,0 ),colorcccc00;
STICKLINE(HSL>=1 and HSL<2,0,量,1,0 ),coloreeee00;
温和2_3:STICKLINE(HSL>=2 and HSL<3,0,量,0.1,0 ),Color0080BB;
STICKLINE(HSL>=2 and HSL<3,0,量,5,0 ),Color0040dd;
STICKLINE(HSL>=2 and HSL<3,0,量,3,0 ),Color0060ee;
STICKLINE(HSL>=2 and HSL<3,0,量,1,0 ),Color0080BB;
活跃3_5:STICKLINE(HSL>=3 and HSL<5,0,量,0.1,0 ),color00eeee;
STICKLINE(HSL>=3 and HSL<5,0,量,5,0 ),color00aaaa;
STICKLINE(HSL>=3 and HSL<5,0,量,3,0 ),color00cccc;
STICKLINE(HSL>=3 and HSL<5,0,量,1,0 ),color00eeee;
带量5_8:STICKLINE(HSL>=5 and HSL<8,0,量,0.1,0 ),coloree00ee;
STICKLINE(HSL>=5 and HSL<8,0,量,5,0 ),coloraa00aa;
STICKLINE(HSL>=5 and HSL<8,0,量,3,0 ),colorcc00cc;
STICKLINE(HSL>=5 and HSL<8,0,量,1,0 ),coloree00ee;
放量8_15:STICKLINE(HSL>=8 and HSL<15,0,量,0.1,0 ),Color0000FF;
STICKLINE(HSL>=8 and HSL<15,0,量,5,0 ),Color0000aa;
sTICKLINE(HSL>=8 and HSL<15,0,量,3,0 ),Color0000cc;
sTICKLINE(HSL>=8 and HSL<15,0,量,1,0 ),Color0000FF;
巨量15_25:STICKLINE(HSL>=15 and HSL<25,0,量,0.01,0 ),coloree0000;
STICKLINE(HSL>=15 and HSL<25,0,量,5,0 ),coloraa0000;
STICKLINE(HSL>=15 and HSL<25,0,量,3,0 ),colorcc0000;
STICKLINE(HSL>=15 and HSL<25,0,量,1,0 ),coloree0000;
怪异25_F:STICKLINE(HSL>=25,0,量,0.1,0),color00ff00;
STICKLINE(HSL>=25,0,量,5,0),color00aa00;
STICKLINE(HSL>=25,0,量,3,0),color00cc00;
STICKLINE(HSL>=25,0,量,1,0),color00ee00;
MA3:MA(量,n),COLORFFffff,linethick1;
MAd:MA(量,na),COLOR00ffff,linethick1;
MA90:MA(量,nb),color00ff00;
DRAWTEXT(ISLASTBAR=1 AND MAd>REF(MAd,1),MAd,' '+NUMTOSTR(na,0)+'↑'),COLOR00ffff,align0;
DRAWTEXT(ISLASTBAR=1 AND MAd<REF(MAd,1),MAd,' '+NUMTOSTR(na,0)+'↑'),Color00ffff,align0;
DRAWTEXT(BARSTATUS=2 AND MA3>REF(MA3,1),MA3,' '+NUMTOSTR(n,0)+'↑'),COLORFFffff,align1;
DRAWTEXT(BARSTATUS=2 AND MA3<REF(MA3,1),MA3,' '+NUMTOSTR(n,0)+'↓'),ColorFFffff,align1;
DRAWTEXT(w>0 and j and as,0,'月'),Color0435FB,ALIGN1,PXUP127;
DRAWNUMBER(w>0 and j and as,0,BY,0),Color0435FB,ALIGN2,PXUP127;EXPLAIN(CLOSE,'&n

 

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

 

 

有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

（怎么收费，代编流程等详情请点击查阅！）

(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

 


【字体：小 大】【打印文章】【查看评论】

相关文章

    没有相关内容

栏目导航

 本月热门排行

 用户常看内容