这是一个不但能在K线图的付图上显示各个周期的技术参数,如果你把它放在分时技术指标里,那么它还能在分时付图上显示各个不同周期的技术参数,是不是很方便呀?
源代码:
DRAWRECTABS(2,19,935,168,RGB(100,50,50)),COLORFFFFFF;

DRAWTEXTABS(15,3,'沙吾提制作'),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(250,0,'不 同 周 期 技 术 参 数'),COLOR0000FF,LINETHICK3;
DRAWTEXTABS(500,0,''+STKNAME+'('+STKLABEL+')'),COLORFF9933,LINETHICK3; {股票名称、代码}

DRAWTEXTABS(10,25,'数据分类'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(10,45,'月 线 图'),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(10,65,'周 线 图'),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(10,85,'日 线 图'),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(10,105,'60分钟图'),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(10,125,'30分钟图'),COLORFF0033,LINETHICK2;
DRAWTEXTABS(10,145,'15分钟图'),COLORFFCC00,LINETHICK2;

月MA5:="MA.MA1#MONTH";
月MA10:="MA.MA2#MONTH";
月MA20:="MA.MA3#MONTH";
月MA30:="MA.MA4#MONTH";
月MA60:="MA.MA5#MONTH";
月MA120:="MA.MA6#MONTH";

周MA5:= "MA.MA1#WEEK";
周MA10:= "MA.MA2#WEEK";
周MA20:= "MA.MA3#WEEK";
周MA30:= "MA.MA4#WEEK";
周MA60:= "MA.MA5#WEEK";
周MA120:= "MA.MA6#WEEK";

MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA30:=MA(C,30);
MA60:=MA(C,60);
MA120:=MA(C,120);

FZ605:="MA.MA1#MIN60";
FZ6010:="MA.MA2#MIN60";
FZ6020:="MA.MA3#MIN60";
FZ6030:="MA.MA4#MIN60";
FZ6060:="MA.MA5#MIN60";
FZ60120:="MA.MA6#MIN60";

FZ305:="MA.MA1#MIN30";
FZ3010:="MA.MA2#MIN30";
FZ3020:="MA.MA3#MIN30";
FZ3030:="MA.MA4#MIN30";
FZ3060:="MA.MA5#MIN30";
FZ30120:="MA.MA6#MIN30";

FZ155:="MA.MA1#MIN15";
FZ1510:="MA.MA2#MIN15";
FZ1520:="MA.MA3#MIN15";
FZ1530:="MA.MA4#MIN15";
FZ1560:="MA.MA5#MIN15";
FZ15120:="MA.MA6#MIN15";

DRAWTEXTABS(105,25,' MA5'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(100,45,STRRIGHT(' '+NUMTOSTRN(月MA5,3),6)),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(100,65,STRRIGHT(' '+NUMTOSTRN(周MA5,3),6)),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(100,85,STRRIGHT(' '+NUMTOSTRN(MA5,3),6)),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(100,105,STRRIGHT(' '+NUMTOSTRN(FZ605,3),6)),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(100,125,STRRIGHT(' '+NUMTOSTRN(FZ305,3),6)),COLORFF0033,LINETHICK2;
DRAWTEXTABS(100,145,STRRIGHT(' '+NUMTOSTRN(FZ155,3),6)),COLORFFCC00,LINETHICK2;

DRAWTEXTABS(170,25,' MA10'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(170,45,STRRIGHT(' '+NUMTOSTRN(月MA10,3),6)),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(170,65,STRRIGHT(' '+NUMTOSTRN(周MA10,3),6)),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(170,85,STRRIGHT(' '+NUMTOSTRN(MA10,3),6)),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(170,105,STRRIGHT(' '+NUMTOSTRN(FZ6010,3),6)),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(170,125,STRRIGHT(' '+NUMTOSTRN(FZ3010,3),6)),COLORFF0033,LINETHICK2;
DRAWTEXTABS(170,145,STRRIGHT(' '+NUMTOSTRN(FZ1510,3),6)),COLORFFCC00,LINETHICK2;

DRAWTEXTABS(240,25,' MA20'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(240,45,STRRIGHT(' '+NUMTOSTRN(月MA20,3),6)),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(240,65,STRRIGHT(' '+NUMTOSTRN(周MA20,3),6)),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(240,85,STRRIGHT(' '+NUMTOSTRN(MA20,3),6)),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(240,105,STRRIGHT(' '+NUMTOSTRN(FZ6020,3),6)),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(240,125,STRRIGHT(' '+NUMTOSTRN(FZ3020,3),6)),COLORFF0033,LINETHICK2;
DRAWTEXTABS(240,145,STRRIGHT(' '+NUMTOSTRN(FZ1520,3),6)),COLORFFCC00,LINETHICK2;

DRAWTEXTABS(310,25,' MA30'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(310,45,STRRIGHT(' '+NUMTOSTRN(月MA30,3),6)),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(310,65,STRRIGHT(' '+NUMTOSTRN(周MA30,3),6)),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(310,85,STRRIGHT(' '+NUMTOSTRN(MA30,3),6)),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(310,105,STRRIGHT(' '+NUMTOSTRN(FZ6030,3),6)),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(310,125,STRRIGHT(' '+NUMTOSTRN(FZ3030,3),6)),COLORFF0033,LINETHICK2;
DRAWTEXTABS(310,145,STRRIGHT(' '+NUMTOSTRN(FZ1530,3),6)),COLORFFCC00,LINETHICK2;

DRAWTEXTABS(380,25,' MA60'),COLOR0066FF,LINETHICK2;
DRAWTEXTABS(380,45,STRRIGHT(' '+NUMTOSTRN(月MA60,3),6)),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(380,65,STRRIGHT(' '+NUMTOSTRN(周MA60,3),6)),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(380,85,STRRIGHT(' '+NUMTOSTRN(MA60,3),6)),COLORFF00FF,LINETHICK2;
DRAWTEXTABS(380,105,STRRIGHT(' '+NUMTOSTRN(FZ6060,3),6)),COLOR39FF00,LINETHICK2;
DRAWTEXTABS(380,125,STRRIGHT(' '+NUMTOSTRN(FZ3060,3),6)),COLORFF0033,LINETHICK2;
DRAWTEXTABS(380,145,STRRIGHT(' '+NUMTOSTRN(FZ1560,3),6)),COLORFFCC00,LINETHICK2;