老師 我想用在文華6
作者:文華財經 來源:cxh99.com 發布時間:2023年02月10日
-
咨詢內容:
?
金牛:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;
金鉆趨勢:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
金牛2:EMA(金鉆趨勢,25)COLORCYAN,LINETHICK2;
DRAWBAND(金鉆趨勢,RGB(55,0,0),金牛2,RGB(0,91,0));
DRAWKLINE(H,O,L,C);
STICKLINE(金鉆趨勢>LOW AND 金鉆趨勢<HIGH,金鉆趨勢,MIN(MIN(OPEN,CLOSE),金鉆趨勢),2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>MIN(C,O) AND 金鉆趨勢<MAX(C,O),金鉆趨勢,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>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:=金鉆趨勢>HIGH AND 回調買 AND L<=金鉆趨勢;
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<金牛;{DRAWTEXT(XG2,L,'抓牛',COLORYELLOW;}
DRAWTEXT(XG2 AND L<金鉆趨勢,L,'鉆起漲',COLORMAGENTA;
?
?來源:程序化99
-
文華技術人員:
?參考:
金牛:(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,COLORYELLOW;
金鉆趨勢: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;
金牛2:EMA(金鉆趨勢,25),COLORCYAN,LINETHICK2;
FILLRGN(金鉆趨勢>金牛2,金鉆趨勢,金牛2,RGB(55,0,0));
FILLRGN(金鉆趨勢<金牛2,金鉆趨勢,金牛2,RGB(0,91,0));
DRAWKLINE1(H,O,L,C);
STICKLINE(金鉆趨勢>LOW AND 金鉆趨勢<HIGH,金鉆趨勢,MIN(MIN(OPEN,CLOSE),金鉆趨勢),2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>MIN(C,O) AND 金鉆趨勢<MAX(C,O),金鉆趨勢,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金鉆趨勢>HIGH,HIGH,LOW,0,0),COLORYELLOW;
N1:=C-REF(C,1);
NN:=REFX1(MA(N1,6),6/2);
X_5:=REFX1(MA(N1,6),6/2);
VAR23:=100*REFX1(MA(X_5,6),6/2)/REFX1(MA(REFX1(MA(ABS(N1),6),6/2),6),6/2);
回調買:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=金鉆趨勢>HIGH AND 回調買 AND L<=金鉆趨勢;
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),COLOR00AAAA;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
N:=BARSLAST(DATE<>REF(DATE,1))+1;
X:=CURRENTTIME;
Q:MOD(INTPART(X/100),100),NODRAW;
VV:=SUM(V,N);
XX:=INTPART(X/10000);
FROMOPEN:=IF(XX<12,60*(XX-9)-30+Q,120+60*(XX-13)+Q)+1;
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
CURRBARSCOUNT:=DATACOUNT-BARPOS+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<金牛;
DRAWTEXT(XG2,L,'抓牛',COLORYELLOW;
DRAWTEXT(XG2 AND L<金鉆趨勢,L,'鉆起漲',COLORMAGENTA;