通达信操盘论1号源码

N:=36;M1:=4;M2:=2;Q1:=36;

VAR1:=(CLOSE-LLV(L,N))/(HHV(H,N)-LLV(L,N))*100;

VAR2:=SMA(VAR1,M1,1);

VAR3:=SMA(VAR2,M2,1);

VAR4:=VOL/CAPITAL*100;

VAR5:=REF(VAR4,1);

A:=(3*C+L+O+H)/6;

HJX21:=EMA(A,21);

HJX3:=(3*A+2*REF(A,1)+REF(A,2))/6;

DC1:=EMA(HJX3,4);

DC2:=EMA(DC1,3);

DC3:=EMA(DC1,7);

DIFF:=(EMA(C,12)-EMA(C,26))*100/EMA(C,26);

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA);

BB:=REF(CLOSE,12);

机构建仓: VAR2<11 AND VAR3<14.5,COLORMAGENTA;

CC:=SMA(MAX(CLOSE-BB,0),M2,1)/SMA(ABS(CLOSE-BB),M1,1)*100;

CCC:=MACD>REF(MACD,1) AND MACD>0;

大户建仓:1.5*(CROSS(C,DC1) AND CROSS(C,DC2) AND CROSS(C,DC3) AND CCC AND CC<50),COLORRED,LINETHICK2;

大户减仓:IF(VAR5>Q1 AND VAR5<48,1.2,1.5),COLORGREEN,LINETHICK2;

机构减仓:IF(VAR3>80.5 AND VAR2>88,1.2,1.5),COLORLIGREEN,LINETHICK2;

股价临界: IF(VAR3>85 AND VAR2>91,1.2,1.5),LINETHICK2;

VAR22:=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);

启动:IF(CROSS(VAR22,3),1,0),COLORRED,LINETHICK3;

秘密买点: IF(VAR22<=5,1,0),COLORBROWN,LINETHICK3;

主力加码: IF(VAR22<10,0.5,0),COLORMAGENTA,LINETHICK3;

{印钞拐点}

PARA1:=(EMA(CLOSE,17)-EMA(CLOSE,26))*100;

PARA2:=EMA(PARA1,9);

MACDD:=2*(PARA1-PARA2);

印钞拐点:CROSS(PARA1,PARA2) AND PARA2<=-6;

DRAWTEXT(印钞拐点,0.5,'!印钞'),COLORRED;

EXP1:=EXPMA(CLOSE,5);

EXP2:=EXPMA(CLOSE,12);

EXP3:=EXPMA(CLOSE,50);

EXP4:=EXPMA(CLOSE,150);

S1:=IF(NAMELIKE('S'),0,1);

S2:=IF(NAMELIKE('*'),0,1);

QST:=S1 AND S2;

市值:=C*CAPITAL/1000000<100;

全去:=QST AND 市值;

度假:=EXP3<EXP4;

DYC:=REF(度假,1) AND REF(度假,2) AND REF(度假,3) AND REF(度假,4) AND REF(度假,5) AND REF(度假,6) AND REF(度假,7) AND REF(度假,8) AND

REF(度假,9) AND REF(度假,10) AND REF(度假,11) AND REF(度假,12) AND REF(度假,13) AND REF(度假,14) AND REF(度假,15) AND REF(度假,16)

AND REF(度假,17) AND REF(度假,18) AND REF(度假,19) AND REF(度假,20) AND REF(度假,21) AND REF(度假,22) AND REF(度假,23) AND

REF(度假,24) AND REF(度假,25) AND REF(度假,26) AND REF(度假,27) AND REF(度假,28) AND REF(度假,29);

度假50:=EXP2<EXP3;

DYC50:=REF(度假50,6) AND REF(度假50,7) AND REF(度假50,8) AND

REF(度假50,9) AND REF(度假50,10) AND REF(度假50,11) AND REF(度假50,12) AND REF(度假50,13) AND REF(度假50,14) AND REF(度假50,15) AND REF(度假50,16)

AND REF(度假50,17) AND REF(度假50,18) AND REF(度假50,19) AND REF(度假50,20) AND REF(度假50,21) AND REF(度假50,22) AND REF(度假50,23) AND

REF(度假50,24) AND REF(度假50,25) AND REF(度假50,26) AND REF(度假50,27) AND REF(度假50,28) AND REF(度假50,29);

热身:=CROSS(EXP2,EXP3) AND 全去;

饮水:=(REF(热身,1) OR REF(热身,2) OR REF(热身,3) OR REF(热身,4) OR REF(热身,5) OR REF(热身,6) OR REF(热身,7) OR REF(热身,8) OR

REF(热身,9) OR REF(热身,10) OR REF(热身,11) OR REF(热身,12) OR REF(热身,13) OR REF(热身,14) OR REF(热身,15) OR REF(热身,16) OR

REF(热身,17) OR REF(热身,18) OR REF(热身,19) OR REF(热身,20) OR REF(热身,21) OR REF(热身,22) OR REF(热身,23) OR REF(热身,24)) AND EXP2>EXP3;

黑马腾飞:饮水 AND REF(C,1)<=REF(O,1) AND EXP2>EXP3 AND EXP2<EXP4 AND C>O AND DYC AND DYC50 AND 全去,COLORMAGENTA,LINETHICK3;

VARA01:=(CLOSE-LLV(LOW,53))/(HHV(HIGH,53)-LLV(LOW,53))*80;

VARB01:=SMA(VARA01,7,1);

VARC01:=SMA(VARB01,5,1);

屠龙刀1:=CROSS(VARB01,VARC01) AND VARB01<20;

VAR20N:=LLV(LOW,3)<=LLV(LOW,53);

VAR30N:= C>O AND (C/O>1.03 OR C>1.03*REF(C,1));

倚天神剑1:=VAR20N AND VAR30N;

倚天剑:屠龙刀1 AND 倚天神剑1,COLORYELLOW,LINETHICK2;

DRAWTEXT(屠龙刀1 AND 倚天神剑1,0.5,'倚天剑'),COLORRED;

RR8:=MA(CLOSE,27);

RR9:=(CLOSE-RR8)/RR8*100;

RRA:=MA(RR9,2);

RRB:=BARSLAST(CROSS(-10,RRA)=1);

RRD:=RRA<-10 AND RRB>3;

万两金:IF(RRD,0.5,0),COLORYELLOW,LINETHICK3;

DRAWICON(RRD,0,0.5);