DIR1:=ABS(CLOSE-REF(CLOSE,5)); VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5); ER1:=DIR1/VIR1; CS1:=ER1*(0.8-2/8)+2/8; CQ1:=CS1*CS1; DIR2:=ABS(CLOSE-REF(CLOSE,10)); VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10); ER2:=DIR2/VIR2; CS2:=ER2*(0.8-2/24)+2/24; CQ2:=CS2*CS2; AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2; AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORBLUE,LINETHICK2; AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)); GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)); GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)); GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)); A:=GJTJ1=GJTJ2 AND GJTJ2=GJTJ3 AND GJTJ1=100 AND GJTJ4>96; B:=COUNT(A,2)=1; D:=GJTJ1<GJTJ2 AND GJTJ1<GJTJ3 AND GJTJ1<GJTJ4 AND GJTJ2<GJTJ3 AND GJTJ4<95; YH:=INDEXC/REF(INDEXC,1)*REF(C,1); YH1:=REF(C,1)+C-INDEXC/REF(INDEXC,1)*REF(C,1); X1:=EMA(YH1,7); X2:=EMA(YH1,14); X3:=EMA(X1,14); E:=X1>X2 AND X2>X3; 竟星:=B AND D AND E; DRAWTEXT(竟星,(L * 0.95),'竟星'),COLORWHITE; XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<5 AND GJTJ1>GJTJ4; 天瀑:=COUNT(XG,3)=1 AND XG; DRAWTEXT(天瀑,(L * 0.95),'天瀑'),COLORYELLOW; A1:=BARSLAST(CROSS(30,GJTJ1))<2 AND BARSLAST(CROSS(GJTJ1,50))<2; B1:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4; E1:=GJTJ1>60 AND GJTJ4>70; 白金:=A1 AND B1 AND E1; DRAWTEXT(白金,(L * 0.95),'白金'),COLORGREEN; A2:=BARSLAST(CROSS(97,GJTJ1))<=1 AND BARSLAST(CROSS(GJTJ1,85))<=1; B2:=BARSLAST(CROSS(97,GJTJ2))<=1 AND BARSLAST(CROSS(GJTJ2,85))<=1; A3:=A2 AND B2; AA:=BARSLAST(CROSS(97,GJTJ1))<=2 AND BARSLAST(CROSS(GJTJ1,85))<=1; BA:=BARSLAST(CROSS(97,GJTJ2))<=2 AND BARSLAST(CROSS(GJTJ2,85))<=1; A4:=AA AND BA ; AAA:=BARSLAST(CROSS(97,GJTJ1))<=3 AND BARSLAST(CROSS(GJTJ1,85))<=1; BAA:=BARSLAST(CROSS(97,GJTJ2))<=3 AND BARSLAST(CROSS(GJTJ2,85))<=1; A8:=AAA AND BAA ; B21:=REF(A3,1); B3:=REF(A4,1); B4:=REF(A8,1); D2:=GJTJ1=100 AND GJTJ2=100 AND A3 ; D3:=GJTJ1=100 AND GJTJ2=100 AND A4 ; D4:=GJTJ1=100 AND GJTJ2=100 AND A8 ; 日月:=D2 OR D3 OR D3; DRAWTEXT(日月,(L * 0.95),'日月'),COLORF00FF0; A5:=BARSLAST(CROSS(95,GJTJ1))<=2; B5:=BARSLAST(CROSS(95,GJTJ2))<=2; E5:= GJTJ4<GJTJ1 AND GJTJ1<GJTJ2 AND GJTJ1<GJTJ3; F1:=GJTJ2>50 AND GJTJ3>50; G1:=GJTJ1=100 AND GJTJ2=100; TX:=COUNT(G1,2)=1; 青干:=A5 AND B5 AND E5 AND F1 AND TX; DRAWTEXT(青干,(L * 0.95),'青干'),COLORRED; A6:=GJTJ3=100; B6:=GJTJ4<90; 莫问:=COUNT(A6,2) = 2 AND B6; DRAWTEXT(莫问,(L * 0.95),'莫问'),COLORBLUE; A7:=BARSLAST(CROSS(50,GJTJ1))<3 AND BARSLAST(CROSS(GJTJ1,50))<3; B7:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4; 黄金:=A7 AND B7; DRAWTEXT(黄金,(L * 0.95),'黄金'),COLORFFBB00; DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIFF,9); 多头:STICKLINE(DIFF>DEA,C,O,2,0),COLORRED; STICKLINE(DIFF>DEA,H,L,0,0),COLORRED; 空头:STICKLINE(DIFF<=DEA,C,O,2,0),COLORF0F000; STICKLINE(DIFF<=DEA,H,L,0,0),COLORF0F000; DRAWTEXT(CROSS(DIFF,DEA),L-0.2,'买入'); DRAWTEXT(CROSS(DEA,DIFF),H+0.2,'卖出');{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |