多線:27;

空線:55;

P:=((2)*(CLOSE) + HIGH + LOW + OPEN)/(5);

BB:=MA(P,3);

CC:=(SUM(IF((P > REF(P,1)),(P)*(VOL),0),4))/(SUM(IF((P < REF(P,1)),(P)*(VOL),0),4));

DD:=REF(100 - (100)/(1 + CC),1);

A1:=HHV(P,15);

A2:=LLV(P,15);

A3:=A1 - A2;

A4:=(EMA((P - A2)/(A3),2))*(100);

多方力度1:=(3*SMA((CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,24)-LLV(LOW,24))*100,5,1),3,1))*強(qiáng)弱;

空方力度1:=(100*(HHV(HIGH,95)-CLOSE)/(HHV(HIGH,95)-LLV(LOW,95)))*強(qiáng)弱;

強(qiáng):空方力度1<多方力度1,COLORRED;

STICKLINE(空方力度1<多方力度1,0,100,6.6.0,0)COLOR001050;

弱:STICKLINE(空方力度1>多方力度1,0,100,9.9.0,0)COLORLICYAN;

短線1:=A4;

短線:IF(CURRBARSCOUNT>短線M,  DRAWNULL,短線1),COLOR888888,LINETHICK1;

IF(短線>REF(短線,1),短線,DRAWNULL),LINETHICK1,COLORRED;

多方力度:(3*SMA((CLOSE-LLV(LOW,多線))/(HHV(HIGH,多線)-LLV(LOW,多線))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,多線))/(HHV(HIGH,27)-LLV(LOW,多線))*100,5,1),3,1)),COLOR00FFFF,LINETHICK2;

空方力度:100*(HHV(HIGH,空線)-CLOSE)/(HHV(HIGH,空線)-LLV(LOW,空線)),COLOR00EC00,LINETHICK1;

DRAWTEXT(ISLASTBAR,短線,'←短線'),COLOR888888;

DRAWTEXT(ISLASTBAR,多方力度,'←多方'),COLORYELLOW;

DRAWTEXT(ISLASTBAR,空方力度,'←空方'),COLORGREEN;

持幣:=(IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL))*強(qiáng)弱;

持股:(IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL))*強(qiáng)弱,COLORRED,NODRAW;

STICKLINE(持幣,50,50,2.1.1,0),COLORCYAN;

STICKLINE(持股,50,50,2.1.1,0),COLORRED;

買點(diǎn):REF(持幣,1)>0 AND 持股>0,COLORLIRED;

RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

VAR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA

((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);

VAR2:=EMA(VAR1,8);

VAR3:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA

((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1);

趨勢(shì):=EMA(VAR3,3)-10;

VAR4:=(趨勢(shì)-REF(趨勢(shì),1))/REF(趨勢(shì),1)*100;

VAR5:=FILTER((趨勢(shì)<=13 AND VAR4>13),10);

VAR6:=FILTER((趨勢(shì)>=90 AND VAR4),10);

VAR7:=LLV(LOW,30);

VAR8:=HHV(HIGH,30);

VAR9:=EMA((CLOSE-VAR7)/(VAR8-VAR7)*4,4)*25;

VAR10:=(VAR9-LLV(VAR9,4))/(HHV(VAR9,4)-LLV(VAR9,4))*100;

VAR11:=SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1);

VAR12:=HHV(VAR11,30)*8;

VAR2222:=REF(LOW,1);

VAR3333:=(SMA(ABS(LOW-VAR2222),3,1))/(SMA(MAX(LOW-VAR2222,0),3,1))*100;

VAR4444:=EMA(IF(CLOSE*1.3,VAR3333*10,VAR3333/10),3);

VAR5555:=LLV(LOW,30);

VAR6666:=HHV(VAR4444,30);

VAR7777:=IF(MA(CLOSE,58),1,0);

主力吸籌:(EMA(IF(LOW<=VAR5555,(VAR4444+VAR6666*2)/2,0),3))/(618)*VAR7777,NODRAW;

VAR9999:=IF(主力吸籌>100,100,主力吸籌)*吸籌;

MA1:=MA(C,5);

MA2:=MA(C,10);

MA3:=MA(C,20);

MA4:=MA(C,60);

MA5:=MA(C,120);

籌碼:=(COST(90)+COST(70)+COST(50)+COST(30)+COST(10))/5;

今獲利:WINNER(C)*100,COLORWHITE,NODRAW;

昨獲利:=REF(今獲利,1),COLORYELLOW,NODRAW;

獲利比增:今獲利-昨獲利,COLORRED,NODRAW;

二日漲幅:=(C-REF(C,5))/REF(C,5)*100;

五日漲幅:=(C-REF(C,5))/REF(C,5)*100;

十日漲幅:=(C-REF(C,10))/REF(C,10)*100;

二十漲幅:=(C-REF(C,20))/REF(C,20)*100;

十五漲幅:=(C-REF(C,15))/REF(C,15)*100;

六十漲幅:=(C-REF(C,60))/REF(C,60)*100;

量比:=V/REF(MA(V,1),1);

五日換手:=SUM(VOL,5)*100/CAPITAL;

二十換手:=SUM(VOL,20)*100/CAPITAL;

六十換手:=SUM(VOL,60)*100/CAPITAL;

趨勢(shì)線:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4;

牛熊線:=MA(CLOSE,26);

生命線:=EMA(CLOSE,55);

AVAR10:=LLV(LOW,10);

AVAR13:=HHV(HIGH,25);

紅線:=EMA((CLOSE-AVAR10)/(AVAR13-AVAR10)*4,4)*25;

A:=IF(空方力度1<多方力度1,紅線,DRAWNULL),LINETHICK2,COLOR0000FF;

RSV10:=(HHV(HIGH,11)-CLOSE)/(HHV(HIGH,11)-LLV(LOW,11))*100;

綠線:=SMA(RSV10,3,1);

B:=IF(空方力度1<多方力度1,綠線,DRAWNULL),LINETHICK2,COLORWHITE;

多方輔助:IF(CURRBARSCOUNT>5,  DRAWNULL,A)COLOR0000FF,LINETHICK2;

空方輔助:IF(CURRBARSCOUNT>5,  DRAWNULL,B)COLORWHITE,LINETHICK2;

強(qiáng)勢(shì)持股:IF(空方力度<空方輔助 AND 空方力度<50 AND 空方力度<多方輔助 AND 空方輔助<多方輔助,空方力度 AND 空方輔助<REF(空方輔助,1),DRAWNULL),LINETHICK1,COLORRED;

天:95,POINTDOT,COLORFFFF00;

界:=50,POINTDOT,COLORFFFFFF;

地:5,POINTDOT;

JD1:=MAX(MAX(趨勢(shì)線,牛熊線),生命線);

JX1:=MIN(MIN(趨勢(shì)線,牛熊線),生命線);

一陽(yáng)定勢(shì):=(C>JD1  AND O<JX1 AND 量比>1 AND CROSS(多方力度,空方力度) AND C/REF(C,1)>1.02)*一陽(yáng),COLORRED,NODRAW;

金銀袋:=(C>生命線 AND L <生命線 AND C>趨勢(shì)線 AND CROSS(多方力度,空方力度) AND C/REF(C,1)>1.02 AND 量比>1.1 AND C>O AND H/MAX(O,C)<1.05)*金銀,COLORYELLOW,NODRAW;

紅鉆石:=C/REF(C,1)>1.03  AND 量比>1.1 AND CROSS(多方力度,空方力度)*紅鉆,COLORLIRED,NODRAW;

STICKLINE(一陽(yáng)定勢(shì),50,65,2.7.2,0),COLOR0000AA;

STICKLINE(一陽(yáng)定勢(shì),50,65,1.9.4,0),COLOR0000BB;

DRAWICON(紅鉆石,35,25);

DRAWICON(金銀袋,45,9);

A5:=((CLOSE - (LLV(LOW,9))) / ((HHV(HIGH,9)) - (LLV(LOW,9)))) * 100;

A6:=SMA(A5,3,1);

A7:=SMA(A6,3,1);

A17:=MA(CLOSE,90);

A26:=((CLOSE - A17) / A17) * 100;

RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K2:=SMA(RSV2,3,1);

D2:=SMA(K2,3,1);

A65:=(CROSS(K2,D2)) * 60;

A105:=MA(CLOSE,27);

A106:=((CLOSE - A105) / A105) * 100;

A107:=(MA(A106,3));

A149:=BARSLAST(((CROSS(-10,A107)) = 1));

A150:=BARSLAST(((CROSS(A107,10)) = 1));

A151:=((A107 < -10) AND (A149 > 3));

A152:=((A107 > 10) AND (A150 > 3));

安全:=(((IF(A151,A107,0)) < 0) * -10),COLORGREEN;

STICKLINE(VAR9999>-150,0,VAR9999,2,0),COLORFF00FF;

龍?zhí)ь^:=((((((A65 AND 安全) AND ((A6 - A7) > 1.5)) AND (OPEN != HIGH)) AND (A26 < -10)) OR (安全 AND (CROSS(A6,A7)))) * 20)*梅花;

IF(龍?zhí)ь^,6,DRAWNULL),CROSSDOT,LINETHICK6,COLORRED;

趨勢(shì)線2:=MA((CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100 ,2);

鉆石底:=(趨勢(shì)線2<-20)*底部,COLORLIGREEN,NODRAW;

DRAWICON(鉆石底,2,27);

VARL1:=(HIGH+LOW+CLOSE)/3;

VARL2:=(VARL1-MA(VARL1,14))/(0.015*AVEDEV(VARL1,14));

VARL3:=(VARL1-MA(VARL1,70))/(0.015*AVEDEV(VARL1,70));

VARL4:=IF(VARL2>=150 AND VARL2<200 AND VARL3>=150 AND VARL3<200,10,0);

VARL5:=IF(VARL2<=-150 AND VARL2>-200 AND VARL3<=-150 AND VARL3>-200,-10,VARL4);

PJX:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

短期強(qiáng)弱:=PJX;

VARL1A:=IF(PJX>0,PJX,0);

VARL1B:=IF(VARL3>=200 AND VARL2>=150,15,IF(VARL3<=-200 AND VARL2<=-150,-15,VARL5));

抄底:REF(VARL1B=-15,1) AND VARL1B>-15,NODRAW;

DRAWTEXT(抄底,5,'  ★抄底'),COLORYELLOW;

VAR01:=(HIGH+LOW+CLOSE)/3;

VAR02:=(VAR01-MA(VAR01,14))/(0.015*AVEDEV(VAR01,14));

VAR03:=(VAR01-MA(VAR01,70))/(0.015*AVEDEV(VAR01,70));

VAR04:=IF(VAR02>=150 AND VAR02<200 AND VAR03>=150 AND VAR03<200,10,0);

VAR05:=IF(VAR02<=-150 AND VAR02>-200 AND VAR03<=-150 AND VAR03>-200,-10,VAR04);

VAR1B:=(IF(VAR03>=200 AND VAR02>=150,15,IF(VAR03<=-200 AND VAR02<=-150,-15,VAR05))+60)*逃頂;

DRAWTEXT(FILTER(VAR1B=75,5),95,'★逃頂'),COLORLIGREEN;

{Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,FGBLOCK);

Z3:=STRCAT(Z2,DYBLOCK);

Z4:=STRCAT(Z3,' ');

DRAWTEXT_FIX(ISLASTBAR,0.00,0.01,0,STRCAT(Z4,GNBLOCK)),COLORWHITE;

DRAWTEXT_FIX(1,0.00,1,0,'主題投資：')COLOR0000FF;

DRAWTEXT_FIX(1,0.07,1,0,EXTERNSTR(0,1))COLORWHITE;};