通達信絕世妖龍風暴主圖指標 源碼 貼圖

GGG:=MA(C,30);
B1:=MA(C,1);
B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1);
SMA2:=MA(B2,3);
止損下限:IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2);
IF(B2>SMA2,B2,DRAWNULL),COLORRED,LINETHICK4;
IF(B2<SMA2,B2,DRAWNULL),COLORGREEN,LINETHICK4;
平臺突破:HHV(MA(B2,1),13);
VAR1A:=(2*CLOSE+HIGH+LOW)/4;
VAR2A:=MA(VAR1A,7);
UUYFFUPPQQA:=VAR2A-MA(VAR1A,7/2)<0;
VAR4A:=VAR2A-MA(VAR1A,7/2)>0;
UUUTA:=BARSLAST(UUYFFUPPQQA);
UUEEWUIITWUUA:=0-BARSLAST(VAR4A);
UUWUTWWTTA:=IF(UUYFFUPPQQA<=0,UUUTA,UUEEWUIITWUUA);
STICKLINE(平臺突破>B2 AND B2>SMA2,平臺突破,B2,0,0),COLORBLUE;
STICKLINE(平臺突破>SMA2 AND B2<SMA2,平臺突破,SMA2,0,0),COLORBLUE;
UUUUUT:=(CLOSE*2+HIGH+LOW)/4;
UUWUIITWUU:=EMA(UUUUUT,13)-EMA(UUUUUT,34);
UUEEWUTWWTT:=EMA(UUWUIITWUU,5);
VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));
UUYFFUPPQQ:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR4:=((REF(UUYFFUPPQQ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
UUUT:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
UUEEWUIITWUU:=((REF(UUUT,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
UUWUTWWTT:=((REF(UUEEWUIITWUU,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
UUYYWUTWUUPP:=((REF(UUWUTWWTT,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
UUUTWW:=((REF(UUYYWUTWUUPP,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
UUWUTWUUPP:=((REF(UUUTWW,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VARB:=((REF(UUWUTWUUPP,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
IIIII:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VARD:=((REF(IIIII,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
WWWW:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR11:=((REF(WWWW,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)));
UUWUTWW:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
UUYYWWUUPP:=((REF(UUWUTWW,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR17:=((REF(UUYYWWUUPP,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
UUYYWWUUPPQQ:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
UUUUU:=((REF(UUYYWWUUPPQQ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
OOOO:=(REF((((((((((((VARE OR VARF) OR WWWW) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR UUWUTWW) OR UUYYWWUUPP) OR VAR17) OR UUYYWWUUPPQQ) OR UUUUU),1) AND VAR2);
STICKLINE(OOOO,O,O+(C-O)/3,2,0),COLOR10FFFF;
STICKLINE(OOOO,O,O+(C-O)/3,1,0),COLOR00FFFF;
AA:=(REF((((((((((((VAR2 OR UUYFFUPPQQ) OR VAR4) OR UUUT) OR UUEEWUIITWUU) OR UUWUTWWTT) OR UUYYWUTWUUPP) OR UUUTWW) OR UUWUTWUUPP) OR VARB) OR IIIII) OR VARD),1) AND VARE);
STICKLINE(AA,O,O+(C-O)/3,2,0),COLOR00EE00;
STICKLINE(AA,O,O+(C-O)/3,1,0),COLOR00FF00;
UUYFFUPPDDQQ:=EMA(CLOSE,55);
A14:=MA(CLOSE,75);
A15:=EMA(A14,3);
A16:=EMA(A15,3);
UUEEWUTW:=(HIGH + LOW) / 5;
A18:=(MA(UUEEWUTW,4)) - (MA(UUEEWUTW,34));
A19:=CROSS(A18,0);
UYFFUPPDDQQ:=CROSS(0,A18);
A21:=BARSLAST(A19);
UUUU:=BARSLAST(UYFFUPPDDQQ);
A23:=REF(A19,1);
A24:=REF(UYFFUPPDDQQ,1);
A25:=BARSLAST(A23);
A26:=BARSLAST(A24);
A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26)));
A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < UUUU);
A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (UUUU < A21);
UYFFUPDQQ:=A28 AND ((COUNT(A28,A21)) = 1);
A31:=A29 AND ((COUNT(A29,UUUU)) = 1);
UYFFAAUPDQQT:=UYFFUPDQQ AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(UYFFUPDQQ),1)));
UYFFAAUPDQQ:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(UYFFUPDQQ),1)));
DRAWTEXT(UYFFAAUPDQQT,SMA2*0.95,'↑--買入'),COLORYELLOW;
AC:=AMOUNT/(VOL);
YY:=MA(AC,13);
LLL:=(C-YY)/YY*100;
MIDC := MA(CLOSE,22);
UPPERC:= MIDC + 2*STD(C,22);
LOWERC:= MIDC - 2*STD(C,22);
BBA:=(C-LOWERC)/(UPPERC-LOWERC);
BBC:=FORCAST(BBA,3);
LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1));
STICKLINE(LIFENGCYC>0,C,O,2,0),COLOR10ABFF;
DRAWTEXT(LIFENGCYC>0,LOW*0.97,'☆'),COLORDD00DD;
TJ:=DYNAINFO(4)>0{WWW.GPXIAZAI.COM}
AND HHV(HIGH,10)/LLV(LOW,10)<1.25
AND REF(CLOSE,1)<(LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85)
AND CLOSE>OPEN
AND CLOSE>=HHV(HIGH,10);
STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,1,0),COLORYELLOW;
放量突破:=TJ,NODRAW,COLORRED;
DRAWTEXT(TJ,L*0.98,'↑--放量突破'),COLORRED;
W1:=C=HHV(C,20);
W2:=BARSLAST(W1);
W3:=IF(W2>0,REF(C,W2),REF(C,W2));
W4:=CROSS(C,REF(W3,1));
回調突破:=W4 AND COUNT(W4,5)=1;
DRAWTEXT(回調突破>0,L*0.95,'↑--回調突破'),COLORWHITE;

所屬板塊:=STRCAT('所屬板塊: ',STRCAT(STRCAT(STRCAT('[行業]-',HYBLOCK),STRCAT(' [地域]-',DYBLOCK)),STRCAT(' [概念]-',GNBLOCK)));
總股本:=STRCAT(STRCAT('總股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'億');
流通盤:=STRCAT(STRCAT(' 流通盤: ',CON2STR(CAPITAL/1000000,2)),'億');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'億');
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(總股本,流通盤),全流通),市值));
{業績}
凈資收益率:=STRCAT(' 凈資收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
主營利潤率:=STRCAT(' 主營利潤率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
當前業績:=STRCAT('當前業績: ',STRCAT(STRCAT(凈資收益率,毛利率),主營利潤率));
{主圖顯示}
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,所屬板塊),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,股本市值),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.18,0,當前業績),COLORGREEN;

UWPUUDQQT:=REF(C,1)/REF(C,3)>=1.2 AND O/REF(C,1)<=1.01 AND L<REF(C,1) AND C/REF(C,1)>1.05;
UWPUURRDDQTRRWW:=UWPUUDQQT AND COUNT(UWPUUDQQT,4)=1;
STICKLINE(UWPUURRDDQTRRWW,O,C,2.5,0),COLORFF00FF;
DRAWTEXT(UWPUURRDDQTRRWW,L*0.98,'↑ -- 漲停風暴'),COLORFF00FF;
UYFFAAUPUUDQQT:=(C-REF(C,1))/REF(C,1)*100<-5 OR O/C>1.05;
砸盤線:DRAWLINE(UYFFAAUPUUDQQT,O,REF(UYFFAAUPUUDQQT,1),REF(O,1),1),DOTLINE,COLORCYAN;

TTTTTTT:=MA(REF(HHV(C,30),1),2),COLORMAGENTA,LINETHICK2;
UWPUURRQTRR:=EMA(((100 * (CLOSE - LLV(LOW,34))) / (HHV(HIGH,34) - LLV(LOW,34))),3);
UWPUURRDQQTRR:=SMA((((HHV(HIGH,34) - CLOSE) / (HHV(HIGH,34) - LLV(LOW,34))) * 100),2,1);
UWPUURRQTRRWW:=EMA(((100 * (INDEXC - LLV(INDEXL,34))) / (HHV(INDEXH,34) - LLV(INDEXL,34))),3);
換手:=(((VOL /MA(V,5))) >= 2);
UWPUUDQQTRR:=(((CLOSE / REF(CLOSE,1)) - 1) * 100);
AAA:=(CROSS(UWPUURRQTRR,UWPUURRDQQTRR) AND (UWPUURRQTRR >= 45));
BBB:=(CROSS(UWPUURRQTRR,UWPUURRQTRRWW) AND (UWPUURRQTRR >= 45));
DDD:=(CROSS(UWPUURRQTRR,75) AND (UWPUUDQQTRR>= 2));
SSSSSS:=(CROSS(UWPUURRQTRR,20) AND (UWPUUDQQTRR>= 2));
UUEEWUTWUU:=(AAA>0 OR BBB>0 OR DDD>0 OR SSSSSS>0);
GGGGGG:=(C>TTTTTTT AND L<TTTTTTT AND C>REF(C,1)*1.097 AND UUEEWUTWUU);

STICKLINE(GGGGGG AND L<GGG*1.05,O,C,1,0),LINETHICK1,COLORYELLOW;
DRAWICON(GGGGGG AND L<GGG*1.05,L,24);
DRAWICON(GGGGGG AND L<GGG*1.05,L*0.97,25);
DRAWICON(GGGGGG AND L<GGG*1.05,L*0.94,26);
DRAWTEXT(GGGGGG AND L<GGG*1.05,(L*0.92),' 妖龍突破'),COLORYELLOW;