软件名称：[B]飘带主图（源码）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：解密版
软件大小：0 Bytes
官方主页：Home Page
更新时间：2009-07-26 11:35:06
软件简介:

{飘带主图}
//DRAWGBK(DATE>900101,COLORRGB(50,90,90),COLORRGB(20,40,40),1);
MA14:=MA(C,14);
STICKLINE(H<MA14 ,H,L,10,0),COLOR000000;
STICKLINE(H<MA14 ,H,L,0.1,0),COLOR666666;
STICKLINE(H<MA14 ,O,C,8,0),COLOR666666;
STICKLINE(H<MA14  AND C>O,O,C,8,0),COLOR8F8F8F;
CC:=(3*C+H+L+O)/6;
MA6:=EMA(MA(IF(MA(CC,3)>MA(CC,4),MA((CC+3*H)/4,3),REF(MA((CC+3*L)/4,3),1)),3),5);
REF(MA6,1), COLOR8A8A8A;
REF(MA6,2), COLOR898989;
REF(MA6,3), COLOR888888;
REF(MA6,4), COLOR878787;
REF(MA6,5), COLOR868686;
REF(MA6,6), COLOR858585;
REF(MA6,7), COLOR848484;
REF(MA6,8), COLOR838383;
REF(MA6,9), COLOR828282;
REF(MA6,10), COLOR818181;
REF(MA6,11), COLOR808080;
REF(MA6,12), COLOR7A7A7A;
REF(MA6,13), COLOR797979;
REF(MA6,14), COLOR787878;
REF(MA6,15), COLOR777777;
REF(MA6,16), COLOR767676;
REF(MA6,17), COLOR757575;
REF(MA6,18), COLOR747474;
REF(MA6,19), COLOR737373;
REF(MA6,20), COLOR727272;
REF(MA6,21), COLOR717171;
REF(MA6,22), COLOR707070;
REF(MA6,23), COLOR6A6A6A;
REF(MA6,24), COLOR696969;
REF(MA6,25), COLOR686868;
REF(MA6,26), COLOR676767;
REF(MA6,27), COLOR666666;
REF(MA6,28), COLOR656565;
REF(MA6,29), COLOR646464;
REF(MA6,30), COLOR636363;
REF(MA6,31), COLOR626262;
REF(MA6,32), COLOR616161;
REF(MA6,33), COLOR606060;
STICKLINE(L<MA14  AND C>O AND H>MA14 ,H,L,0.1,0),COLORDD66CC;
STICKLINE(L<MA14  AND C<O AND H>MA14,H,L,0.1,0),COLORFFCC66;
STICKLINE(L<MA14  AND C>O AND H>MA14 ,O,C,8,0),COLORDD66CC;
STICKLINE(L<MA14  AND C<O AND H>MA14,O,C,8,0),COLORFFCC66;
STICKLINE(L>MA14  AND C>O AND H>MA14,H,L,0.1,0),COLOR0066FF;
STICKLINE(L>MA14  AND C<O AND H>MA14,H,L,0.1,0),COLOR66FF66;
STICKLINE(L>MA14  AND C>O AND H>MA14,O,C,8,0),COLOR0066FF;
STICKLINE(L>MA14  AND C<O AND H>MA14,O,C,8,0),COLOR66FF66;
A0:=OPENMINUTES(TIME);
P:=DATATYPE;
A:=IF(P=1,A0,IF(P=2,A0/5,IF(P=3,A0/15,IF(P=4,A0/30,IF(P=5,A0/60,IF(P=0,0,1))))));
均价线:=IF(CAPITAL>0,SUM(AMOUNT,A)/100/SUM(VOL,A),SUM(CLOSE*VOL,A)/SUM(VOL,A));
额势:=IF(CAPITAL>0,均价线,1);
取势:=IF(SMA(额势,3,2)>SMA(额势,5,3),(O+2*HHV(H,2))/3,(O+2*LLV(L,2))/3);
短1:=(EMA(取势,1)+MA(取势,3)+MA(取势,5))/3;
短2:=(EMA(取势,3)+MA(取势,6)+MA(取势,9))/3;
短01:=EMA((短1+短2+MD(短2,5))/3,2.637),COLORFFC0F0,LINETHICK2;
趋势线1:=SMA(FORCAST(CLOSE,13),5,1),COLORFFFF00,LINETHICK1,PRECISION2;
趋势线2:(EMA(SMA(FORCAST(取势,12),4,1),4)+趋势线1)/2,COLORFFFF00,LINETHICK1,PRECISION2;
趋势线3:(EMA(SMA(FORCAST(取势,12),20,1),4)+趋势线1)/2,COLORFFFF00,LINETHICK1,PRECISION2;
PARTLINE(趋势线1>REF(趋势线1,1),趋势线2),COLORFFAA00,LINETHICK2;
PARTLINE(趋势线1<REF(趋势线1,1),趋势线2),COLOR0088FF,LINETHICK2;
MA6,COLOR66FFFF;
PARTLINE(1,MA6),COLOR878787;
ZF:=(C-REF(C,1))/REF(C,1)*100;
选股: CROSS(A0,50) AND ZF>3,LINETHICK;
DRAWICON(CROSS(A0,50) AND ZF>3,L*0.98,1);
MA20:=MA(C,20),COLORWHITE,LINETHICK2;
乖离线:=((C-REF(MA20,1))/20+MA20)*1.20;
卖点:=CROSS(C,乖离线);
X6:=REF(CLOSE,1);
X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);
X8:=CROSS(79,X7) ;
X9:=FILTER(X8,4) ;
出货:=X9;
条件A:=卖点 AND C<O;
条件B:出货 AND C<O,LINETHICK;
显示A_B:=(REF(BARSLAST(条件A OR 条件B)>=4,1) AND 条件B )  OR 条件A;
限制性出现出货:DRAWTEXT((REF(BARSLAST(条件A OR 条件B)>=4,1) AND 条件B ),(HIGH * 1.02),'出货'),COLOR9000F5;//卖点跟出货在5天内同时出现的时候，不让出货显示
允许出现卖点:DRAWTEXT(条件A  ,H+0.13,'卖点'),COLOR00FF00;
STICKLINE(显示A_B,O,C,8,0),COLORFF9933;
DRAWTEXT(显示A_B,(H+L)/2,'★'),ALIGN0,COLORDD99FF;
★:DRAWTEXT(C>MA(C,20) AND (MA(C,5)>MA(C,10) AND MA(C,5)<MA(C,20))
OR (C>MA(C,20) AND MA(C,5)>MA(C,10) AND MA(C,10)<MA(C,20))
OR(C>MA(C,20) AND MA(C,5)>MA(C,10) AND MA(C,10)<MA(C,20)),MA(C,20),'★'),COLORFFFFFF;

TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
TYX4:=MA((C+L+O+H)/4,13);
TYX5:=EMA((C+L+O+H)/4,21);
{空心红}
STICKLINE(C<TYX5 AND C>O,H,L,0.1,1),COLORRED;
STICKLINE(C<TYX5 AND C>O,C,O,8,1),COLORRED;
{深绿}
STICKLINE(C<TYX5 AND C<O,H,L,0.1,0),COLOR009900;
STICKLINE(C<TYX5 AND C<O,C,O,8,0),COLOR005500;
STICKLINE(C<TYX5 AND C<O,C,O,6,0),COLOR005A00;
STICKLINE(C<TYX5 AND C<O,C,O,5,0),COLOR006600;
STICKLINE(C<TYX5 AND C<O,C,O,4,0),COLOR006B00;
STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR007700;
STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007B00;
{蓝}
STICKLINE(C>TYX5 AND C<O,H,L,0.1,0),COLORFFAA22;
STICKLINE(C>TYX5 AND C<O,C,O,8,0 ),COLORFF7700;
STICKLINE(C>TYX5 AND C<O,C,O,6,0 ),COLORFF8811;
STICKLINE(C>TYX5 AND C<O,C,O,5,0 ),COLORFFAA22;
STICKLINE(C>TYX5 AND C<O,C,O,4,0 ),COLORFFBB33;
STICKLINE(C>TYX5 AND C<O,C,O,3 ,0 ),COLORFFDD44;
STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFFF55;
{黄}
STICKLINE(C>TYX5 AND C>O,H,L,0.1,0 ),COLOR00CCFF;
STICKLINE(C>TYX5 AND C>O,C,O,8,0 ),COLOR00AAFF;
STICKLINE(C>TYX5 AND C>O,C,O,6,0 ),COLOR00BBFF;
STICKLINE(C>TYX5 AND C>O,C,O,5,0 ),COLOR00CCFF;
STICKLINE(C>TYX5 AND C>O,C,O,4,0 ),COLOR00DDFF;
STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00EEFF;
STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00FFFF;
{粉红}
STICKLINE(C>TYX4 AND C>O,H,L,0.1,0),COLORAA00AA;
STICKLINE(C>TYX4 AND C>O,C,O,8,0 ),COLORFF11FF;
STICKLINE(C>TYX4 AND C>O,C,O,6,0 ),COLORFF33FF;
STICKLINE(C>TYX4 AND C>O,C,O,5,0 ),COLORFF44FF;
STICKLINE(C>TYX4 AND C>O,C,O,4,0 ),COLORFF55FF;
STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF66FF;
STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF77FF;
STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF88FF;
{亮灰}
STICKLINE(C>TYX4 AND C<O,H,L,0.1,0),COLORWHITE;
STICKLINE(C>TYX4 AND C<O,C,O,8,0),COLOR555555;
STICKLINE(C>TYX4 AND C<O,C,O,6,0),COLOR777777;
STICKLINE(C>TYX4 AND C<O,C,O,5,0),COLOR999999;
STICKLINE(C>TYX4 AND C<O,C,O,4,0),COLORAAAAAA;
STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLORBBBBBB;
STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLORCCCCCC;
STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLORDDDDDD;
STICKLINE(C>TYX4 AND C<O,C,O,0.1,0),COLOREEEEEE;
{深红}
STICKLINE(C>TYX3 AND C>O,H,L,0.5,0),COLOR0000DD;
STICKLINE(C>TYX3 AND C>O,C,O,8,0),COLOR000099;
STICKLINE(C>TYX3 AND C>O,C,O,6,0),COLOR0000AA;
STICKLINE(C>TYX3 AND C>O,C,O,5,0),COLOR0000BB;
STICKLINE(C>TYX3 AND C>O,C,O,4,0),COLOR0000CC;
STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR0000DD;
STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000EE;
STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000FF;
{涨跌停K线}
STICKLINE(HIGH=LOW AND CLOSE=OPEN  AND (CLOSE/REF(CLOSE,1))>1.048,HIGH,LOW,9,0) ,COLORRED;
STICKLINE(HIGH=LOW AND CLOSE=OPEN  AND (REF(CLOSE,1)/CLOSE)>1.048,HIGH,LOW,9,0) ,COLOR00FF00;

[url=http://www.70822.com/soft/sort013/sort02/down-11113.html]飘带主图（源码）[/url]