通达信广通红绿灯公式源码

日K线的话第一行是大盘，下四行15分，30分，60分，日级别的安全期

F15A:=MAX(MA(C,5),MA(C,10));
F15B:=MIN(MA(C,5),MA(C,10));
绿行F15:C>F15A,COLORGREEN;
红停F15:C<F15B,COLORRED;
黄望F15:C>=F15B AND C<=F15A,COLORYELLOW;
STICKLINE(C>F15A,3.3,4,8,0),COLORGREEN,LINETHICK2;
STICKLINE(C<F15B,3.3,4,8,0),COLORRED,LINETHICK2;
STICKLINE(C>=F15B AND C<=F15A,3.3,4,8,0),COLORYELLOW,LINETHICK2;

F30A:=MAX(MA(C,10),MA(C,20));
F30B:=MIN(MA(C,10),MA(C,20));
绿行F30:C>F30A,COLORGREEN;
红停F30:C<F30B,COLORRED;
黄望F30:C>=F30B AND C<=F30A,COLORYELLOW;
STICKLINE(C>F30A,2.3,3,8,0),COLORGREEN,LINETHICK2;
STICKLINE(C<F30B,2.3,3,8,0),COLORRED,LINETHICK2;
STICKLINE(C>=F30B AND C<=F30A,2.3,3,8,0),COLORYELLOW,LINETHICK2;

F60A:=MAX(MA(C,20),MA(C,28));
F60B:=MIN(MA(C,20),MA(C,28));
绿行F60:C>F60A,COLORGREEN;
红停F60:C<F60B,COLORRED;
黄望F60:C>=F60B AND C<=F60A,COLORYELLOW;
STICKLINE(C>F60A,1.3,2,8,0),COLORGREEN,LINETHICK2;
STICKLINE(C<F60B,1.3,2,8,0),COLORRED,LINETHICK2;
STICKLINE(C>=F60B AND C<=F60A,1.3,2,8,0),COLORYELLOW,LINETHICK2;

FRA:=MAX(MA(C,60),MA(C,120));
FRB:=MIN(MA(C,60),MA(C,120));
绿行FR:C>FRA,COLORGREEN;
红停FR:C<FRB,COLORRED;
黄望FR:C>=F30B AND C<=F30A,COLORYELLOW;
STICKLINE(C>FRA,0,1,8,0),COLORGREEN,LINETHICK2;
STICKLINE(C<FRB,0,1,8,0),COLORRED,LINETHICK2;
STICKLINE(C>=FRB AND C<=FRA,0,1,8,0),COLORYELLOW,LINETHICK2;

DPA:=MAX(MA(INDEXC,60),MA(INDEXC,120));
DPB:=MIN(MA(INDEXC,60),MA(INDEXC,120));
绿行DP:INDEXC>DPA,COLORGREEN;
红停DP:INDEXC<DPB,COLORRED;
黄望DP:INDEXC>=DPB AND INDEXC<=DPA,COLORYELLOW;
STICKLINE(INDEXC>DPA,4.3,5,8,0),COLORGREEN,LINETHICK2;
STICKLINE(INDEXC<DPB,4.3,5,8,0),COLORRED,LINETHICK2;
STICKLINE(INDEXC>=DPB AND INDEXC<=DPA,4.3,5,8,0),COLORYELLOW,LINETHICK2;