DRAWGBK(CLOSE>0,COLORRGB(198,198,198),COLORRGB(158,158,58),1);
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
S:='股票代码：'+STKLABEL;
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,S),ALIGN4,color111111;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                 所属板 块:'+BLKNAME+'\n'+'发行价'+NUMTOSTR(FINANCE(51),2)+'元'+'  发行量'+NUMTOSTR(FINANCE(52),2)+'万股'+'\n'+'总股本'+NUMTOSTR(FINANCE(1),0)+'万 股'+'  流通A股'+NUMTOSTR(FINANCE(7),0)+'万股'+'   净资产'+NUMTOSTR(FINANCE(34),2)+'元'+'  每股收 益'+NUMTOSTR(FINANCE(33),2)+'元'+'  主营业务增长率'+NUMTOSTR(FINANCE(53),2)+'%'+'\n'+'市盈率'+NUMTOSTR(DYNAINFO(39),2)+'%'+'  投资收益'+NUMTOSTR(FINANCE(24),2)+'元'+'  股东总数'+NUMTOSTR(FINANCE(50),0)+'户'),ALIGN4,color111111;
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:='                                        
  今天是：'+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日, '+WDAY[WD[P]+1];
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STR1),ALIGN5,colorFFFF;
CG:=MA(CLOSE,17);
FL:HHV(CG,2),colorFFFF;
FS:CG-(FL-CG),LINETHICK2,colorFFA500;
CG:MA(CLOSE,17),LINETHICK2,colorFFFF00;
AMV0:=VOL*(OPEN+CLOSE)/2;
BS:SUM(AMV0,88)/SUM(VOL,88),LINETHICK1,colorFF0000;
VAR4:=(2*CLOSE+LOW+HIGH)/4;
风险:=EMA(VAR4,45)*1.15;
必卖:=EMA(VAR4,55)*1.3;
底:=EMA(VAR4,40)*0.85;
铁底:=EMA(VAR4,88)*0.7;
成本:=EMA(VAR4,55);
价值:=(成本+底)/2;
STICKLINE(CLOSE<OPEN,HIGH,LOW,1,0),color8800;
STICKLINE(CLOSE<OPEN,HIGH,LOW,0,0),colorFF00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,8,0),color8800;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,0),color9900;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,6,0),colorAA00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,5,0),colorBB00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,4,0),colorCC00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),colorDD00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),colorEE00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1,0),colorFF00;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,1,0),colorFF;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),colorEEFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),color22FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),color44FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),color66FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4,0),color88FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),colorAAFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2,0),colorCCFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),colorEEFF;
LC:=REF(CLOSE,1);
RSI:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;
DRAWTEXT(CROSS(RSI,20),LOW*0.92,'博雅买'),ALIGN0,PXUP6,colorC71585;
STICKLINE(CROSS(RSI,20),LOW*0.98,LOW*1,6,0),colorFF0000;
DRAWTEXT(CROSS(80,RSI) AND CLOSE>风险,HIGH*1.04,'博雅卖'),ALIGN0,PXUP6,colorFF0000;
STICKLINE(CROSS(80,RSI) AND CLOSE>风险,HIGH*1.02,HIGH*1,6,0),color1;
WX:=MA(CLOSE,0);
M1:=MA(CLOSE,P1);
M2:=MA(CLOSE,P2)*(IF(N<2,WX,1));
M3:=MA(CLOSE,P3)*(IF(N<3,WX,1));
M4:=MA(CLOSE,P4)*(IF(N<4,WX,1));
M5:=MA(CLOSE,P5)*(IF(N<5,WX,1));
M6:=MA(CLOSE,P6)*(IF(N<6,WX,1));
M7:=MA(CLOSE,P7)*(IF(N<7,WX,1));
M8:=MA(CLOSE,P8)*(IF(N<8,WX,1));
C1:=REF(CLOSE,1);
C2:=HHV(C1,2);
C3:=LLV(C1,1);
ET:=HHV(C1,2);
ET1:=REF(ET,1);
XB:=LLV(C1,1);
XB1:=REF(XB,1);
M:=BARSLAST(CLOSE<XB AND C1>=XB1);
C1:=REF(CLOSE,1);
C2:=HHV(C1,2);
C3:=LLV(C1,1);
ET:=HHV(C1,2);
ET1:=REF(ET,1);
XB:=LLV(C1,1);
XB1:=REF(XB,1);
M:=BARSLAST(CLOSE<XB AND C1>=XB1);
M11:=REF(M,1);
N9:=BARSLAST(CLOSE>ET AND C1<=ET1);
N1:=REF(N9,1);
M21:=(BARSLAST(M-N9>0 AND M11<=N1))+1;
N2:=(BARSLAST(N9-M>0 AND N1<=M11))+1;
ET2:=HHV(ET,M21);
XB2:=LLV(XB,N2);
A:=IF(M-N9>0 AND M11<=N1,1,IF(N9-M>0 AND N1<=M11,0,2));
H1:=IF(M-N9>0,CLOSE,ET2);
H2:=IF(A=1,CLOSE,C2);
H3:=IF(M-N9<0,CLOSE,XB2);
H4:=IF(A=1,CLOSE,XB2);
H5:=IF(M-N9>0 OR A=1,CLOSE,H3);
H6:=REF(H5,1);
H7:=REF(H5,2);
H8:=H5>H6;
H9:=H4=REF(H4,1) AND REF(H4,1)<REF(H4,2) AND H5>REF(H5,2);
H10:=H2=REF(H2,1) AND H4=REF(H4,1) AND H5=REF(H5,2);
W:=H8 OR H9 OR H10;
T9:=H5<H6 AND H5<REF(H5,2);
T10:=H4=REF(H4,1) AND H5<REF(H5,2);
T11:=H3>REF(H3,1) AND H5<REF(H5,1);
T12:=H5=REF(H5,1) AND H3=H4;
T13:=H2=REF(H2,1) AND H2=H5;
TW:=T9 OR T10 OR T11 OR T12 OR T13;
PK:=AMOUNT*(OPEN+CLOSE+HIGH+LOW)/4;
PK1:=IF(VOL>0,PK/AMOUNT,(OPEN+CLOSE+HIGH+LOW)/4);
BBP:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
STICKLINE(ISLASTBAR AND W,H5*1.025,H5*0.99,0.5,0),SHIFT1,colorFF;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,8,0),SHIFT1,color102088;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,7,0),SHIFT1,color102099;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,6,0),SHIFT1,color1020AA;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,5,0),SHIFT1,color1020BB;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,4,0),SHIFT1,color1020CC;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,3,0),SHIFT1,color1020DD;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,2,0),SHIFT1,color1020EE;
STICKLINE(ISLASTBAR AND W,H5*1.02,H5,1,0),SHIFT1,color1020FF;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.96,(H5+H3)/2.05,0.5,0),SHIFT1,colorFF8800;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,8,0),SHIFT1,colorFF7700;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,7,0),SHIFT1,colorFF8800;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,6,0),SHIFT1,colorFF9900;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,5,0),SHIFT1,colorFFAA00;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,4,0),SHIFT1,colorFFBB00;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,3,0),SHIFT1,colorFFCC00;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,2,0),SHIFT1,colorFFDD00;
STICKLINE(ISLASTBAR AND TW,(H5+H4)/1.99,(H5+H3)/2.03,1,0),SHIFT1,colorFFEE00;
DRAWTEXT(ISLASTBAR AND BBP>=96.5,H5*1.022,'     明见\n     短高\n     龙头\n     除外'),SHIFT1,colorFFFF;
DRAWTEXT(ISLASTBAR AND BBP<1,(H5+H4)/1.96,'    明见\n    短低\n    跌停\n    除外'),SHIFT1,colorFF00FF;
DRAWTEXT(ISLASTBAR AND W AND BBP<96.5,H5*1.022,'    明日\n    看涨'),SHIFT1,colorFF00;
DRAWTEXT(ISLASTBAR AND TW AND BBP>1,(H5+H4)/2,'     明日\n     看跌'),SHIFT1,colorFF00;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5);
AK:=EMA((CLOSE-VAR1)/(VAR2-VAR1)*50,13);
AB:=CROSS(AK1,AK);
DRAWTEXT(AB=1,LOW*0.9,'起步'),colorFFFF;
MA13:=MA(CLOSE,13);
MA34:=MA(CLOSE,34);
MA55:=MA(CLOSE,55);
LC:=REF(CLOSE,1);
RSI: