当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:2560主图,提示压力支撑位(通达信公式 主图 源码 测试图)
软件名称:[B]2560主图,提示压力支撑位(通达信公式 主图 源码 测试图)[/B]
软件类型:国产软件
运行环境:Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:分享版
软件大小:4.00 KB
官方主页:Home Page
更新时间:2024-11-11 00:15:23
软件简介:
2560主图指标
GSPT1:=SUM((WINNER(C)*100),30)/30*0.1;
GSPT2:=SUM((WINNER(C)*100),20)/20*0.4;
GSPT3:=SUM((WINNER(C)*100),10)/10*0.3;
GSPT4:=SUM((WINNER(C)*100),5)/5*0.1;
GSPT5:=SUM((WINNER(C)*100),3)/3*0.1;
GSPTZ:=GSPT1+GSPT2+GSPT3+GSPT4+GSPT5;
赚钱效应:IF(GSPTZ>38,GSPTZ,GSPTZ*1.3),NODRAW;
活跃度:IF(SUMBARS(VOL,CAPITAL)<100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;
获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
DRAWKLINE(H,O,L,C);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
MA5:MA(CLOSE,5),COLORWHITE;
MA25:MA(CLOSE,25),COLORYELLOW;
VM5:=MA(VOL,5);
VM60:=MA(VOL,60);
JCX:=CROSS(MA5,MA25);
XG8:=MA25>REF(MA25,1) AND VM5>VM60 AND JCX;
STICKLINE(XG8,C,O,1.5,0),COLORMAGENTA;
DRAWTEXT(XG8,L*0.99,'关注'),COLORMAGENTA;
M13:=MA(C,13);
M24:=MA(C,24);
M55:=MA(C,55);
A1:=M13>M24 AND M24>M55 AND M13>=REF(M13,1) AND M24>=REF(M24,1) AND M55>=REF(M55,1);
A2:=V<REF(V,1) AND V<VM60 AND VM5>VM60;
XG7:=A1 AND A2 AND CROSS(M24,C) OR A1 AND A2 AND CROSS(M24,L);
STICKLINE(XG7,C,O,1.5,0),COLORYELLOW;
DRAWTEXT(XG7,L*0.99,'回踩'),COLORYELLOW;
{止损价}
CCC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL);
止损:0.977*CCC,LINETHICK1,COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=15,止损,STRCAT('止损: ',STRCAT(CON2STR(止损,
2),' '))),LINETHICK1,COLORGREEN;
{庄家成本}
AL0:=SUMBARS(V,CAPITAL*1);
AL1:=SUM(COST(10),AL0)/AL0;
AL2:=SUM(COST(20),AL0)/AL0;
AL3:=SUM(COST(30),AL0)/AL0;
AL4:=SUM(COST(40),AL0)/AL0;
AL5:=SUM(COST(50),AL0)/AL0;
庄家成本2:=(5*AL1+4*AL2+3*AL3+2*AL4+AL5)/15,COLOR0080FF,DOTLINE;
庄家成本1:REFDATE(庄家成本2,DATE),COLORYELLOW,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=30,庄家成本1,STRCAT('庄本:',CON2STR(庄家成本1,2))),COLORYELLOW;
{快逃绿箭头}
VAR30:=PEAKBARS(3,15,1)<10;
VAR50:=IF(VAR30=1,2,0);
顶1:= IF(VAR50=2,2,0);
顶A:=IF(顶1>REF(顶1,1),2,0),COLORGREEN;
DRAWICON(顶A=2,H*1.01,2);
{买点红箭头}
AR1:=EMA(OPEN,7);
AR2:=EMA(AR1,21);
AR3:=CROSS(AR1,AR2);
AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
短买:=IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,2,0),COLORRED;
DRAWICON(短买=2,L*0.99,1);
顶点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIBLUE,DOTLINE;
低点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIRED,DOTLINE;
STICKLINE(CCI>=200 AND H>=顶点....附件里有完整的源码,公式不加密
[url=http://www.70822.com/soft/sort013/sort05/down-175509.html]2560主图,提示压力支撑位(通达信公式 主图 源码 测试图)[/url]