老師，可以幫忙修改一下嗎，謝謝了

作者：文華財(cái)經(jīng) 來(lái)源：cxh99.com 發(fā)布時(shí)間：2021年10月05日

咨詢內(nèi)容： ?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);回調(diào)買(mǎi):=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));XG:=ZD1>HIGH AND 回調(diào)買(mǎi) 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;}主力持倉(cāng)%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);主力持倉(cāng)大于75%:=主力持倉(cāng)%>=75 {AND 主力持倉(cāng)%<=91} AND C>0 AND CLOSE>OPEN AND C=H;敢死嗎:=主力持倉(cāng)大于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);買(mǎi):=13;入:=AAA1-REF(AAA1,1);正大:=CROSS(入,買(mǎi));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);無(wú):=ABS(VAR1),COLORGREEN;敵:=50,COLORFFAA00,LINETHICK3;
DRAWTEXT_FIX(1,0.01,0,0,'【分析家公式網(wǎng) WWW.70822.COM】',COLORRED,LINETHICK8;LC:=REF(CLOSE,1);操作線:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;賣(mài):=CROSS(90,操作線);DRAWICON(賣(mài),H,8);絕底線:=5;買(mǎi)陰線1:操作線<5 AND ZD1>ZD2 AND L<ZD1,NODRAW;DRAWICON(買(mǎi)陰線1,L,7);買(mǎi)陰線2:操作線<5 AND ZD1<ZD2 AND L<ZD1,NODRAW;DRAWICON(買(mǎi)陰線2,L,7);NOTEXT1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
?
?來(lái)源:程序化99
文華技術(shù)人員： ?參考： ?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); 回調(diào)買(mǎi):=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2)); XG:=ZD1>HIGH AND 回調(diào)買(mǎi) 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; }*/ 主力持倉(cāng)%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3); 主力持倉(cāng)大于75%:=主力持倉(cāng)%>=75 {AND 主力持倉(cāng)%<=91} AND C>0 AND CLOSE>OPEN AND C=H; 敢死嗎:=主力持倉(cāng)大于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); 買(mǎi):=13; 入:=AAA1-REF(AAA1,1); 正大:=CROSS(入,買(mǎi)); 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); 無(wú):=ABS(VAR1),COLORGREEN; 敵:=50,COLORFFAA00,LINETHICK3;
LC:=REF(CLOSE,1); 操作線:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100; 賣(mài):=CROSS(90,操作線); DRAWICON(賣(mài),H,8); 絕底線:=5; 買(mǎi)陰線1:操作線<5 AND ZD1>ZD2 AND L<ZD1,NODRAW; DRAWICON(買(mǎi)陰線1,L,7); 買(mǎi)陰線2:操作線<5 AND ZD1<ZD2 AND L<ZD1,NODRAW; DRAWICON(買(mǎi)陰線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;