AI主力语模初--AI主力伏击模型之一
公式用到dll,无法解开,只能提供给大家参考。
主图源码:
{AI主力语模初}{语模初级}
现金负债比A:=(FINANCE(25)/FINANCE(15));主营业增长率:=FINANCE(44);净利润增长率:=FINANCE(43);每股收益:=CONST(FINANCE(38));每股净资产:=CONST(FINANCE(34));每股现金流:=CONST((FINANCE(25)/FINANCE(1)));每股未分配:=CONST(FINANCE(32));每股公积金:=CONST(FINANCE(18));市盈率:=DYNAINFO(39);换手率:=V/CAPITAL*100,COLORYELLOW,NODRAW;量比:=DYNAINFO(17);现价:=DYNAINFO(7);振幅:=DYNAINFO(13)*100;市销率:CONST(TDXDLL6(15,FINANCE(1),DYNAINFO(7),FINANCE(20))),COLORYELLOW,NODRAW;
ER4:=主营业增长率>1;ER42:=主营业增长率>0;ER5:=净利润增长率>2;ER52:=净利润增长率>0.2;SAX1:=每股收益>0.01;SAX12:= 每股收益>0.001;SAX2:=每股净资产>2;SAX22:=每股净资产>0.01;SAX4:=每股未分配>0.5;SAX42:=每股未分配>0.001;SAX5:=每股公积金>0.5;SAX52:=每股公积金>0.002;DP3:=市盈率<200;DP32:=市盈率<5000;DP4:=换手率>0.1;DP42:=换手率>0.01;WMF1:=TDXDLL6(17,DP4,量比,DP3);WMF12:=TDXDLL6(18,DP4,量比,DP3);{风险系数}X11:=TDXDLL6(19,FINANCE(11),FINANCE(15),FINANCE(10));X12:=TDXDLL6(20,FINANCE(31),FINANCE(17),FINANCE(10));X13:=TDXDLL6(21,FINANCE(31),FINANCE(23),FINANCE(10));X14:=TDXDLL6(22,FINANCE(23),FINANCE(19),FINANCE(15));X15:=TDXDLL6(23,FINANCE(25),FINANCE(20),FINANCE(15));ZZ值:=X11+X12+X13+X14+X15;
预警A:=IF(ZZ值<1.2,'重警',IF(ZZ值>=1.2 AND ZZ值<=2.6,'轻警','无警'));财务预警A:=STRCAT('财务预警A: ',STRCAT(预警A,STRCAT('-ZZ值: ',CON2STR(ZZ值,3))));优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准};现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警A,优质资产率),现金负债比));
优秀:=ER4 AND ER5 AND SAX1 AND SAX2 AND SAX4 AND SAX5 AND DP3 AND DP4 AND WMF1,COLORRED;较好:=ER42 AND ER52 AND SAX12 AND SAX22 AND SAX42 AND SAX52 AND DP32 AND DP42 AND WMF12,COLORMAGENTA;DRAWTEXT_FIX(优秀 AND 较好=0,0,0,0,'基本面:优秀级!'),COLORRED;DRAWTEXT_FIX(较好,0,0,0,'基本面:较好!钰开AI开盘界面'),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0.00,0.05,0,财务系数),COLORRED;DRAWTEXT_FIX(1,0,0.5,0,'钰开AI智能看盘'),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,STRCAT('机构总家数: ',STRCAT(CON2STR(FINVALUE(TDXDLL6(24,168,99,88)),0),' 家'))),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0,0.3,0,STRCAT('机构总持股: ',STRCAT(CON2STR(FINVALUE(TDXDLL6(39,168,99,88))/FINVALUE(TDXDLL6(40,168,99,88))*100,2),' %'))),COLORYELLOW;AA:=TDXDLL6(25,GPJYVALUE(2,3,0),GPJYVALUE(2,1,0),GPJYVALUE(2,2,0));TJ:=AA>0; {上龙虎榜}DRAWTEXT_FIX(TJ,0,0.4,0,STRCAT('龙虎榜净买入: ',VAR2STR(AA,0))),COLORRED;DRAWTEXT_FIX(TJ,0,0.5,0,'钰开AI智能看盘'),COLORYELLOW;DRAWICON(TJ,LOW*0.995,9);DRAWTEXT(TJ,LOW*0.975,'--龙'),COLORYELLOW;ZT:=TDXDLL6(26,H,C,REF(C,1));STICKLINE(ZT,C,O,4,0),COLORRED;获利线:=EMA(CLOSE,14);中线:=EMA(C,145); 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,19))/210;主力成本:EMA(X,13),COLORMAGENTA,LINETHICK2;M8:=EMA(CLOSE,8);M13:=EMA(M8,13);VAR1:=EMA(M13,55);VAR2:=(REF(HIGH,1)+REF(LOW,1))/2;{二一位}VAR3:=TDXDLL6(27,STD(C,21),MA(C,21),STD(C,21));DRAWTEXT(VAR2>VAR3 AND (O-C)/C*100>=3,HIGH*1.02,'T'), COLORGREEN;VAR4:=REF(CLOSE,1);VAR44:=REF(CLOSE,1);VAR5:=SMA(MAX(CLOSE-VAR44,0),7,1)/SMA(ABS(CLOSE-VAR44),7,1)*100;VAR6:=CROSS(79,VAR5);VAR7:=TDXDLL6(28,VAR6,VAR5,VAR44);DRAWTEXT(VAR7 AND C<O,HIGH*1.02,'T'), COLORGREEN;S:=(O-L)>1.1*(C-O) AND C>O;J:=TDXDLL6(29,H,C,O) AND C>O AND C/REF(C,1)<1.01;SJ:=REF(S,1) AND J;DRAWTEXT(SJ AND REF(H,1)>1.01*H,L*0.98,'双剑合璧'),COLORYELLOW;A7:=(2*C+H+L)/4;VAR10:=LLV(LOW,34);VAR11:=HHV(HIGH,34);SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);D:=MA(CLOSE,80)-MA(CLOSE,10)/3;DRAWTEXT(IF(CLOSE<D AND VOL/235>MA(VOL,5)/235 AND CLOSE>REF(CLOSE,1)*1.08AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●中期抄底'),COLORRED;DT1:=TDXDLL6(31,O,C,H);DT:=TDXDLL6(32,C,REF(C,1),H);STICKLINE(ZT,C,O,4,0),COLORRED;STICKLINE(DT1,C,O,4,0),COLORBLUE;STICKLINE(DT,C,O,4,0),COLORBLUE;X1:=TDXDLL6(34,C,REF(C,1),MA(C,13));X2:=TDXDLL6(35,H,C,MA(C,13));二分位:=(MIN(O,C)+(MAX(O,C)-MIN(O,C))/2);STICKLINE(X1,二分位,二分位,9,0),COLORRED;STICKLINE(X2,二分位,二分位,9,0),COLORWHITE;BHSGL:=TDXDLL6(35,V,REF(VOL,1),REF(C,1));控盘不佳:=BHSGL AND C>REF(C,1);STICKLINE(控盘不佳,O,C,2,0),COLORGREEN;{K线上下划线};STICKLINE(控盘不佳,O,(O+C)*0.5,2,0),COLORFF00FF;{紫色线}SYS:=TDXDLL6(13,V,C,REF(VOL,1)) AND TDXDLL6(13,C,H,REF(C,1)) AND C>=O*1.048 AND (H-C)/(C-O)<=0.6 AND TDXDLL6(13,REF(O,1),H,REF(C,1));STICKLINE(SYS,C,(C+O)*0.5,2,0),COLORYELLOW;HJJ:=(3*C+H+L+O)/6;HVAR:=(8*HJJ+7*REF(HJJ,1)+6*REF(HJJ,2)+5*REF(HJJ,3)+4*REF(HJJ,4)+3*REF(HJJ,5)+2*REF(HJJ,6)+REF(HJJ,8))/36;TJ1:=VOL=HHV(VOL,10) AND VOL>=2*REF(VOL,1) AND VOL<3*REF(VOL,1) AND CLOSE>HVAR AND C>REF(C,1);TJ2:=C>O AND TDXDLL6(36,H,C,O);JZ:=FILTER(TJ1 AND TJ2,10);STICKLINE(JZ,OPEN,CLOSE,5,0),COLORYELLOW;{K线上下划线};DRAWICON(JZ,L-0.1,25);{红宝石}FSGL:=REF(VOL,1)/REF(VOL,2)>3 AND REF(VOL,1)/REF(VOL,2)<5;CXFL:=TDXDLL6(13,V,C,REF(V,1)) AND FSGL;SPEY:=C<(H+L)/2;SGEY:=C>(H+L)/2;BTBD:=TDXDLL6(13,C,C,REF(C,1));BT1:=CXFL AND BTBD AND SPEY;BT2:=CXFL AND BTBD AND SGEY;STICKLINE(BT1,O,C,3,0),COLOR871F78;STICKLINE(BT1,O,(O+C)*0.5,1,0),COLORRED;DRAWICON(BT1,H+0.1,23);STICKLINE(BT2,O,C,3,0),COLOR871F78;STICKLINE(BT2,O,(O+C)*0.5,1,0),COLORRED;DRAWICON(BT2,H+0.1,26);N5:=HHVBARS(C,60);F1:=REF(N5,1)>30 AND CROSS(C,REF(HHV(H,60),1));F2:=TDXDLL6(37,C,V,REF(V,1));DRAWTEXT(F1 AND F2,H,'BLGF'),LINETHICK2,COLORYELLOW;板阴:=REF(H,1)>=REF(C,1)*1.07 AND REF(C,1)<REF(H,1); 量比2:=REF(VOL,1)/ REF(VOL,2);高量:=量比2>=2.5;ZRGLY:=板阴 AND 高量;今日量比:=VOL/REF(VOL,1);缩三一或缩倍:=今日量比<0.66;SNZT:=COUNT( C/REF(C,1)>=1.09,5);SRNZT:=REF(C,3)/REF(C,4)<1.09;GLY:=ZRGLY AND TDXDLL6(38,ZRGLY,SNZT,SNZT);DRAWTEXT(GLY,REF(H,1),'GLY'),LINETHICK2,COLORYELLOW;AAA:=MA(LOW,5)*(1-5/100);BBB:=(HHV(AAA,5)+LLV(AAA,5))/2;DRAWTEXT(TDXDLL6(41,BBB,L,GLY) AND BBB>REF(BBB,1),L*0.98,'回马 '),COLORYELLOW;A1:=EMA((C - REF(C,1)) / REF(C,3),10) * 100 ;A2:=EMA(EMA(EMA(EMA(A1,2),2),2),3) ;A3:=(C - MA(C,26)) / MA(C,26) * 100 ;A4:=1 ;A5:=IF(MA((C - MA(C,28)) / MA(C,28),3) * 100 > 0 AND MA(C,5) > MA(C,10) AND A3 > EMA(MA((C - MA(C,28)) / MA(C,28),3) * 100,5) AND A2 > REF(A2,1),MA((C - MA(C,28)) / MA(C,28),3) * 100,0) * A4 ;VARD1:=MA((C - MA(C,28)) / MA(C,28),3) * 100 ;