|
{CZW-c分析家用} x01:=(C-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3)); x11:=SMA(x01,2,1); x21:=SMa(x11,2,1); x31:=3*x11-2*x21 ; x41:=2*x31-0.5; sg:C*(1-(x41-x21)/15),colorWHITE,linethick2; PARTLINE(sg,c<sg),COLORBLUE,LINETHICK2; B1:=REF(CLOSE,1); B2:=REF(CLOSE,2); B3:=REF(CLOSE,3); B4:=REF(CLOSE,4); CMAX:=MAX(MAX(MAX(CLOSE,B1),B2),B3); CMIN:=MIN(MIN(MIN(CLOSE,B1),B2),B3); 持股:STICKLINE(CLOSE=CMAX AND (B1>=B2 OR B1>=B3) OR B1=CMAX AND (B2=CMIN OR B3=CMIN) AND CLOSE>=B2 OR B2=CMAX AND B3=CMIN AND CLOSE>=B1 OR B3=CMAX AND CLOSE>=B1 AND CLOSE>=B2,B1,CLOSE,8,0),COLOR0000ff; 變盤(pán):STICKLINE(CLOSE=CMAX AND B1=CMIN,B2,CLOSE,8,0),COLOR0099ef; 下跌:STICKLINE(CLOSE=CMIN AND (B1<B2 OR B1<B3) OR B1=CMIN AND (B2=CMAX OR B3=CMAX) AND CLOSE<B2 OR B2=CMIN AND B3=CMAX AND CLOSE<B1 OR B3=CMIN AND CLOSE<B1 AND CLOSE<B2,B1,CLOSE,8,1),COLOR00ff00; STICKLINE(B1=CMAX AND CLOSE=CMIN,B2,CLOSE,8,0),COLOR009900; 買(mǎi)入:STICKLINE(B1=CMIN AND CLOSE>=B2 OR (B2=CMIN AND B1<=B3 OR B3=CMIN AND B1<=B2) AND B2<B4 AND CLOSE>=B1,B1,B2,8,0),COLORffffff; 拋售:STICKLINE(B1=CMAX AND CLOSE<B2 OR (B2=CMAX AND B1>B3 OR B3=CMAX AND B1>B2) AND B2>=B4 AND CLOSE<B1,B1,B2,8,0),COLOR00ffff; k1:=llv(l,barslast(DISPSTATUS=1)+1); a1:=cost(95); a2:=cost(5); ly:=(a1-a2)*100/(a1+a2); drawicon(ly>ref(ly,1),k1,8); Var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); Var2:=REF(Var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var3:=REF(Var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var4:=REF(Var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var5:=REF(Var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var6:=REF(Var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var7:=REF(Var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var8:=REF(Var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var9:=REF(Var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarA:=REF(Var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VarB:=REF(VarA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarC:=REF(VarB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VarD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); VarE:=REF(VarD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VarF:=REF(VarE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var10:=REF(VarF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var11:=REF(Var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var12:=REF(Var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var13:=REF(Var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var14:=REF(Var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var15:=REF(Var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var16:=REF(Var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); Var17:=REF(Var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); Var18:=REF(Var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); bs:=REF(VarD OR VarE OR VarF OR Var10 OR Var11 OR Var12 OR Var13 OR Var14 OR Var15 OR Var16 OR Var17 OR Var18,1) AND Var1; ns:=REF(Var1 OR Var2 OR Var3 OR Var4 OR Var5 OR Var6 OR Var7 OR Var8 OR Var9 OR VarA OR VarB OR VarC,1) AND VarD; stickline(ns,h*1.009,h*1.010,8,0),colorgreen; stickline(bs,l*0.996,l*0.997,8,0),colorwhite; Var33:=(2*(C+L)/2+(C+H)/2+L)/4*1; 下降通道阻擊線:=EMA(Var33,89)*0.91*1; Var55:=IF(VOL>0,1,0); Var66:=LOW<=下降通道阻擊線; Var77:=FILTER(Var66*Var55,30)*1; Var99:=IF(VOL>0,1,0); VarA:=FILTER(Var66,13)*1; VarB:=Var77 OR VarA*Var99; DRAWTEXT(VarB*1,LOW,'阻擊'),coloryellow ; A:=REF(H,9)=HHV(H,2*9+1); B:=FILTER(A,3); D:=BACKSET(B,9+1); HD:=FILTER(D,9); AA2:=REF(L,9)=LLV(L,2*9+1); BB2:=FILTER(AA2,9); DD2:=BACKSET(BB2,9+1); LD:=FILTER(DD2,9); STICKLINE(REF(HD,1),REF(H,1),REF(H,1),18,0),LINETHICK6,COLORMAGENTA; STICKLINE(REF(LD,1),REF(L,1),REF(L,1),18,0),LINETHICK6,COLORGREEN; DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA:=EMA(DIFF,9); MACD:=2*(DIFF-DEA); AA1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); BB1:=REF(C,AA1+1)>C AND REF(DIFF,AA1+1)<DIFF AND CROSS(DIFF,DEA); DRAWTEXT(FILTER(BB1>0,5),L*0.977,'▲MACD底背離'),COLORGREEN; nA2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1)); nB2:=REF(C,nA2+1)>C AND REF("KDJ.K",nA2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"); DRAWTEXT(FILTER(nB2>0,5),L*0.96,'△KDJ底背離'),COLORYELLOW; nA3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)); nB3:=REF(C,nA3+1)>C AND REF("RSI.RSI1",nA3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"); DRAWTEXT(FILTER(nB3>0,5),L*0.995,'↑RSI底背離'),COLORCYAN; C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)); D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF); DRAWTEXT(FILTER(D1>0,5),H*1.035,'▼MACD頂背離'),COLOR0066FF; C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)); D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"); DRAWTEXT(FILTER(D2>0,5),H*1.02,'▽KDJ頂背離'),COLORRED; C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)); D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"); DRAWTEXT(FILTER(D3>0,5),H*1.005,'↓RSI頂背離'),COLORMAGENTA; 上市年:REF(YEAR,BARSCOUNT(C)-1),LINETHICK0,COLORGREEN; 月:REF(MONTH,BARSCOUNT(C)-1),LINETHICK0,COLORMAGENTA; e:=BARSCOUNT(c); ah:=hhv(h,200); al:=llv(l,200); b0:=(ah-al)/40; kb1:=h+b0; kb2:=l-b0; stickline((e+0)/34=FLOOR((e+0)/34),kb2,kb2-b0,2,0),COLORYELLOW; drawtext((e+0)/34=FLOOR((e+0)/34),kb2,'時(shí)間窗'),COLORFFFFFF; V1:=REF(C,1); V2:=SMA(MAX(C-V1,0),6,1)/SMA(ABS(C-V1),6,1)*100; DRAWICON(IF(CROSS(81,V2),1,0),h*1.01,5),COLORYELLOW;股票論壇 www.55188.com |
|
|
