筹码峰主图指标公式[大智慧公式]

相关标签:主力筹码指标公式源码 、 筹码大底指标源码 、 庄家筹码指标公式源码 、 控盘筹码公式指标源码 、 筹码峰主图指标公式 、 筹码突破主图指标公式 、 筹码平铺主图指标公式 、 主力主图指标公式源码 、 macd主图指标源码公式 、 筹码分布主图指标公式 、 筹码峰值主图指标公式 、 现货支撑压力指标源码 、 麦克支撑压力指标源码 、 支撑压力买卖指标源码 、

原理解析：
DRAWGBKLAST(收盘价, STRIP(自定色 ,自定色,1)) W赋值:上次DISPSTATUS=1距今天数 显示天数赋值:6 开始赋值:430%之字转向的前1个波谷位置 显示条件赋值:若数据位置状态=2则将最近如果显示天数=0,返回开始+1,否则返回显示天数周期置为1 输出DRAWTEXTABS(5,45,'■目前可见K线:'+NUMTOSTRN(W+1,0)+'天'),COLOR006600 输出DRAWTEXTABS(2,1, '【所属板块】: '+BKNAME),COLOR006600 输出输出输出DRAWTEXTABS(2,14,'【报 告 期】: '+FINANCE2(1)+' 【每股收益】: '+NUMTOSTRN(FINANCE2(3),2)+'元'+' 【市盈率】:'+NUMTOSTRN(市盈(动),1)+'倍 '),COLOR006600 输出输出DRAWTEXTABS(2,28,'【流通 A股】: '+NUMTOSTRN(FINANCE2(37)/10000,2)+'亿'+' 【总 股 本】: '+NUMTOSTRN(FINANCE2(35)/10000,2)+'亿 '+'【市值】 '+NUMTOSTRN(笔涨跌/100000000,2)+'亿'),COLOR006600 SVAR0赋值:FINANCE2(37) / 1000000 * 100 输出输出DRAWTEXTABS(5,65, STKLABEL+' '+品种名称+' 现价:'+收盘价+' 涨幅:'+NUMTOSTRN((收盘价-1日前的收盘价)/1日前的收盘价*100,2)),COLOR555555,线宽为2 输出现价: 如果开盘价=0,返回收盘价,否则返回现价,COLOR555555,POINTDOT 赋值:"那时的阿P@FMLCREATE" 赋值:"那时的阿P@VHL" 赋值:"那时的阿P@VHK" 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0,4 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0,6 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0,8 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0,9 ) 赋值: "那时的阿P@FMLPARAMREAD" ( 0,0,0, 10 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0, 11 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0, 12 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0, 13 ) 赋值:"那时的阿P@FMLPARAMREAD" ( 0,0,0, 15 ) 赋值:"那时的阿P@FMLPARAMREAD"( 0,0,0, 16 ) 赋值: "那时的阿P@FMLPARAMREAD" ( 0,0,0, 17 ) 赋值: "那时的阿P@FMLPARAMREAD" ( 0,0,0, 18 ) MM赋值:如果HL=1,返回BX,否则返回AX MM1赋值:如果HL=1,返回BX1,否则返回AX1 下跌趋势1赋值:HL=0 ANDC<1日前的最高价 OR (收盘价>1日前的最高价 AND 收盘价<AXX1) 上升趋势1赋值:HL=1 ANDC>1日前的最低价 OR (收盘价<1日前的最低价 AND 收盘价>BXX1) 下跌趋势2赋值:KK=0 上升趋势2赋值:KK=1 上升趋势赋值:上升趋势1 OR 上升趋势2 下跌趋势赋值:下跌趋势1 OR 下跌趋势2 当满足条件显示条件AND下跌趋势时,在AXX1和AXX1+AXX1*0.00001位置之间画柱状线,宽度为30,1不为0则画空心柱.,COLORFF8800,线宽为1, DOTLINE,LAYER2 当满足条件显示条件AND上升趋势时,在BXX1和BXX1-BXX1*0.00001位置之间画柱状线,宽度为30,1不为0则画空心柱.,COLORFF00FF,线宽为1, DOTLINE,LAYER2 输出转折:(MM+MM1)/2,COLOR00AAAA,线宽为0 PARTLINE(转折,收盘价>=转折,自定色,收盘价<转折,自定色),LAYER0 N赋值:100 V0赋值:"XWUS@CMBL"(N,5) V1赋值:"XWUS@CMBL"(N,10) V2赋值:"XWUS@CMBL"(N,15) V3赋值:"XWUS@CMBL"(N,20) V4赋值:"XWUS@CMBL"(N,25) V5赋值:"XWUS@CMBL"(N,30) V6赋值:"XWUS@CMBL"(N,35) V7赋值:"XWUS@CMBL"(N,40) V8赋值:"XWUS@CMBL"(N,45) V9赋值:"XWUS@CMBL"(N,50) POLYLINE(V0>0,V0),COLOR008364,LAYER7 POLYLINE(V1>0,V1),COLOR008364,LAYER7 POLYLINE(V2>0,V2),COLOR008364,LAYER7 POLYLINE(V3>0,V3),COLOR008364,LAYER7 POLYLINE(V4>0,V4),COLOR008364,LAYER7 POLYLINE(V5>0,V5),COLOR008364,LAYER7 POLYLINE(V6>0,V6),COLOR008364,LAYER7 POLYLINE(V7>0,V7),COLOR008364,LAYER7 POLYLINE(V8>0,V8),COLOR008364,LAYER7 POLYLINE(V9>0,V9),COLOR008364,LAYER7 当满足条件数据位置状态=2ANDV0>0ANDV1>0时,在(V0+V1)/2和(V0+V1)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV1>0ANDV2>0时,在(V1+V2)/2和(V1+V2)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV2>0ANDV3>0时,在(V2+V3)/2和(V2+V3)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV3>0ANDV4>0时,在(V3+V4)/2和(V3+V4)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV4>0ANDV5>0时,在(V4+V5)/2和(V4+V5)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV5>0ANDV6>0时,在(V5+V6)/2和(V5+V6)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV6>0ANDV7>0时,在(V6+V7)/2和(V6+V7)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV7>0ANDV8>0时,在(V7+V8)/2和(V7+V8)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 当满足条件数据位置状态=2ANDV8>0ANDV9>0时,在(V8+V9)/2和(V8+V9)/2位置之间画柱状线,宽度为22,0不为0则画空心柱.,COLOR888888,LAYER4 CXH赋值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 输出WARNING('HTTP://WWW.CXH99.COM',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指标公式')

 来源:程序化99（ WWW.CXH99.COM ）

源码：

DRAWGBKlast(c, strip(RGB(0,20,0) ,RGB(00,40,0),1));W:=BARSLAST(DISPSTATUS=1);显示天数:=6;开始:=TROUGHBARS(4,30,1 );显示条件:=BACKSET(BARSTATUS=2 ,if(显示天数=0, 开始+1,显示天数));DRAWTEXTABS(5,45,'■目前可见K线:'+NUMTOSTRN(W+1,0)+'天'),COLOR006600;DRAWTEXTABS(2,1, '【所属板块】: '+BKNAME),Color006600;DRAWTEXTABS(2,14,'【报 告 期】: '+FINANCE2(1)+' 【每股收益】: '+NUMTOSTRN(FINANCE2(3),2)+'元'+' 【市盈率】:'+NUMTOSTRN(DYNAINFO(39),1)+'倍 '),COLOR006600;DRAWTEXTABS(2,28,'【流通 A股】: '+NUMTOSTRN(FINANCE2(37)/10000,2)+'亿'+' 【总 股 本】: '+NUMTOSTRN(FINANCE2(35)/10000,2)+'亿 '+'【市值】 '+NUMTOSTRN(DYNAINFO(57)/100000000,2)+'亿'),Color006600;SVAR0:=FINANCE2(37) / 1000000 * 100 ;DRAWTEXTABS(5,65, STKLABEL+' '+STKNAME+' 现价:'+C+' 涨幅:'+NUMTOSTRN((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100,2)),Color555555,LINETHICK2;现价: if (DYNAINFO(4)=0,C,DYNAINFO(7)),color555555,POINTDOT;{--------------------以下设置转折线---------------------------}Create :="那时的阿P@FmlCreate";HL :="那时的阿P@VHL";KK :="那时的阿P@VHK";ax :="那时的阿P@FmlParamRead" ( 0,0,0,4 ) ;bx :="那时的阿P@FmlParamRead" ( 0,0,0,6 ) ;ax1 :="那时的阿P@FmlParamRead" ( 0,0,0,8 ) ;bx1 :="那时的阿P@FmlParamRead" ( 0,0,0,9 ) ;axx1 := "那时的阿P@FmlParamRead" ( 0,0,0, 10 ) ;bxx1 :="那时的阿P@FmlParamRead" ( 0,0,0, 11 ) ;hh :="那时的阿P@FmlParamRead" ( 0,0,0, 12 ) ;ll :="那时的阿P@FmlParamRead" ( 0,0,0, 13 ) ;arh :="那时的阿P@FmlParamRead" ( 0,0,0, 15 ) ;arl :="那时的阿P@FmlParamRead"( 0,0,0, 16 ) ;axxx1 := "那时的阿P@FmlParamRead" ( 0,0,0, 17 ) ;bxxx1 := "那时的阿P@FmlParamRead" ( 0,0,0, 18 ) ;mm:=if(hl=1,bx,ax);mm1:=if(hl=1,bx1,ax1);下跌趋势1:=hl=0 andc<ref(h,1) or (c>ref(h,1) and C<axx1);上升趋势1:=hl=1 andc>ref(L,1) or (c<ref(L,1) and C>bxx1);下跌趋势2:=kk=0;上升趋势2:=kk=1;上升趋势:=上升趋势1 OR 上升趋势2;下跌趋势:=下跌趋势1 OR 下跌趋势2;stickline(显示条件 AND 下跌趋势,axx1,axx1+axx1*0.00001,30,1),colorFF8800,linethick1, DOTLINE,LAYER2;stickline(显示条件 AND 上升趋势,bxx1,bxx1-bxx1*0.00001,30,1),colorFF00ff,linethick1, DOTLINE,LAYER2;转折:(mm+mm1)/2,color00aaaa,linethick0;PARTLINE(转折,C>=转折,RGB(255,255,0),C<转折,RGB(0,0,255)),LAYER0;{--------------------以下设置筹码支撑压力---------------------------}N:=100;V0:="XWUS@CMBL"(n,5);V1:="XWUS@CMBL"(n,10);V2:="XWUS@CMBL"(n,15);V3:="XWUS@CMBL"(n,20);V4:="XWUS@CMBL"(n,25);V5:="XWUS@CMBL"(n,30);V6:="XWUS@CMBL"(n,35);V7:="XWUS@CMBL"(n,40);V8:="XWUS@CMBL"(n,45);V9:="XWUS@CMBL"(n,50);POLYLINE(V0>0,V0),Color008364,LAYER7{,color888888};POLYLINE(V1>0,V1),Color008364,LAYER7{,color888888};POLYLINE(V2>0,V2),Color008364,LAYER7{,color888888};POLYLINE(V3>0,V3),Color008364,LAYER7{,color888888};POLYLINE(V4>0,V4),Color008364,LAYER7{,color888888};POLYLINE(V5>0,V5),Color008364,LAYER7{,color888888};POLYLINE(V6>0,V6),Color008364,LAYER7{,color888888};POLYLINE(V7>0,V7),Color008364,LAYER7{,color888888};POLYLINE(V8>0,V8),Color008364,LAYER7{,color888888};POLYLINE(V9>0,V9),Color008364,LAYER7{,color888888};STICKLINE(BARSTATUS=2 AND V0>0 AND V1>0,(V0+V1)/2,(V0+V1)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V1>0 AND V2>0,(V1+V2)/2,(V1+V2)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V2>0 AND V3>0,(V2+V3)/2,(V2+V3)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V3>0 AND V4>0,(V3+V4)/2,(V3+V4)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V4>0 AND V5>0,(V4+V5)/2,(V4+V5)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V5>0 AND V6>0,(V5+V6)/2,(V5+V6)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V6>0 AND V7>0,(V6+V7)/2,(V6+V7)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V7>0 AND V8>0,(V7+V8)/2,(V7+V8)/2,22,0),color888888,LAYER4;STICKLINE(BARSTATUS=2 AND V8>0 AND V9>0,(V8+V9)/2,(V8+V9)/2,22,0),color888888,LAYER4;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指标公式');

 

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