选股公式生成的长 "涨停风暴选股公式:前期压力位与妖龙突破,当前业绩及股本市值分析"
[通达信] 4091
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 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; N:=10; T1:=CONST(HHVBARS(V,10)),NODRAW; 前期压力位:IF(CURRBARSCOUNT<=N+15,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL)COLOR0000FF,LINETHICK2; DRAWTEXT(ISLASTBAR,前期压力位,' 前期压力位'); |
楼主 |
2楼 |