老師，可以幫忙修改一下嗎，謝謝了 [文華財經]
-
咨詢內容：
?DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1,2,1);Z1:=STRCAT(HYBLOCK,'';Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,'';DRAWTEXT_FIX(ISLASTBAR,0.6,0.99,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;ZK1:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),COLORGREEN,LINETHICK2;ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;ZD2:EMA(ZD1,25),LINETHICK2;DRAWBAND(ZD1,RGB(55,0,0),ZD2,RGB(0,91,0));DRAWKLINE(H,O,L,C);STICKLINE(ZD1>LOW AND ZD1<HIGH,ZD1,MIN(MIN(OPEN,CLOSE),ZD1),2,0),COLORYELLOW;STICKLINE(ZD1>MIN(C,O) AND ZD1<MAX(C,O),ZD1,MIN(OPEN,CLOSE),2,0),COLORYELLOW;STICKLINE(ZD1>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;STICKLINE(ZD1>HIGH,HIGH,LOW,0,0),COLORYELLOW;VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);回調買:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));XG:=ZD1>HIGH AND 回調買 AND L<=ZD1;DRAWTEXT(XG,L,'',COLORRED;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);V5:=SMA(V2*120/FROMOPEN*5,2,1);V10:=SMA(V5,5,1);V20:=SMA(V10,5,1);DY:=CURRBARSCOUNT=1 AND C<REF(C,1);DY2:=REF(V2,1)-DY;XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<ZK1;{DRAWTEXT(XG2,L,'抓牛',COLORYELLOW;}DRAWTEXT(XG2 AND L<ZD1,L,'牛',COLORRED;
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);籌碼突破:=C>TYX3 AND(C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),COLORRED;A111:=COST(85);?A222:=COST(15);?A333:=A111-A222;?A444:=(A111+A222)/2;?單峰密集:=A333/A444*100<30,LINETHICK0;{A5:=A3/A4*100<30;}?B1:=HHV(HIGH,250);?B2:=LLV(LOW,250);?B3:=B1-B2;?B4:=(A444-B2);低位:=A444<(B3*04+B2),LINETHICK0;?低位單峰密集:=單峰密集 AND 低位;B5:=C/REF(C,1)>1.04; {AND V/REF(V,1)>2;{ AND H=C;}主力持倉%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);主力持倉大于75%:=主力持倉%>=75 {AND 主力持倉%<=91} AND C>0 AND CLOSE>OPEN AND C=H;敢死嗎:=主力持倉大于75% AND 低位單峰密集 AND B4 AND WINNER(C)>=0.91 AND B5,COLORGREEN,LINETHICK3;{DRAWTEXT(FILTER(敢死嗎=1,5),L,'---敢死嗎',COLORGREEN;}DRAWICON(FILTER(敢死嗎=1,5),L,25);
DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);DEA1:=EMA(DIF1,9);AAA1:=(DIF1-DEA1)*2*60;AAA上:=IF(AAA1>REF(AAA1,1),AAA1,DRAWNULL);AAA下:=IF(AAA1<REF(AAA1,1),AAA1,DRAWNULL);買:=13;入:=AAA1-REF(AAA1,1);正大:=CROSS(入,買);DIF2:=EMA(DCLOSE,10)-EMA(DCLOSE,72);DEA2:=EMA(DIF2,17);AAA:=(DIF2-DEA2)*2*60;入2:=AAA-REF(AAA,1);牛股:=CROSS(入2,13);正大牛股:=正大 AND 牛股;DRAWICON(正大牛股,L,1);VAR1:=(CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*100;VAR2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;VAR3:=SMA(VAR2,3,1);天:=100+(-ABS(VAR1)),COLORRED;下:=SMA(VAR3,2,1);無:=ABS(VAR1),COLORGREEN;敵:=50,COLORFFAA00,LINETHICK3;
DRAWTEXT_FIX(1,0.01,0,0,'【分析家公式網 www.weiqiv.net.cn】',COLORRED,LINETHICK8;LC:=REF(CLOSE,1);操作線:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;賣:=CROSS(90,操作線);DRAWICON(賣,H,8);絕底線:=5;買陰線1:操作線<5 AND ZD1>ZD2 AND L<ZD1,NODRAW;DRAWICON(買陰線1,L,7);買陰線2:操作線<5 AND ZD1<ZD2 AND L<ZD1,NODRAW;DRAWICON(買陰線2,L,7);NOTEXT1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;?
?來源:程序化99
-
文華技術人員：
?參考：
?CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
DRAWGBK(C>O,RGB(10,0,0),RGB(0,0,0),1);
ZK1:(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1+(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)),DOT,COLORBLUE;
ZD1:REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1,LINETHICK2,COLORRED;
ZD2:EMA(ZD1,25),LINETHICK2;
FILLRGN(ZD1>ZD2,ZD2,ZD1,RGB(55,0,0));
FILLRGN(ZD1>ZD2,ZD2,ZD1,RGB(0,91,0));
DRAWKLINE1(H,O,L,C);
STICKLINE1(ZD1>LOW AND ZD1<HIGH,ZD1,MIN(MIN(OPEN,CLOSE),ZD1),2,0),COLORYELLOW;
STICKLINE1(ZD1>MIN(C,O) AND ZD1<MAX(C,O),ZD1,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE1(ZD1>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE1(ZD1>HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*REFX1(MA(REFX1(MA((C-REF(C,1)),6),3),6),3)/REFX1(MA(REFX1(MA(ABS((C-REF(C,1))),6),3),6),3);
回調買:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=ZD1>HIGH AND 回調買 AND L<=ZD1;
DRAWTEXT(XG,L,'',COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
CAPITAL:=GETPRICE1('通股本';
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000);
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<ZK1;
DRAWTEXT(XG2 AND L<ZD1,L,'牛',COLORRED;
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3); 籌碼突破:=C>TYX3 AND (C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),COLORRED; A111:=COST(85);? A222:=COST(15);? A333:=A111-A222;? A444:=(A111+A222)/2;? 單峰密集:=A333/A444*100<30; //{A5:=A3/A4*100<30;}? B1:=HHV(HIGH,250);? B2:=LLV(LOW,250);? B3:=B1-B2;? B4:=(A444-B2); 低位:=A444<(B3*04+B2);? 低位單峰密集:=單峰密集 AND 低位; B5:=C/REF(C,1)>1.04;? /*{AND V/REF(V,1)>2; { AND H=C; }*/ 主力持倉%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3); 主力持倉大于75%:=主力持倉%>=75 {AND 主力持倉%<=91} AND C>0 AND CLOSE>OPEN AND C=H; 敢死嗎:=主力持倉大于75% AND 低位單峰密集 AND B4 AND WINNER(C)>=0.91 AND B5,COLORGREEN,LINETHICK3; //{DRAWTEXT(FILTER(敢死嗎=1,5),L,'---敢死嗎',COLORGREEN;} DRAWICON(FILTER(敢死嗎=1,5),L,25); DCLOSE:=C; DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26); DEA1:=EMA(DIF1,9); AAA1:=(DIF1-DEA1)*2*60; AAA上:=IF(AAA1>REF(AAA1,1),AAA1,NULL); AAA下:=IF(AAA1<REF(AAA1,1),AAA1,NULL); 買:=13; 入:=AAA1-REF(AAA1,1); 正大:=CROSS(入,買); DIF2:=EMA(DCLOSE,10)-EMA(DCLOSE,72); DEA2:=EMA(DIF2,17); AAA:=(DIF2-DEA2)*2*60; 入2:=AAA-REF(AAA,1); 牛股:=CROSS(入2,13); 正大牛股:=正大 AND 牛股; DRAWICON(正大牛股,L,1); VAR1:=(CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*100; VAR2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; VAR3:=SMA(VAR2,3,1); 天:=100+(-ABS(VAR1)),COLORRED; 下:=SMA(VAR3,2,1); 無:=ABS(VAR1),COLORGREEN; 敵:=50,COLORFFAA00,LINETHICK3;
LC:=REF(CLOSE,1); 操作線:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100; 賣:=CROSS(90,操作線); DRAWICON(賣,H,8); 絕底線:=5; 買陰線1:操作線<5 AND ZD1>ZD2 AND L<ZD1,NODRAW; DRAWICON(買陰線1,L,7); 買陰線2:操作線<5 AND ZD1<ZD2 AND L<ZD1,NODRAW; DRAWICON(買陰線2,L,7); NOTEXT1:REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1,LINETHICK2,COLORRED;
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號：cxh99cxh99 進行 有償收費 編寫！
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊