{雙紫共振主圖} {雙紫共振主圖} X_1:=INDEXH; X_2:=INDEXO; X_3:=INDEXL; X_4:=INDEXC; X_5:=INDEXV; X_6:=(3*CLOSE+HIGH+LOW+OPEN)/6; X_7:=EMA(X_6,35); X_8:=(HHV(X_7,5)+HHV(X_7,15)+HHV(X_7,30))/3; X_9:=(LLV(X_7,5)+LLV(X_7,15)+LLV(X_7,30))/3; X_10:=(LLV(X_9,5)+LLV(X_9,15)+LLV(X_9,30))/3; X_11:=X_4/EMA(X_4,120); 大盤中線:EMA(EMA(CLOSE,120)*X_11,2),COLORYELLOW; 紅牛線:(HHV(X_8,5)+HHV(X_8,15)+HHV(X_8,30))/3,COLORRED; M1:MA(CLOSE,5),COLORRED,LINETHICK0; M2:EMA(CLOSE,12),COLORRED,LINETHICK0; M3:EMA(CLOSE,50),COLORRED,LINETHICK0; X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120)); IF(M3<REF(M3,1),M3,DRAWNULL),COLORGREEN,LINETHICK; STICKLINE(C>=大盤中線,O,C,2.5,0 ),COLORRED; STICKLINE(C>=紅牛線 AND C<大盤中線,O,C,2.5,0 ),COLORMAGENTA; STICKLINE(C<紅牛線,O,C,2.5,0 ),COLORGREEN; VOLUME:=MA(VOL,1)/VOL; MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW); EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,9),9); EMVA:=MA(EMV,14); BB:=EMV-EMVA; BIAS :=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; BIASMA :=MA(BIAS,6); CC:=BIAS-BIASMA; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; DD:=(K+D+J)/3; KK:=J-DD; DIFF2:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA2:=EMA(DIFF2,9); SS:=DIFF2-DEA2; AA:=MA(BB+CC+KK+SS,1)*0.01; MID1:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛線:=(20*MID1+19*REF(MID1,1)+18*REF(MID1,2)+17*REF(MID1,3)+16*REF(MID1,4)+15*REF(MID1,5)+14*REF(MID1,6)+13*REF(MID1,7)+12*REF(MID1,8)+11*REF(MID1,9)+10*REF(MID1,10)+9*REF(MID1,11)+8*REF(MID1,12)+7*REF(MID1,13)+6*REF(MID1,14)+5*REF(MID1,15)+4*REF(MID1,16)+3*REF(MID1,17)+2*REF(MID1,18)+REF(MID1,20))/210,COLORGREEN{COLORRED}; 馬線:=MA(牛線,3),COLORMAGENTA{COLORYELLOW}; GB:=(C-牛線); 換手:=V*100/CAPITAL; 主:=MA(換手,5); 大:=MA(換手,12); 中:=MA(換手,34); 散:=MA(換手,55); 均:=(主+大+中+散)/4; GBB:=(主-散); GB1:=GB+GBB; 成交量:=V,COLORWHITE,LINETHICK0; Q:=EMA(V,5); Q1:=EMA(V,50); OBV:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0); OBV1:=EMA(OBV,5); OBV2:=EMA(OBV,50); W:=(Q-Q1)*0.00001; W1:=(OBV1-OBV2)*0.000001; W2:=W+W1; {R:=0;} E:=MAX(MA(C,45),MA(C,90)); FF0:=MIN(MA(C,45),MA(C,90)); C1:=10000*CLOSE/INDEXC; O1:=10000*OPEN/INDEXO; H1:=10000*HIGH/INDEXH; L1:=10000*LOW/INDEXL; LL:=IF(L1<C1 AND L1<O1,L1,MAX(C1,O1)); HH:=IF(H1>C1 AND H1>O1,H1,MAX(C1,O1)); A:=EMA(C1,5); B:=EMA(C1,12); D3:=EMA(C1,30); XX:=EMA(C1,35); F:=EMA(C1,7); 均量:=(A+B+D)/3; VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV11:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); MAOBV:=MA(OBV11,30); MTR:=EMA(EMA(EMA(CLOSE,12),12),12); TRIX:=(MTR-REF(MTR,1))/REF(MTR,1)*100; MATRIX:=MA(TRIX,9) ; MIDA:=CLOSE-MIN(REF(CLOSE,1),LOW); MIDB:=IF(CLOSE<REF(CLOSE,1),CLOSE-MAX(REF(CLOSE,1),HIGH),0); WAD:=SUM(IF(CLOSE>REF(CLOSE,1),MIDA,MIDB),0); MAWAD:=MA(WAD,30); JB:=(OBV11-MAOBV)*0.000001+(A-XX); 機構:=A-XX; J3:=MAX(MA(C,30),MA(C,60)); K3:=MIN(MA(C,30),MA(C,60)); MID11:=(3*CLOSE+LOW+OPEN+HIGH)/6; DKX:=(20*MID11+19*REF(MID11,1)+18*REF(MID11,2)+17*REF(MID11,3)+ 16*REF(MID11,4)+15*REF(MID11,5)+14*REF(MID11,6)+ 13*REF(MID11,7)+12*REF(MID11,8)+11*REF(MID11,9)+ 10*REF(MID11,10)+9*REF(MID11,11)+8*REF(MID11,12)+ 7*REF(MID11,13)+6*REF(MID11,14)+5*REF(MID11,15)+ 4*REF(MID11,16)+3*REF(MID11,17)+2*REF(MID11,18)+REF(MID11,20))/210; MADKX:=MA(DKX,5); MDD:=(DKX-MADKX)*1.2; V1:=(C*2+H+L)/4*10; V2:=EMA(V1,6)-EMA(V1,55); V3:=EMA(V2,6); V4:=2*(V2-V3)*5.5; V5:=(V2-V3)*0.06; V6:=MDD+V5; BQIUV:=(GB1); BQIUSV:=(W2); WWV:=(A-XX); XEV:=(V6); SH:=CROSS(BQIUV,0); YZ:=CROSS(BQIUSV,0); JG:=CROSS(WWV,0); ZL:=CROSS(XEV,0); EXP1:=EMA(C,5); EXP2:=EMA(C,8); EXP3:=EMA(C,12); EXP4:=EMA(C,17); EXP5:=EMA(C,21); EXP6:=EMA(C,50); EXP7:=EMA(C,250); A321:=CROSS(C,EXP1); A1:=CROSS(C,EXP2); A2:=CROSS(C,EXP3); A3:=CROSS(C,EXP4); A4:=CROSS(C,EXP5); A5:=CROSS(C,EXP6); A6:=CROSS(C,EXP7); M:=A321 AND A1 AND A2 AND A3 AND A4 AND A5 AND A6; 買:=SH AND BQIUSV>=0 AND WWV>=0 AND XEV>=0 OR YZ AND BQIUV>=0 AND WWV>=0 AND XEV>=0 OR JG AND BQIUSV>=0 AND BQIUV>=0 AND XEV>=0 OR ZL AND BQIUSV>=0 AND WWV>=0 AND BQIUV>=0; MMM:=M AND 買; STICKLINE(MMM ,C ,O ,3 ,0 ),COLORRED; STICKLINE(MMM ,C ,O ,2 ,0 ),COLORWHITE; STICKLINE(MMM ,C ,O ,1 ,0 ),COLORYELLOW; STICKLINE(MMM ,C ,O ,0 ,0 ),COLORGREEN; DRAWTEXT(CROSS(AA,0),L*0.95,' '),LINETHICK3,COLORRED; DRAWTEXT(CROSS(0,AA),H*1.02,' '),LINETHICK3,COLORGREEN; 漲停:=IF((C-REF(C,1))/REF(C,1)>0.097,3,0); STICKLINE(漲停,OPEN,CLOSE,1,0),COLORYELLOW; HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6; HHJSJDB:(20*HHJSJDA+18*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6) +13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12) +7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+ REF(HHJSJDA,20))/210,COLORWHITE; HHJSJDC:MA(HHJSJDB,5),COLORLIGREEN; TT:=(2*CLOSE+OPEN+HIGH+LOW)*100; 主導動能:=(TT/EMA(TT,4)-1)*100,COLORSTICK; FF:=主導動能; HH10:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,FF=HHV(ABS(FF),10),0); HH20:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,FF=HHV(ABS(FF),20),0); HH30:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,FF=HHV(ABS(FF),30),0); HH50:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,FF=HHV(ABS(FF),50),0); HH100:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,FF=HHV(ABS(FF),80),0); 動能級別:=(HH10+HH20+HH30+HH50+HH100)/50*100,LINETHICK1,COLORWHITE; CQDN:DRAWTEXT(HH100 ,ABS(FF)*1.1,'超強'),COLORWHITE; DWX:REF(H,BARSLAST(CQDN))COLORLIBLUE; STICKLINE(H,DWX,DWX,5,0),COLORGREEN; |
|