| 轉(zhuǎn)送大家一個(gè)一看就懂的主圖公式源碼[大智慧1用] 圖片： {n:5 250 14} N1:=6;N2:=12;N3:=26; MA6:MA(CLOSE,6),COLORWHITE{,LINETHICK2}; MA18:MA(CLOSE,18),COLORBLUE{,LINETHICK2}; a:=(3*c+l+o+h)/6; X:=(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; 莊成本:eMA(X,13),COLORRED,LINETHICK2; MTM:=C-REF(C,1); DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); {買賣} 買:IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0),COLORRED; 賣:IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0),COLOR00FF00; DRAWTEXT(filter(買=1,5),LOW-0.03,'買'),COLORRED; STICKLINE(filter(買=1,5),HIGH,LOW,0,1),COLORRED{,LINETHICK2}; STICKLINE(filter(買=1,5),OPEN,CLOSE,4,1),COLORRED{,LINETHICK2}; DRAWTEXT(filter(賣=1,1),HIGH*1.02,'賣'),COLORBLUE; STICKLINE(filter(賣=1,1),HIGH,LOW,0,1),COLORBLUE{,LINETHICK2}; STICKLINE(filter(賣=1,1),OPEN,CLOSE,4,1),COLORBLUE{,LINETHICK2}; {加倉} 加倉A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10; 加倉B:=加倉A;{白K突破壓力位要用} DRAWTEXT(FILTER((CROSS(加倉A,0) OR CROSS(CLOSE,莊成本)) {AND MA18>REF(MA18,1)} AND 買<>1,3),LOW-0.03,'加'),COLORFF00FF; STICKLINE(FILTER((CROSS(加倉A,0) OR CROSS(CLOSE,莊成本)) {AND MA18>REF(MA18,1)} AND 買<>1,3),HIGH,LOW,0,1),COLORFF00FF{,LINETHICK2}; STICKLINE(FILTER((CROSS(加倉A,0) OR CROSS(CLOSE,莊成本)) {AND MA18>REF(MA18,1)} AND 買<>1,3),OPEN,CLOSE,4,1),COLORFF00FF{,LINETHICK2}; 加倉:FILTER((CROSS(加倉A,0) OR CROSS(CLOSE,莊成本)) {AND MA18>REF(MA18,1)} AND 買<>1,3),COLORFF00FF; {追加} 追:IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0),COLORYELLOW; DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'追'),COLORYELLOW; STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),HIGH,LOW,0,1),COLORYELLOW{,LINETHICK2}; STICKLINE(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),OPEN,CLOSE,4,1),COLORYELLOW{,LINETHICK2}; {減倉} RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1),COLORFFFFFF; D:=SMA(K,3,1),COLOR00FFFF; J:=3*K-2*D,COLORFF00FF; BDGD:=HHV(J,2)=HHV(J,8) AND J>80; 減倉:IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0),COLOR006633; DRAWTEXT(減倉 AND 賣<>1,HIGH*1.02,'減'),COLOR006633; STICKLINE(減倉 AND 賣<>1,HIGH,LOW,0,1),COLOR006633{,LINETHICK2}; STICKLINE(減倉 AND 賣<>1,OPEN,CLOSE,4,1),COLOR006633{,LINETHICK2}; {買跌} {N:5,250,14;} KA:=N/2; DTPL:=MA(C,N)>MA(C,N*1.5) AND MA(C,N*1.5)>MA(C,N*3) AND MA(C,3)>MA(C,N*6); 連續(xù)走強(qiáng):=COUNT(C>MA(C,N),KA)=KA; ZQSJ:=BARSLAST(連續(xù)走強(qiáng)); 下穿:=CROSS(MA(C,N),C); GL:=MA(C,N/2)/MA(C,N*2)>=1.05; 買跌A:=(下穿 AND ZQSJ<=3 AND DTPL AND GL)*N; DRAWTEXT(買跌A>0,LOW*0.98 , '買'),COLOR00FF00; STICKLINE(買跌A>0,HIGH,LOW,0,1),COLOR00FF00{,LINETHICK2}; STICKLINE(買跌A>0,OPEN,CLOSE,4,1),COLOR00FF00{,LINETHICK2}; 買跌:IF((下穿 AND ZQSJ<=3 AND DTPL AND GL)*N,1,0),COLOR00FF00; RSV1:=(c-LLV(low,13))/(HHV(h,13)-LLV(l,13))*100; K1:=SMA(RSV1,3,1),COLORFFFFFF; D1:=SMA(K1,3,1),COLOR00FFFF; J1:=3*K1-2*D1,COLORFF00FF; RSV2:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100; K2:=SMA(RSV2,3,1); D2:=SMA(K2,3,1); J2:=3*K2-2*D2; 支撐:=IF(CROSS(J1,J2),L,REF(L,BARSLAST(CROSS(J1,J2)))),COLORRED; 壓力:=IF(CROSS(J2,J1),H,REF(H,BARSLAST(CROSS(J2,J1)))),COLOR00FF00; DRAWTEXT(支撐=壓力 AND REF(支撐,1)<>REF(壓力,1),LOW*0.99,'●'),COLOR3300FF; DRAWTEXT(支撐=壓力 AND REF(支撐,1)<>REF(壓力,1),LOW*0.97,'優(yōu)'),COLOR3300FF; DRAWTEXT((CROSS(C,壓力) AND 加倉B<>加倉A) OR (CROSS(C,壓力) AND 買<>1) OR (C=壓力 AND OPEN<CLOSE),LOW*0.98,'突'),COLORWHITE; STICKLINE((CROSS(C,壓力) AND 加倉B<>加倉A) OR (CROSS(C,壓力) AND 買<>1) OR (C=壓力 AND OPEN<CLOSE),HIGH,LOW,0,1),COLORWHITE{,LINETHICK2}; STICKLINE((CROSS(C,壓力) AND 加倉B<>加倉A) OR (CROSS(C,壓力)AND 買<>1) OR (C=壓力 AND OPEN<CLOSE),OPEN,CLOSE,4,1),COLORWHITE{,LINETHICK2}; 突破:IF((CROSS(C,壓力) AND 加倉B<>加倉A) OR (CROSS(C,壓力)AND 買<>1) OR (C=壓力 AND OPEN<CLOSE),1,0),COLORWHITE; TY:=C; HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10); LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10); A2:=REF(C,BARSLAST(HD)); B2:=REF(C,BARSLAST(LD)); T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ; T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); 頂:IF(T1,A2,A2),COLOR00FF00,POINTDOT,LINETHICK2; STICKLINE(T1,A2,A2,9,0),COLOR00FF00; 底:IF(T2,B2,B2),COLORFF00FF,POINTDOT,LINETHICK2; AA1:=AMOUNT/V; BB1:=LOW<AA1*0.9; CC1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>1.2; DD1:=LOW<MA(CLOSE,5)*0.921; EE1:=V<MA(V,5)*1.5; 老鼠倉:=BB1 AND CC1 AND DD1 AND EE1; DRAWTEXT(老鼠倉,l*0.96,'鼠'),COLOR0099FF; |
