大盘顶底(通达信)，修改的博弈水平面(通达信)

大盘顶底(通达信)

difF:=ema(CLOSE,12)-Ema(CLOSE,27);

DEA:=EMA(DIFF,9);

macd:=(2)*(DIFF-DEA);

A1:=BArslAst(REF(crOSS(DIFF,DEA),1));

接近大盘底:=(REF(CLOSE,A1+1)>CLOSE) AND (DIFF>REF(DIFF,A1+1)) AND CROSS(DIFF,DEA);

STICKLINE(接近大盘底,0,0.1,10,0),COLOR0000FF;

DRAWTEXT(接近大盘底,0.01,'接近大盘底'),COLORWHITE;

A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));

大盘顶:=(REF(CLOSE,A2+1)<CLOSE) AND (REF(DIFF,A2+1)>DIFF) AND CROSS(DEA,DIFF);

STICKLINE(大盘顶,0,0.1,10,0),COLOR00FF00;

DRAWTEXT(大盘顶,0.01,'大盘顶'),COLORYELLOW;

修改的博弈水平面(通达信)

股票买卖操作是一种方法，方法得当，自然能够赚钱。本人将原来的博弈111的公式进行了下面的修改，分成了水平面和停损线。当股价突破水平面，以水平面的价格购入，当然跌破水平面，可以出局或者减仓当跌破停损线坚决出局。当收益达到预期收入，可以设定3.4%，或者5%，也可以出局。公式没有进行优化和美化，当时大家都可以导入使用。

【博弈水平面】

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),COLORWHITE,LINETHICK1,POINTDOT;

SNAKEA1:=HHV(MA(B2,1),13),COLORYELLOW;

X1:=SNAKEA1;

X2:=IF(SNAKEA1<=B2,SNAKEA1,IF(B2>SMA2,B2,B2));{最后一个B2用SMA2}

{DRAWBAND(X1,RGB(64,64,196),X2,RGB(64,64,64));}

DRAWBAND(SNAKEA1,RGB(64,64,196),MIN(停损下限,L),RGB(64,64,64));

MIN(停损下限,L),COLORWHITE,LINETHICK1;

停损:停损下限,COLORGREEN,LINETHICK1;

{IF(B2>SMA2,B2,DRAWNULL),COLORRED,LINETHICK4;

IF(B2<SMA2,B2,DRAWNULL),COLORGREEN,LINETHICK4;}

SNAKEA:=SNAKEA1;

水平面:SNAKEA,COLORYELLOW,LINETHICK1;

IF (SNAKEA1<=B2,B2,DRAWNULL),COLORYELLOW,LINETHICK2;

stICKLINE(C>=O,C,O,3,0),COLOR000045;

STICKLINE(C>=O,C,O,2.5,0),COLOR000065;

STICKLINE(C>=O,C,O,2,0),COLOR000085;

STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;

STICKLINE(C>=O,C,O,1,0),COLOR0000C5;

STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;

STICKLINE(C>=O,H,L,0,0),COLOR0000F5;

STICKLINE(C<O,C,O,3,0),COLOR353500;

STICKLINE(C<O,C,O,2.5,0),COLOR454500;

STICKLINE(C<O,C,O,2,0),COLOR555500;

STICKLINE(C<O,C,O,1.5,0),COLOR656500;

STICKLINE(C<O,C,O,1,0),COLOR757500;

STICKLINE(C<O,C,O,0.5,0),COLOR858500;

STICKLINE(C<O,H,L,0,0),COLOR959500;

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

VAR2A:=MA(VAR1A,7);

VAR3A:=VAR2A-MA(VAR1A,7/2)<0;

VAR4A:=VAR2A-MA(VAR1A,7/2)>0;

VAR5A:=BArslAST(VAR3A);

VAR6A:=0-BARSLAST(VAR4A);

VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A);

{STICKLINE(SNAKEA>B2 AND B2>SMA2,SNAKEA,B2,0,0),COLORBLUE;

STICKLINE(SNAKEA>SMA2 AND B2<SMA2,SNAKEA,SMA2,0,0),COLORBLUE;}

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

VAR21A:=ema(VAR11A,13)-EMA(VAR11A,34);

VAR31A:=EMA(VAR21A,5);

{STICKLINE((C>=O),OPEN,LOW,0,0),COLOR0726CA;

STICKLINE((C>=O),CLOSE,HIGH,0,0),COLOR0726CA;

STICKLINE((C<O),CLOSE,LOW,0,0),COLORDE9100;

STICKLINE((C<O),OPEN,HIGH,0,0),COLORDE9100;

STICKLINE((C<O),CLOSE,OPEN,2.5,0),COLORFFCC00;

STICKLINE((C<O),CLOSE,OPEN,1.5,0),COLORFFFF00;

STICKLINE((C>O),CLOSE,OPEN,2,0),COLOR0754E9;

STICKLINE((C>O),CLOSE,OPEN,1.5,0),COLOR076EF3;

STICKLINE((C>O),CLOSE,OPEN,1,0),COLOR077BF3;}

VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));

VAR3:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR4:=((REF(VAR3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR5:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR6:=((REF(VAR5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR7:=((REF(VAR6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR8:=((REF(VAR7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR9:=((REF(VAR8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VARD:=((REF(VARC,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)));

VAR10:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR11:=((REF(VAR10,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)));

VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));

VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));

VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2);

{STICKLINE(VAR1B,O,O+(C-O)/3,3,0),COLOR10D0FF;}

STICKLINE(VAR1B,O,O+(C-O)/3,3,0),COLOR005555;

STICKLINE(VAR1B,O,O+(C-O)/3,2.5,0),COLOR006565;

STICKLINE(VAR1B,O,O+(C-O)/3,2,0),COLOR007575;

STICKLINE(VAR1B,O,O+(C-O)/3,1.5,0),COLOR008585;

STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR009595;

STICKLINE(VAR1B,O,O+(C-O)/3,0.5,0),COLOR00A5A5;

STICKLINE(VAR1B,O,O+(C-O)/3,0,0),COLOR00B5B5;

{STICKLINE(VAR1B,O,O+(C-O)/3,2,0),COLOR10FFFF;

STICKLINE(VAR1B,O,O+(C-O)/3,1,0),COLOR00FFFF;}

AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE);

STICKLINE(AA,O,O+(C-O)/3,3,0),COLOR005500;

STICKLINE(AA,O,O+(C-O)/3,2.5,0),COLOR006500;

STICKLINE(AA,O,O+(C-O)/3,2,0),COLOR007500;

STICKLINE(AA,O,O+(C-O)/3,1.5,0),COLOR008500;

STICKLINE(AA,O,O+(C-O)/3,1,0),COLOR009500;

STICKLINE(AA,O,O+(C-O)/3,0.5,0),COLOR00A500;

STICKLINE(AA,O,O+(C-O)/3,0,0),COLOR00B500;

{STICKLINE(AA,O,O+(C-O)/3,2,0),COLOR00EE00;

STICKLINE(AA,O,O+(C-O)/3,1,0),COLOR00FF00;}

A13:=EMA(CLOSE,55);

A14:=MA(CLOSE,75);

A15:=EMA(A14,3);

A16:=EMA(A15,3);

A17:=(HIGH + LOW) / 5;

A18:=(MA(A17,4)) - (MA(A17,34));

A19:=crOSS(A18,0);

A20:=CROSS(0,A18);

A21:=BARSLAST(A19);

A22:=BARSLAST(A20);

A23:=REF(A19,1);

A24:=REF(A20,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 < A22);

A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21);

A30:=A28 AND ((COUNT(A28,A21)) = 1);

A31:=A29 AND ((COUNT(A29,A22)) = 1);

A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1)));

A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1)));

DRAWTEXT(A32,SMA2*0.99,'←═≒∝'),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));

IF (LIFENGCYC,L*0.95,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

{STICKLINE(LIFENGCYC,BBC,0.5,6,0);}

{bbd:(UPPER+LOWER)/2*(C-UPPER);};

----------------------------------

欢迎大家对操作方法进行讨论。