咨詢內容：

老師，這個指標能否幫我修改成博易指標？

通達信極品跟莊分時指標公式

TE;A1:=(DVOL?/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
機買:(A2/A6)*100,LINETHICK2,COLORRED;
機賣:(A3/A6)*100,LINETHICK2,COLORGREEN;
散買:(A4/A6)*100,LINETHICK0;
散賣:(A5/A6)*100,LINETHICK0;
主力差:機買-機賣,LINETHICK2,NODRAW;
散戶?差:散買-散賣,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●機構?'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○機構'),COLORWHITE;
DRAWTEXT(散戶差>0 AND REF(散戶差,1)<=0,C*0.15,'▲散戶'),COLORCYAN;
DRAWTEXT(散戶差<0 AND REF(散戶差,1)>=0,-C*0.15,'△散戶'),COLORWHI
?
?
還一個：
HH:=FINDHIGH(H,0,20,1);
?LL:=FINDLOW(L,0,20,1);
?HH1:=FINDHIGH(H,20,20,1);
?LL1:=FINDLOW(L,20,20,1);
?HH2:=FINDHIGH(H,40,20,1);
?LL2:=FINDLOW(L,40,20,1);
?HH3:=FINDHIGH(H,60,20,1);
?LL3:=FINDLOW(L,60,20,1);
?HH4:=FINDHIGH(H,80,20,1);
?LL4:=FINDLOW(L,80,20,1);
?HH5:=FINDHIGH(H,100,20,1);
?LL5:=FINDLOW(L,100,20,1);
?STICKLINE(CURRBARSCOUNT<20 AND CURRBARSCOUNT>1 ,CONST(HH),CONST(HH),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<20 AND CURRBARSCOUNT>1 ,CONST(LL),CONST(LL),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<20 AND CURRBARSCOUNT>1 ,(CONST(HH)+CONST(LL))/2,(CONST(HH)+CONST(LL))/2,8,-1)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT=20 OR CURRBARSCOUNT=1 ,CONST(HH),CONST(LL),0,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<40 AND CURRBARSCOUNT>21 ,CONST(HH1),CONST(HH1),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<40 AND CURRBARSCOUNT>21,CONST(LL1),CONST(LL1),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<40 AND CURRBARSCOUNT>21 ,(CONST(HH1)+CONST(LL1))/2,(CONST(HH1)+CONST(LL1))/2,8,-1)COLORYELLOW;STICKLINE(CURRBARSCOUNT=40 OR CURRBARSCOUNT=21 ,CONST(HH1),CONST(LL1),0,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<60 AND CURRBARSCOUNT>41,CONST(HH2),CONST(HH2),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<60 AND CURRBARSCOUNT>41,CONST(LL2),CONST(LL2),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<60 AND CURRBARSCOUNT>41 ,(CONST(HH2)+CONST(LL2))/2,(CONST(HH2)+CONST(LL2))/2,8,-1)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT=60 OR CURRBARSCOUNT=41,CONST(HH2),CONST(LL2),0,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<80 AND CURRBARSCOUNT>61,CONST(HH3),CONST(HH3),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<80 AND CURRBARSCOUNT>61,CONST(LL3),CONST(LL3),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<80 AND CURRBARSCOUNT>61 ,(CONST(HH3)+CONST(LL3))/2,(CONST(HH3)+CONST(LL3))/2,8,-1)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT=80 OR CURRBARSCOUNT=61,CONST(HH3),CONST(LL3),0,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<100 AND CURRBARSCOUNT>81,CONST(HH4),CONST(HH4),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<100 AND CURRBARSCOUNT>81,CONST(LL4),CONST(LL4),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<100 AND CURRBARSCOUNT>81 ,(CONST(HH4)+CONST(LL4))/2,(CONST(HH4)+CONST(LL4))/2,8,-1)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT=100 OR CURRBARSCOUNT=81,CONST(HH4),CONST(LL4),0,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<120 AND CURRBARSCOUNT>101,CONST(HH5),CONST(HH5),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<120 AND CURRBARSCOUNT>101,CONST(LL5),CONST(LL5),8,0)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT<120 AND CURRBARSCOUNT>101 ,(CONST(HH5)+CONST(LL5))/2,(CONST(HH5)+CONST(LL5))/2,8,-1)COLORYELLOW;
?STICKLINE(CURRBARSCOUNT=120 OR CURRBARSCOUNT=101,CONST(HH5),CONST(LL5),0,0)COLORYELLOW;

?DRAWTEXT_FIX(CURRBARSCOUNT=20,0.9,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=20,0.9,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=40,0.7,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH1,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=40,0.7,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL1,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=60,0.55,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH2,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=60,0.55,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL2,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=80,0.38,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH3,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=80,0.38,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL3,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=100,0.22,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH4,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=100,0.22,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL4,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=120,0.101,0.005,0,STRCAT(STRCAT('最高價:',VAR2STR(HH5,2)),'元'))COLORYELLOW;
?DRAWTEXT_FIX(CURRBARSCOUNT=120,0.101,1.9,0,STRCAT(STRCAT('最低價:',VAR2STR(LL5,2)),'元'))COLORYELLOW;

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： 這里面DVOL我搜了資料顯示是個未來函數，博易中暫不支持，我用vol替換的。
A1:=(VOL*100/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
機買:(A2/A6)*100,LINETHICK2,COLORRED;
機賣:(A3/A6)*100,LINETHICK2,COLORGREEN;
散買:(A4/A6)*100,LINETHICK0;
散賣:(A5/A6)*100,LINETHICK0;
主力差:機買-機賣,LINETHICK2,NODRAW;
散戶差:散買-散賣,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●機構?'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○機構'),COLORWHITE;
DRAWTEXT(散戶差>0 AND REF(散戶差,1)<=0,C*0.15,'▲散戶'),COLORCYAN;
DRAWTEXT(散戶差<0 AND REF(散戶差,1)>=0,-C*0.15,'△散戶'),COLORWHITE; 謝謝老師！剛才下面還一個呢？
? 來源 程序化久久網