通达信天涯核心卧槽马和谐后小有改动未加密选股指标公式源码

ma5:MA(CLOSE,5);

MA10:MA(CLOSE,10);

MA20:MA(CLOSE,20);

MA60:MA(CLOSE,60);

N:=30;

KK:=BArslAST(CURRBARSCOUNT=N);

GD:=CONST(IF(ISLASTBAR=1,HHV(H,KK),0));

RR:=CONST(IF(ISLASTBAR=1,LLV(L,KK),0));

KJ:=GD-RR;

A:=ema(C,21)COLORYELLOW,LINETHICK3;

B:=A<REF(A,1);

HY:=IF(B-1,A,DRAWNULL)COLORWHITE,LINETHICK3;

AA:=EMA(C,3) > EMA(C,21);

BB:=EMA(C,3) < EMA(C,21);

CC:= EMA(C,3) > EMA(C,8);

CC1:=EMA(C,3) < EMA(C,8);

STICKLINE(AA,L,H,0,0),COLOR0088EE;{金色}

STICKLINE(AA,CLOSE,OPEN,3,0),COLOR0055AA;

STICKLINE(AA,CLOSE,OPEN,2.8,0),COLOR0066BB;

STICKLINE(AA,CLOSE,OPEN,2.5,0),COLOR0077CC;

STICKLINE(AA,CLOSE,OPEN,2.2,0),COLOR0088DD;

STICKLINE(AA,CLOSE,OPEN,1.7,0),COLOR0099EE;

STICKLINE(AA,CLOSE,OPEN,1.2,0),COLOR00AAFF;

STICKLINE(AA,CLOSE,OPEN,0.7,0),COLOR00CCFF;

STICKLINE(AA,CLOSE,OPEN,0.2,0),COLOR00FFFF;

STICKLINE(BB,H,L,0,1),COLORCYAN;{绿色}

STICKLINE(BB,C,O,3.2,0),COLOR006600;

STICKLINE(BB,C,O,2.6,0),COLOR008800;

STICKLINE(BB,C,O,1.9,0),COLOR00AA00;

STICKLINE(BB,C,O,1.1,0),COLOR00CC00;

STICKLINE(BB,C,O,0.3,0),COLOR00FF00;

STICKLINE(BB AND CC,H,L,0,1),COLORFF55FF;{紫色}

STICKLINE(BB AND CC,C,O,3.2,0),COLOR880088;

STICKLINE(BB AND CC,C,O,2.6,0),COLORAA00AA;

STICKLINE(BB AND CC,C,O,1.9,0),COLORCC00CC;

STICKLINE(BB AND CC,C,O,1.1,0),COLOREE00EE;

STICKLINE(BB AND CC,C,O,0.3,0),COLORFF44FF;

STICKLINE(AA AND CC1,H,L,0,1),COLORFF8800;{蓝色}

STICKLINE(AA AND CC1,C,O,3.2,0),COLORFF2200;

STICKLINE(AA AND CC1,C,O,2.6,0),COLORFF4400;

STICKLINE(AA AND CC1,C,O,1.9,0),COLORFF6600;

STICKLINE(AA AND CC1,C,O,1.1,0),COLORFF8800;

STICKLINE(AA AND CC1,C,O,0.3,0),COLORFFAA00;

{XS2 }

N2:=102;

M:=7;

UU:=MA((2*CLOSE+HIGH+LOW)/4,5);

买价:=((C-REF(MA5,1))/5+MA5)*1.004;

买条件:=crOSS(C,买价) AND 买价>REF(买价,1);

醉白K买进:IF(买条件,L,H),COLORRED,POINTDOT;

STICKLINE(买条件,H,L,0,1),COLORRED,LINETHICK2，;

STICKLINE(买条件,O,C,4,1),COLORRED,LINETHICK2;

加码价:=((C-REF(MA10,1))/20+MA10)*1.004;

加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);

醉黄K加码:IF(加码条件,L,H),COLORBLUE,POINTDOT;

STICKLINE(加码条件,H,L,0,1),COLORBLUE,LINETHICK2;

STICKLINE(加码条件,O,C,4,1),COLORBLUE,LINETHICK2;

DRAWTEXT_FIX(1,0.88,5,0,''),COLORWHITE;

ZK1:(xma(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;

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

QJ0:=vol/IF(HIGH=LOW,4,HIGH-LOW);

QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));

QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));

QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));

QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));

ddx:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;

V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);

V5:=SMA(V2*120/FROMOPEN*5,2,1);

V10:=SMA(V5,5,1);

V20:=SMA(V10,5,1);

DY:=CURRBARSCOUNT=1 AND C<REF(C,1);

DY2:=REF(V2,1)-DY;

XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<ZK1;

B1:=HHV(HIGH,100);

B2:="bias.BIAS3 #WEEK";

B3:=MA(B2,10);

A1:=VOL;

A2:=REF(MA(VOL,5),1);

A3:=A1/A2;

A4:=A3>=0.001 AND A3<0.8;

买入:=CROSS(B2,B3) AND WEEKDAY=1 AND A4;

DRAWTEXT(FILTER(买入=1,5),LOW-0.15,'↖卧槽马'),COLORBLUE;

STICKLINE(买入,O,C,3,0),COLORLIMAGENTA;

{高抛低吸}

VARA:=(2*CLOSE+HIGH+LOW)/4;

VARB:=IF(YEAR>=2099 AND MONTH>2,0,1);

VARC:=LLV(LOW,5);

VARD:=HHV(HIGH,4);

散户:=EMA((VARA-VARC)/(VARD-VARC)*100,4)*VARB;

庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VARB;

DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.006,'&larr;高抛'),COLORCYAN;

{行业属性}

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLICYAN;

未来函数检测公式代码域:

ma5:MM(CLOSE,5);MM10:MM(CLOSE,10);MM20:MM(CLOSE,20);MM60:MM(CLOSE,60);N:=30;KK:=BMrslMST(CURRBMRSCOUNT=N);GD:=CONST(IF(ISLMSTBMR=1,HHV(H,KK),0));RR:=CONST(IF(ISLMSTBMR=1,LLV(L,KK),0));KJ:=GD-RR;M:=ema(C,21)COLORYELLOW,LINETHICK3;B:=M<REF(M,1);HY:=IF(B-1,M,DRMWNULL)COLORWHITE,LINETHICK3;MM:=EMM(C,3) > EMM(C,21);BB:=EMM(C,3) < EMM(C,21);CC:= EMM(C,3) > EMM(C,8);CC1:=EMM(C,3) < EMM(C,8);STICKLINE(MM,L,H,0,0),COLOR0088EE;{金色}STICKLINE(MM,CLOSE,OPEN,3,0),COLOR0055MM;STICKLINE(MM,CLOSE,OPEN,2.8,0),COLOR0066BB;STICKLINE(MM,CLOSE,OPEN,2.5,0),COLOR0077CC;STICKLINE(MM,CLOSE,OPEN,2.2,0),COLOR0088DD;STICKLINE(MM,CLOSE,OPEN,1.7,0),COLOR0099EE;STICKLINE(MM,CLOSE,OPEN,1.2,0),COLOR00MMFF;STICKLINE(MM,CLOSE,OPEN,0.7,0),COLOR00CCFF;STICKLINE(MM,CLOSE,OPEN,0.2,0),COLOR00FFFF;STICKLINE(BB,H,L,0,1),COLORCYMN;{绿色}STICKLINE(BB,C,O,3.2,0),COLOR006600;STICKLINE(BB,C,O,2.6,0),COLOR008800;STICKLINE(BB,C,O,1.9,0),COLOR00MM00;STICKLINE(BB,C,O,1.1,0),COLOR00CC00;STICKLINE(BB,C,O,0.3,0),COLOR00FF00;STICKLINE(BB MND CC,H,L,0,1),COLORFF55FF;{紫色}STICKLINE(BB MND CC,C,O,3.2,0),COLOR880088;STICKLINE(BB MND CC,C,O,2.6,0),COLORMM00MM;STICKLINE(BB MND CC,C,O,1.9,0),COLORCC00CC;STICKLINE(BB MND CC,C,O,1.1,0),COLOREE00EE;STICKLINE(BB MND CC,C,O,0.3,0),COLORFF44FF;STICKLINE(MM MND CC1,H,L,0,1),COLORFF8800;{蓝色}STICKLINE(MM MND CC1,C,O,3.2,0),COLORFF2200;STICKLINE(MM MND CC1,C,O,2.6,0),COLORFF4400;STICKLINE(MM MND CC1,C,O,1.9,0),COLORFF6600;STICKLINE(MM MND CC1,C,O,1.1,0),COLORFF8800;STICKLINE(MM MND CC1,C,O,0.3,0),COLORFFMM00;{XS2 }N2:=102;M:=7;UU:=MM((2*CLOSE+HIGH+LOW)/4,5);买价:=((C-REF(MM5,1))/5+MM5)*1.004;买条件:=crOSS(C,买价) MND 买价>REF(买价,1);醉白K买进:IF(买条件,L,H),COLORRED,POINTDOT;STICKLINE(买条件,H,L,0,1),COLORRED,LINETHICK2，;STICKLINE(买条件,O,C,4,1),COLORRED,LINETHICK2;加码价:=((C-REF(MM10,1))/20+MM10)*1.004;加码条件:=CROSS(C,加码价) MND 加码价>REF(加码价,1);醉黄K加码:IF(加码条件,L,H),COLORBLUE,POINTDOT;STICKLINE(加码条件,H,L,0,1),COLORBLUE,LINETHICK2;STICKLINE(加码条件,O,C,4,1),COLORBLUE,LINETHICK2;DRMWTEXT_FIX(1,0.88,5,0,''),COLORWHITE;ZK1:(xma(XMM(H,25),25)-XMM(XMM(L,25),25))*1+XMM(XMM(H,25),25),DOTLINE,COLORYELLOW;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=vol/IF(HIGH=LOW,4,HIGH-LOW);QJ1:=IF(CMPITML=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));QJ2:=IF(CMPITML=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));QJ3:=IF(CMPITML=0,QJ0*(HIGH-MMX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MMX(OPEN,CLOSE))));QJ4:=IF(CMPITML=0,QJ0*(MMX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MMX(CLOSE,OPEN)-JJ)));ddx:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CMPITML=0,10000,10000),COLOR00MMMM,LINETHICK;V2:=SMM(IF(C>=REF(C,1),DDX,-DDX/100),2,1);V5:=SMM(V2*120/FROMOPEN*5,2,1);V10:=SMM(V5,5,1);V20:=SMM(V10,5,1);DY:=CURRBMRSCOUNT=1 MND C<REF(C,1);DY2:=REF(V2,1)-DY;XG2:=C>O MND DY2<0.02 MND MM(C,5)>MM(C,60) MND C/REF(C,1)>=1.02 MND H<ZK1;B1:=HHV(HIGH,100);B2:="bias.BIMS3 #WEEK";B3:=MM(B2,10);M1:=VOL;M2:=REF(MM(VOL,5),1);M3:=M1/M2;M4:=M3>=0.001 MND M3<0.8;买入:=CROSS(B2,B3) MND WEEKDMY=1 MND M4;DRMWTEXT(FILTER(买入=1,5),LOW-0.15,'↖卧槽马'),COLORBLUE;STICKLINE(买入,O,C,3,0),COLORLIMMGENTM;{高抛低吸}VMRM:=(2*CLOSE+HIGH+LOW)/4;VMRB:=IF(YEMR>=2099 MND MONTH>2,0,1);VMRC:=LLV(LOW,5);VMRD:=HHV(HIGH,4);散户:=EMM((VMRM-VMRC)/(VMRD-VMRC)*100,4)*VMRB;庄家:=EMM(0.667*REF(散户,1)+0.333*散户,2)*VMRB;DRMWTEXT(CROSS(庄家,散户) MND 散户>70,H+0.006,'←高抛'),COLORCYMN;{行业属性}Z1:=STRCMT(HYBLOCK,' ');Z2:=STRCMT(Z1,DYBLOCK);Z3:=STRCMT(Z2,' ');DRMWTEXT_FIX(ISLMSTBMR,0,0,0,STRCMT(Z3,GNBLOCK)),COLORLICYMN;

警惕！警惕！警惕!该公式包含未来函数:CMPITML...

未发现:COST...

未发现:DYNMINFO...

未发现:FINMNCE...

未发现:LWINNER...

未发现:WINNER...

未发现:BMCKSET...

未发现:BMRSNEXT...

警惕！警惕！警惕!该公式包含未来函数:CURRBMRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

未发现:DRMWLINE...

未发现:REFX...

未发现:FLMTZIG...

未发现:FLMTZIGM...

未发现:FFT...

未发现:FILTERX...

未发现:PEMK...

未发现:PEMKM...

未发现:PEMKBMRS...

未发现:PEMKBMRSM...

未发现:PLOYLINE...

未发现:REFDMTE...

未发现:TROUGH...

未发现:TROUGHM...

未发现:TROUGHBMRS...

警惕！警惕！警惕!该公式包含未来函数:XMM...

未发现:ZIG...

未发现:ZIGM...

未发现:ZXNH...

未发现:#YEMR...

未发现:#MONTH...

警惕！警惕！警惕!该公式包含未来函数:#WEEK...

未发现:$ZIG...

未发现:$PEMK...

未发现:$PEMKBMRS...

未发现:$TROUGH...

未发现:$TROUGHBMRS...

未发现:$FLMTZIG...

未发现:$FLMTZIGM...

未发现:$PEMKM...

未发现:$PEMKBMRSM...

未发现:$TROUGHM...

未发现:$ZIGM...

未发现:$FFT...

未发现:$BMCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNMINFO...

未发现:$FINMNCE...

未发现:$DRMWLINE...