MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛線:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORYELLOW;
馬線:MA(牛線,6),COLORGREEN;
五日線:MA(CLOSE,5),CIRCLEDOT,COLOR0000FF;
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{頂部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高點壓力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORYELLOW,LINETHICK1;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLORGREEN,DOTLINE;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORWHITE,DOTLINE;{公式分割線};
{以下為單陽不破公式}
陽漲幅:=10;{可自調(diào)4-10}
陽倍量:=1.90;{王子倍量倍數(shù)}
單陽:=C>O*(1+陽漲幅/100) AND VOL>REF(VOL,1)*陽倍量;
LS0:=BARSLAST(單陽);
不破價:=REF(L,LS0);
DRAWTEXT(單陽,L-L*0.02,'陽后放量+題材'),COLOR00FFFF;
位置1:=不破價 *0.998;
位置2:=不破價 *0.97;
位置3:=不破價 *0.94;
LS11:=IF(1,LS0=1,單陽);
LS21:=IF(1,LLV(L,1)>REF(L,1),1);
單陽不破:=LS11 AND LS21;
STICKLINE(單陽不破,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破,位置3,'1'),COLORGREEN;
LS12:=IF(2,LS0=2,單陽);
LS22:=IF(2,LLV(L,2)>REF(L,2),1);
單陽不破2:=LS12 AND LS22;
STICKLINE(單陽不破2,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破2,位置3,'2'),COLORGREEN;
LS13:=IF(3,LS0=3,單陽);
LS23:=IF(3,LLV(L,3)>REF(L,3),1);
單陽不破3:=LS13 AND LS23;
STICKLINE(單陽不破3,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破3,位置3,'3'),COLORGREEN;
LS14:=IF(4,LS0=4,單陽);
LS24:=IF(4,LLV(L,4)>REF(L,4),1);
單陽不破4:=LS14 AND LS24;
STICKLINE(單陽不破4,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破4,位置3,'4'),COLORGREEN;
LS15:=IF(5,LS0=5,單陽);
LS25:=IF(5,LLV(L,5)>REF(L,5),1);
單陽不破5:=LS15 AND LS25;
STICKLINE(單陽不破5,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破5,位置3,'5'),COLORGREEN;
LS16:=IF(6,LS0=6,單陽);
LS26:=IF(6,LLV(L,6)>REF(L,6),1);
單陽不破6:=LS16 AND LS26;
STICKLINE(單陽不破6,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破6,位置3,'6'),COLORGREEN;
LS17:=IF(7,LS0=7,單陽);
LS27:=IF(7,LLV(L,7)>REF(L,7),1);
單陽不破7:=LS17 AND LS27;
STICKLINE(單陽不破7,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破7,位置3,'7'),COLORGREEN;
LS18:=IF(8,LS0=8,單陽);
LS28:=IF(8,LLV(L,8)>REF(L,8),1);
單陽不破8:=LS18 AND LS28;
STICKLINE(單陽不破8,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破8,位置3,'8'),COLORGREEN;
LS19:=IF(9,LS0=9,單陽);
LS29:=IF(9,LLV(L,9)>REF(L,9),1);
單陽不破9:=LS19 AND LS29;
STICKLINE(單陽不破9,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破9,位置3,'9'),COLORGREEN;
LS110:=IF(10,LS0=10,單陽);
LS210:=IF(10,LLV(L,10)>REF(L,10),1);
單陽不破10:=LS110 AND LS210;
STICKLINE(單陽不破10,位置1,不破價,4,0),COLORRED;
DRAWTEXT(單陽不破10,位置3,'10'),COLORGREEN;


X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公積用資本公積金代替};
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺長期負債或負債總額}
X5:=FINANCE(20)/FINANCE(15)*0.999;
Z值:=X1+X2+X3+X4+X5;
預(yù)警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'輕警','無警'));


{頂?shù)讅
短頂:HHV(H,20),COLORRED;
長頂:HHV(H,60),COLORRED;
DRAWKLINE(H,O,L,C);
{中買}
MA6:=MA(C,5);MA18:=MA(CLOSE,18);MA13:=MA(C,13);
A:=(3*C+L+O+H)/6;
VAR1:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
MTM:=C-REF(C,1);CB:=EMA(VAR1,13);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
賣:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
DRAWTEXT(FILTER(賣=1,1),HIGH*1.01,'賣'),COLORDD0000;
買:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(買=1,5),LOW-0.03,'中'),COLOR00DDDD;
加倉:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
DRAWTEXT(FILTER((CROSS(加倉,0) OR CROSS(CLOSE,CB)) AND 買=1,3),LOW-0.03,' ↖←←㈩'),COLORWHITE;
{今買明賣}
A1:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,20) AND MA(C,20)>MA(C,60);
A2:=C/REF(C,1)>=HHV(C/REF(C,1),10) ;
A3:=MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) ;
A4:=MA(C,20)>REF(MA(C,20),1) AND MA(C,60)>REF(MA(C,60),1);
A5:=V>REF(V,1) AND REF(V,1)>REF(V,2) AND H/C<1.01 AND REF(C>O,1);
A6:=(3*CLOSE+OPEN+LOW+HIGH)/6;
A7:=(20*A6+19*REF(A6,1)+18*REF(A6,2)+17*REF(A6,3)+16*REF(A6,4)
+15*REF(A6,5)+14*REF(A6,6)+13*REF(A6,7)+12*REF(A6,8)+11*REF(A6,9)
+10*REF(A6,10)+9*REF(A6,11)+8*REF(A6,12)+7*REF(A6,13)+6*REF(A6,14)
+5*REF(A6,15)+4*REF(A6,16)+3*REF(A6,17)+2*REF(A6,18)+REF(A6,20))/210;
A8:=BARSLAST(CROSS(A7,MA(A7,5)))<6;
STICKLINE(A1 AND A2 AND A3 AND A4 AND A5 AND A8,C,O,1.5,0),COLORYELLOW;