现价与历史上的价格比较主图指标 (源码)

大智慧现价与历史上的价格比较主图指标公式股票软件源码如下:

DRAWGBKLAST(DATE>900101,STRIP(RGB(5,5,5),RGB(5,4,100),1));
现价: if (DYNAINFO(4)=0,C,DYNAINFO(7)),color0077FF,POINTDOT;
X:=BARSLAST(DISPSTATUS=1)+1;
DRAWTEXTABS(500,10,'★['+STKLABEL+']'+ STKNAME+':【可视:'+X+'天,】'),Color00FFFF,LINETHICK7,LAYER0;
MA5:MA(C,5),COLOR00FFFF,PRECIS2;
MA10:MA(C,10),PRECIS2;
MA20:MA(C,20),PRECIS2;
MA30:MA(C,30),PRECIS2;
MA60:MA(C,60),PRECIS2;
MA120:MA(C,120),PRECIS2,LINETHICK0;
partline(MA5,MA5>ref(MA5,1),rgb(255,0,0),MA5<ref(MA5,1),rgb(0,255,0)),LINETHICK2;
BBI:EMA((WMA(CLOSE,3)+WMA(CLOSE,6)+WMA(CLOSE,12)+WMA(CLOSE,24))/4,13),COLOR00FF00,LINETHICK0;;
partline(BBI,BBI>ref(BBI,1),rgb(255,0,0),BBI<ref(BBI,1),rgb(0,255,0)),LINETHICK2;
FILLRGN(MA5,BBI,(MA5>REF(MA5,1))-1,rgb(60,0,60),1,rgb(0,0,255) ),LINETHICK2,LAYER7;
{K线}
STICKLINE(CLOSE>OPEN,HIGH,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,HIGH,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR006600;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000566;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000499;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0003bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0002dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0001ff;
{www.gpxiazai.com 股票软件下载网_大智慧股票指标公式}
DRAWRECTABS(5,2 ,99 ,396 , rgb(0,60,0)),COLOR44FF00,LINETHICK2,LAYER0;;
DRAWRECTABS(100,2 ,420 ,396 , rgb(40,0,50)),COLOR0044FF,LINETHICK2,LAYER0;;
DRAWTEXTABS(20,15,'今日【C】 '+NUMTOSTRN((C),2)+'元。 '+NUMTOSTRN((h),2)+'元。'),COLOR44FF00,LINETHICK2,LAYER0;
DRAWTEXTABS(20,45,' 5日【C】 '+NUMTOSTRN((hhv(C,5)),2)+'元。 '+NUMTOSTRN((hhv(h,5)),2)+'元。 '),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,75,' 10日【C】 '+NUMTOSTRN((hhv(C,10)),2)+'元。 '+NUMTOSTRN((hhv(h,10)),2)+'元。 '),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,105,' 20日【C】 '+NUMTOSTRN((hhv(C,20)),2)+'元。 '+NUMTOSTRN((hhv(h,20)),2)+'元。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,135,' 30日【C】 '+NUMTOSTRN((hhv(C,30)),2)+'元。 '+NUMTOSTRN((hhv(h,30)),2)+'元。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,165,' 60日【C】 '+NUMTOSTRN((hhv(C,60)),2)+'元。 '+NUMTOSTRN((hhv(h,60)),2)+'元。 '),COLOR4477FF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,195,' 90日【C】 '+NUMTOSTRN((hhv(C,90)),2)+'元。 '+NUMTOSTRN((hhv(h,90)),2)+'元。'),COLOR00FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,225,' 120日【C】 '+NUMTOSTRN((hhv(C,120)),2)+'元 '+NUMTOSTRN((hhv(h,120)),2)+'元。 '),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,255,' 240日【C】 '+NUMTOSTRN((hhv(C,240)),2)+'元。 '+NUMTOSTRN((hhv(h,240)),2)+'元。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,285,' 480日【C】 '+NUMTOSTRN((hhv(C,480)),2)+'元。 '+NUMTOSTRN((hhv(h,480)),2)+'元。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,315,' 2400日【C】 '+NUMTOSTRN((hhv(C,2400)),2)+'元。 '+NUMTOSTRN((hhv(h,2400)),2)+'元。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(10,345,' 最高【C】 '+NUMTOSTRN((hhv(C,0)),2)+'元。 '+NUMTOSTRN((hhv(h,0)),2)+'元。'),COLOR00FF00,LINETHICK2,LAYER0;
DRAWTEXTABS(10,375,' '+X+'日【C】 '+NUMTOSTRN((hhv(C,X)),2)+'元。 '+NUMTOSTRN((hhv(h,X)),2)+'元。'),COLOR0000FF,LINETHICK2,LAYER0;
DRAWRECTABS(100,4,100+(C)/C*100 ,14 , rgb(255,0,0)),LAYER0;
DRAWRECTABS(100,34 ,100+(hhv(C,5))/C*100 ,44 , rgb(0,255,0)),LAYER0;
DRAWRECTABS(100,64 ,100+(hhv(C,10))/C*100 ,74 , rgb(0,155,100)),LAYER0;
DRAWRECTABS(100,94 ,100+(hhv(C,20))/C*100 ,104 , rgb(250,55,0)),LAYER0;
DRAWRECTABS(100,124,100+(hhv(C,30))/C*100,134 , rgb(250,155,0)),LAYER0;
DRAWRECTABS(100,154,100+(hhv(C,60))/C*100 ,164 , rgb(0,205,200)),LAYER0;
DRAWRECTABS(100,184,100+(hhv(C,90))/C*100 ,194 , rgb(255,0,100)),LAYER0;
DRAWRECTABS(100,214,100+(hhv(C,120))/C*100,224 , rgb(0,155,100)),LAYER0;
DRAWRECTABS(100,244,100+(hhv(C,240))/C*100 ,254 , rgb(50,255,20)),LAYER0;
DRAWRECTABS(100,274,100+(hhv(C,480))/C*100 ,284 , rgb(250,55,0)),LAYER0;
DRAWRECTABS(100,304,100+(hhv(C,2400))/C*100 ,314 , rgb(0,205,20)),LAYER0;
DRAWRECTABS(100,334,100+(hhv(C,0))/C*100 ,344 , rgb(255,255,0)),LAYER0;
DRAWRECTABS(100,364,100+(hhv(C,X))/C*100 ,374 , rgb(255,0,0)),LAYER0;
DRAWTEXTABS(280,15,' '+NUMTOSTRN(VOL/CAPITAL*100,2)+'%。'),COLOR00FF00,LINETHICK3,LAYER0;
DRAWTEXTABS(280,45,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,5),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,5)/5,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,75,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,10),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,10)/10,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,105,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,20),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,20)/20,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,135,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,30),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,30)/30,2)+'%。 '),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,165,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,60),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,60)/60,2)+'%。'),COLOR44FF00,LINETHICK2,LAYER0;
DRAWTEXTABS(280,195,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,90),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,90)/90,2)+'%。 '),COLOR00FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,225,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,120),0)+'% '+NUMTOSTRN(SUM(VOL/CAPITAL*100,120)/120,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,255,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,240),0)+'% '+NUMTOSTRN(SUM(VOL/CAPITAL*100,240)/240,2)+'%。 '),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,285,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,480),0)+'% '+NUMTOSTRN(SUM(VOL/CAPITAL*100,480)/480,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,315,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,2400),0)+'% '+NUMTOSTRN(SUM(VOL/CAPITAL*100,2400)/2400,2)+'%。'),COLOR44FFFF,LINETHICK2,LAYER0;
DRAWTEXTABS(280,345,' '+NUMTOSTRN((hhv(VOL/CAPITAL*100,0)),2)+'% '),COLOR00FF00,LINETHICK3,LAYER0;
DRAWTEXTABS(280,375,' '+NUMTOSTRN(SUM(VOL/CAPITAL*100,X),0)+'%。 '+NUMTOSTRN(SUM(VOL/CAPITAL*100,X)/X,2)+'%。 '),COLOR0044FF,LINETHICK2,LAYER0;