CHOUM1:=1;
CHOUM2:=MA(CHOUM1,5);
CHOUM3:=LLV(LOW,10);
CHOUM4:=HHV(HIGH,25);
CHOUM5:=EMA((CLOSE-CHOUM3)/(CHOUM4-CHOUM3)*4,4);
CHOUM6:EMA(CHOUM5,3);
CHOUM7:=CHOUM1-(ABS(REF(CHOUM1,1))+ABS(REF(CHOUM1,2))+ABS(REF(CHOUM1,3))+ABS(REF(CHOUM1,4))+ABS(REF(CHOUM1,5))/2)>0 AND CHOUM6>=REF(CHOUM6,1) AND REF(CHOUM6,1)<REF(CHOUM6,2);
CHOUM8:=CHOUM1+(ABS(REF(CHOUM1,1))+ABS(REF(CHOUM1,2))+ABS(REF(CHOUM1,3))+ABS(REF(CHOUM1,4))+ABS(REF(CHOUM1,5))/2)<0 AND CHOUM6<=REF(CHOUM6,1) AND REF(CHOUM6,1)>REF(CHOUM6,2);
DRAWTEXT(CHOUM7>0,1.5,'主进'),COLORRED;
DRAWTEXT(CHOUM8<0,2.8,'主退'),COLORGREEN;
CHOUM9:=CHOUM6>=REF(CHOUM6,1);
CHOUM10:=CLOSE>MA(CLOSE,20)AND CLOSE>MA(CLOSE,5);
CHOUM11:=CLOSE<MA(CLOSE,10)AND CLOSE<MA(CLOSE,5);
CHOUM12:=VOL>MA(VOL,5);
STICKLINE(CHOUM6>=REF(CHOUM6,1),CHOUM5,REF(CHOUM5,1),3,0),COLORRED;
STICKLINE(CHOUM6<REF(CHOUM6,1),CHOUM5 ,REF(CHOUM5,1),3,0),COLORGREEN;
CHOUM13:=CHOUM9=1 AND REF(CHOUM9,1)=0 AND (REF(CHOUM9,2)+REF(CHOUM9,3)=0) AND CHOUM6<0.5;
CHOUM14:=CHOUM9=1 AND REF(CHOUM9,1)=0 AND (REF(CHOUM9,2)+REF(CHOUM9,3)=0) AND CHOUM10=1 AND REF(CHOUM10,1)=0 AND CHOUM12=1;
CHOUM15:=CHOUM6>2 AND (CHOUM9=0 AND REF(CHOUM9,1)=1) AND (REF(CHOUM9,2)+REF(CHOUM9,3)=2);
CHOUM16:=(CHOUM9=0 AND REF(CHOUM9,1)=1) AND (REF(CHOUM9,2)+REF(CHOUM9,3)=2) AND CHOUM2<0 AND CHOUM11=1 AND CHOUM6>1;
DRAWTEXT(CHOUM13=1,1.75,'极底'),COLORRED;
DRAWTEXT(CHOUM14=1,CHOUM6,'升');
DRAWTEXT(CHOUM15=1,CHOUM6,'顶');
DRAWTEXT(CHOUM16=1,CHOUM6,'下');
IF(CHOUM6>=REF(CHOUM6,1),CHOUM6,DRAWNULL),COLORRED,LINETHICK2;
IF(CHOUM6<REF(CHOUM6,1),CHOUM6,DRAWNULL),COLORGREEN,LINETHICK2;
CHOUM17:=REF(CLOSE,1);
CHOUM18:=((SMA(MAX((CLOSE - CHOUM17),0),5,1) / SMA(ABS((CLOSE - CHOUM17)),5,1)) * 100);
CHOUM19:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
CHOUM20:=(HIGH - REF(HIGH,1));
CHOUM21:=(REF(LOW,1) - LOW);
CHOUM22:=SUM(IF(((CHOUM20 > 0) AND (CHOUM20 > CHOUM21)),CHOUM20,0),10);
CHOUM23:=SUM(IF(((CHOUM21 > 0) AND (CHOUM21 > CHOUM20)),CHOUM21,0),10);
CHOUM24:=((CHOUM22 * 100) / CHOUM19);
CHOUM25:=((CHOUM23 * 100) / CHOUM19);
CHOUM26:=MA(((ABS((CHOUM25 - CHOUM24)) / (CHOUM25 + CHOUM24)) * 100),5);
CHOUM27:=(CHOUM18 + CHOUM26);
CHOUM28:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
CHOUM29:=(CHOUM18 - CHOUM28);
CHOUM30:=(CHOUM27 + CHOUM29);
CHOUM31:=IF(CROSS(CHOUM30,0),1,0);
CHOUM32:=SMA(CHOUM31,3,1);
CHOUM33:=SMA(CHOUM32,3,1);
CHOUM34:=SMA(CHOUM33,3,1);
CHOUM35:=IF(CROSS(CHOUM33,CHOUM34) AND (CHOUM33<40),5,0);
DRAWTEXT(CHOUM35,0.75,'建仓'),COLORRED;
CHOUM36:=REF(CLOSE,2);
CHOUM37:=SMA(MAX(CLOSE-CHOUM36,0),7,1)/SMA(ABS(CLOSE-CHOUM36),7,1)*100;
CHOUM38:=IF(CHOUM37< REF(CHOUM37,1) AND CHOUM37>79,CHOUM37,0);
DRAWTEXT(CHOUM38,3.1,'逃'),COLORYELLOW;
DRAWTEXT(88>0 AND REF(O,1)/REF(C,1)>1.04 AND REF(L,1)<=688 AND O>REF(C,1)AND C<REF(O,1)AND C/O>=1.01,1,'见底'),COLORLIRED;
DRAWTEXT(C-O>=0 AND O/L>1.05 AND L<=LLV(L,20),1,'绝底'),COLORRED;
CHOUM39:=REF(LOW,1);
CHOUM40:=SMA(ABS(LOW-CHOUM39),3,1)/SMA(MAX(LOW-CHOUM39,0),3,1)*100;
CHOUM41:=EMA(IF(CLOSE*1.2,CHOUM40*10,CHOUM40/10),3);
CHOUM42:=LLV(LOW,38);
CHOUM43:=HHV(CHOUM41,38);
CHOUM44:=IF(LLV(LOW,90),1,0);
CHOUM45:=EMA(IF(LOW<=CHOUM42,(CHOUM41+CHOUM43*2)/2,0),3)/618*CHOUM44;
CHOUM46:=HHV(CHOUM45,0)/2.6;
STICKLINE(CHOUM45,0.53,CHOUM45/CHOUM46+0.53,0.6,0),COLORWHITE;
CHOUM47:=(CLOSE - LLV(LOW,14)) / (HHV(HIGH,14) - LLV(LOW,14)) * 1.2 * CLOSE;
CHOUM48:=EMA(CHOUM47,4);
CHOUM49:=EMA(CHOUM47,8);
DRAWICON(CROSS(CHOUM48,CHOUM49) AND CLOSE/OPEN>1.05,0.5,1);
DRAWICON(CROSS(CHOUM49,CHOUM48) AND COUNT(CROSS(CHOUM48,CHOUM49) AND CLOSE/OPEN>1.05 ,20) ,3.2,2);
CHOUM50:=SMA(MAX(CLOSE-REF(CLOSE,1),0),16,2)/SMA(ABS(CLOSE/REF(CLOSE,1)),16,2)*100;
CHOUM51:=SMA(CHOUM50,3,1);
CHOUM52:=SMA(CHOUM51,3,1);
CHOUM53:=3*CHOUM51-2*CHOUM52;
CHOUM54:=CROSS(CHOUM53,CHOUM52);
CHOUM55:=CROSS(CHOUM52,CHOUM53);
DRAWICON( CHOUM55,3.3,2),COLORYELLOW;
CHOUM56:=IF(CLOSE/REF(CLOSE,1)>1.05 AND HIGH/CLOSE<1.01 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
DRAWTEXT(CHOUM56>90 AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1) AND COUNT(CHOUM56>90,30)=1,CHOUM6-0.25, '见涨'),,COLORLIRED;
CHOUM57:=MA((2*CLOSE+HIGH+LOW)/4,5);
CHOUM58:=CHOUM57*89/100;
DRAWTEXT(CROSS(LOW,CHOUM58),1.25,'必涨'),COLORRED;
CHOUM59:=EMA(SLOPE(1,1)+C,3),COLORRED;
CHOUM60:=EMA(SLOPE(1,1)+C,7),COLORBLUE;
STICKLINE(CHOUM59>CHOUM60 ,0.5,0.53,6,0) ,COLORRED;
STICKLINE(CHOUM59<=CHOUM60 ,0.5,0.53,6,0),COLORGREEN;
CHOUM61:=1;
CHOUM62:=SMA(MAX(CLOSE-CHOUM17,0),3,1)/SMA(ABS(CLOSE-CHOUM17),3,1)*100;
CHOUM63:=SMA(MAX(CLOSE-CHOUM17,0),5,1)/SMA(ABS(CLOSE-CHOUM17),5,1)*100;
CHOUM64:=SMA(MAX(CLOSE-CHOUM17,0),8,1)/SMA(ABS(CLOSE-CHOUM17),8,1)*100;
CHOUM65:=0.5*CHOUM62+0.31*CHOUM63+0.19*CHOUM64;
CHOUM66:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),3,1);
CHOUM67:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),5,1);
CHOUM68:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),8,1);
CHOUM69:=0.5*CHOUM66+0.31*CHOUM67+0.19*CHOUM68;
CHOUM70:=0.5*CHOUM65+0.5*CHOUM69,COLORYELLOW;
CHOUM71:=IF(CHOUM70<20 AND CLOSE>OPEN AND CHOUM61>0,1,0);
CHOUM72:=IF(CHOUM70<20 AND LOW>=REF(LOW,1) AND CLOSE>LOW AND CHOUM61>0,1,0);
CHOUM73:=IF(REF(CHOUM70,1)<20 AND CHOUM70>REF(CHOUM70,1),1,0);
CHOUM74:=(CHOUM71=1 OR CHOUM72=1 OR CHOUM73=1);
CHOUM75:=(CHOUM74 AND COUNT(CHOUM74,3)=1);
DRAWTEXT(CHOUM75,0.5,'抄底'),COLOR0099FF;
CHOUM76:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100;
CHOUM77:=EMA(CHOUM76,9);
CHOUM78:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
CHOUM79:=SMA(CHOUM78,9,3);
CHOUM80:=SMA(CHOUM79,9,3);
CHOUM81:=CROSS(CHOUM76,CHOUM77) AND CROSS(CHOUM79,CHOUM80);
DRAWTEXT(CHOUM81,2,'金叉'),COLOR0099FF;