源码： {N:5,30,8;ZF:1,10,5;M:1.100.3;} V1:=MA(V,5); V2:=MA(V,10); MA5:=MA(CLOSE,5); MA10:=MA(CLOSE,10); MA13:=MA(CLOSE,13); MA20:=MA(CLOSE,20); MA40:=MA(CLOSE,40); MA60:=MA(CLOSE,60); MA75:=MA(CLOSE,75); LC:=REF(C,1); K9:=SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1); STICKLINE(1=1,11,-1,4,0),COLOR444444; STICKLINE(C<=MA(C,13) AND MA(C,13)<=REF(MA(C,13),1),11,-1,4,0),COLOR663300; STICKLINE(C>=MA(C,13) AND MA(C,13)>=REF(MA(C,13),1),11,-1,4,0),COLOR000055; D9:=SMA(K9,3,1); J9:=3*K9-2*D9; KK:K9*0.1; JJ:J9*0.1; VAR1:=DYNAINFO(17)*REF(MA(V,5),1); VAR2:=DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT; VAR3:=IF(DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT,VAR1,VAR2); VAR4:=BARSLAST(CROSS(MA5,MA60)); VAR5:=BARSLAST(CROSS(MA10,MA60)); VAR6:=BARSLAST(HIGH=HHV(HIGH,VAR5)); VAR7:=BARSLAST(CROSS(MA10,MA5)); VAR8:=BARSLAST(CROSS(MA5,MA10)); VAR9:=VAR4>VAR5 AND VAR5>VAR6 AND VAR6>VAR7 AND VAR7>VAR8 AND VAR8<5; VARA:=COUNT(CROSS(MA10,MA5),VAR5)=1; VARB:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100; VARC:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100; VARD:=(VARC-VARB)/20+6; AA:=MA(VARD,5); YYY:=EMA((INDEXC-LLV(INDEXL,11))/(HHV(INDEXH,25)-LLV(INDEXL,11))*4,8)+1; YY:=POW(YYY,2)-10; XXX:=EMA((C-LLV(L,11))/(HHV(H,25)-LLV(L,11))*4,8)+1; XX:=IF(1=1,POW(XXX,2)-10,DRAWNULL); 预:=CLOSE>MA(CLOSE,13); 升:=CLOSE>MA(CLOSE,5) AND CLOSELLV(CCI,7) AND LLV(L,2)<=LLV(L,7) AND HHV(H,10)>MA(CLOSE,60),1,0),COLORWHITE; TR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14); HD:=HIGH-REF(HIGH,1); LD:=REF(LOW,1)-LOW; PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14); MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14); PDI:=PDM*100/TR1; MDI:=MDM*100/TR1; A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1)); B1:=REF(C,A1+1)>C && REF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9) && CROSS ("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)); A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)); B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS ("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)); C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1)); D1:=REF(C,C1+1)"MACD.DIF"(12,26,9) AND CROSS ("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)); C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)); D2:=REF(C,C2+1)"KDJ.K"(9,3,3) AND CROSS ("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)); C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)); D3:=REF(C,C3+1)"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)); C4:=BARSLAST(REF(CROSS(MDI,PDI),1)); D4:=REF(C,C4+1)MDI AND CROSS(MDI,PDI); A4:=BARSLAST(REF(CROSS(PDI,MDI),1)); B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5; A12:=COUNT(CROSS(MA10,MA5),PDAY2)=1; A13:=OPENMAX(MA20,MAX(MA40,MA60)); A15:=V/MA(V,30)>1.2; A16:=C/REF(C,1)>1.049; A17:=MIN(MA(C,5),MA(C,10))>MA(C,60) AND CROSS(MA(C,5),MA(C,10)); A18:=MIN(MA(C,5),MA(C,10))/MA(C,60)<1.05; A19:=COUNT(V6; A20:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100; A21:=SMA(SMA(A20,3,1),3,1)/28.57; A22:=EMA(A21,5); A23:=3*A21-2*A22; A24:=(LOW+HIGH+CLOSE*2)/4; A25:=MA(A24,4); A26:=HHV(A25,10); A27:=MA(A26,3); A28:=1.25*A27-0.25*A26; A29:=IF(A28>A26,A26,A28); A30:=LLV(A25,10); A31:=MA(A30,3); A32:=1.25*A31-0.25*A30; A33:=IF(A3210.8 AND INDEXC>(MA(INDEXC,26)+2*STD(INDEXC,26)) AND PERIOD=5,9,DRAWNULL)=9 AND CURRBARSCOUNT=40,10,'大盘高'),COLORFFFF00; DRAWTEXT(CONST(IF(C>=MA(C,10) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,20)>REF(MA(C,20),1) AND MA(C,40)>REF(MA(C,40),1) AND MA (C,10)>REF(MA(C,20),1),1,0)) AND CURRBARSCOUNT=40,11,'上升趋势'),COLOR0033FF; DRAWTEXT(CONST(IF(C<=MA(C,10) AND MA(C,10)=VAR3 AND PERIOD=5,V,VAR3))=LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10),1,0)) AND CURRBARSCOUNT=40,-2,'缩量'),COLOR00FF00; DRAWTEXT(CONST(IF((IF(V>=VAR3 AND PERIOD=5,V,VAR3))=LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10) AND J9<70,1,0)) AND CURRBARSCOUNT=40,-2,'缩量,一旦放量上升可买入'),COLOR00FF00; DRAWTEXT((CONST(((IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0))+(IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0)))/REF(V,1)>2)) AND CURRBARSCOUNT=40,-3,'预比昨量放1倍以上'),COLORGREEN; DRAWTEXT((CONST(((IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0))+(IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0)))/REF(V,1)<0.5)) AND CURRBARSCOUNT=40,-3,'预比昨量缩一半以上'),COLORYELLOW; DRAWTEXT((DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))/(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>1.4 AND CURRBARSCOUNT=40,-4,'卖盘/买盘>1.4'),COLORGREEN; DRAWTEXT((DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))/(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>1.4 AND CURRBARSCOUNT=40,-4,'买量/卖盘>1.4'),COLORYELLOW; DRAWTEXT(CONST(IF(MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,20)>REF (MA(C,20),1) AND MA(C,30)>REF(MA (C,30),1) AND C>MA(C,5) AND C>MA(C,10) AND C>MA(C,30) AND C>LC AND V1>V2 AND ((IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) OR (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1) AND C>LC AND XX<8 and c>O,1,0)) AND CURRBARSCOUNT=40,-5,'量能理想 继续持有'),COLOR00FFFF; DRAWTEXT(CONST(IF(C>LC AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND C>MA(C,5) AND REF(MA(C,5),1)>=REF(MA (C,5),2) AND V1<=V2 AND ((IF(V>=VAR3 AND PERIOD=5,V,VAR3))=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))=VAR3 AND PERIOD=5,V,VAR3))/V))>(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),1,0)) AND CURRBARSCOUNT=40,-5,'量弱少量买 明放量加仓'),COLORFF00FF; DRAWTEXT(CONST(IF(C=VAR3 AND PERIOD=5,V,VAR3))/V))<(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1,1,0)) AND CURRBARSCOUNT=40,-5,'放量跌'),COLOR00FF00; DRAWTEXT(CONST(IF(C=VAR3 AND PERIOD=5,V,VAR3))/V))>(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))*1.15 AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF ((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1,1,0)) AND CURRBARSCOUNT=40,-6,'有抄底资金进入'),COLOR00CCCC; DRAWTEXT(CONST(IF(CREF(MA(C,10),1) AND REF(MA(C,5),1)>=REF(MA(C,5),2),1,0)) AND CURRBARSCOUNT=40,-6,'减部分仓'),COLOR00FF00; DRAWTEXT(CONST(IF(LLV(J9,5)<-15 AND C=LLV(C,10) AND C=VAR3 AND PERIOD=5,V,VAR3))/V))<(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)) AND C=VAR3 AND PERIOD=5,V,VAR3))>LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10),1,0)) AND CURRBARSCOUNT=40,-7,'走弱离场'),COLORFFFF00; DRAWTEXT(((V>REF(V,1)*3 AND HHV(REF(H,1),15)>LLV(REF(L,1),15)*1.18 AND HHV(H,5)>LLV(L,70)*1.3 AND HHV(H,40)>LLV(L,40)*1.3 AND J9>90) OR XX>12) AND C>(MA(C,26)+2*STD(C,26)) AND CMA(C,5) AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>=REF(MA(C,10),1) AND MA(C,5)>=MA(C,10)) OR (XX>REF(XX,1) AND XX>YY AND C>LC),1,0)) AND CURRBARSCOUNT=23,-6,'短线强'),COLORFF44FF; DRAWTEXT(CONST(IF(CMA(C,5) AND C=MA(C,10) OR MA(C,10)>=REF(MA(C,10),1))),1,0)) AND C=MA(CLOSE,13),1,0))) AND CURRBARSCOUNT=23,-2,'短线上升持股'),COLORGREEN; DRAWTEXT((CONST(IF(CLOSE=MA75,1,0))) AND CURRBARSCOUNT=30,-2,'长线上升持股'),COLORGREEN; DRAWTEXT((CONST(IF(CMA(CLOSE,3) AND CLOSE=15),1,0))) AND CURRBARSCOUNT=23,-4,'低买持 股信号'),COLORGREEN; DRAWTEXT((CONST(IF(CROSS(CLOSE,MA13),1,0))) AND CURRBARSCOUNT=30,-5,'加买信号'),COLORGREEN; DRAWTEXT(B1,JJ-1,'M底'),COLORFF44FF; DRAWTEXT(B2,JJ-3,'K底'),COLORFF44FF; DRAWTEXT(B3,JJ-2,'R底'),COLORFF44FF; DRAWTEXT(B4,JJ-1,'D底'),COLORFF44FF; DRAWTEXT(D1,JJ+1,'M顶'),COLORGREEN; DRAWTEXT(D2,JJ+3,'K顶'),COLORGREEN; DRAWTEXT(D3,JJ+2,'R顶'),COLORGREEN; DRAWTEXT(D4,JJ+1,'D顶'),COLORGREEN; DRAWTEXT(CROSS(MA(C,13),MA(C,21)),JJ-1,'圆底'),COLORFF44FF; DRAWTEXT(CCI背 AND REF(CCI,1)<-150 and c>O,JJ-1,' CCI进'),COLORGREEN; DRAWTEXT(A11 AND A12 AND CURRBARSCOUNT=30,-7,'唐鸭头买点'),COLORGREEN; DRAWTEXT((VAR9 AND VARA AND MA60>REF(MA60,1) AND CURRBARSCOUNT=30),-5,'老鸭头买点'),COLORGREEN; DRAWTEXT(A17 AND A18 AND A19 AND CURRBARSCOUNT=30,-6,'青龙取水买点'),COLORGREEN; DRAWTEXT(CROSS(A23,A21) AND A21<2.1 AND C>O AND CURRBARSCOUNT=30,-7,'绝买买点'),COLORGREEN; DRAWTEXT((A34 OR A35) AND CURRBARSCOUNT=30,-5,'的卢买点'),COLORGREEN; DRAWTEXT(A13 AND A14 AND A15 AND A16 AND CURRBARSCOUNT=30,-6,'出水芙蓉买点'),COLORGREEN; N3:=9; N4:=6; N5:=14; TYP := (HIGH + LOW + CLOSE)/3; CC1:=(TYP-MA(TYP,N5))/(0.015*AVEDEV(TYP,N5)),COLORFF00FF; C11:=SMA(CC1,3,1); C12:=SMA(C11,3,1); C13:=3*C11-2*C12; CB1:=EMA(C13,5); RSI1:=SMA(MAX(CLOSE-LC,0),N4,1)/SMA(ABS(CLOSE-LC),N4,1)*100; RSI:=(RSI1-50)*5,LINETHICK2,COLORFFFFFF; R1:=SMA(RSI,3,1); D11:=SMA(R1,3,1); J1:=3*R1-2*D11; RR1:=EMA(J1,5); RR2:=REF(RR1,1); RR:=RR1>RR2; RSV:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100; K:=SMA(RSV,3,1); K1:=(K-50)*5,COLOR00FF00; K2:=SMA(K1,3,1); D12:=SMA(K2,3,1); J2:=3*K2-2*D12; BB1:=EMA(J2,5); 买入:=RR AND NOT(REF(RR,1)) AND (RR1<-100 and bb1<-100) cb1<-100,linethick0; drawtext(买入 jj<8 ref(cci,1)<-120 c>O AND CONST(IF(C>=MA75,1,0)),-0.8,'东家买');
公式模块：
N3:=9;
N4:=6; N5:=14; LC:=REF(C,1); MA75:=MA(CLOSE,75); K9:=SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1); D9:=SMA(K9,3,1); J9:=3*K9-2*D9; JJ:=J9*0.1; TYP := (HIGH + LOW + CLOSE)/3; CC1:=(TYP-MA(TYP,N5))/(0.015*AVEDEV(TYP,N5)); C11:=SMA(CC1,3,1); C12:=SMA(C11,3,1); C13:=3*C11-2*C12; CB1:=EMA(C13,5); rsi1:=SMA(MAX(CLOSE-LC,0),N4,1)/SMA(ABS(CLOSE-LC),N4,1)*100; RSI:=(RSI1-50)*5; R1:=SMA(RSI,3,1); D11:=SMA(R1,3,1); J1:=3*R1-2*D11; RR1:=EMA(J1,5); RR2:=REF(RR1,1); RR:=RR1>RR2; RSV:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100; K:=SMA(RSV,3,1); K1:=(K-50)*5; K2:=SMA(K1,3,1); D12:=SMA(K2,3,1); J2:=3*K2-2*D12; BB1:=EMA(J2,5); 买入:=RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BB1<-100) AND CB1<-100; 买入 AND JJ<8 AND REF(cci,1)<-120 AND C>O AND CONST(IF(C>=MA75,1,0));
