通达信千里波涛15线谱主图+江河横溢资金盈亏副图源码
1. 千里波涛(15线谱主图)：并非原创，原理就是简单的EMA均线向上或向下线性延伸（很简单粗暴，适合初学者），之所以采用了和寥廓江天主图类似的配色，是因为二者用法也是类似的：用线概括某些价格轮廓和趋势特征。周期参数PR可以调整均线谱的平滑度。
2. 江河横溢(资金盈亏副图)：渐变色优化旧作2合1。当CM=1时使用传统的成交量柱状图；当CM=2时使用资金盈亏柱状图，原理是对价格重心涨跌幅作指数级降权，然后直接乘以成交量，就可以作为资金进出的一个参考指标了，可用于选股。
{千里波涛主图源码如下}
{DEF-CA}
TM:=2;
PR:=2;
TYP:=(C+H+L)/3;
VWP:=0.01*AMO/V;
TVR:=0.01*TYP/VWP;
CASK:=IF(BETWEEN(TVR,0,0.05),1,0);
VPTP:=IF(BETWEEN(TVR,0,0.05)=1,VWP,IF(BETWEEN(TVR,0.95,1.05)=1,VWP*100,TYP));
{DEF-DMAP}
DMA0:=DMA(TYP,0.2*POW(0.5,PR));
DMN1:=DMA0*0.95;
DMN2:=DMA0*0.90;
DMN3:=DMA0*0.85;
DMN4:=DMA0*0.80;
DMN5:=DMA0*0.75;
DMN6:=DMA0*0.70;
DMN7:=DMA0*0.65;
DMP1:=DMA0*1.05;
DMP2:=DMA0*1.10;
DMP3:=DMA0*1.15;
DMP4:=DMA0*1.20;
DMP5:=DMA0*1.25;
DMP6:=DMA0*1.30;
DMP7:=DMA0*1.35;
{OP-BK}
BKR:=IF(TM=1,254,12);
BKG:=IF(TM=1,255,24);
BKB:=IF(TM=1,255,36);
DRAWGBK(TM>0,RGB(BKR,BKG,BKB),RGB(BKR,BKG,BKB),0,0,0);
{OP-TX}
TMTX:=IF(TM=1,'【浅色模式】','【深色模式】');
PRTX:=STRCAT('15线谱(',STRCAT(CON2STR(PR,0),'X周期)'));
TTTX:=STRCAT(TMTX,PRTX);
DRAWTEXT_FIX(TM=1,0,0,0,TTTX),COLORC0A8A0;
DRAWTEXT_FIX(TM=2,0,0,0,TTTX),COLOR785028;
{OP-DM1}
NOTEXTM1P1:IF(TM=1,DMP1,DRAWNULL),COLORF1F1E3;
NOTEXTM1P3:IF(TM=1,DMP3,DRAWNULL),COLORF1F1E3;
NOTEXTM1P5:IF(TM=1,DMP5,DRAWNULL),COLORF1F1E3;
NOTEXTM1P7:IF(TM=1,DMP7,DRAWNULL),COLORF1F1E3;
NOTEXTM1N1:IF(TM=1,DMN1,DRAWNULL),COLORF8E3F8;
NOTEXTM1N3:IF(TM=1,DMN3,DRAWNULL),COLORF8E3F8;
NOTEXTM1N5:IF(TM=1,DMN5,DRAWNULL),COLORF8E3F8;
NOTEXTM1N7:IF(TM=1,DMN7,DRAWNULL),COLORF8E3F8;
NOTEXTM2P1:IF(TM=2,DMP1,DRAWNULL),COLOR32270B;
NOTEXTM2P3:IF(TM=2,DMP3,DRAWNULL),COLOR32270B;
NOTEXTM2P5:IF(TM=2,DMP5,DRAWNULL),COLOR32270B;
NOTEXTM2P7:IF(TM=2,DMP7,DRAWNULL),COLOR32270B;
NOTEXTM2N1:IF(TM=2,DMN1,DRAWNULL),COLOR3B1525;
NOTEXTM2N3:IF(TM=2,DMN3,DRAWNULL),COLOR3B1525;
NOTEXTM2N5:IF(TM=2,DMN5,DRAWNULL),COLOR3B1525;
NOTEXTM2N7:IF(TM=2,DMN7,DRAWNULL),COLOR3B1525;
{OP-KL1}
HZF:=100*(H/REF(C,1)-1);
DP1:=IF(CASK=1 AND HZF>=5,1,0);
DP2:=IF(CASK=0 AND HOD(HZF,240)<=60,1,0);
DPX:=SGN(DP1+DP2);
KXN:=IF(C>O OR (C=O AND C>=REF(C,1)),1,0);
STICKLINE(TM=1 AND KXN=0,H,L,0,0),COLORC0C0A0;
STICKLINE(TM=1 AND KXN=1,H,L,0,1),COLORC0A0C0;
STICKLINE(TM=1 AND KXN=0,C,O,2,0),COLORC0C0A0;
STICKLINE(TM=1 AND KXN=1,C,O,2,1),COLORC0A0C0;
STICKLINE(TM=2 AND KXN=0,H,L,0,0),COLOR604E3C;
STICKLINE(TM=2 AND KXN=1,H,L,0,1),COLOR805068;
STICKLINE(TM=2 AND KXN=0,C,O,2,0),COLOR604E3C;
STICKLINE(TM=2 AND KXN=1,C,O,2,1),COLOR805068;
{OP-DM2}
NOTEXTM1P2:IF(TM=1,DMP2,DRAWNULL),COLORD5D5AA;
NOTEXTM1P6:IF(TM=1,DMP6,DRAWNULL),COLORD5D5AA;
NOTEXTM1N2:IF(TM=1,DMN2,DRAWNULL),COLOREAAAEA;
NOTEXTM1N6:IF(TM=1,DMN6,DRAWNULL),COLOREAAAEA;
NOTEXTM2P2:IF(TM=2,DMP2,DRAWNULL),COLOR4D4508;
NOTEXTM2P6:IF(TM=2,DMP6,DRAWNULL),COLOR4D4508;
NOTEXTM2N2:IF(TM=2,DMN2,DRAWNULL),COLOR681058;
NOTEXTM2N6:IF(TM=2,DMN6,DRAWNULL),COLOR681058;
{OP-KL2}
STICKLINE(TM=1 AND KXN=0 AND DPX=1,H,L,0,0),COLOR309000;
STICKLINE(TM=1 AND KXN=1 AND DPX=1,H,L,0,1),COLOR4000C0;
STICKLINE(TM=1 AND KXN=0 AND DPX=1,C,O,2,0),COLOR309000;
STICKLINE(TM=1 AND KXN=1 AND DPX=1,C,O,2,1),COLOR4000C0;
STICKLINE(TM=2 AND KXN=0 AND DPX=1,H,L,0,0),COLOR30C000;
STICKLINE(TM=2 AND KXN=1 AND DPX=1,H,L,0,1),COLOR4000FF;
STICKLINE(TM=2 AND KXN=0 AND DPX=1,C,O,2,0),COLOR30C000;
STICKLINE(TM=2 AND KXN=1 AND DPX=1,C,O,2,1),COLOR4000FF;
{OP-DM3}
NOTEXTM1P4:IF(TM=1,DMP4,DRAWNULL),COLOR808000;
NOTEXTM1N4:IF(TM=1,DMN4,DRAWNULL),COLORC000C0;
NOTEXTM2P4:IF(TM=2,DMP4,DRAWNULL),COLORA0A000;
NOTEXTM2N4:IF(TM=2,DMN4,DRAWNULL),COLORF000F0;
{OP-DMA}
NOTEXTM1A0:IF(TM=1,DMA0,DRAWNULL),COLORFF0000;
NOTEXTM2A0:IF(TM=2,DMA0,DRAWNULL),COLORFFAA55;
{江河横溢副图源码如下}
{DEF-VL}
TM:=2;
CM:=2;
TYP:=(C+H+L)/3;
PWV:=V*POW(0.1,4);
PWA:=AMO*POW(0.1,8);
PTV:=(SQRT(TYP/REF(TYP,1))-1)*V;
STK:=IF(CM=1,PWV,PTV);
ATK:=ABS(STK);
{OP-BK}
HTK:=HHV(ATK,240);
LTK:=IF(CM=1,0,-HTK);
BKR:=IF(TM=1,254,12);
BKG:=IF(TM=1,255,24);
BKB:=IF(TM=1,255,36);
DRAWBAND(HTK,RGB(BKR,BKG,BKB),LTK,RGB(BKR,BKG,BKB));
DRAWGBK(TM>0,RGB(BKR,BKG,BKB),RGB(BKR,BKG,BKB),0,0,0);
{OP-TX}
TMTX:=IF(TM=1,'【浅色模式】','【深色模式】');
CMTX:=IF(CM=1,'成交量','量价盈亏');
TTTX:=STRCAT(TMTX,CMTX);
DRAWTEXT_FIX(TM=1,0,0,0,TTTX),COLORC0A8A0;
DRAWTEXT_FIX(TM=2,0,0,0,TTTX),COLOR785028;
总量_万手:PWV,NODRAW,COLOR00A0F0;
总额_亿元:PWA,NODRAW,COLOR00A0F0;
盈亏系数:100*PTV/HHV(V,240),NODRAW,COLORFF6699;
{OP-SK}
HK1:=IF(HOD(ATK,240)<=15,1,0);
HK2:=IF(HOD(ATK,240)<=30,1,0);
HK3:=IF(HOD(ATK,240)<=60,1,0);
STN:=IF(CM=1,IF(C>O OR (C=O AND C>=REF(C,1)),1,0),IF(STK>0,1,0));
STICKLINE(TM=1 AND STN=0,0,STK,2,0),COLORE4F0D8;
STICKLINE(TM=1 AND STN=0 AND HK3=1,0,STK,2,0),COLORCEE5C0;
STICKLINE(TM=1 AND STN=0 AND HK2=1,0,STK,2,0),COLORA4D090;
STICKLINE(TM=1 AND STN=0 AND HK1=1,0,STK,2,0),COLOR249000;
STICKLINE(TM=1 AND STN=1,0,STK,2,2-CM),COLORE8DCF4;
STICKLINE(TM=1 AND STN=1 AND HK3=1,0,STK,2,2-CM),COLORD4C4F1;
STICKLINE(TM=1 AND STN=1 AND HK2=1,0,STK,2,2-CM),COLORAD93EB;
STICKLINE(TM=1 AND STN=1 AND HK1=1,0,STK,2,2-CM),COLOR3600D8;
STICKLINE(TM=2 AND STN=0,0,STK,2,0),COLOR303018;
STICKLINE(TM=2 AND STN=0 AND HK3=1,0,STK,2,0),COLOR343D15;
STICKLINE(TM=2 AND STN=0 AND HK2=1,0,STK,2,0),COLOR3C5910;
STICKLINE(TM=2 AND STN=0 AND HK1=1,0,STK,2,0),COLOR55AA00;
STICKLINE(TM=2 AND STN=1,0,STK,2,2-CM),COLOR482448;
STICKLINE(TM=2 AND STN=1 AND HK3=1,0,STK,2,2-CM),COLOR4E205C;
STICKLINE(TM=2 AND STN=1 AND HK2=1,0,STK,2,2-CM),COLOR5B1885;
STICKLINE(TM=2 AND STN=1 AND HK1=1,0,STK,2,2-CM),COLOR8000FF;
来函数检测结果如下：
该公式没有未来函数
定制、编写公式指标请联系QQ或微信同号：88652583
置顶指标
相关指标公式
TM赋值:2
PR赋值:2
TYP赋值:(收盘价+最高价+最低价)/3
VWP赋值:0.01*成交额(元)/成交量(手)
TVR赋值:0.01*TYP/VWP
CASK赋值:如果TVR位于0和0.05之间,返回1,否则返回0
VPTP赋值:如果TVR位于0和0.05之间=1,返回VWP,否则返回如果TVR位于0.95和1.05之间=1,返回VWP*100,否则返回TYP
DMA0赋值:以0.2*0.5的PR乘幂为权重TYP的动态移动平均
DMN1赋值:DMA0*0.95
DMN2赋值:DMA0*0.90
DMN3赋值:DMA0*0.85
DMN4赋值:DMA0*0.80
DMN5赋值:DMA0*0.75
DMN6赋值:DMA0*0.70
DMN7赋值:DMA0*0.65
DMP1赋值:DMA0*1.05
DMP2赋值:DMA0*1.10
DMP3赋值:DMA0*1.15
DMP4赋值:DMA0*1.20
DMP5赋值:DMA0*1.25
DMP6赋值:DMA0*1.30
DMP7赋值:DMA0*1.35
BKR赋值:如果TM=1,返回254,否则返回12
BKG赋值:如果TM=1,返回255,否则返回24
BKB赋值:如果TM=1,返回255,否则返回36
填充背景
TMTX赋值:如果TM=1,返回'【浅色模式】',否则返回'【深色模式】'
PRTX赋值:字符串相加
TTTX赋值:字符串相加
当满足条件TM=1时,在横轴0纵轴0位置书写文字,COLORC0A8A0
当满足条件TM=2时,在横轴0纵轴0位置书写文字,COLOR785028
输出NOTEXTM1P1:如果TM=1,返回DMP1,否则返回无效数,COLORF1F1E3
输出NOTEXTM1P3:如果TM=1,返回DMP3,否则返回无效数,COLORF1F1E3
输出NOTEXTM1P5:如果TM=1,返回DMP5,否则返回无效数,COLORF1F1E3
输出NOTEXTM1P7:如果TM=1,返回DMP7,否则返回无效数,COLORF1F1E3
输出NOTEXTM1N1:如果TM=1,返回DMN1,否则返回无效数,COLORF8E3F8
输出NOTEXTM1N3:如果TM=1,返回DMN3,否则返回无效数,COLORF8E3F8
输出NOTEXTM1N5:如果TM=1,返回DMN5,否则返回无效数,COLORF8E3F8
输出NOTEXTM1N7:如果TM=1,返回DMN7,否则返回无效数,COLORF8E3F8
输出NOTEXTM2P1:如果TM=2,返回DMP1,否则返回无效数,COLOR32270B
输出NOTEXTM2P3:如果TM=2,返回DMP3,否则返回无效数,COLOR32270B
输出NOTEXTM2P5:如果TM=2,返回DMP5,否则返回无效数,COLOR32270B
输出NOTEXTM2P7:如果TM=2,返回DMP7,否则返回无效数,COLOR32270B
输出NOTEXTM2N1:如果TM=2,返回DMN1,否则返回无效数,COLOR3B1525
输出NOTEXTM2N3:如果TM=2,返回DMN3,否则返回无效数,COLOR3B1525
输出NOTEXTM2N5:如果TM=2,返回DMN5,否则返回无效数,COLOR3B1525
输出NOTEXTM2N7:如果TM=2,返回DMN7,否则返回无效数,COLOR3B1525
HZF赋值:100*(最高价/1日前的收盘价-1)
DP1赋值:如果CASK=1ANDHZF>=5,返回1,否则返回0
DP2赋值:如果CASK=0ANDHOD(HZF,240)<=60,返回1,否则返回0
DPX赋值:求符号值
KXN赋值:如果收盘价>OOR(收盘价=OANDC>=1日前的收盘价),返回1,否则返回0
当满足条件TM=1ANDKXN=0时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORC0C0A0
当满足条件TM=1ANDKXN=1时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLORC0A0C0
当满足条件TM=1ANDKXN=0时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORC0C0A0
当满足条件TM=1ANDKXN=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,COLORC0A0C0
当满足条件TM=2ANDKXN=0时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR604E3C
当满足条件TM=2ANDKXN=1时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR805068
当满足条件TM=2ANDKXN=0时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR604E3C
当满足条件TM=2ANDKXN=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,COLOR805068
输出NOTEXTM1P2:如果TM=1,返回DMP2,否则返回无效数,COLORD5D5AA
输出NOTEXTM1P6:如果TM=1,返回DMP6,否则返回无效数,COLORD5D5AA
输出NOTEXTM1N2:如果TM=1,返回DMN2,否则返回无效数,COLOREAAAEA
输出NOTEXTM1N6:如果TM=1,返回DMN6,否则返回无效数,COLOREAAAEA
输出NOTEXTM2P2:如果TM=2,返回DMP2,否则返回无效数,COLOR4D4508
输出NOTEXTM2P6:如果TM=2,返回DMP6,否则返回无效数,COLOR4D4508
输出NOTEXTM2N2:如果TM=2,返回DMN2,否则返回无效数,COLOR681058
输出NOTEXTM2N6:如果TM=2,返回DMN6,否则返回无效数,COLOR681058
当满足条件TM=1ANDKXN=0ANDDPX=1时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR309000
当满足条件TM=1ANDKXN=1ANDDPX=1时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR4000C0
当满足条件TM=1ANDKXN=0ANDDPX=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR309000
当满足条件TM=1ANDKXN=1ANDDPX=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,COLOR4000C0
当满足条件TM=2ANDKXN=0ANDDPX=1时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR30C000
当满足条件TM=2ANDKXN=1ANDDPX=1时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR4000FF
当满足条件TM=2ANDKXN=0ANDDPX=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR30C000
当满足条件TM=2ANDKXN=1ANDDPX=1时,在收盘价和开盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,COLOR4000FF
输出NOTEXTM1P4:如果TM=1,返回DMP4,否则返回无效数,COLOR808000
输出NOTEXTM1N4:如果TM=1,返回DMN4,否则返回无效数,COLORC000C0
输出NOTEXTM2P4:如果TM=2,返回DMP4,否则返回无效数,COLORA0A000
输出NOTEXTM2N4:如果TM=2,返回DMN4,否则返回无效数,COLORF000F0
输出NOTEXTM1A0:如果TM=1,返回DMA0,否则返回无效数,COLORFF0000
输出NOTEXTM2A0:如果TM=2,返回DMA0,否则返回无效数,COLORFFAA55
TM赋值:2
CM赋值:2
TYP赋值:(收盘价+最高价+最低价)/3
PWV赋值:成交量(手)*0.1的4乘幂
PWA赋值:成交额(元)*0.1的8乘幂
PTV赋值:(TYP/1日前的TYP的开方-1)*成交量(手)
STK赋值:如果CM=1,返回PWV,否则返回PTV
ATK赋值:STK的绝对值
HTK赋值:240日内ATK的最高值
LTK赋值:如果CM=1,返回0,否则返回-HTK
BKR赋值:如果TM=1,返回254,否则返回12
BKG赋值:如果TM=1,返回255,否则返回24
BKB赋值:如果TM=1,返回255,否则返回36
画带状线
填充背景
TMTX赋值:如果TM=1,返回'【浅色模式】',否则返回'【深色模式】'
CMTX赋值:如果CM=1,返回'成交量',否则返回'量价盈亏'
TTTX赋值:字符串相加
当满足条件TM=1时,在横轴0纵轴0位置书写文字,COLORC0A8A0
当满足条件TM=2时,在横轴0纵轴0位置书写文字,COLOR785028
输出总量_万手:PWV,NODRAW,COLOR00A0F0
输出总额_亿元:PWA,NODRAW,COLOR00A0F0
输出盈亏系数:100*PTV/240日内成交量(手)的最高值,NODRAW,COLORFF6699
HK1赋值:如果240日内ATK的高值名次<=15,返回1,否则返回0
HK2赋值:如果240日内ATK的高值名次<=30,返回1,否则返回0
HK3赋值:如果240日内ATK的高值名次<=60,返回1,否则返回0
STN赋值:如果CM=1,返回如果收盘价>OOR(收盘价=OANDC>=1日前的收盘价),返回1,否则返回0,否则返回如果STK>0,返回1,否则返回0
当满足条件TM=1ANDSTN=0时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORE4F0D8
当满足条件TM=1ANDSTN=0ANDHK3=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORCEE5C0
当满足条件TM=1ANDSTN=0ANDHK2=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORA4D090
当满足条件TM=1ANDSTN=0ANDHK1=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR249000
当满足条件TM=1ANDSTN=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLORE8DCF4
当满足条件TM=1ANDSTN=1ANDHK3=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLORD4C4F1
当满足条件TM=1ANDSTN=1ANDHK2=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLORAD93EB
当满足条件TM=1ANDSTN=1ANDHK1=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLOR3600D8
当满足条件TM=2ANDSTN=0时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR303018
当满足条件TM=2ANDSTN=0ANDHK3=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR343D15
当满足条件TM=2ANDSTN=0ANDHK2=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR3C5910
当满足条件TM=2ANDSTN=0ANDHK1=1时,在0和STK位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR55AA00
当满足条件TM=2ANDSTN=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLOR482448
当满足条件TM=2ANDSTN=1ANDHK3=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLOR4E205C
当满足条件TM=2ANDSTN=1ANDHK2=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLOR5B1885
当满足条件TM=2ANDSTN=1ANDHK1=1时,在0和STK位置之间画柱状线,宽度为2,2-CM不为0则画空心柱.,COLOR8000FF
