input: n(5,0,999,1),n1(10,0,999,1),n2(20,0,999,1),n3(30,0,999,1);
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 – 10)) + IF(A76,10,(0 – 10))) + IF(A77,10,(0 – 10))) + IF(A78,10,(0 – 10))) + IF(A79,10,(0 – 10))) + IF(A711,10,(0 – 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;
T := BARSLAST(DISPSTATUS=1)+1;
HHg := HHV(H, T);
ddg := LLV(L, T);
{Hk := LL-HH; G12 := LL-HK*1.55; }
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股的量能理想，有明顯走強(qiáng)跡象，可以考慮中線進(jìn)場(chǎng)參與，倉(cāng)位在2/3左右。 ‘),color0000FF;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股雖然走勢(shì)趨強(qiáng)，但量能還顯不足，可以考慮短線進(jìn)場(chǎng)，倉(cāng)位在1/2左右。 ‘),color0000FF;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股量?jī)r(jià)配合良好，但相對(duì)其它股票并沒(méi)有明顯走強(qiáng)，可以考慮短線進(jìn)場(chǎng)，倉(cāng)位1/2左右。 ‘),color0000FF;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股形態(tài)尚可，但量能不足，股票也未完全走強(qiáng)，可以短線參與，倉(cāng)位1/3左右。 ‘),color0000FF;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股形態(tài)變壞，但走勢(shì)相對(duì)其它股票尚可，重倉(cāng)者減持大半，清倉(cāng)者可以觀望。 ‘),color00FF00;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股隨大盤一起下跌，程明顯縮量走勢(shì)，考慮到大盤風(fēng)險(xiǎn)，減持或清倉(cāng)。 ‘),color00FF00;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股放量下跌，走勢(shì)明顯偏弱，離場(chǎng)觀望。 ‘),color00FF00;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股縮量下跌，走勢(shì)偏弱，離場(chǎng)觀望。 ‘),color00FF00;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股形態(tài)良好，強(qiáng)勢(shì)明顯，量能充足，可以繼續(xù)持有。 ‘),color0022dd;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股上行趨勢(shì)不變，強(qiáng)勢(shì)依然，但量能開(kāi)始轉(zhuǎn)弱，注意風(fēng)險(xiǎn)。 ‘),color0022dd;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股仍然具備上漲潛力，但股性偏弱，可考慮減倉(cāng)。 ‘),color0022dd;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股走勢(shì)趨弱，量能不足，減持大部分籌碼。 ‘),color00FFFF;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股形態(tài)不佳，注意成交量的變化，但目前不適合參與。 ‘),COLOR00FF00;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(8,70,’該股趨勢(shì)不明，股價(jià)偏弱，注意量能變化，目前不宜參與。 ‘),COLOR00FF00;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股有走強(qiáng)跡象，但量能不足，趨勢(shì)不明，不適合操作。 ‘),COLOR00FF00;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(8,70,’該股走勢(shì)太弱，沒(méi)有參與價(jià)值。 ‘),COLOR00FF00;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,’大盤量能理想，有明顯走強(qiáng)跡象，可以考慮中線進(jìn)場(chǎng)參與，倉(cāng)位在2/3左右， ‘),color0000FF;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,’如前期經(jīng)過(guò)一輪下跌，此時(shí)為最佳買點(diǎn)，但如果前期有過(guò)一段漲幅則介入需謹(jǐn)慎。 ‘),color0000FF;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,’大盤雖然走勢(shì)趨強(qiáng)，但量能還顯不足，如果前期經(jīng)過(guò)一輪下跌， ‘),color0000FF;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,’可以考慮短線進(jìn)場(chǎng)，倉(cāng)位在1/2左右，一旦量能放大可以加倉(cāng)買入。 ‘),color0000FF;
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,’大盤形態(tài)走壞，重倉(cāng)者可以減去大部分倉(cāng)位。 ‘),color0022dd;
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,’大盤縮量調(diào)整，注意風(fēng)險(xiǎn)，短線清倉(cāng)觀望。 ‘),color0022dd;
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,’大盤走勢(shì)良好，量能理想，可以繼續(xù)持有強(qiáng)勢(shì)股。 ‘),color0022dd;
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,’大盤形態(tài)良好，但量能稍顯不足，隨時(shí)準(zhǔn)備減倉(cāng)。 ‘),color0022dd;
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(8,70,’大盤趨勢(shì)不明，注意成交量變化，目前不適宜進(jìn)場(chǎng)。 ‘),color0022dd;
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(8,70,’大盤趨勢(shì)向下，量能萎縮，不適合進(jìn)場(chǎng)。 ‘),color0022dd;
{所屬板塊}
var100:=’所屬板塊:’;
if inblock(‘電力’)=1 then var100:=var100+’ 電力’;
if inblock(‘電腦’)=1 then var100:=var100+’ 電腦’;
if inblock(‘電器’)=1 then var100:=var100+’ 電器’;
if inblock(‘電子信息’)=1 then var100:=var100+’ 電子信息’;
if inblock(‘房地產(chǎn)’)=1 then var100:=var100+’ 房地產(chǎn)’;
if inblock(‘紡織服裝’)=1 then var100:=var100+’ 紡織服裝’;
if inblock(‘鋼鐵’)=1 then var100:=var100+’ 鋼鐵’;
if inblock(‘工程建筑’)=1 then var100:=var100+’ 工程建筑’;
if inblock(‘供水供氣’)=1 then var100:=var100+’ 供水供氣’;
if inblock(‘化工’)=1 then var100:=var100+’ 化工’;
if inblock(‘化纖’)=1 then var100:=var100+’ 化纖’;
if inblock(‘機(jī)械’)=1 then var100:=var100+’ 機(jī)械’;
if inblock(‘建材’)=1 then var100:=var100+’ 建材’;
if inblock(‘交通工具’)=1 then var100:=var100+’ 交通工具’;
if inblock(‘交通設(shè)施’)=1 then var100:=var100+’ 交通設(shè)施’;
if inblock(‘教育傳媒’)=1 then var100:=var100+’ 教育傳媒’;
if inblock(‘金融’)=1 then var100:=var100+’ 金融’;
if inblock(‘旅游酒店’)=1 then var100:=var100+’ 旅游酒店’;
if inblock(‘煤炭石油’)=1 then var100:=var100+’ 煤炭石油’;
if inblock(‘釀酒食品’)=1 then var100:=var100+’ 釀酒食品’;
if inblock(‘農(nóng)林牧漁’)=1 then var100:=var100+’ 農(nóng)林牧漁’;
if inblock(‘其他行業(yè)’)=1 then var100:=var100+’ 其他行業(yè)’;
if inblock(‘汽車’)=1 then var100:=var100+’ 汽車’;
if inblock(‘汽配’)=1 then var100:=var100+’ 汽配’;
if inblock(‘商業(yè)連鎖’)=1 then var100:=var100+’ 商業(yè)連鎖’;
if inblock(‘石化’)=1 then var100:=var100+’ 石化’;
if inblock(‘通信’)=1 then var100:=var100+’ 通信’;
if inblock(‘外貿(mào)’)=1 then var100:=var100+’ 外貿(mào)’;
if inblock(‘醫(yī)藥’)=1 then var100:=var100+’ 醫(yī)藥’;
if inblock(‘儀電儀表’)=1 then var100:=var100+’ 儀電儀表’;
if inblock(‘有色金屬’)=1 then var100:=var100+’ 有色金屬’;
if inblock(‘運(yùn)輸物流’)=1 then var100:=var100+’ 運(yùn)輸物流’;
if inblock(‘造紙印刷’)=1 then var100:=var100+’ 造紙印刷’;
if inblock(‘安徽’)=1 then var100:=var100+’ 安徽’;
if inblock(‘北京’)=1 then var100:=var100+’ 北京’;
if inblock(‘福建’)=1 then var100:=var100+’ 福建’;
if inblock(‘甘肅’)=1 then var100:=var100+’ 甘肅’;
if inblock(‘廣東’)=1 then var100:=var100+’ 廣東’;
if inblock(‘廣西’)=1 then var100:=var100+’ 廣西’;
if inblock(‘貴州’)=1 then var100:=var100+’ 貴州’;
if inblock(‘海南’)=1 then var100:=var100+’ 海南’;
if inblock(‘河北’)=1 then var100:=var100+’ 河北’;
if inblock(‘河南’)=1 then var100:=var100+’ 河南’;
if inblock(‘黑龍江’)=1 then var100:=var100+’ 黑龍江’;
if inblock(‘湖北’)=1 then var100:=var100+’ 湖北’;
if inblock(‘湖南’)=1 then var100:=var100+’ 湖南’;
if inblock(‘吉林’)=1 then var100:=var100+’ 吉林’;
if inblock(‘江蘇’)=1 then var100:=var100+’ 江蘇’;
if inblock(‘江西’)=1 then var100:=var100+’ 江西’;
if inblock(‘遼寧’)=1 then var100:=var100+’ 遼寧’;
if inblock(‘內(nèi)蒙古’)=1 then var100:=var100+’ 內(nèi)蒙古’;
if inblock(‘寧夏’)=1 then var100:=var100+’ 寧夏’;
if inblock(‘青海’)=1 then var100:=var100+’ 青海’;
if inblock(‘山東’)=1 then var100:=var100+’ 山東’;
if inblock(‘山西’)=1 then var100:=var100+’ 山西’;
if inblock(‘陜西’)=1 then var100:=var100+’ 陜西’;
if inblock(‘上海’)=1 then var100:=var100+’ 上海’;
if inblock(‘深圳’)=1 then var100:=var100+’ 深圳’;
if inblock(‘四川’)=1 then var100:=var100+’ 四川’;
if inblock(‘天津’)=1 then var100:=var100+’ 天津’;
if inblock(‘***’)=1 then var100:=var100+’ ***’;
if inblock(‘新疆’)=1 then var100:=var100+’ 新疆’;
if inblock(‘云南’)=1 then var100:=var100+’ 云南’;
if inblock(‘浙江’)=1 then var100:=var100+’ 浙江’;
if inblock(‘重慶’)=1 then var100:=var100+’ 重慶’;
if inblock(‘3G’)=1 then var100:=var100+’ 3G’;
if inblock(‘H股’)=1 then var100:=var100+’ H股’;
if inblock(‘QFII持股’)=1 then var100:=var100+’ QFII持股’;
if inblock(‘ST’)=1 then var100:=var100+’ ST’;
if inblock(‘奧運(yùn)’)=1 then var100:=var100+’ 奧運(yùn)’;
if inblock(‘創(chuàng)投’)=1 then var100:=var100+’ 創(chuàng)投’;
if inblock(‘次新股’)=1 then var100:=var100+’ 次新股’;
if inblock(‘大盤’)=1 then var100:=var100+’ 大盤’;
if inblock(‘股權(quán)改革’)=1 then var100:=var100+’ 股權(quán)改革’;
if inblock(‘股權(quán)投資’)=1 then var100:=var100+’ 股權(quán)投資’;
DD:=FINANCE2(35);
SS:=FINANCE2(37);
GG:=FINANCE2(3);
TH:=DYNAINFO(39);
DRAWTEXTABS(8,30,’總股本:’+NUMTOSTRn(DD,0)+’萬(wàn)股’ +’ 流通A股:’+NUMTOSTRn(SS,0)+’萬(wàn)股’+’市盈率:’+NUMTOSTRn(TH,2)+’ 倍’+’ 每股收益:’+NUMTOSTRn(GG,3)+’ 元’),ColorFF00DD;
DRAWTEXTABS(8,50,var100+’ ‘),ColorFFDE00;
{量能飽和}
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
DRAWTEXTREL(8,10,’量能飽和度：’+NUMTOSTRN(SAT,0)),Color8000FF;
{趨勢(shì)}
AA10:MA(CLOSE,8),color0000FF;
AA12:MA(CLOSE,12),color0000FF;
BB10:=((ATAN((AA10 – REF(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 – REF(AA12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
FILLRGN(AA10,AA12,(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1))),Color0098FF;
FILLRGN(AA10,AA12,(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1))),color00FF00;
{45度異動(dòng)}
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,’∠45上升’),colorblack;
{壓力支撐}
壓力:MA(REF(HHV(C,30),1),2),Color9D00FF;
支撐:MA(REF(LLV(C,30),1),2),ColorABdd46;
{老鼠倉(cāng)}
AA1:=AMOUNT/V;
BB1:=L CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L EE1:=V FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(ff1,(LOW* 0.99),’老鼠倉(cāng)’),Color4080FF;
{黑馬線}
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
黑馬線:=EMA(A51,5);
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
趨勢(shì)線:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
DRAWTEXT(CROSS(趨勢(shì)線,0)AND 黑馬線<40,(HIGH* 0.97),'▲大黑馬'),COLOR0055ff;
{頂?shù)妆畴x}
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE – LC),0),3,1) / SMA(ABS((CLOSE – LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),’B’),ColorFF00FF;
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),’S’),ColorA6E500;
{短線}
VAR2:=LLV(LOW,27);
VAR3:=HHV(HIGH,34);
VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25;
注意買:=IF((Var4<10),80,100);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
超跌:=IF(J<0,10,0);
BDDD:=LLV(J,2)=LLV(J,8);
買入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0);
DRAWTEXTABS(5,5,’概念股網(wǎng) www.chiang1015.com’),linethick1,COLOR00EEff;
DRAWTEXT(買入 AND 注意買=100 AND 超跌=0,low,’短線’),Color8000FF;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
買:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(filter(買=1,5),LOW-0.03,’拉升’),ColorFFDE00;
{K線}
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
stickline(var9Q,c,(o+c)/2,7,0),color000055;
stickline(var9Q,c,(o+c)/2,6,0),color000066;
stickline(var9Q,c,(o+c)/2,5,0),color000077;
stickline(var9Q,c,(o+c)/2,4,0),color000099;
stickline(var9Q,c,(o+c)/2,3,0),color0000bb;
stickline(var9Q,c,(o+c)/2,2,0),color0000dd;
stickline(var9Q,c,(o+c)/2,1,0),color0000ff;
varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
stickline(varaQ,c,(o+c)/2,7,0),colorff11ff;
stickline(varaQ,c,(o+c)/2,6,0),colorff33ff;
stickline(varaQ,c,(o+c)/2,5,0),colorff55ff;
stickline(varaQ,c,(o+c)/2,4,0),colorff77ff;
stickline(varaQ,c,(o+c)/2,3,0),colorff99ff;
stickline(varaQ,c,(o+c)/2,2,0),colorffbbff;
stickline(varaQ,c,(o+c)/2,1,0),colorffddff;
varbQ:=c=llv(c,4) and (ref(c,1)hhv(c,4) and c stickline(varbQ,c,(o+c)/2,7,0),color333333;
stickline(varbQ,c,(o+c)/2,6,0),color555555;
stickline(varbQ,c,(o+c)/2,5,0),color777777;
stickline(varbQ,c,(o+c)/2,4,0),color999999;
stickline(varbQ,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbQ,c,(o+c)/2,2,0),colordddddd;
stickline(varbQ,c,(o+c)/2,1,0),color00ffff;
varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)=ref(c,1);
stickline(varcQ,o,(o+c)/2,7,0),color003300;
stickline(varcQ,o,(o+c)/2,6,0),color005500;
stickline(varcQ,o,(o+c)/2,5,0),color007700;
stickline(varcQ,o,(o+c)/2,4,0),color009900;
stickline(varcQ,o,(o+c)/2,3,0),color00bb00;
stickline(varcQ,o,(o+c)/2,2,0),color00dd00;
stickline(varcQ,o,(o+c)/2,1,0),color00ff00;
vardQ:=ref(c,1)=hhv(c,4) and cref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c stickline(vardQ,o,(o+c)/2,7,0),colorff1100;
stickline(vardQ,o,(o+c)/2,6,0),colorff3300;
stickline(vardQ,o,(o+c)/2,5,0),colorff5500;
stickline(vardQ,o,(o+c)/2,4,0),colorff7700;
stickline(vardQ,o,(o+c)/2,3,0),colorff9900;
stickline(vardQ,o,(o+c)/2,2,0),colorffbb00;
stickline(vardQ,o,(o+c)/2,1,0),colorffdd00;