当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：顶底主图（通达信公式 主图 源码 测试图）
软件名称：[B]顶底主图（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2022-08-30 00:16:06
软件简介:
顶底主图
参数：
源码是：
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
底部:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),LINETHICK3,COLORYELLOW;
DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'底部'),COLORRED;
顶部:IF(卖１>0,HIGH*1.01,DRAWNULL),LINETHICK3,COLORGREEN;
DRAWTEXT(卖１>0,HIGH*1.02,'顶部'),COLORGREEN;
{股灵吧决定}
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
加仓:=IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),LINETHICK3,COLOREE00EE;
MA1:MA(CLOSE,M1),COLORRED;
MA2:MA(CLOSE,M2),COLORYELLOW;
MA4:MA(CLOSE,M4),COLORGREEN;
MA3:MA(CLOSE,M3),LINETHICK2,COLORMAGENTA;
T1B:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1B));
CC:=CONST(CURRBARSCOUNT);
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2B));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
必杀线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK2;{,LINETHICK2,COLOR0000FF;}
DRAWTEXT(ISLASTBAR, T3HIGH, '必杀线')LINETHICK1,COLOR0000FF;
MA5K:必杀线,COLORYELLOW,LINETHICK1;
DRAWICON(CROSS(CLOSE,必杀线),LOW*0.97,13);
趋势:=EMA(EMA(C,4),4),COLORYELLOW;
月K:="KDJ.K#MONTH";
月D:="KDJ.D#MONTH";
周K:="KDJ.K#WEEK";
周D:="KDJ.D#WEEK";
日K:="KD.K";
日D:="KD.D";
日金叉:=IF(CROSS(日K,日D),15,0);
周金叉:=IF(CROSS(周K,周D),25,0);
月金叉:=IF(CROSS(月K,月D),35,0);
日周月:=IF(日金叉=15 AND 周金叉=25 AND 月金叉=35,1,0);
日周月赚:=日周月=1;
日周:=IF(日金叉=15 AND 周金叉=25,2,0);
日周赚:=日周=2;
周月:=IF(周金叉=25 AND 月金叉=35,3,0);
日月:=IF(日金叉=15 AND 月金叉=35,4,0);
日月赚:=日月=4;
周月赚:=周月=3;
DRAWTEXT(日周月赚,趋势*0.96,'↖LSP大牛'),COLORRED;
DRAWTEXT(周月赚,趋势*0.97,'↖LSP↖'),COLORFF00FF;
DRAWTEXT(日月赚,趋势*0.98,'↖LSP牛牛'),COLORYELLOW;
DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIF,9);
AAA:=(DIF-DEA)*2*60;
启动:=CROSS(AAA-REF(AAA,1),15),COLORRED,LINETHICK2;
DRAWTEXT(启动,L*0.99,'↖启动'),COLORYELLOW,LINETHICK2;
{公式平台，公式指标和源码 WWW.GSPT.COM}
AA:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
BB:=EMA(AA,2);
TP:=(CROSS(AA,BB) OR CROSS(C,AA)) AND C>=EMA(C,55);
HH:=EMA(CLOSE,12)-EMA(CLOSE,26);
DD:=EMA(HH,9);
主升启动:=TP AND CROSS(HH,DD) AND (DD<=-0.07)*CC;
DRAWICON(主升启动,L*0.996,1);
DRAWTEXT(主升启动,L,'↖LSP牛');
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'←拐点卖'),COLOR00FF00;
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'←拐点买'),COLOR00FFFF;
VAR9Q:=C= HHV(C,4)AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2)
OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.030 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
DRAWTEXT(VAR3P>88,LOW*0.99,'牛'),COLORWHITE;
DRAWTEXT_FIX(1,0.00,0,0,'所属行业')COLOR0080FF;
DRAWTEXT_FIX(1,0.09,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.18,0,0,'获利比例'),COLORF00FF0;
DRAWNUMBER_FIX(1,0.27,0,0,CONST(WINNER(C )*100)),COLORF00FF0;
赢利%:=WINNER(CLOSE)*100,NODRAW,COLORF00FF0;
DRAWTEXT_FIX(赢利%>=95 AND ISLASTBAR,0.37,0,0,'高危'),COLORYELLOW;
DRAWTEXT_FIX(赢利%>=80 AND 赢利%<95 AND ISLASTBAR,0.37,0,0,'风险'),COLORYELLOW;
DRAWTEXT_FIX(赢利%>=50 AND 赢利%<80 AND ISLASTBAR,0.37,0,0,'安全'),COLORYELLOW;
DRAWTEXT_FIX(赢利%<50 AND ISLASTBAR,0.37,0,0,'空头'),COLORYELLOW;
盘1:=COST(0.33);
盘2:=COST(5);
盘3:=COST(15);
盘4:=COST(55);
盘5:=COST(97);
获利:=WINNER(CLOSE)*100;
套牢:=100-WINNER(CLOSE)*100;
DRAWTEXT_FIX (1,0.49,0,1,'升浪:'),COLORRED;
DRAWNUMBER_FIX(1,0.50,0,0,CONST(COST(55))),COLORRED;
DRAWTEXT_FIX (1,0.58,0,0,'预测:'),COLORRED;
DRAWNUMBER_FIX(1,0.63,0,0,CONST(COST(97))),COLORRED;
[url=http://www.70822.com/soft/sort013/sort05/down-163939.html]顶底主图（通达信公式 主图 源码 测试图）[/url]