图片武汉股票配资

信号:=0;

分盘:=0;

ZK:=1;

月开:=1;

动量线:=1;

闪屏:=0;

DQ:=DATE<991231;

//宣传语

NM:=BARSLAST(MONTH<>REF(MONTH,1))+1;

MO:REF(O,NM-1),NODRAW;

DRAWHORIZONTALLINE(MONTH<>REF(MONTH,1) AND DQ AND 月开,O,COLORRED武汉股票配资); 

//三色板

DRAWGBK1(CLOSEMINUTE<=1080 AND CLOSEMINUTE>500 AND PERIOD<=3 AND DQ AND 分盘,RGB(208,222,253));

DRAWGBK1(CLOSEMINUTE<500 AND CLOSEMINUTE>200 AND PERIOD<=3 AND DQ AND 分盘,RGB(224,244,217));

DRAWGBK1(CLOSEMINUTE<200 AND CLOSEMINUTE>0 AND PERIOD<=3 AND DQ AND 分盘,RGB(254,239,237));

//均线组

F1:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,16)),RGB(0,120,0),LINETHICK1,NOTEXT;

F2:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,15)),RGB(0,120,0),LINETHICK1,NOTEXT;

F3:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,15)),RGB(0,120,0),LINETHICK1,NOTEXT;

F4:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,14)),RGB(0,120,0),LINETHICK1,NOTEXT;

F5:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,16)),RGB(0,120,0),LINETHICK1,NOTEXT;

F6:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,17)),RGB(0,120,0),LINETHICK1,NOTEXT;

F7:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,18)),RGB(0,120,0),LINETHICK1,NOTEXT;

F8:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,19)),RGB(0,120,0),LINETHICK1,NOTEXT;

F9:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,20)),RGB(0,120,0),LINETHICK1,NOTEXT;

IF(F5>REF(F5,1),F5,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F6>REF(F6,1),F6,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F7>REF(F7,1),F7,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F8>REF(F8,1),F8,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F9>REF(F9,1),F9,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F1>REF(F1,1),F1,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F2>REF(F2,1),F2,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F3>REF(F3,1),F3,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

IF(F4>REF(F4,1),F4,NULL),COLORLIGHTRED,LINETHICK1,NOTEXT;

//60120均线

F91:=VALUEWHEN(PERIOD<=25 AND  DQ ,EMA(C,100)),COLORBLUE,LINETHICK4,NOTEXT;

//IF(F91>REF(F91,1),F91,NULL),COLORRED,LINETHICK4,NOTEXT;

F81:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA(C,60)),RGB(0,120,0),LINETHICK3,NOTEXT;

IF(F81>REF(F81,1),F81,NULL),COLORLIGHTRED,LINETHICK3,NOTEXT;

F71:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA(C,30)),RGB(0,120,0),LINETHICK2,NOTEXT;

IF(F71>REF(F71,1),F71,NULL),COLORLIGHTRED,LINETHICK2,NOTEXT;

F61:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA2(C,300)),COLORGREEN,LINETHICK2,NOTEXT;

IF(F61>REF(F61,1),F61,NULL),COLORRED,LINETHICK2,NOTEXT;

F611:VALUEWHEN(PERIOD<=25 AND  DQ ,EMA(C,300)),COLORGREEN,LINETHICK2,NOTEXT;

IF(F611>REF(F611,1),F611,NULL),COLORRED,LINETHICK2,NOTEXT;

DT:=F5>REF(F5,1) AND F6>REF(F6,1) AND F7>REF(F7,1) AND F8>REF(F8,1) AND F9>REF(F9,1) AND F1>REF(F1,1) AND F2>REF(F2,1) AND F3>REF(F3,1) AND F4>REF(F4,1);

KT:=F5<REF(F5,1) AND F6<REF(F6,1) AND F7<REF(F7,1) AND F8<REF(F8,1) AND F9<REF(F9,1)  AND F1<REF(F1,1) AND F2<REF(F2,1) AND F3<REF(F3,1) AND F4<REF(F4,1);

//日内支撑压力

 TR1:=MAX  (MAX  ((HHV(H,DAYBARPOS)-LLV(L,DAYBARPOS)),ABS  (REF(CLOSE,DAYBARPOS)-HHV(H,DAYBARPOS))),ABS (REF(CLOSE,DAYBARPOS)-LLV(L,DAYBARPOS)));

TR2:=IF (DAYBARPOS=1,TR1,0);

ATR1:=(SUM(TR2,SUMBARS(DAYBARPOS=1,25))+TR1)/26,COLORYELLOW;

TATR:=REF(C,DAYBARPOS)+ATR1;

DATR:=REF(C,DAYBARPOS)-ATR1;

ATR2:=ATR1*1.5;

A0:=CURRENTTIME;//

DRAWNUMBER(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C-ATR2,C-ATR2,2,COLORRED),ALIGN0,FONTSIZE16;

DRAWNUMBER(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C+ATR2,C+ATR2,2,COLORBLUE),ALIGN0,FONTSIZE16;

DRAWNUMBER(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C-ATR1,C-ATR1,2,COLORRED),ALIGN0,FONTSIZE16;

DRAWNUMBER(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C+ATR1,C+ATR1,2,COLORBLUE),ALIGN0,FONTSIZE16;

DRAWTEXT(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C-ATR2,'明日支撑'),ALIGN2,COLORRED,FONTSIZE16;

DRAWTEXT(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C+ATR2,'明日压力'),ALIGN2,COLORBLUE,FONTSIZE16;

DRAWTEXT(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C-ATR1,'明日支撑'),ALIGN2,COLORRED,FONTSIZE16;

DRAWTEXT(ISLASTBAR&&A0>150000&&A0<210000  AND PERIOD<=3 AND DQ ,C+ATR1,'明日压力'),ALIGN2,COLORBLUE,FONTSIZE16;

DRAWHORIZONTALLINE(DAYBARPOS=1 AND PERIOD<=3&&BACKSET(ISLASTBAR,DAYBARPOS) ,REF(C+ATR1,DAYBARPOS),COLORWHITE),LINETHICK1;

DRAWHORIZONTALLINE(DAYBARPOS=1 AND PERIOD<=3&&BACKSET(ISLASTBAR,DAYBARPOS),REF(C-ATR1,DAYBARPOS),COLORRED),LINETHICK1;

DRAWHORIZONTALLINE(DAYBARPOS=1 AND PERIOD<=3&&BACKSET(ISLASTBAR,DAYBARPOS),REF(C+ATR2,DAYBARPOS),COLORWHITE),LINETHICK1;

DRAWHORIZONTALLINE(DAYBARPOS=1 AND PERIOD<=3&&BACKSET(ISLASTBAR,DAYBARPOS),REF(C-ATR2,DAYBARPOS),COLORRED),LINETHICK1;

DRAWSL(ISLASTBAR&&A0>150000&&A0<210000 AND PERIOD<=3 ,C+ATR1,0,REF(DAYBARPOS,DAYBARPOS),0,COLORBLUE);

DRAWSL(ISLASTBAR&&A0>150000&&A0<210000 AND PERIOD<=3,C-ATR1,0,REF(DAYBARPOS,DAYBARPOS),0,COLORWHITE);

DRAWSL(ISLASTBAR&&A0>150000&&A0<210000 AND PERIOD<=3 ,C+ATR2,0,REF(DAYBARPOS,DAYBARPOS),0,COLORBLUE);

DRAWSL(ISLASTBAR&&A0>150000&&A0<210000 AND PERIOD<=3 ,C-ATR2,0,REF(DAYBARPOS,DAYBARPOS),0,COLORWHITE);

//显示补足跳空

跳空:VALUEWHEN(DAYBARPOS=1,O-REF(C,1)),NODRAW;

//闪屏

SPTJKT:=F81>F71 AND KT;

SPTJDT:=F81<F71 AND DT;

DTX:=F81>REF(F81,1) AND F71>REF(F71,1) AND DT AND C>F611;

KTX:=F81<REF(F81,1) AND F71<REF(F71,1) AND KT AND C<F611;

DRAWGBK(SPTJKT AND 闪屏,RGB(208,222,253),RGB(208,222,253),1);

DRAWGBK(SPTJDT AND 闪屏,RGB(254,239,237),RGB(254,239,237),1);

//抵扣价

//STICKLINE(ISLASTBAR,REF(H,29),REF(L,29),COLORGREEN,0);

//STICKLINE(ISLASTBAR,REF(H,30),REF(L,30),COLORGREEN,0);

//多空分界:=VALUEWHEN(PERIOD<=25 AND  DQ ,FORCAST(C,30)),COLORBLUE,LINETHICK2;

//IF(多空分界>REF(多空分界,1),多空分界,NULL),COLORRED,LINETHICK2,NOTEXT;

//DRAWSL(ISLASTBAR,多空分界,0,20,0,COLORBLACK);

//DRAWNUMBER(ISLASTBAR AND PERIOD>=7 AND DQ ,多空分界,多空分界,2,COLORRED),ALIGN0,FONTSIZE16;

//ZK区间

//5分钟波幅

TR := MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));

ATR := MA(TR,26),NODRAW;

//复盘ZK

D1:=(H-L)>ATR*0.5&&(H-L)<ATR*1.5&&ABS(C-O)>ATR*0.4&&BACKSET(ISLASTBAR,DAYBARPOS),NODRAW;

D2:=D1&&DAYBARPOS>=4,NODRAW;

D3:=COUNT(D2,DAYBARPOS)=1&&D2,NODRAW;

DRAWSL(EXIST(D3,DAYBARPOS) AND PERIOD<=8 AND ZK AND DQ,VALUEWHEN(D3,O),0,1,0,COLORBLACK),LINETHICK1;

DRAWSL(EXIST(D3,DAYBARPOS) AND PERIOD<=8 AND ZK AND DQ,VALUEWHEN(D3,C),0,1,0,COLORBLACK),LINETHICK1;

SBJ:=MAX(VALUEWHEN(D3,O),VALUEWHEN(D3,C)),NODRAW; 

XBJ:=MIN(VALUEWHEN(D3,O),VALUEWHEN(D3,C)),NODRAW;

//DRAWCOLORKLINE(C>0 AND ISUP AND  DQ,COLORLIGHTBLUE,1);

//DRAWCOLORKLINE(C>0 AND C<=O AND DQ,COLORLIGHTBLUE,0);

DRAWCOLORKLINE(ISUP AND DT AND PERIOD<=25 AND DQ,COLORRED,1);

DRAWCOLORKLINE(ISDOWN AND DT AND PERIOD<=25 AND DQ,COLORRED,0);

DRAWCOLORKLINE(ISUP AND KT AND PERIOD<=25 AND DQ ,COLORBLUE,1);

DRAWCOLORKLINE(ISDOWN AND KT AND PERIOD<=25 AND DQ ,COLORBLUE,0);

DRAWICON(CROSS(KTX,0.5) AND DQ AND 信号,H+1,'ICO86');

DRAWICON(CROSS(DTX,0.5) AND DQ AND 信号,L-1,'ICO92');

//DRAWICON(CROSS(KTX,0.5) AND DQ ,H+1,'ICO157');

//DRAWICON(CROSS(DTX,0.5) AND DQ,L-1,'ICO159');

//IF(LLV(C,30)<REF(LLV(C,30),1) AND HHV(C,30)=REF(HHV(C,30),1),HHV(C,30),NULL);

DRAWICON(CROSS(BACKSET(ISLASTBAR,31) AND PERIOD>=7,0.5),H,'ICO149');

DRAWICON(CROSS(BACKSET(ISLASTBAR,61)  AND PERIOD>=7,0.5),H,'ICO149');

DRAWICON(CROSS(BACKSET(ISLASTBAR,20)  AND PERIOD>=7,0.5),H,'ICO148');

H11:=HIGH;

L11:=LOW;

A:=IFELSE(HIGH>=REF(HIGH,1)&&HIGH>=REF(HIGH,2)&&HIGH>=REF(HIGH,3) &&HIGH>=REF(HIGH,4)&&HIGH>=REF(HIGH,5),LOW,0);//高点大于等于前5日的高点的低点（否则为0）

B:=IFELSE(LOW<=REF(LOW,1)&&LOW<=REF(LOW,2)&&LOW<=REF(LOW,3) &&LOW<=REF(LOW,4)&&LOW<=REF(LOW,5),HIGH,888888);//低点小于等于前五日的地点的高点（否则为8888888）

P1:=IFELSE(A>REF(L11,1),REF(L11,1),0);

P2:=IFELSE(A>REF(L11,2)&&A<=REF(L11,1),REF(L11,2),0);

P3:=IFELSE(A>REF(L11,3)&&A<=REF(L11,1)&&A<=REF(L11,2),REF(L11,3),0);

P4:=IFELSE(A>REF(L11,4)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3),REF(L11,4),0);

P5:=IFELSE(A>REF(L11,5)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4),REF(L11,5),0);

P6:=IFELSE(A>REF(L11,6)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5),REF(L11,6),0);

P7:=IFELSE(A>REF(L11,7)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6),REF(L11,7),0);

P8:=IFELSE(A>REF(L11,8)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7),REF(L11,8),0);

P9:=IFELSE(A>REF(L11,9)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7)&&A<=REF(L11,8),REF(L11,9),0);

P10:=IFELSE(A>REF(L11,10)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7)&&A<=REF(L11,8)&&A<=REF(L11,9),REF(L11,10),0);

AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10;//低点大于前1到十日的低点小于等于，否则取零

PP1:=IFELSE(AA>REF(L11,1),REF(L11,1),0);

PP2:=IFELSE(AA>REF(L11,2)&&AA<=REF(L11,1),REF(L11,2),0);

PP3:=IFELSE(AA>REF(L11,3)&&AA<=REF(L11,1)&&AA<=REF(L11,2),REF(L11,3),0);

PP4:=IFELSE(AA>REF(L11,4)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3),REF(L11,4),0);

PP5:=IFELSE(AA>REF(L11,5)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4),REF(L11,5),0);

PP6:=IFELSE(AA>REF(L11,6)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5),REF(L11,6),0);

PP7:=IFELSE(AA>REF(L11,7)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6),REF(L11,7),0);

PP8:=IFELSE(AA>REF(L11,8)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7),REF(L11,8),0);

PP9:=IFELSE(AA>REF(L11,9)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7)&&AA<=REF(L11,8),REF(L11,9),0);

PP10:=IFELSE(AA>REF(L11,10)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7)&&AA<=REF(L11,8)&&AA<=REF(L11,9),REF(L11,10),0);

AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10;

C11:=VALUEWHEN(AAA>0,AAA);

T1:=IFELSE(B<REF(H11,1),REF(H11,1),0);

T2:=IFELSE(B<REF(H11,2)&&B>=REF(H11,1),REF(H11,2),0);

T3:=IFELSE(B<REF(H11,3)&&B>=REF(H11,1)&&B>=REF(H11,2),REF(H11,3),0);

T4:=IFELSE(B<REF(H11,4)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3),REF(H11,4),0);

T5:=IFELSE(B<REF(H11,5)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4),REF(H11,5),0);

T6:=IFELSE(B<REF(H11,6)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5),REF(H11,6),0);

T7:=IFELSE(B<REF(H11,7)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6),REF(H11,7),0);

T8:=IFELSE(B<REF(H11,8)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7),REF(H11,8),0);

T9:=IFELSE(B<REF(H11,9)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7)&&B>=REF(H11,8),REF(H11,9),0);

T10:=IFELSE(B<REF(H11,10)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7)&&B>=REF(H11,8)&&B>=REF(H11,9),REF(H11,10),0);

BB:=IFELSE((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10);

TT1:=IFELSE(BB<REF(H11,1),REF(H11,1),0);

TT2:=IFELSE(BB<REF(H11,2)&&BB>=REF(H11,1),REF(H11,2),0);

TT3:=IFELSE(BB<REF(H11,3)&&BB>=REF(H11,1)&&BB>=REF(H11,2),REF(H11,3),0);

TT4:=IFELSE(BB<REF(H11,4)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3),REF(H11,4),0);

TT5:=IFELSE(BB<REF(H11,5)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4),REF(H11,5),0);

TT6:=IFELSE(BB<REF(H11,6)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5),REF(H11,6),0);

TT7:=IFELSE(BB<REF(H11,7)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6),REF(H11,7),0);

TT8:=IFELSE(BB<REF(H11,8)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7),REF(H11,8),0);

TT9:=IFELSE(BB<REF(H11,9)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7)&&BB>=REF(H11,8),REF(H11,9),0);

TT10:=IFELSE(BB<REF(H11,10)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7)&&BB>=REF(H11,8)&&BB>=REF(H11,9),REF(H11,10),0);

BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10;

D:=VALUEWHEN(BBB>0,BBB);

UD:=IFELSE(CLOSE>D&&REF(CLOSE,1)<=D,1,IFELSE(CLOSE<C11&&REF(CLOSE,1)>=C11,-3,0)),NODRAW;

K:=VALUEWHEN(UD<>0,UD);

G:=IFELSE(K=1,C11,D),COLORRED;

POLYLINE(LOW>0 AND 动量线,G,COLORYELLOW),LINETHICK3,DOT;

G1:=VALUEWHEN(ISLASTBAR,G);

DRAWNUMBER(LOW>0,G1,G1,0,RGB(0,0,0));

TMP:=-K;

DRAWCOLORKLINE(TMP>0 AND ISUP,COLORCYAN,1);

DRAWCOLORKLINE(TMP>0 AND C<=O,COLORCYAN,0);

DRAWCOLORKLINE(TMP<=0 AND ISUP,COLORRED,1);

DRAWCOLORKLINE(TMP<=0 AND C<=O,COLORRED,0);