最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 通达信主力筹码源码

    正文概述    2024-05-04 04:13:28  
    P:=10; A:=5; SVOL:=INTPART(SUM(V,0)/CAPITAL); TJ0:=SVOL REF(SVOL,1)ORBARSSINCE(CLOSE)=0; S1:=BARSLAST(TJ0)+1; TJ2:=S1 REF(S1,1); S2:=IF(TJ2,REF(S1,1)+1,S1); S3:=SUM(TJ2,0); ZK1:="KD.K#WEEK"(9,3,3); ZD2:="KD.D#WEEK"(9,3,3); ZF1:="MACD.DIF#WEEK"(12,26,9); ZA2:="MACD.DEA#WEEK"(12,26,9); 换手:=V/CAPITAL*100,LINETHICK0; JCD:=FILTER(CROSS(ZK1,ZD2)ANDREF(ZD2,1) 30,13),NODRAW; 取点:=BARSLAST(JCD); 吸筹区:=IF(取点 0AND取点 61,取点,0); ZS1:=吸筹区; ZS2:=吸筹区+1; ZS3:=换手/5; ZSA:=IF(ZS1 0,SUM((ZS3),吸筹区+1),0),NODRAW; 主力筹码%:ZSA,NODRAW; 建仓天数:ZS1,NODRAW; 阶段总额(万):=SUM(AMOUNT/10000,S2)*100,NODRAW; 阶段总量(手):=SUM(V,S2)*100,NODRAW; 阶段(元):(阶段总额(万)/(阶段总量(手)/100)),NODRAW; 换手冷清:STICKLINE(换手 3,(0-6)*4,(换手-6)*4,2,0),COLOR339900; STICKLINE(换手 3,(0-6)*4,(换手-6)*4,1.3,0),COLOR33BB00; STICKLINE(换手 3,(0-6)*4,(换手-6)*4,0.8,0),COLOR33DD00; STICKLINE(换手 3,(0-6)*4,(换手-6)*4,0.3,0),COLOR33FF00; 换手活跃:STICKLINE(换手 =3AND换手 7,(0-6)*4,(换手-6)*4,2,0),COLOR880088; STICKLINE(换手 =3AND换手 7,(0-6)*4,(换手-6)*4,1.3,0),COLORAA00AA; STICKLINE(换手 =3AND换手 7,(0-6)*4,(换手-6)*4,0.8,0),COLORDD00DD; STICKLINE(换手 =3AND换手 7,(0-6)*4,(换手-6)*4,0.3,0),COLORFF00FF; 换手热烈:STICKLINE(换手 =7,(0-6)*4,(换手-6)*4,1.5,1),COLOR0000DD; STICKLINE(换手 =7,(0-6)*4,(换手-6)*4,2,0),COLOR000088; STICKLINE(换手 =7,(0-6)*4,(换手-6)*4,1.5,0),COLOR0000AA; STICKLINE(换手 =7,(0-6)*4,(换手-6)*4,0.8,0),COLOR0000DD; STICKLINE(换手 =7,(0-6)*4,(换手-6)*4,0.3,0),COLOR0000FF; STICKLINE(JCD,(0-6)*4,6*4,4,0),COLORRED; N:=2.5; VAR2:=LLV(LOW,10); VAR3:=HHV(HIGH,25); 卖出:14.5*N,COLORGREEN,POINTDOT; 清仓:17.5*N,COLORBLUE; 动力线:=(EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*10-17.5)*N; STICKLINE(动力线 REF(动力线,1),动力线,REF(动力线,1),4,1),COLORRED; STICKLINE(动力线 =REF(动力线,1),动力线,REF(动力线,1),4,1),COLOR00FF00; 底部:-15.5*N,COLORRED; 关注:-12.5*N,COLORFF00FF,POINTDOT; T1:=FILTER(CROSS(动力线,关注),20); T2:=FILTER(CROSS(动力线,底部),20); T3:=FILTER(CROSS(清仓,动力线),20); T4:=FILTER(CROSS(卖出,动力线),20); RSV:=((((HHV(HIGH,P)-CLOSE)/(HHV(HIGH,P)-LLV(LOW,P)))*200)-125); :SMA(RSV,A,1)+15,COLORGRAY,LINETHICK2; RSV1:=((((CLOSE-LLV(LOW,P))/(HHV(HIGH,P)-LLV(LOW,P)))*200)-105); 主力:SMA(RSV1,A,1)+15,COLORBLUE,LINETHICK2; IF(散户 0,散户,DRAWNULL),COLOR00FF00,LINETHICK2; IF(散户 REF(散户,1)AND散户 0,散户,DRAWNULL),COLORYELLOW,LINETHICK2; IF(主力 0,主力,DRAWNULL),COLORRED,LINETHICK2; IF(主力 REF(主力,1)AND0 主力 清仓,主力,DRAWNULL),COLORBLUE,LINETHICK2; IF(主力 REF(主力,1)AND主力 0,主力,DRAWNULL),COLORFF00FF,LINETHICK2; DRAWICON(主力 REF(主力,1)AND主力 0,主力,15); {DRAWICON(主力 REF(主力,1)AND0 主力 清仓,主力,19);} 准备起爆:=CROSS(主力,散户); STICKLINE(准备起爆,10,-10,5,0),COLOR009999; STICKLINE(准备起爆,10,-10,3,0),COLOR00BBBB; STICKLINE(准备起爆,10,-10,1.3,0),COLOR00DDDD; STICKLINE(准备起爆,10,-10,0.4,0),COLOR00FFFF; 小心阴跌一:=CROSS(散户,主力); STICKLINE(小心阴跌一,10,-10,4,0),COLORBLUE; DRAWICON((T1ORT2),0,1); DRAWTEXT((T3ORT4),0,'$'),COLOR00FF00; DRAWTEXT(准备起爆,5,'全买'),COLOR0000FF; VAR1:=Ema(EMA(CLOSE,9),9); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; stICKLINE(控盘 0,控盘,0,1,0),linethick4,colorblue; A10:=crOSS(控盘,0); 无庄控盘:IF(控盘 0,控盘,0),linethick0,colorblue; 开始控盘:IF(A10,5,0),LINETHICK2,COLORYELLOW; STICKLINE(控盘 REF(控盘,1)AND控盘 0,控盘,0,1,0),linethick4,COLORRED; 有庄控盘:IF(控盘 REF(控盘,1)AND控盘 0,控盘,0),linethick0,COLORRED; VAR2:=100*WINNER(CLOSE*0.95); STICKLINE(VAR2 50ANDCOST(85) CLOSEAND控盘 0,控盘,0,1,0),linethick4,COLORFF00FF; 高度控盘:IF(VAR2 50ANDCOST(85) CLOSEAND控盘 0,控盘,0),linethick0,COLORFF00FF; STICKLINE(控盘 REF(控盘,1)AND控盘 0,控盘,0,1,0),linethick4,COLOR00FF00; 主力出货:IF(控盘 REF(控盘,1)AND控盘 0,控盘,0),linethick0,COLOR00FF00;



    [源码注释]通达信公式动态公式解读


       P赋值:10

       A赋值:5

       SVOL赋值:(手)的历史累和/当前流通股本(手)的整数部分

       TJ0赋值:SVOL

       1日前的SVOLORBARSSINCE(收盘价)=0

       S1赋值:上次TJ0距今天数+1

       TJ2赋值:S1

       1日前的S1

       S2赋值:如果TJ2,返回1日前的S1+1,否则返回S1

       S3赋值:TJ2的历史累和

       ZK1赋值:"随机指标KD的K[取周线数据]"(9,3,3)

       ZD2赋值:"随机指标KD的D[取周线数据]"(9,3,3)

       ZF1赋值:"平滑异同平的DIF[取周线数据]"(12,26,9)

       ZA2赋值:"平滑异同平均线的DEA[取周线数据]"(12,26,9)

       换手赋值:成交量(手)/当前流通股本(手)*100,线宽为0

       JCD赋值:ZK1上穿ZD2ANDREF(ZD2,1) 的?日过滤

       30,13),NODRAW

       取点赋值:上次JCD距今天数

       吸筹区赋值:如果取点 ,返回?,否则返回?

       0AND取点

       61,取点,0)

       ZS1赋值:吸筹区

       ZS2赋值:吸筹区+1

       ZS3赋值:换手/5

       ZSA赋值:如果ZS1 ,返回?,否则返回?

       0,(ZS3)的吸筹区+1日累和,0),NODRAW

       输出主力筹码%:ZSA,NODRAW

       输出建仓天数:ZS1,NODRAW

       阶段总额(万)赋值:成交额(元)/10000的S2日累和*100,NODRAW

       阶段总量(手)赋值:成交量(手)的S2日累和*100,NODRAW

       输出阶段成本(元):(阶段总额(万)/(阶段总量(手)/100)),NODRAW

       输出换手冷清:当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       3,(0-6)*4,(换手-6)*4,2,0),COLOR339900

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       3,(0-6)*4,(换手-6)*4,1.3,0),COLOR33BB00

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       3,(0-6)*4,(换手-6)*4,0.8,0),COLOR33DD00

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       3,(0-6)*4,(换手-6)*4,0.3,0),COLOR33FF00

       输出换手活跃:当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =3AND换手

       7,(0-6)*4,(换手-6)*4,2,0),COLOR880088

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =3AND换手

       7,(0-6)*4,(换手-6)*4,1.3,0),COLORAA00AA

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =3AND换手

       7,(0-6)*4,(换手-6)*4,0.8,0),COLORDD00DD

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =3AND换手

       7,(0-6)*4,(换手-6)*4,0.3,0),COLORFF00FF

       输出换手热烈:当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =7,(0-6)*4,(换手-6)*4,1.5,1),COLOR0000DD

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =7,(0-6)*4,(换手-6)*4,2,0),COLOR000088

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =7,(0-6)*4,(换手-6)*4,1.5,0),COLOR0000AA

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =7,(0-6)*4,(换手-6)*4,0.8,0),COLOR0000DD

       当满足条件换手 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =7,(0-6)*4,(换手-6)*4,0.3,0),COLOR0000FF

       当满足条件JCD时,在(0-6)*4和6*4位置之间画柱状线,宽度为4,0不为0则画空心柱.,画红色

       N赋值:2.5

       VAR2赋值:10日内最低价的最低值

       VAR3赋值:25日内最高价的最高值

       输出卖出:14.5*N,画绿色,POINTDOT

       输出清仓:17.5*N,画蓝色

       动力线赋值:((收盘价-VAR2)/(VAR3-VAR2)*4的4日指数移动平均*10-17.5)*N

       当满足条件动力线 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       1日前的动力线,动力线,1日前的动力线,4,1),画红色

       当满足条件动力线 时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

       =1日前的动力线,动力线,1日前的动力线,4,1),COLOR00FF00

       输出底部:-15.5*N,画红色

       输出关注:-12.5*N,COLORFF00FF,POINTDOT

       T1赋值:动力线上穿关注的20日过滤

       T2赋值:动力线上穿底部的20日过滤

       T3赋值:清仓上穿动力线的20日过滤

       T4赋值:卖出上穿动力线的20日过滤

       RSV赋值:((((P日内最高价的最高值-收盘价)/(P日内最高价的最高值-P日内最低价的最低值))*200)-125)

       输出散户:RSV的A日[1日权重]移动平均+15,画深灰色,线宽为2

       RSV1赋值:((((收盘价-P日内最低价的最低值)/(P日内最高价的最高值-P日内最低价的最低值))*200)-105)

       输出主力:RSV1的A日[1日权重]移动平均+15,画蓝色,线宽为2

       如果散户 ,返回?,否则返回?

       0,散户,无效数),COLOR00FF00,线宽为2

       如果散户 ,返回?,否则返回?

       1日前的散户AND散户

       0,散户,无效数),画黄色,线宽为2

       如果主力 ,返回?,否则返回?

       0,主力,无效数),画红色,线宽为2

       如果主力 ,返回?,否则返回?

       1日前的主力AND0

       主力

       清仓,主力,无效数),画蓝色,线宽为2

       如果主力 ,返回?,否则返回?

       1日前的主力AND主力

       0,主力,无效数),COLORFF00FF,线宽为2

       当满足条件主力 时,在?位置画?号图标

       1日前的主力AND主力

       0,主力,15)

       准备起爆赋值:主力上穿散户

       当满足条件准备起爆时,在10和-10位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR009999

       当满足条件准备起爆时,在10和-10位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00BBBB

       当满足条件准备起爆时,在10和-10位置之间画柱状线,宽度为1.3,0不为0则画空心柱.,COLOR00DDDD

       当满足条件准备起爆时,在10和-10位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLOR00FFFF

       小心阴跌一赋值:散户上穿主力

       当满足条件小心阴跌一时,在10和-10位置之间画柱状线,宽度为4,0不为0则画空心柱.,画蓝色

       当满足条件(T1ORT2)时,在0位置画1号图标

       当满足条件(T3ORT4)时,在0位置书写文字,COLOR00FF00

       当满足条件准备起爆时,在5位置书写文字,COLOR0000FF

       VAR1赋值:收盘价的9日指数移动平均的9日指数移动平均

       控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000

       当满足条件控盘 0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为4,画蓝色

       A10赋值:控盘上穿0

       输出无庄控盘:如果控盘 0,返回控盘,否则返回0,线宽为0,画蓝色

       输出开始控盘:如果A10,返回5,否则返回0,线宽为2,画黄色

       当满足条件控盘 1日前的控盘AND控盘 0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为4,画红色

       输出有庄控盘:如果控盘 1日前的控盘AND控盘 0,返回控盘,否则返回0,线宽为0,画红色

       VAR2赋值:100*以收盘价*0.95计算的获利盘比例

       当满足条件VAR2 50ANDCOST(85) CLOSEAND控盘 0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为4,COLORFF00FF

       输出高度控盘:如果VAR2 50ANDCOST(85) CLOSEAND控盘 0,返回控盘,否则返回0,线宽为0,COLORFF00FF

       当满足条件控盘 1日前的控盘AND控盘 0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为4,COLOR00FF00

       输出主力出货:如果控盘 1日前的控盘AND控盘 0,返回控盘,否则返回0,线宽为0,COLOR00FF00


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 通达信主力筹码源码 加入收藏