通达信主图指标——价格通道交易系统【源码】

纯技术交流，不构成投资建议

BB0:=(MA(CLOSE,3)+MA(CLOSE,7)+MA(CLOSE,13)+MA(CLOSE,27))/4;

BB1:=EMA(CLOSE,5);

BB:=IF(BB0==DRAWNULL,BB1,BB0);

A0:=(H+L+2*O+6*C)/10;

TK:=(C<O OR (C<REF(H,1) AND C>O) OR (C>=O AND (H-C)>=(C-O) AND C/REF(C,1)<1.02) OR (C=O AND (H-C)>=(C-L) AND C/REF(C,1)<1.05));

TP:=((C>O AND C/REF(C,1)>0.94 ) OR (C>REF(L,1) AND C<O) OR (C<=O AND (C-L)>=(O-C) AND C/REF(C,1)>0.98) OR (C=O AND (C-L)>=(H-C) AND C/REF(C,1)>0.95));

DRAWTEXT_FIX(1,0.980,0,1,'V作者： BRUCE_MII'),COLOR666666;

DRAWTEXT_FIX(1,0.980,0.2,1,'公众号：口袋知识库'),COLOR666666;

C1:=CROSS(A0,BB) AND TK;

C2:=CROSS(BB,A0) AND TP;

A1:=IF(C1,BB*0.98,IF(C2,BB*1.02,A0));

C12:=CROSS(A1,BB) AND TK;

C22:=CROSS(BB,A1) AND TP;

A2:=IF(C12,BB*0.98,IF(C22,BB*1.02,A1));

C13:=CROSS(A2,BB) AND TK;

C23:=CROSS(BB,A2) AND TP;

A3:=IF(C13,BB*0.98,IF(C23,BB*1.02,A2));

C14:=CROSS(A3,BB) AND TK;

C24:=CROSS(BB,A3) AND TP;

A4:=IF(C14,BB*0.98,IF(C24,BB*1.02,A3));

C15:=CROSS(A4,BB) AND TK;

C25:=CROSS(BB,A4) AND TP;

A5:=IF(C15,BB*0.98,IF(C25,BB*1.02,A4));

C16:=CROSS(A5,BB) AND TK;

C26:=CROSS(BB,A5) AND TP;

A6:=IF(C16,BB*0.98,IF(C26,BB*1.02,A5));

C17:=CROSS(A6,BB) AND TK;

C27:=CROSS(BB,A6) AND TP;

A7:=IF(C17,BB*0.98,IF(C27,BB*1.02,A6));

C18:=CROSS(A7,BB) AND TK;

C28:=CROSS(BB,A7) AND TP;

A8:=IF(C18,BB*0.98,IF(C28,BB*1.02,A7));

C19:=CROSS(A8,BB) AND TK;

C29:=CROSS(BB,A8) AND TP;

A9:=IF(C19,BB*0.98,IF(C29,BB*1.02,A8));

C31:=CROSS(A9,BB) AND TK;

C41:=CROSS(BB,A9) AND TP;

A:=IF(C31,BB*0.98,IF(C41,BB*1.02,A9));

MAXS:=MAX(C,O);

MINS:=MIN(C,O);

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

JA:=EMA(A,1);

JB:=EMA(A,5);

ZF:=(C/REF(C,1)-1)*100;

ZJ:=(A/BB-1)*100;

KK0:=CROSS(A,BB);

PP0:=CROSS(BB,A);

JZF:=(H-L)/L;

DRAWICON(KK0,L*0.998,1);

DRAWICON(PP0,H*(1+JZF/2),2);

K:=A>=BB;

P:=A<BB;

TCY:=K AND ((C>=REF(H,1) AND ((H-C)<(C-O)) OR ZF>=7) OR (C<REF(H,1) AND C<O AND ZF>-3 AND ZJ>=10));

TZK:=K AND NOT(TCY);

TKC:=P AND ((C<REF(L,1)) OR (C>REF(L,1)AND C>O AND ZF<3 AND ZJ<=-10));

TZD:=P AND NOT(TKC);

RBB:=(SUM(CLOSE,2)/3+SUM(CLOSE,6)/7+SUM(CLOSE,12)/13+SUM(CLOSE,26)/27);

RB1:=4*1.01-1540/2457;

RB2:=4*0.99-1540/2457;

DRAWTEXT_FIX(C>O,0.02,0,0,'V作者： BRUCE_MII'),COLORFFC0CB;

DRAWTEXT_FIX(C>O,0.02,0.2,0,'公众号：口袋知识库'),COLORFFC0CB;

AX1:=RBB/RB1;

AX2:=RBB/RB2;

AXX1:=IF(AX1>L,L*0.998,IF(AX1>BB,BB*0.998,AX1));

AXX2:=IF(AX1<H,H*1.002,IF(AX1<BB,BB*1.002,AX1));

STICKLINE(CLOSE>=OPEN AND K,OPEN,CLOSE,3.2,1),COLORRED;

STICKLINE(CLOSE<OPEN AND K,OPEN,CLOSE,3.2,0),COLORRED;

STICKLINE(CLOSE>=OPEN AND K,HIGH,CLOSE,0,1),COLORRED;

STICKLINE(CLOSE<OPEN AND K,HIGH,CLOSE,0,0),COLORRED;

STICKLINE(CLOSE>=OPEN AND K,LOW,OPEN,0,1),COLORRED;

STICKLINE(CLOSE<OPEN AND K,LOW,CLOSE,0,0),COLORRED;

STICKLINE(CLOSE<=OPEN AND P,OPEN,CLOSE,3.2,0),COLORGREEN;

STICKLINE(CLOSE>OPEN AND P,OPEN,CLOSE,3.2,1),COLORGREEN;

STICKLINE(CLOSE<OPEN AND P,HIGH,CLOSE,0,0),COLORGREEN;

STICKLINE(CLOSE>=OPEN AND P,HIGH,CLOSE,0,1),COLORGREEN;

STICKLINE(CLOSE<OPEN AND P,LOW,CLOSE,0,0),COLORGREEN;

STICKLINE(CLOSE>=OPEN AND P,LOW,OPEN,0,1),COLORGREEN;