請(qǐng)老師幫改個(gè)預(yù)警 [文華財(cái)經(jīng)]
-
咨詢內(nèi)容：
請(qǐng)齊云老師幫我修改下前面做過的預(yù)警，
首次預(yù)警時(shí)再現(xiàn)在的基礎(chǔ)上, 加個(gè)一個(gè)條件， 當(dāng)前收盤在前日開盤上以上, 如當(dāng)前Ｋ線沒有在開盤價(jià)之上，過幾個(gè)Ｋ線也可以，
麻煩老師再幫我做個(gè)加載到Ｋ線附屬指標(biāo)的， 滿足條件打紅點(diǎn)的原碼，多謝
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);
機(jī)構(gòu)買:(A2),COLORRED,NODRAW;機(jī)構(gòu)賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機(jī)構(gòu)買,NULL),LINETHICK6,COLORRED;IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機(jī)構(gòu)買,NULL),LINETHICK6,COLORRED;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機(jī)構(gòu)賣,NULL),LINETHICK6,COLORGREEN;IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機(jī)構(gòu)賣,NULL),LINETHICK6,COLORGREEN;
機(jī)構(gòu)進(jìn)出:機(jī)構(gòu)買-機(jī)構(gòu)賣,NODRAW;散戶買:=(A4),COLOR5555FF;散戶賣:=(A5),COLOR55FF55;強(qiáng)勢:((100*A2)/A6>50);STICKLINE(強(qiáng)勢,機(jī)構(gòu)買*1.02,機(jī)構(gòu)買*1.1,1,0),COLORYELLOW;拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;STICKLINE(拉升,機(jī)構(gòu)買*1.1,機(jī)構(gòu)買*1.2,1,0),COLORRED;DRAWTEXT(ISLASTBAR=1,機(jī)構(gòu)買*0.95,'#39),LINETHICK2,COLORRED;DRAWTEXT(ISLASTBAR=1,機(jī)構(gòu)賣*0.95,'#39),LINETHICK2,COLORFFFF55;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),機(jī)構(gòu)買,5);DD1:=1;
機(jī)構(gòu)買入:(100*A2)/A6,NODRAW;機(jī)構(gòu)賣出:(100*A3)/A6,NODRAW;散戶買入:(100*A4)/A6,NODRAW;散戶賣出:(100*A5)/A6,NODRAW;DAYBARPOS>2&&REF(CROSS(機(jī)構(gòu)買入,機(jī)構(gòu)賣出)||DAYBARPOS=2&&機(jī)構(gòu)買入>機(jī)構(gòu)賣出,1),NOTICE;
//前一根K線如果是 ： 機(jī)構(gòu)買入 上穿? ?機(jī)構(gòu)賣出? 或者是當(dāng)日第一根K線? 機(jī)構(gòu)買入大于機(jī)構(gòu)賣出 都可以預(yù)警
XXZ:CROSS(機(jī)構(gòu)買入,機(jī)構(gòu)賣出)||DAYBARPOS=2&&機(jī)構(gòu)買入>機(jī)構(gòu)賣出,NODRAW;
DAYBARPOS>2&&EXIST(CROSS(機(jī)構(gòu)買入,機(jī)構(gòu)賣出)||DAYBARPOS=2&&機(jī)構(gòu)買入>機(jī)構(gòu)賣出,DAYBARPOS)&&REF(? ? ? C>LLV( IF(XXZ,C,9999999) ,DAYBARPOS)? ,1),NOTICE;
//如果當(dāng)日存在第一次預(yù)警 ，后續(xù)價(jià)格大于第一次預(yù)警的收盤價(jià) 則預(yù)警
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機(jī)構(gòu)買,機(jī)構(gòu)買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25;DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機(jī)構(gòu)賣,機(jī)構(gòu)賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25;?
?來源:程序化99
- 文華技術(shù)人員： ?來源:程序化99
-
文華技術(shù)人員：1樓描述中：當(dāng)前收盤在前日開盤上以上,
這里是筆誤嗎？是要昨日開盤比較 還是根今日開盤比較？
之前的條件是?機(jī)構(gòu)買入? 上穿?? 機(jī)構(gòu)賣出 現(xiàn)在是改為??機(jī)構(gòu)買入大于機(jī)構(gòu)賣出 并且價(jià)格大于開盤價(jià)的起點(diǎn)位置？?
?來源: www.weiqiv.net.cn
-
文華客服：
?哦哦筆誤， 是站上當(dāng)日的開盤價(jià)以上， 起碼當(dāng)是紅盤的,
首次機(jī)構(gòu)買入和機(jī)構(gòu)賣出，按下面的定義，
//前一根K線如果是 ： 機(jī)構(gòu)買入 上穿? ?機(jī)構(gòu)賣出? 或者 是當(dāng)日前幾根K線機(jī)構(gòu)買入大于機(jī)構(gòu)賣出 都可以預(yù)警
多謝老師?
-
網(wǎng)友回復(fù)：
當(dāng)日前幾根按照前10根 ，參考：
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);
機(jī)構(gòu)買:(A2),COLORRED,NODRAW; 機(jī)構(gòu)賣:(A3),COLORGREEN,NODRAW;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機(jī)構(gòu)買,NULL),LINETHICK6,COLORRED; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機(jī)構(gòu)買,NULL),LINETHICK6,COLORRED;
IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=0,機(jī)構(gòu)賣,NULL),LINETHICK6,COLORGREEN; IF(MOD( COUNT(DAYBARPOS=1,BARPOS),2)=1,機(jī)構(gòu)賣,NULL),LINETHICK6,COLORGREEN;
機(jī)構(gòu)進(jìn)出:機(jī)構(gòu)買-機(jī)構(gòu)賣,NODRAW; 散戶買:=(A4),COLOR5555FF; 散戶賣:=(A5),COLOR55FF55; 強(qiáng)勢:((100*A2)/A6>50); STICKLINE(強(qiáng)勢,機(jī)構(gòu)買*1.02,機(jī)構(gòu)買*1.1,1,0),COLORYELLOW; 拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18; STICKLINE(拉升,機(jī)構(gòu)買*1.1,機(jī)構(gòu)買*1.2,1,0),COLORRED; DRAWTEXT(ISLASTBAR=1,機(jī)構(gòu)買*0.95,'),LINETHICK2,COLORRED; DRAWTEXT(ISLASTBAR=1,機(jī)構(gòu)賣*0.95,'),LINETHICK2,COLORFFFF55; 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),機(jī)構(gòu)買,5); DD1:=1;
機(jī)構(gòu)買入:(100*A2)/A6,NODRAW; 機(jī)構(gòu)賣出:(100*A3)/A6,NODRAW; 散戶買入:(100*A4)/A6,NODRAW; 散戶賣出:(100*A5)/A6,NODRAW;
//前一根K線如果是 ： 機(jī)構(gòu)買入 上穿? ?機(jī)構(gòu)賣出? 或者是當(dāng)日第一根K線? 機(jī)構(gòu)買入大于機(jī)構(gòu)賣出 都可以預(yù)警 OO:VALUEWHEN(DAYBARPOS=1,O),NODRAW; XXZ:CROSS(機(jī)構(gòu)買入,機(jī)構(gòu)賣出)&&C>OO||DAYBARPOS<10&&機(jī)構(gòu)買入>機(jī)構(gòu)賣出&&C>OO,NODRAW; DAYBARPOS>2&&REF(XXZ,1),NOTICE; DAYBARPOS>2&&EXIST(XXZ,DAYBARPOS)&&REF(? ? ? C>LLV( IF(XXZ,C,9999999) ,DAYBARPOS)? ,1),NOTICE;
//如果當(dāng)日存在第一次預(yù)警 ，后續(xù)價(jià)格大于第一次預(yù)警的收盤價(jià) 則預(yù)警
DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機(jī)構(gòu)買,機(jī)構(gòu)買/A6*100,2,COLORRED),ALIGN0,FONTSIZE25; DRAWNUMBER(CLOSEMINUTE<=BARINTERVAL||ISLASTBAR,機(jī)構(gòu)賣,機(jī)構(gòu)賣/A6*100,2,COLORGREEN),ALIGN0,FONTSIZE25;?
-
網(wǎng)友回復(fù)：
麻煩老師， 2次預(yù)警都是收盤后預(yù)警吧
延續(xù)預(yù)警， 是破當(dāng)日幾個(gè)首次預(yù)警Ｋ線的收盤價(jià)中， 價(jià)格最低的那個(gè)收盤價(jià)吧
請(qǐng)老師再幫我做， 收盤首次預(yù)警成功, 在Ｋ線上打個(gè)紅點(diǎn)， 當(dāng)日有幾次打幾次， 多謝老師．
有思路，想編寫各種指標(biāo)公式，交易模型，選股公式，還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號(hào)：cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫！
（怎么收費(fèi)，代編流程等詳情請(qǐng)點(diǎn)擊閱讀！）
(注：由于人數(shù)限制，QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行，加好友時(shí)請(qǐng)簡單備注下您的需求，否則無法通過。謝謝您！)
相關(guān)文章
-
沒有相關(guān)內(nèi)容