{青松寻牛记}
 {操作：发现“○牛窝”后，试买。待“寻牛起跑”出现。加仓买入股票，享受主力拉升的一波行情。（熊市要谨慎）。
'*' ，中线强弱变色分界线（21日线）。
 纪律：不买高位除权票，不买无故暴跌票，不买高位横盘票，年底不买腰部票，切记熊市不言底').}

DRAWGBK(v>1,colorRGB(10,150,0),colorRGB(10,10,0),70);
 DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,('版块:'     + BLKNAME)),ALIGN4;
 BB:=BARPOS=SYSPARAM(1);
 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];
 explain(barpos=p,str1),colorRED;
 DRAWTEXT(barpos=p,H*1.12,str1),ALIGN2,coloryellow,;
 DRAWTEXT(sysparam(2)=BARPOS,c,
 '收益:'+ NUMTOSTR(FINANCE(33),2)+'\n'
 +'净资:'+NUMTOSTR(FINANCE(34),2 )+'\n'
 +'流通:'+ NUMTOSTR(FINANCE(7)/10000,2)+'亿'+'\n'
 +'流通:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100 ,0)+' %'+'\n'
 +'权益:'+NUMTOSTR(FINANCE(36),0 )+' %'+'\n'
 +'主营:'+NUMTOSTR(FINANCE(53),0 )+' %'+'\n'
 +'利润:'+NUMTOSTR(FINANCE(54),0 )+' %'+'\n'
 +'主营:'+NUMTOSTR(FINANCE(20)/10000,1 )+'亿'+'\n'
 ),COLORccffcc,ALIGN4;

 v1:ema(close,5);
 v2:ema(ema(close,90)*1.01,10),LINETHICK2;
 DRAWTEXT(cross(v1,v2),v1+0.05,'寻牛起跑'),color00ff00,LINETHICK2;
 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);
 DRAWICON(cross(v1,v2),v2,1);
 DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窝'),colorYELLOW;
 M5:MA(CLOSE,5),LINETHICK1,colorYELLOW;
 M13:MA(CLOSE,13),LINETHICK2,color0099ff;

 A:MA(CLOSE,3),ColorFF00FF,LINETHICK0;
 A1:=(CLOSE+HIGH+LOW)/(3);
 B:=EMA(A1,10);
 B2:=REF(B,1);
 MA21:=EMA(CLOSE,21);
 DRAWTEXT((B>B2),ma21,'*'),COLORMAGENTA;
 DRAWTEXT((B<B2),ma21,'*'),Coloryellow;
 varC:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
 DRAWICON(CROSS(82,varC),HIGH,2);
 var6:=REF(C,1);
 var7:=SMA(MAX(C-var6,0),6,1)/SMA(ABS(C-var6),6,1)*100;
 DRAWTEXT(CROSS(84,var7),H*1.01,'▲逃顶'),COLORGREEN ;
 Var32:=CLOSE/REF(CLOSE, 1)>=1.062 AND HIGH/CLOSE<1.005 AND MA(CLOSE, 90)/CLOSE>=1.150;
 Var33:=Var32 AND COUNT(Var32, 20)=1 ;
 Var34:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
 Var35:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
 Var36:=IF(Var34>0.010, 0.900, 1) AND IF(Var34>(-0.025), 1, 1.200);
 Var37:=Var36*(Var35-Var34)*100;
 Var38:=SUM(Var37, 10);
 Var39:=SMA(Var38, 40, 1);
 Var310:=Var38>20;
 Var311:=CROSS(CLOSE, MA(CLOSE*1.055, 3)) AND CLOSE>OPEN*1.060 AND VOL>=REF(VOL, 1)*1.5 AND CLOSE>=MA(CLOSE, 10);
 Var312:=Var310 AND Var311 ;
 Var313:=(-100)*(HHV(HIGH, 3)-CLOSE)/(HHV(HIGH, 3)-LLV(LOW, 3));
 Var314:= CROSS(Var313, (-87)) AND OPEN=1.090*REF(CLOSE, 1) AND INDEXC>0.980*REF(INDEXC, 1) AND CLOSE<=1.470*LLV(CLOSE, 58);
 Var315:=EMA(CLOSE, 12)-EMA(CLOSE, 26);
 Var316:=EMA(Var315, 9);
 Var317:=2*(Var315-Var316);
 Var318:=(CLOSE-LLV(LOW, 9))/(HHV(HIGH, 9)-LLV(LOW, 9))*100;
 Var319:=SMA(Var318, 3, 1);
 Var320:=SMA(Var319, 3, 1);
 Var321:=EMA(IF(Var316>REF(Var316, 1), 1, (-1)), 14)*14;
 Var322:=EMA(IF(Var320>REF(Var320, 1), 1, (-1)), 14)*14*2;
 Var323:=(MA(CLOSE, 5)/MA(CLOSE, 70)-1)*100;
 Var324:=(Var323+Var322+Var321)/3;
 Var325:=MA(CLOSE, 80)-MA(CLOSE, 10)/3;
 Var326:=IF(CLOSE and MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);{Var38>Var39;}
 Var327:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND Var326>0, 91, 0);
 Var328:=IF(Var324>REF(Var324, 1) AND REF(Var324, 1)<REF(Var324, 2) AND (Var33 OR Var312 OR Var314) OR Var326>0 OR Var327>0, 85, 0);
 Var329:=IF(Var327>0 ,95,0), STICK,LINETHICK2;
 Var330:=IF(Var326>0 or var327>0,91,0), STICK,LINETHICK2;
 Var331:=IF(Var328>0 or var327>0 or var326>0,88,0), STICK,LINETHICK2;
 Var332:=100*(CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42)),LINETHICK1,colorgreen;
 Var333:=COUNT(MA(CLOSE,3)>REF(MA(CLOSE,3),1),1)=1;
 Var334:=(Var332<93 AND Var333 and MAX(MAX(Var329, Var330), Var331))*100; 
 STICKLINE(Var327>90,LOW*0.99,LOW*0.95,2,0),COLORYELLOW;
 DRAWTEXT(Var327>90,LOW*0.95,'追涨'),COLORYELLOW;
 DRAWICON(Var310>0 AND Var327=0,HIGH*1.01,5);
 STICKLINE(OPEN>=CLOSE ,HIGH ,LOW,0.2,0 ),COLORFFCC00;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),ColorFF9F68;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff9900;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORffaa11;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb11;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc22;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd22;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee33;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffff33;
 STICKLINE(CLOSE>OPEN,HIGH,LOW,0.2,0) ,COLOR0000FF;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR0000CC;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR3300CC;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0033CC;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR6633CC;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR3333FF;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR6633FF;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR3366FF;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR6666FF;