分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置:分析家公式网股票公式大智慧L2公式 → 一键转帖:金砖看盘

软件名称:[B]金砖看盘[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:26.0 KB
官方主页:Home Page
更新时间:2017-04-08 01:06:10
软件简介:

 {【金砖看盘】3821均线+薛丝通道理论}

K:=0;
DRAWRECTREL(5,100,235,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(245,200,340+k,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(350+K,200,480+K,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(490+K,200,620+K,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(630+K,200,740+K,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(750+K,200,860+K,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
DRAWRECTREL(870+K,200,990+K,1000,rgb(0,0,255)),layer0,colorffffff,LINETHICK1;
{引用 自定义}
买入日期:=selfstring('买入日期');
买入价:=SELFDATA('买入价');
{引用 昨买今卖}
预测低一:="昨买今卖.预测低一";
预测低二:="昨买今卖.预测低二";
C1:=REF(C,1);
L1:=REF(L,1);
{MACD优化----大智慧L2版本}
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIFF,9);
MACD:= 2*(DIFF-DEA);
主升:= DIFF>0 AND DIFF>DEA;
{3 8 21 均线}
MA3:=MA(CLOSE,3);
MA8:=MA(CLOSE,8);
MA21:=MA(CLOSE,21);
三线红:=MA3>REF(MA3,1) AND MA8>REF(MA8,1) AND MA21>REF(MA21,1);
三线上:=MA3>MA8 AND MA8>MA21
      AND MA3>REF(MA3,1) AND MA8>REF(MA8,1) AND MA21>REF(MA21,1) ;
回调线:=MA3<REF(MA3,1) AND MA8>REF(MA8,1) AND  MA21>REF(MA21,1);
 
{卖出提示}
获利:=C-买入价;
百分比:=(C-买入价)/买入价*100;
DRAWTEXTREL(15,216,'             日期:'+买入日期),COLORFFFFFF,linethick2,layer0;
DRAWTEXTREL(15,420,' 买入价: '),COLORFFFFFF,linethick2,layer0;
DRAWTEXTREL(15,420,'         '+NUMTOSTRN(买入价,2)+' 元'),COLORFFFFFF,linethick2,layer0;
DRAWTEXTREL(15,620,' 获  利: '),COLORGREEN,linethick2,layer0;
DRAWTEXTREL(15,620,'         '+NUMTOSTRN(获利,2)+' 元'),COLORGREEN,linethick2,layer0;
DRAWTEXTREL(15,820,' 百分比: '),COLORGREEN,linethick2,layer0;
DRAWTEXTREL(15,820,'         '+NUMTOSTRN(百分比,2)+' %'),COLORGREEN,linethick2,layer0;
HL1:=IFS(获利>0,NUMTOSTRN(获利,2),'');
HL2:=IFS(百分比>0,NUMTOSTRN(百分比,2),'');
DRAWTEXTREL(15,620,'         '+HL1),COLORRED,linethick2,layer0;
DRAWTEXTREL(15,820,'         '+HL2),COLORRED,linethick2,layer0;
持股:=MACD>REF(MACD,1) AND MA3>MA8 AND MA21>REF(MA21,1);
卖出:=MACD<REF(MACD,1) OR MA3<MA8 OR MA21<REF(MA21,1);
IF BARSTATUS=2 AND 持股 THEN BEGIN 
DRAWRECTREL(150,420,225,950,rgb(255,0,0)),layer0,colorffffff,LINETHICK1;
DRAWTEXTREL(165,580,'持股'),COLORFFFFFF,linethick5,layer0;
END
ELSE
IF BARSTATUS=2 AND 卖出 THEN BEGIN 
DRAWRECTREL(150,420,225,950,rgb(47,79,79)),layer0,color00FF00,LINETHICK1;
DRAWTEXTREL(165,580,'卖出'),COLORFFFFFF,linethick5,layer0;
END
{昨日趋势}
DRAWTEXTREL(245+K,250,'  昨今趋势         预测股价           今日行情         今日买入价      明日买入价        预测提示'),layer0,colorffffff,LINETHICK2;
{预测股价}
DRAWTEXTREL(360+K,420,'预测低二: '+NUMTOSTRN(预测低二,2)),COLOR00FF00,layer0,LINETHICK2;
DRAWTEXTREL(360+K,620,'预测低一: '+NUMTOSTRN(预测低一,2)),COLOR00FF00,layer0,LINETHICK2;
YC1:=IFS(预测低二>=L,NUMTOSTRN(预测低二,2),'');
YC2:=IFS(预测低一>=L,NUMTOSTRN(预测低一,2),'');
DRAWTEXTREL(363+K,420,'         '+YC1),COLORRED,linethick2,layer0;
DRAWTEXTREL(363+K,620,'         '+YC2),COLORRED,linethick2,layer0;
{今日行情}
DRAWTEXTREL(510+K,620,'现  价: '+NUMTOSTRN(C,2)),COLOR00FFFF,layer0,LINETHICK2;
DRAWTEXTREL(510+K,820,'最高价: '+NUMTOSTRN(H,2)),COLOR00FFFF,layer0,LINETHICK2;
{显示金砖 蓝砖 DPPD提供薛丝通道公式}
XSVAR2:=CLOSE*VOL;
XSVAR3:=EMA((EMA(XSVAR2,3)/EMA(VOL,3)+EMA(XSVAR2,6)/EMA(VOL,6)+EMA(XSVAR2,12)/EMA(VOL,12)+EMA(XSVAR2,24)/EMA(VOL,24))/4,13);
XSVAR4:=EMA(CLOSE,9);
SUP:=1.06*XSVAR3;{强势上升}
SUP1:=REF(SUP,1);
SUP2:=REF(SUP,2);
HUP:=EMA(XSVAR4*1.14,5);{顶部高位}
金砖:=SUP>SUP1 AND C>SUP;
蓝砖:=SUP>SUP1 AND C<SUP;
金砖1:=SUP1>SUP2 AND C1>SUP1;
蓝砖1:=SUP1>SUP2 AND C1<SUP1;
IF BARSTATUS=2 AND 金砖 THEN BEGIN
DRAWTEXTREL(265+K,500,'   ■'),COLOR00FFFF,layer0,LINETHICK3;
END
ELSE
IF BARSTATUS=2 AND 蓝砖 THEN BEGIN
DRAWTEXTREL(265+K,500,'   ■'),COLOR00FF00,layer0,LINETHICK3;
END
IF BARSTATUS=2 AND 金砖1 THEN BEGIN
DRAWTEXTREL(245+K,500,'  ■'),COLOR00FFFF,layer0,LINETHICK3;
END
ELSE
IF BARSTATUS=2 AND 蓝砖1 THEN BEGIN
DRAWTEXTREL(245+K,500,'  ■'),COLOR00FF00,layer0,LINETHICK3;
END
{显示红砖 起涨}
JZVAR1:=(CLOSE+HIGH+LOW)/(3);
JZVAR2:=EMA(JZVAR1,10);
DRAWTEXTREL(700,5,'   ● 支撑:'+NUMTOSTRN(JZVAR2,2)),COLOR00FFFF,layer0,LINETHICK2;
ZC1:=IFS(JZVAR2>=L,NUMTOSTRN(JZVAR2,2),'');
DRAWTEXTREL(704,5,'           '+ZC1),COLOR00FF00,linethick2,layer0;
{天数:barslast(CROSS(JZVAR2,REF(JZVAR2,1))),linethick0;}{计算上涨天数};
红砖:=JZVAR2>REF(JZVAR2,1);
红砖1:=REF(JZVAR2,1)>REF(JZVAR2,2);
起涨1:=红砖>0 AND 红砖1>0;
起涨2:=红砖>0 AND 红砖1<0;
起涨3:=红砖<0 AND 红砖1>0;
IF BARSTATUS=2 AND 起涨1 THEN BEGIN
DRAWTEXTREL(265+K,750,'   ■'),COLORRED,layer0,LINETHICK3;
DRAWTEXTREL(245+K,750,'  ■'),COLORRED,layer0,LINETHICK3;
END
ELSE
IF BARSTATUS=2 AND 起涨2 THEN BEGIN
DRAWTEXTREL(265+K,750,'   ■'),COLORRED,layer0,LINETHICK3;
END
ELSE
IF BARSTATUS=2 AND 起涨3 THEN BEGIN
DRAWTEXTREL(265+K,750,'   ■'),COLORRED,layer0,LINETHICK3;
END
{强势股买入信号}
MR1:=(C1<SUP1 AND 金砖>0 AND 红砖>0 AND 三线上>0) 
     OR (蓝砖1>0 AND 金砖>0 AND 红砖>0 AND 三线上>0)
     OR (金砖>0 AND 三线上);{强买信号}
MR2:=(C1<SUP1 AND 蓝砖>0 AND 红砖>0 AND 三线红>0 )
     OR (蓝砖>0 AND 红砖>0 AND MA21>REF(MA21,1) AND REF(MA21,1)<REF(MA21,2))
     OR (C1<SUP1 AND 蓝砖>0 AND 红砖>0);{起涨信号}
MR3:=金砖1>0 AND 金砖>0 AND 红砖>0 AND 三线上>0;
MR4:=蓝砖1>0 AND 蓝砖>0 AND 红砖>0 AND 三线上>0;
MR5:=(蓝砖1>0 AND 蓝砖>0 AND 红砖>0 AND 三线红>0) OR (金砖1>0 AND 蓝砖>0 AND 红砖>0 AND 三线红>0);
MR6:=回调线>0 AND 红砖>0;
MR7:=JZVAR2<REF(JZVAR2,1) OR 红砖<0 OR (金砖=0 AND 蓝砖=0);
 
IF BARSTATUS=2 AND MR1 THEN BEGIN 
DRAWTEXTREL(420,5,'● 金砖
[url=http://www.70822.com/soft/sort013/sort03/down-109608.html]金砖看盘[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间:46.87500 毫秒