简单实用才能说好，都是坛友的指标，谢分享的坛友。 应大家要求，发原码上来，主付—齐上。 准备启动 A1:=IF(DATE>=11208015,0,1);{这是时间限制} A2:=(5); A3:=(((2*CLOSE)+HIGH)+LOW)/4; A4:=LLV(LOW,20); A5:=HHV(HIGH,20); A6:=EMA((((A3-A4)/(A5-A4))*100),10); A7:=(EMA(((0.667*(REF(A6,1)))+(0.333*A6)),2))*A1; 庄家轨迹:(EMA(A7,A2))*A1,COLORCACA00,LINETHICK2; IF(庄家轨迹>REF(庄家轨迹,1),庄家轨迹,DRAWNULL),COLOR0000FF,DOTLINE,LINETHICK2; {www.fxjgsw.com} A8:=(HHV(HIGH,10))-(LLV(LOW,10)); A9:=(HHV(HIGH,5))-CLOSE; A10:=CLOSE-(LLV(LOW,5)); A11:=((A9/A8)*100)-70; A12:=((CLOSE-(LLV(LOW,60)))/((HHV(HIGH,60))-(LLV(LOW,60))))*100; A13:=SMA(((A10/A8)*100),5,1); A14:=(SMA(A13,5,1))-(SMA(A11,5,1)); A15:=IF((A14>100),(A14-100),0); A16:=(EMA((((A3-A4)/(A5-A4))*100),5))*A1; A17:=(EMA(A16,5))*A1; STICKLINE(((A16-A17)>0 AND A1),A16,A17,4,1),COLOR0000FF; STICKLINE(((A16-A17)<0 AND A1),A16,A17,4,0),COLORGREEN; A18:=(EMA(CLOSE,2))*A1; A19:=(EMA((((SLOPE(CLOSE,20))*20)+CLOSE),60))*A1; A20:=(HHV((MA(HIGH,10)),10))*A1; A21:=(LLV((MA(HIGH,10)),1))*A1; A22:=(EMA(CLOSE,4))*A1; A23:=((((A18>=A19) AND (A21=A20)) AND (A18>A22)) AND (CLOSE>A21)) AND ((REF(A21,1))<(REF(A20,1))); A24:=BARSLAST(A23)+1; A25:=(LLV(LOW,A24))*1.3; A26:=(LLV(LOW,10))*1.418; A27:=(((((A18>=A19) AND (A21=A20)) AND ((CLOSE/(REF(CLOSE,1)))>=1.07)) AND (A24<=30)) AND (CLOSE<=A25)) AND (CLOSE<=A26); A28:=A27 AND (FILTER(A27,A24)); {A29:=(STRFIND(STKNAME,'ST',1)) > 0;} A30:=((((((A18>=A19) AND (A21=A20)) AND ((CLOSE/(REF(CLOSE,1)))>=1.035)) AND (A24<=30)) AND (CLOSE<=A25)) AND (CLOSE<=A26)) ; A31:=A30 AND (FILTER(A30,20)); {DRAWICON((A28 OR A31),庄家轨迹,26); DRAWTEXT((A28 OR A31),庄家轨迹,'←准备启动'),COLORRED;} A32:=CROSS(((A16-A17)>0 AND A1),(庄家轨迹>REF(庄家轨迹,1))); DRAWTEXT(A32,庄家轨迹,'←准备启动'),COLORYELLOW; VAR1:=(CLOSE*2+HIGH+LOW)/4; VAR2:=EMA(VAR1,10)-EMA(VAR1,20); VAR3:=EMA(VAR2,5); 散资线:=(-2)*(VAR2-VAR3)*1503.8,COLORGREEN,LINETHICK2; 主资线:=2*(VAR2-VAR3)*1503.8,COLORYELLOW,LINETHICK2; ZC_1:=IF(L<DYNAINFO(7),0,IF(H>DYNAINFO(7),DYNAINFO(7)-(DYNAINFO(7)-H+0.02)/(H-L+0.02),0)); ZC_2:=DMA(ZC_1,V/CAPITAL)*100; 出货:=IF(ZC_2>0 AND ZC_2>REF(ZC_2,1),ZC_2/20,0); 轴:=0,COLOR00FF00; PJJ:=DMA((H + L + C * 2) / 4,0.9); JJ:=REF(EMA(PJJ,3),1); QJJ:=VOL / ((H - L) * 2 - ABS(C - O)); XVL:=IF(C > O,QJJ * (H - L),IF(C < O,QJJ * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - QJJ * (H - C + (O - L)),IF(C < O,0 - QJJ * (H - L),0 - VOL / 2)); ZLL:=VOL / CAPITAL; HSL1:=IF(ZLL > 10,10,ZLL); HSL:=XVL / 21 / 1.15; 攻击流量:=HSL * 0.66 + REF(HSL,1) * 0.33 + REF(HSL,2) * 0.22; GJJ:=EMA(攻击流量,7); LLJX:=EMA(攻击流量,3); 流量:=LLJX,COLORC875B7,COLORRED,NODRAW; {STICKLINE(流量 > 0,流量,0,2.3,0)COLOR0000FF; STICKLINE(流量 < 0,流量,0,2.3,0),COLORFF4242;} {流量基线:=GJJ,COLOR00BBBB,COLORGREEN; STICKLINE(HSL * 0.4 >= 0,HSL * 0.4 * 1.5,0,0,1)COLORYELLOW; STICKLINE(HSL * 0.4 < 0,HSL * 0.4 * 1.5,0,0,1)COLORGREEN;} ZJLL:=REF(LLJX,1); QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100); 流量幅%:IF(((LLJX > 0) AND (ZJLL < 0)),ABS(QZJJ),IF((((LLJX < 0) AND (ZJLL < 0)) AND (LLJX < ZJLL)),(0 - QZJJ),QZJJ))COLORMAGENTA,NODRAW; 力度:HSL / 1000,COLOR9B37FF,COLORRED,NODRAW; 周流量:SUM(LLJX,5),COLORFFBFDF,COLORMAGENTA,NODRAW; BB:=REF(周流量,1); ZQZJJ:=(周流量-BB)/BB*100; 周幅%:IF(周流量>0 AND BB<0,ABS(ZQZJJ),IF(周流量<0 AND BB<0 AND 周流量<BB,-ZQZJJ,ZQZJJ))COLORMAGENTA,NODRAW; VARQ1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); VARQ2:=SMA(ABS(LOW-VARQ1),13,1)/SMA(MAX(LOW-VARQ1,0),10,1); VARQ3:=EMA(VARQ2,10); VARQ4:=LLV(LOW,33); VARQ5:=EMA(IF(LOW<=VARQ4,VARQ3,0),3)*100; 主力进场:=STICKLINE(VARQ5>REF(VARQ5,1) AND 出货<=0,0,VARQ5,7,0 ),COLORYELLOW; 主力吸筹:=VARQ5,COLORYELLOW; 买点出现:=CROSS(主资线,散资线); {DRAWICON(买点出现,-500,1);} DIF:=EMA(CLOSE,5)-EMA(CLOSE,10); DEA:=EMA(DIF,5); XG:=(流量<0)<REF((流量<0),1)/1.15 AND CROSS(DIF,DEA); DRAWICON(XG,22,1); STICKLINE(XG,0,20,2.3,0)COLOR0000FF; ============================== 短线决策主图 JJ:=(CLOSE+HIGH+LOW)/3; A1:=EMA(JJ,13); B1:=REF(A1,1); 持股:IF(A1>B1,A1,DRAWNULL),LINETHICK2,COLORYELLOW; 持币:IF(A1<B1,A1,DRAWNULL),LINETHICK2,COLORGRAY;
|
