板块涨跌幅公式为板块乖离率公式_ai活跃度

请高手帮忙，修改板块涨跌幅公式为板块乖离率公式。先谢谢了.

飞狐板块涨跌幅公式

VAR1:=("399139$CLOSE");VAR2:=("399190$CLOSE");VAR3:=("399132$CLOSE");
VAR4:=("399150$CLOSE");VAR5:=("399138$CLOSE");VAR6:=("399200$CLOSE");
VAR7:=("399110$CLOSE");VAR8:=("399136$CLOSE");VAR9:=("399135$CLOSE");
VAR10:=("399130$CLOSE");VAR11:=("399160$CLOSE");VAR12:=("399131$CLOSE");
VAR13:=("399137$CLOSE");VAR14:=("399140$CLOSE");VAR15:=("399210$CLOSE");
水电:(VAR14/REF(VAR14,1)-1)*100,LINETHICK,COLORFFFF00;
服务:(VAR15/REF(VAR15,1)-1)*100,LINETHICK,COLORFF66CC;
金融:(VAR2/REF(VAR2,1)-1)*100,LINETHICK,COLOR00FFFF;
地产:(VAR6/REF(VAR6,1)-1)*100,LINETHICK,COLORAAAAFF;
石化:(VAR9/REF(VAR9,1)-1)*100,LINETHICK,COLORFF99BB;
金属:(VAR13/REF(VAR13,1)-1)*100,LINETHICK,COLORFFFF66;
医药:(VAR1/REF(VAR1,1)-1)*100,LINETHICK,COLOR0033FF;
机械:(VAR5/REF(VAR5,1)-1)*100,LINETHICK,COLORFFCC00;
电子:(VAR8/REF(VAR8,1)-1)*100,LINETHICK,COLOR00BBFF;
制造:(VAR10/REF(VAR10,1)-1)*100,LINETHICK,COLORCCCCCC;
农林:(VAR7/REF(VAR7,1)-1)*100,LINETHICK,COLOR33FF66;
运输:(VAR11/REF(VAR11,1)-1)*100,LINETHICK,COLORFFFFFF;
纺织:(VAR3/REF(VAR3,1)-1)*100,LINETHICK,COLORCC66FF;
建筑:(VAR4/REF(VAR4,1)-1)*100,LINETHICK,COLOR009999;
食品:(VAR12/REF(VAR12,1)-1)*100,LINETHICK,COLOR6666FF;
P1:=IF(BARSLAST((DATACOUNT-BARPOS+1)=1),1,0);
P2:=IF(BARSLAST((DATACOUNT-BARPOS+1)=5),1,0);
P3:=IF(BARSLAST((DATACOUNT-BARPOS+1)=10),1,0);
P4:=IF(BARSLAST((DATACOUNT-BARPOS+1)=15),1,0);
P5:=IF(BARSLAST((DATACOUNT-BARPOS+1)=20),1,0);
P6:=IF(BARSLAST((DATACOUNT-BARPOS+1)=25),1,0);
P7:=IF(BARSLAST((DATACOUNT-BARPOS+1)=30),1,0);
P8:=IF(BARSLAST((DATACOUNT-BARPOS+1)=35),1,0);
P9:=IF(BARSLAST((DATACOUNT-BARPOS+1)=40),1,0);
P10:=IF(BARSLAST((DATACOUNT-BARPOS+1)=45),1,0);
P11:=IF(BARSLAST((DATACOUNT-BARPOS+1)=50),1,0);
P12:=IF(BARSLAST((DATACOUNT-BARPOS+1)=55),1,0);
P13:=IF(BARSLAST((DATACOUNT-BARPOS+1)=60),1,0);
P14:=IF(BARSLAST((DATACOUNT-BARPOS+1)=65),1,0);
P15:=IF(BARSLAST((DATACOUNT-BARPOS+1)=70),1,0);
P16:=IF(BARSLAST((DATACOUNT-BARPOS+1)=75),1,0);
食品0:IF(P1-P2,REFX(食品[SYSPARAM(1)],4),0),STICK,LINETHICK6,COLOR6666FF;
建筑0:IF(P3-P2,REFX(建筑[SYSPARAM(1)],9),0),STICK,LINETHICK6,COLOR009999;
纺织0:IF(P4-P3,REFX(纺织[SYSPARAM(1)],14),0),STICK,LINETHICK6,COLORCC66FF;
运输0:IF(P5-P4,REFX(运输[SYSPARAM(1)],19),0),STICK,LINETHICK6,COLORFFFFFF;
农林0:IF(P6-P5,REFX(农林[SYSPARAM(1)],24),0),STICK,LINETHICK6,COLOR33FF66;
制造0:IF(P7-P6,REFX(制造[SYSPARAM(1)],29),0),STICK,LINETHICK6,COLORCCCCCC;
电子0:IF(P8-P7,REFX(电子[SYSPARAM(1)],34),0),STICK,LINETHICK6,COLOR00BBFF;
机械0:IF(P9-P8,REFX(机械[SYSPARAM(1)],39),0),STICK,LINETHICK6,COLORFFCC00;
医药0:IF(P10-P9,REFX(医药[SYSPARAM(1)],44),0),STICK,LINETHICK6,COLOR0033FF;
金属0:IF(P11-P10,REFX(金属[SYSPARAM(1)],49),0),STICK,LINETHICK6,COLORFFFF66;
石化0:IF(P12-P11,REFX(石化[SYSPARAM(1)],54),0),STICK,LINETHICK6,COLORFF9988;
地产0:IF(P13-P12,REFX(地产[SYSPARAM(1)],59),0),STICK,LINETHICK6,COLORAAAAFF;
金融0:IF(P14-P13,REFX(金融[SYSPARAM(1)],64),0),STICK,LINETHICK6,COLOR00FFFF;
服务0:IF(P15-P14,REFX(服务[SYSPARAM(1)],69),0),STICK,LINETHICK6,COLORFF66CC;
水电0:IF(P16-P15,REFX(水电[SYSPARAM(1)],74),0),STICK,LINETHICK6,COLORFFFF00;
DRAWTEXT(P2-P1,0,'食品'),COLOR6666FF;
DRAWTEXT(P3-P2,0,'建筑'),COLOR009999;
DRAWTEXT(P4-P3,0,'纺织'),COLORCC66FF;
DRAWTEXT(P5-P4,0,'运输'),COLORFFFFFF;
DRAWTEXT(P6-P5,0,'农林'),COLOR33FF66;
DRAWTEXT(P7-P6,0,'制造'),COLORCCCCCC;
DRAWTEXT(P8-P7,0,'电子'),COLOR00BBFF;
DRAWTEXT(P9-P8,0,'机械'),COLORFFCC00;
DRAWTEXT(P10-P9,0,'医药'),COLOR0033FF;
DRAWTEXT(P11-P10,0,'金属'),COLORFFFF66;
DRAWTEXT(P12-P11,0,'石化'),COLORFF99BB;
DRAWTEXT(P13-P12,0,'地产'),COLORAAAAFF;
DRAWTEXT(P14-P13,0,'金融'),COLOR00FFFF;
DRAWTEXT(P15-P14,0,'服务'),COLORFF66CC;
DRAWTEXT(P16-P15,0,'水电'),COLORFFFF00;

我想将会变色的乖离率柱公式代替上面公式中的涨跌幅柱，用于板块指数公式。
 

 

乖离率 代替 涨跌幅 ， 用于板块指数时，颜色会变，

5日，15日，34日 乖离率，由内至外排列。

今天的乖离率比昨天上涨或者下跌 会变色。

飞狐乖离率柱
Q1 := (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
Q2 := (CLOSE-MA(CLOSE,15))/MA(CLOSE,15)*100;
Q3 := (CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100;

stickline(Q3 and q3>ref(q3,1),0,Q3,8,1) COLORMAGENTA,LINETHICK1;
stickline(Q3 and q3<ref(q3,1),0,Q3,8,1) colorffff00,LINETHICK1;
stickline(Q2 and q2>ref(q2,1),0,Q2,5.5,0) color000099;
stickline(Q2 and q2<ref(q2,1),0,Q2,5.5,0) color006600;
stickline(Q1 and q1>ref(q1,1),0,Q1,2,0) coloraaaaff;
stickline(Q1 and q1<ref(q1,1),0,Q1,2,0) color00ff99;
 

 

解答如下：

VAR1:=("399139$CLOSE");VAR2:=("399190$CLOSE");VAR3:=("399132$CLOSE");

VAR4:=("399150$CLOSE");VAR5:=("399138$CLOSE");VAR6:=("399200$CLOSE");

VAR7:=("399110$CLOSE");VAR8:=("399136$CLOSE");VAR9:=("399135$CLOSE");

VAR10:=("399130$CLOSE");VAR11:=("399160$CLOSE");VAR12:=("399131$CLOSE");

VAR13:=("399137$CLOSE");VAR14:=("399140$CLOSE");VAR15:=("399210$CLOSE");

水电:(VAR14/REF(VAR14,1)-1)*100,LINETHICK,COLORFFFF00;

服务:(VAR15/REF(VAR15,1)-1)*100,LINETHICK,COLORFF66CC;

stickline(水电 and 水电>ref(水电,1),0,水电,8,1) COLORMAGENTA,LINETHICK1;
stickline(水电 and 水电<ref(水电,1),0,水电,8,1) colorffff00,LINETHICK1;
stickline(服务 and 服务>ref(服务,1),0,服务,5.5,0) color000099;
stickline(服务 and 服务<ref(服务,1),0,服务,5.5,0) color006600;