飞狐: DRAWGBK(CLOSE, COLORRGB(50,100,50), COLORRGB(50,100,50),1); TC:=STRCMP(MARKETLABEL,'SH')=0; CC:if(tc=1,"SH000001$CLOSE","SZ399001$CLOSE"),LINETHICK; OO:if(tc=1,"SH000001$OPEN","SZ399001$OPEN"),LINETHICK; HH:if(tc=1,"SH000001$HIGH","SZ399001$HIGH"),LINETHICK; LL:if(tc=1,"SH000001$LOW","SZ399001$LOW"),LINETHICK; STICKLINE(OO>=CC ,CC ,OO,8,0 ),COLOR777700; STICKLINE(OO>=CC ,CC ,OO,7,0 ),COLOR999900; STICKLINE(OO>=CC ,CC ,OO,5,0 ),COLORbbbb00; STICKLINE(OO>=CC ,CC ,OO,3,0 ),COLORdddd00; STICKLINE(OO>=CC ,HH,LL,1 ,0 ),COLORffff00; STICKLINE(CC>OO ,CC,OO,8,0) ,COLOR000077; STICKLINE(CC>OO ,CC,OO,7,0) ,COLOR000099; STICKLINE(CC>OO ,CC,OO,5,0) ,COLOR0000bb; STICKLINE(CC>OO ,CC,OO,3,0) ,COLOR0000dd; STICKLINE(CC>OO ,HH,LL,1,0 ),COLOR0000FF; MA5:MA(CC,5),COLOR00FFFF; MA10:MA(CC,10),COLORFFFF00; MA20:MA(CC,20),COLOR00FF00; MA30:MA(CC,30),COLOR0000FF; MA40:MA(CC,40),COLOR009FFF; MA60:MA(CC,60),COLORFF0000; MA120:MA(CC,120),COLORFF00FF; MA250:MA(CC,250),COLORFFFFFF; DRAWTEXT(ISLASTBAR,MA5,' '+NUMTOSTR(MA5,2)),COLOR00FFFF; DRAWTEXT(ISLASTBAR,MA10,' '+NUMTOSTR(MA10,2)),COLORFFFF00; DRAWTEXT(ISLASTBAR,MA20,' '+NUMTOSTR(MA20,2)),COLOR00FF00; DRAWTEXT(ISLASTBAR,MA30,' '+NUMTOSTR(MA30,2)),COLOR0000FF; DRAWTEXT(ISLASTBAR,MA40,' '+NUMTOSTR(MA40,2)),COLOR009FFF; DRAWTEXT(ISLASTBAR,MA60,' '+NUMTOSTR(MA60,2)),COLORFF0000; DRAWTEXT(ISLASTBAR,MA120,' '+NUMTOSTR(MA120,2)),COLORFF00FF; DRAWTEXT(ISLASTBAR,MA250,' '+NUMTOSTR(MA250,2)),COLORFFFFFF; ==================================================================== 通达信:OO:IF(CODELIKE('600'),"999999$OPEN","399001$OPEN"),NODRAW; CC:IF(CODELIKE('600'),"999999$CLOSE","399001$CLOSE"),NODRAW; LL:IF(CODELIKE('600'),"999999$LOW","399001$LOW"),NODRAW; HH:IF(CODELIKE('600'),"999999$HIGH","399001$HIGH"),NODRAW; FH:=CONST(HHV(HH,120)); FL:=CONST(LLV(LL,120)); STICKLINE(CC ,FH,FL,40,0 ),COLOR556655; STICKLINE(CC>=OO ,OO,CC,2.8,0 ),COLOR000099; STICKLINE(CC>=OO ,OO,CC,1.5,0 ),COLOR0000CC; STICKLINE(CC>=OO ,OO,CC,0.5,0 ),COLOR0000EE; STICKLINE(CC>=OO ,HH,LL,0,0 ),COLOR0000FF; STICKLINE(CC<OO ,OO,CC,2.8,0 ),COLORFF8800; STICKLINE(CC<OO ,OO,CC,1.5,0 ),COLORFFCC00; STICKLINE(CC<OO ,OO,CC,0.5,0 ),COLORFFEE00; STICKLINE(CC<OO ,HH,LL,0,0 ),COLORFFFF00; MA5:MA(CC,5),COLOR00FFFF; MA10:MA(CC,10),COLORFFFF00; MA20:MA(CC,20),COLOR00FF00; MA30:MA(CC,30),COLOR0000FF; MA40:MA(CC,40),COLOR009FFF; MA60:MA(CC,60),COLORFF0000; MA120:MA(CC,120),COLORFF00FF; MA250:MA(CC,250),COLORFFFFFF; DRAWNUMBER(ISLASTBAR,MA5,MA5),COLOR00FFFF; DRAWNUMBER(ISLASTBAR,MA10,MA10),COLORFFFF00; DRAWNUMBER(ISLASTBAR,MA20,MA20),COLOR00FF00; DRAWNUMBER(ISLASTBAR,MA30,MA30),COLOR0000FF; DRAWNUMBER(ISLASTBAR,MA40,MA40),COLOR009FFF; DRAWNUMBER(ISLASTBAR,MA60,MA60),COLORFF0000; DRAWNUMBER(ISLASTBAR,MA120,MA120),COLORFF00FF; DRAWNUMBER(ISLASTBAR,MA250,MA250),COLORFFFFFF; ====================================================================== 同花顺:DRAWGBKLAST(CLOSE>0,STRIP(RGB(100,100,100),RGB(100,100,100),1)); TC:=STRFIND(STRLEFT(CODE,3),'600',1); CC:IF(tc=1,INDEXDATA("1A0001",&CLOSE),INDEXDATA("399001",&CLOSE));//线形不输出 OO:IF(tc=1,INDEXDATA("1A0001",&OPEN),INDEXDATA("399001",&OPEN)); //线形不输出 HH:IF(tc=1,INDEXDATA("1A0001",&HIGH),INDEXDATA("399001",&HIGH)); //线形不输出 LL:IF(tc=1,INDEXDATA("1A0001",&LOW),INDEXDATA("399001",&LOW)); //线形不输出 STICKLINE(OO>=CC ,CC ,OO,8,0 ),COLOR777700; STICKLINE(OO>=CC ,CC ,OO,7,0 ),COLOR999900; STICKLINE(OO>=CC ,CC ,OO,5,0 ),COLORbbbb00; STICKLINE(OO>=CC ,CC ,OO,3,0 ),COLORdddd00; STICKLINE(OO>=CC ,HH,LL,1 ,0 ),COLORffff00; STICKLINE(CC>OO ,CC,OO,8,0) ,COLOR000077; STICKLINE(CC>OO ,CC,OO,7,0) ,COLOR000099; STICKLINE(CC>OO ,CC,OO,5,0) ,COLOR0000bb; STICKLINE(CC>OO ,CC,OO,3,0) ,COLOR0000dd; STICKLINE(CC>OO ,HH,LL,1,0 ),COLOR0000FF; MA5:MA(CC,5),COLOR00FFFF; MA10:MA(CC,10),COLORFFFF00; MA20:MA(CC,20),COLOR00FF00; MA30:MA(CC,30),COLOR0000FF; MA40:MA(CC,40),COLOR009FFF; MA60:MA(CC,60),COLORFF0000; MA120:MA(CC,120),COLORFF00FF; MA250:MA(CC,250),COLORFFFFFF; gg:=ISNULL(REFX(&CLOSE,1)); DRAWTEXT(gg,MA5,'``'+TOSTRING(MA5,2)),COLOR00FFFF; DRAWTEXT(gg,MA10,'``'+TOSTRING(MA10,2)),COLORFFFF00; DRAWTEXT(gg,MA20,'``'+TOSTRING(MA20,2)),COLOR00FF00; DRAWTEXT(gg,MA30,'``'+TOSTRING(MA30,2)),COLOR0000FF; DRAWTEXT(gg,MA40,'``'+TOSTRING(MA40,2)),COLOR009FFF; DRAWTEXT(gg,MA60,'``'+TOSTRING(MA60,2)),COLORFF0000; DRAWTEXT(gg,MA120,'``'+TOSTRING(MA120,2)),COLORFF00FF; DRAWTEXT(gg,MA250,'``'+TOSTRING(MA250,2)),COLORFFFFFF; ============================================================== 大智慧:DRAWGBKLAST(C>0,STRIP(rgb(100,100,100),rgb(100,100,100),0)); TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SH')=0; CC:if(tc=1,"SH000001$CLOSE","SZ399001$CLOSE"),LINETHICK0; OO:if(tc=1,"SH000001$OPEN","SZ399001$OPEN"),LINETHICK0; HH:if(tc=1,"SH000001$HIGH","SZ399001$HIGH"),LINETHICK0; LL:if(tc=1,"SH000001$LOW","SZ399001$LOW"),LINETHICK0; STICKLINE(OO>=CC ,CC ,OO,8,0 ),COLOR777700; STICKLINE(OO>=CC ,CC ,OO,7,0 ),COLOR999900; STICKLINE(OO>=CC ,CC ,OO,5,0 ),COLORbbbb00; STICKLINE(OO>=CC ,CC ,OO,3,0 ),COLORdddd00; STICKLINE(OO>=CC ,HH,LL,1 ,0 ),COLORffff00; STICKLINE(CC>OO ,CC,OO,8,0) ,COLOR000077; STICKLINE(CC>OO ,CC,OO,7,0) ,COLOR000099; STICKLINE(CC>OO ,CC,OO,5,0) ,COLOR0000bb; STICKLINE(CC>OO ,CC,OO,3,0) ,COLOR0000dd; STICKLINE(CC>OO ,HH,LL,1,0 ),COLOR0000FF; MA5:MA(CC,5),COLOR00FFFF; MA10:MA(CC,10),COLORFFFF00; MA20:MA(CC,20),COLOR00FF00; MA30:MA(CC,30),COLOR0000FF; MA40:MA(CC,40),COLOR009FFF; MA60:MA(CC,60),COLORFF0000; MA120:MA(CC,120),COLORFF00FF; MA250:MA(CC,250),COLORFFFFFF; DRAWTEXT(DISPSTATUS=2,MA5,' '+NUMTOSTRN(MA5,2)),COLOR00FFFF; DRAWTEXT(DISPSTATUS=2,MA10,' '+NUMTOSTRN(MA10,2)),COLORFFFF00; DRAWTEXT(DISPSTATUS=2,MA20,' '+NUMTOSTRN(MA20,2)),COLOR00FF00; DRAWTEXT(DISPSTATUS=2,MA30,' '+NUMTOSTRN(MA30,2)),COLOR0000FF; DRAWTEXT(DISPSTATUS=2,MA40,' '+NUMTOSTRN(MA40,2)),COLOR009FFF; DRAWTEXT(DISPSTATUS=2,MA60,' '+NUMTOSTRN(MA60,2)),COLORFF0000; DRAWTEXT(DISPSTATUS=2,MA120,' '+NUMTOSTRN(MA120,2)),COLORFF00FF; DRAWTEXT(DISPSTATUS=2,MA250,' '+NUMTOSTRN(MA250,2)),COLORFFFFFF; |