就是个股K线图上叠加大盘K线,刚写好还热乎 
{大盘个股K线-通达信版-创幻论坛-舍得快乐}{N(50,9999,100)} 
{通达信对应大盘K线-BY 舍得快乐} 
{自填参数: 
M(50,9999,100),P1(0,300,5),P2(0,300,10),P3(0,300,60),N(0,3,0);}; 
{用法:请在A股下使用,指数和其它品种不显示数据。中小、创业、沪、深大盘分显,采取飞狐的源码取3组可调均线可调显示根数(N),默认N为0不显示可调均线} 
创业板:=INBLOCK('创业板'),NODRAW; 
中小企业:=INBLOCK('中小企业'),NODRAW; 
上证A股:=INBLOCK('上证A股'),NODRAW; 
深证A股:=INBLOCK('深证A股'),NODRAW; 
开A:=IF(中小企业=1,"399101$O",IF(创业板=1,"399102$O",IF(上证A股=1,"999999$O",IF(深证A股=1,"399001$O",0)))),NODRAW; 
高A:=IF(中小企业=1,"399101$H",IF(创业板=1,"399102$H",IF(上证A股=1,"999999$H",IF(深证A股=1,"399001$H",0)))),NODRAW; 
低A:=IF(中小企业=1,"399101$L",IF(创业板=1,"399102$L",IF(上证A股=1,"999999$L",IF(深证A股=1,"399001$L",0)))),NODRAW; 
收A:=IF(中小企业=1,"399101$C",IF(创业板=1,"399102$C",IF(上证A股=1,"999999$C",IF(深证A股=1,"399001$C",0)))),NODRAW; 
DPJX:=(开A+高A+低A+收A)/4;{大盘均价}  JX:=(O+H+L+C)/4;{个股均价} 
BL:=DPJX/REF(DPJX,BARSCOUNT(C))/(JX/REF(JX,BARSCOUNT(C)));{大盘个股比例} 
{模拟大盘数据} 
开:BL*O,NODRAW; 
高:BL*H,NODRAW; 
低:BL*L,NODRAW; 
收:BL*C,NODRAW; 
{画背景图}{调节参数N确定背景高度} 
DRAWBAND(CONST(HHV(MAX(高,H),M)),RGB(100,100,100),CONST(LLV(MIN(低,L),M)),RGB(50,50,50)); 
DRAWTEXT(CURRBARSCOUNT=100,CONST(LLV(MIN(低,L),M))*1.03,'创幻论坛の舍得快乐'),COLORFFFFCC; 
{DRAWKLINE(高,开,低,收),COLORFF9B00;} 
{画大盘K线} 
STICKLINE(收>=开,高,低,0,0),COLORYELLOW; 
STICKLINE(收<开,高,低,0,0),COLORFF55BB; 
STICKLINE(收>=开,收,开,4,0),COLOR00AAFF; 
STICKLINE(收>=开,收,开,3.3,0),COLOR00BBFF; 
STICKLINE(收>=开,收,开,2.2,0),COLOR00CCFF; 
STICKLINE(收>=开,收,开,1.65,0),COLOR00DDFF; 
STICKLINE(收>=开,收,开,1.1,0),COLOR00EEFF; 
STICKLINE(收>=开,收,开,0.55,0),COLOR00FFFF; 
STICKLINE(收<开,收,开,4,0),COLORAA00BB; 
STICKLINE(收<开,收,开,3.3,0),COLORBB11BB; 
STICKLINE(收<开,收,开,2.2,0),COLORCC22BB; 
STICKLINE(收<开,收,开,1.65,0),COLORDD33BB; 
STICKLINE(收<开,收,开,1.1,0),COLOREE44BB; 
STICKLINE(收<开,收,开,0.55,0),COLORFF55BB; 
{画个股K线} 
STICKLINE(C>=O,L,H,0,0),COLORRED; 
STICKLINE(C<O,L,H,0,0),COLORFFFF00; 
STICKLINE(1,C,O,3,0),COLOR353500; 
STICKLINE(1,C,O,2.8,0),COLOR454500; 
STICKLINE(1,C,O,2,0),COLOR555500; 
STICKLINE(1,C,O,1.5,0),COLOR656500; 
STICKLINE(1,C,O,1,0),COLOR757500; 
STICKLINE(1,C,O,0.5,0),COLOR858500; 
STICKLINE(C>=O,C,O,3,0),COLOR000045; 
STICKLINE(C>=O,C,O,2.8,0),COLOR000065; 
STICKLINE(C>=O,C,O,2,0),COLOR000085; 
STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5; 
STICKLINE(C>=O,C,O,1,0),COLOR0000C5; 
STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5; 
个股命:MA(C,21),COLORRED,LINETHICK2; 
大盘命:MA(收,21),COLOR00FF80,LINETHICK2; 
{3组可调均线} 
WX:=MA(C,0); 
M1:MA(C,P1)*IF(N<1,WX,1); 
M2:MA(C,P2)*IF(N<2,WX,1); 
M3:MA(C,P3)*IF(N<3,WX,1); 
D1:MA(收,P1)*IF(N<1,WX,1); 
D2:MA(收,P2)*IF(N<2,WX,1); 
D3:MA(收,P3)*IF(N<3,WX,1); 
  
  
  
  
 
  |