改為文華6使用

作者：文華財經來源：cxh99.com 發布時間：2023年05月20日

咨詢內容： ?CAPITAL:=GETPRICE1('通股本'; AMOUNT:=AVPRICE*V; A1:=SUM( IF(CLOSE>REF(CLOSE,1)&&DAYBARPOS>1,VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1)&&DAYBARPOS>1,-VOL/CAPITAL*100,0)),DAYBARPOS); 成交額:=V*C/100,NODRAW; A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A6:=((A2+A3)+A4)+A5; A7:=IF((ISLASTBAR),((100*A2)/A6),0); A8:=IF((ISLASTBAR),((100*A3)/A6),0); A9:=IF((ISLASTBAR),((100*A4)/A6),0); A10:=IF((ISLASTBAR),((100*A5)/A6),0);
機構買:(A2),COLORRED,NODRAW; 機構賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構買,NULL),LINETHICK6,COLORRED; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構買,NULL),LINETHICK6,COLORRED;

IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構賣,NULL),LINETHICK6,COLORGREEN; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構賣,NULL),LINETHICK6,COLORGREEN;
機構進出:機構買-機構賣,NODRAW; 散戶買:=(A4),COLOR5555FF; 散戶賣:=(A5),COLOR55FF55; 強勢:((100*A2)/A6>50); STICKLINE(強勢,機構買*1.02,機構買*1.1,1,0),COLORYELLOW; 拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18; STICKLINE(拉升,機構買*1.1,機構買*1.2,1,0),COLORRED;
Q:=BETWEEN(C/(SUM(AMOUNT,DAYBARPOS)/SUM(VOL*100,DAYBARPOS)),1.05,0.95); Q2:=IF(Q=0,MA(C,DAYBARPOS),(SUM(AMOUNT,DAYBARPOS)/SUM(VOL*100,DAYBARPOS))); DRAWICON(CROSS((C/Q2),1.03),機構買,5); DD1:=1;
機構買入:(100*A2)/A6,NODRAW; 機構賣出:(100*A3)/A6,NODRAW; 散戶買入:(100*A4)/A6,NODRAW; 散戶賣出:(100*A5)/A6,NODRAW; DAYBARPOS>2&&REF(CROSS(機構買入,機構賣出)||DAYBARPOS=2&&機構買入>機構賣出,1),NOTICE;
//前一根K線如果是：機構買入上穿? ?機構賣出? 或者是當日第一根K線? 機構買入大于機構賣出都可以預警
XXZ:CROSS(機構買入,機構賣出)||DAYBARPOS=2&&機構買入>機構賣出,NODRAW;
DAYBARPOS>2&&EXIST(CROSS(機構買入,機構賣出)||DAYBARPOS=2&&機構買入>機構賣出,DAYBARPOS)&&REF(? ? ? C>LLV( IF(XXZ,C,9999999) ,DAYBARPOS)? ,1),NOTICE;
//如果當日存在第一次預警，后續價格大于第一次預警的收盤價則預警
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構買,機構買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25,VALIGN2; DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構買,機構賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25,VALIGN0;? ?老師你好，幫忙改為文華6使用可以嗎，謝謝
?
?來源:程序化99
文華技術人員： ?參考：
CAPITAL:=GETPRICE1('通股本'; AMOUNT:=AVPRICE*V; A1:=SUM( IF(CLOSE>REF(CLOSE,1)&&DAYBARPOS>1,VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1)&&DAYBARPOS>1,-VOL/CAPITAL*100,0)),DAYBARPOS); 成交額:=V*C/100,NODRAW; A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1))))&&DAYBARPOS>1,成交額,0)),DAYBARPOS); A6:=((A2+A3)+A4)+A5; A7:=IF((ISLASTBAR),((100*A2)/A6),0); A8:=IF((ISLASTBAR),((100*A3)/A6),0); A9:=IF((ISLASTBAR),((100*A4)/A6),0); A10:=IF((ISLASTBAR),((100*A5)/A6),0);
機構買:(A2),COLORRED,NODRAW; 機構賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構買,NULL),LINETHICK6,COLORRED; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構買,NULL),LINETHICK6,COLORRED;

IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構賣,NULL),LINETHICK6,COLORGREEN; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構賣,NULL),LINETHICK6,COLORGREEN;
機構進出:機構買-機構賣,NODRAW; 散戶買:=(A4),COLOR5555FF; 散戶賣:=(A5),COLOR55FF55; 強勢:((100*A2)/A6>50); STICKLINE(強勢,機構買*1.02,機構買*1.1,1,0),COLORYELLOW; 拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18; STICKLINE(拉升,機構買*1.1,機構買*1.2,1,0),COLORRED;
Q:=BETWEEN(C/(SUM(AMOUNT,DAYBARPOS)/SUM(VOL*100,DAYBARPOS)),1.05,0.95); Q2:=IF(Q=0,MA(C,DAYBARPOS),(SUM(AMOUNT,DAYBARPOS)/SUM(VOL*100,DAYBARPOS))); DRAWICON(CROSS((C/Q2),1.03),機構買,5); DD1:=1;
機構買入:(100*A2)/A6,NODRAW; 機構賣出:(100*A3)/A6,NODRAW; 散戶買入:(100*A4)/A6,NODRAW; 散戶賣出:(100*A5)/A6,NODRAW;

//前一根K線如果是：機構買入上穿? ?機構賣出? 或者是當日第一根K線? 機構買入大于機構賣出都可以預警
XXZ:CROSS(機構買入,機構賣出)||DAYBARPOS=2&&機構買入>機構賣出,NODRAW;

//如果當日存在第一次預警，后續價格大于第一次預警的收盤價則預警
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構買,機構買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25,VALIGN2; DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構買,機構賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25,VALIGN0;