麻煩老師幫改個指標(biāo)謝謝,
作者：文華財經(jīng) 來源：cxh99.com 發(fā)布時間：2023年05月31日
-
咨詢內(nèi)容：
請舟亢老師幫我加個 TIME? 時間，加下以上原碼下多謝， 我試了幾次提示錯誤， 只考慮當(dāng)天的時間就行， 如上午的10：34分，多謝老師
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);
機構(gòu)買:(A2),COLORRED,NODRAW;機構(gòu)賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構(gòu)買,NULL),LINETHICK2,COLORRED;IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構(gòu)買,NULL),LINETHICK2,COLORRED;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;
機構(gòu)進出:機構(gòu)買-機構(gòu)賣,NODRAW;散戶買:=(A4),COLOR5555FF;散戶賣:=(A5),COLOR55FF55;強勢:((100*A2)/A6>50);STICKLINE(強勢,機構(gòu)買*1.02,機構(gòu)買*1.1,1,0),COLORYELLOW;拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;STICKLINE(拉升,機構(gòu)買*1.1,機構(gòu)買*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),機構(gòu)買,5);DD1:=1;
機構(gòu)買入:(100*A2)/A6,NODRAW;機構(gòu)賣出:(100*A3)/A6,NODRAW;散戶買入:(100*A4)/A6,NODRAW;散戶賣出:(100*A5)/A6,NODRAW;
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構(gòu)買,機構(gòu)買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25,VALIGN2;DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構(gòu)買,機構(gòu)賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25,VALIGN0;
DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買>機構(gòu)賣,機構(gòu)賣,'',COLORRED,ALIGN0,FONTSIZE25;DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買<機構(gòu)賣,機構(gòu)賣,'',COLORGREEN,ALIGN0,FONTSIZE25;
請舟亢老師幫我加個 TIME? 時間，加下以上原碼下多謝， 我試了幾次提示錯誤， 只考慮當(dāng)天的時間就行， 如上午的10：34分，多謝老師
?
?來源:程序化99
-
文華技術(shù)人員：
?
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);
機構(gòu)買:(A2),COLORRED,NODRAW;
機構(gòu)賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構(gòu)買,NULL),LINETHICK2,COLORRED;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構(gòu)買,NULL),LINETHICK2,COLORRED;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;
K:=TIME>=1034;
機構(gòu)進出:機構(gòu)買-機構(gòu)賣,NODRAW;
散戶買:=(A4),COLOR5555FF;
散戶賣:=(A5),COLOR55FF55;
強勢:((100*A2)/A6>50);
STICKLINE(強勢&&K,機構(gòu)買*1.02,機構(gòu)買*1.1,1,0),COLORYELLOW;
拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升&&K,機構(gòu)買*1.1,機構(gòu)買*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)&&K,1.03),機構(gòu)買,5);
DD1:=1;
機構(gòu)買入:(100*A2)/A6,NODRAW;
機構(gòu)賣出:(100*A3)/A6,NODRAW;
散戶買入:(100*A4)/A6,NODRAW;
散戶賣出:(100*A5)/A6,NODRAW;
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL&&K||ISLASTBAR&&K,機構(gòu)買,機構(gòu)買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25,VALIGN2;
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL&&K||ISLASTBAR&&K,機構(gòu)買,機構(gòu)賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25,VALIGN0;
DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買>機構(gòu)賣&&K,機構(gòu)賣,'',COLORRED,ALIGN0,FONTSIZE25;
DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買<機構(gòu)賣&&K,機構(gòu)賣,'',COLORGREEN,ALIGN0,FONTSIZE25;
?
?來源: www.weiqiv.net.cn
-
文華客服：
?麻煩老師，我是想從這個指定的時候開始，從0開始計算 這個時間前的可以取消掉， 多謝
?
-
網(wǎng)友回復(fù)：
?
CAPITAL:=GETPRICE1('通股本';
AMOUNT:=AVPRICE*V;
QW:=BARSLAST(TIME=1034)+1;
A1:=SUM( IF(CLOSE>REF(CLOSE,1)&&QW>1,VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1)&&QW>1,-VOL/CAPITAL*100,0)),QW);
成交額:=V*C/100,NODRAW;
A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1))))&&QW>1,成交額,0)),QW);
A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1))))&&QW>1,成交額,0)),QW);
A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1))))&&QW>1,成交額,0)),QW);
A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1))))&&QW>1,成交額,0)),QW);
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);
機構(gòu)買:(A2),COLORRED,NODRAW;
機構(gòu)賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(QW=1,BARPOS),2)=0,機構(gòu)買,NULL),LINETHICK2,COLORRED;
IF(MOD( COUNT(QW=1,BARPOS),2)=1,機構(gòu)買,NULL),LINETHICK2,COLORRED;
IF(MOD( COUNT(QW=1,BARPOS),2)=0,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;
IF(MOD( COUNT(QW=1,BARPOS),2)=1,機構(gòu)賣,NULL),LINETHICK2,COLORGREEN;
機構(gòu)進出:機構(gòu)買-機構(gòu)賣,NODRAW;
散戶買:=(A4),COLOR5555FF;
散戶賣:=(A5),COLOR55FF55;
強勢:((100*A2)/A6>50);
STICKLINE(強勢,機構(gòu)買*1.02,機構(gòu)買*1.1,1,0),COLORYELLOW;
拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,機構(gòu)買*1.1,機構(gòu)買*1.2,1,0),COLORRED;
Q:=BETWEEN(C/(SUM(AMOUNT,QW)/SUM(VOL*100,QW)),1.05,0.95);
Q2:=IF(Q=0,MA(C,QW),(SUM(AMOUNT,QW)/SUM(VOL*100,QW)));
DRAWICON(CROSS((C/Q2),1.03),機構(gòu)買,5);
DD1:=1;
機構(gòu)買入:(100*A2)/A6,NODRAW;
機構(gòu)賣出:(100*A3)/A6,NODRAW;
散戶買入:(100*A4)/A6,NODRAW;
散戶賣出:(100*A5)/A6,NODRAW;
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構(gòu)買,機構(gòu)買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25,VALIGN2;
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機構(gòu)買,機構(gòu)賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25,VALIGN0;
DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買>機構(gòu)賣,機構(gòu)賣,'',COLORRED,ALIGN0,FONTSIZE25;
DRAWTEXT(REFX(ISLASTBAR,1)&&機構(gòu)買<機構(gòu)賣,機構(gòu)賣,'',COLORGREEN,ALIGN0,FONTSIZE25;
?
-
網(wǎng)友回復(fù)：
?沒有清零尼， 能不能讓他清零， 從我指定的時間開始，往后走
打印本文
關(guān)閉窗口