[通达信电脑版] 红绿灯操盘线 量学看盘系统主图

[复制链接]
查看3974 | 回复14 | 2018-7-15 16:02:57 | 显示全部楼层 |阅读模式

马上注册,结交更多股友,享用更多功能,让你轻松玩转股票

您需要 登录 才可以下载或查看,没有账号?立即注册

x
          红绿灯操盘线.png
-----------------部分源码展示-------------------
{板块};
DRAWTEXT_FIX(1,1-0.99,1-0.99,0,'')COLORWHITE;
所属行业:DRAWTEXT_FIX(1,1-0.99,1-0.95,0,'所属行业:'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.95,0,HYBLOCK)COLOR0080FF;
所属地域:DRAWTEXT_FIX(1,1-0.99,1-0.90,0,'所属地域:'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.90,0,DYBLOCK)COLOR00FFFF;
所属概念:DRAWTEXT_FIX(1,1-0.99,1-0.85,0,'所属概念:'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.85,0,GNBLOCK)COLOR0000FF;
所属风格:DRAWTEXT_FIX(1,1-0.99,1-0.80,0,'所属风格:'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.80,0,FGBLOCK)COLORFF00FF;

LDM4:=CONST(HHV(REF(HIGH,1),240));
LDM5:=CONST(LLV(REF(LOW,1),240));
LDM6:=LDM4-LDM5;
LDM7:=LOW-LDM6*0.03;
LDM8:=HIGH+LDM6*0.03;
LDM9:=CLOSE>500;
LDM10:=MAX(CLOSE,OPEN);
LDM11:=MIN(CLOSE,OPEN);
LDM12:=0;
LDM13:=1;
LDM14:=IF(LDM9,HIGH,LDM10);
LDM15:=IF(LDM9,LOW,LDM11);
LDM16:=IF(CLOSE>OPEN,IF(LDM13=0,LOW,LDM15),IF(LDM13=0,HIGH,LDM14));
LDM17:=2/1000;
LDM18:=CURRBARSCOUNT;
LDM19:=120;
LDM20:=LDM18<=LDM19;
LDM21:=LOW;
LDM22:=IF(LDM12=0,LDM21,REF(LDM12,LDM12));
基准价:IF(LDM20,CONST(LDM22),DRAWNULL),DOTLINE,COLORLIGRAY;
LDM23:=基准价;
LDM24:=LDM23*LDM17;
LDM25:=ABS(LOW-LDM23)<=LDM24;
LDM26:=ABS(OPEN-LDM23)<=LDM24;
LDM27:=ABS(CLOSE-LDM23)<=LDM24;
LDM28:=ABS(HIGH-LDM23)<=LDM24;
LDM29:=LDM25 OR LDM26 OR LDM27 OR LDM28 AND LDM20 AND LDM18!=1;
LDM30:=COUNT(LDM29,LDM19);
精准点个数:IF(LDM30>0,LDM30+1,0),NODRAW,COLORMAGENTA;
LDM31:=5;
LDM32:=REF(HIGH,LDM31)=HHV(HIGH,2*LDM31+1);
LDM33:=FILTER(LDM32,LDM31);
LDM34:=BACKSET(LDM33,LDM31+1);
LDM35:=FILTER(LDM34,LDM31);
LDM36:=REF(HIGH,BARSLAST(LDM35));
LDM37:=REF(MAX(CLOSE,OPEN),LDM31)=HHV(MAX(CLOSE,OPEN),2*LDM31+1);
LDM38:=FILTER(LDM37,LDM31);
LDM39:=BACKSET(LDM38,LDM31+1);
LDM40:=FILTER(LDM39,LDM31);
LDM41:=REF(MAX(CLOSE,OPEN),BARSLAST(LDM40));
LDM42:=REF(LOW,LDM31)=LLV(LOW,2*LDM31+1);
LDM43:=FILTER(LDM42,LDM31);
LDM44:=BACKSET(LDM43,LDM31+1);
LDM45:=FILTER(LDM44,LDM31);
LDM46:=REF(LOW,BARSLAST(LDM45));
LDM47:=REF(MIN(CLOSE,OPEN),LDM31)=LLV(MIN(CLOSE,OPEN),2*LDM31+1);
LDM48:=FILTER(LDM47,LDM31);
LDM49:=BACKSET(LDM48,LDM31+1);
LDM50:=FILTER(LDM49,LDM31);
LDM51:=REF(MIN(CLOSE,OPEN),BARSLAST(LDM50));
LDM52:=IF(LDM13=0,LDM36,LDM41);
LDM53:=IF(LDM13=0,LDM46,LDM51);
STICKLINE(LDM52=REF(LDM52,1) ,LDM52,LDM52,5,0),COLORWHITE;
STICKLINE(LDM53=REF(LDM53,1) ,LDM53,LDM53,5,0),COLORRED;

LDM138:=LDM14-(LDM14-LDM15)/3;
LDM139:=LDM15+(LDM14-LDM15)/3;
LDM140:=LDM15+(LDM14-LDM15)/2;
LDM141:=1+IF(LDM9,2,4.92)/100;
LDM142:=LDM14/LDM15>=LDM141 OR CLOSE/REF(CLOSE,1)>=LDM141;
STICKLINE(LDM142,LDM138,LDM138 ,1,0),COLORYELLOW;
STICKLINE(LDM142,LDM140,LDM140,1,0),COLORYELLOW;
STICKLINE(LDM142,LDM139,LDM139,1,0),COLORYELLOW;
STICKLINE(LDM29,LDM23,LDM23,3,1),COLORYELLOW;
STICKLINE(LDM18=1,LDM23,LDM23,3,1),COLORYELLOW;
LDM146:=IF(LDM13=0,BARSLAST(LDM35)>0,BARSLAST(LDM40)>0) AND
(ABS(LOW-LDM52)<=LDM52*LDM17 OR ABS(LDM11-LDM52)<=LDM52*LDM17);
LDM147:=IF(LDM13=0,BARSLAST(LDM45)>0,BARSLAST(LDM50)>0) AND
(ABS(LOW-LDM53)<=LDM53*LDM17 OR ABS(LDM11-LDM53)<=LDM53*LDM17);
STICKLINE(LDM146,LDM52,LDM52,1,1),COLORYELLOW;
STICKLINE(LDM147,LDM53,LDM53,1,1),COLORYELLOW;

{牛熊分界}
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC3:=IF(JJJT,0.01*EMA(AMOUNT,35)/EMA(VOL,35),EMA((HIGH+LOW+CLOSE)/3,35));


------------------------------完整公式请直接下载---------------------------------------
红绿灯操盘_0.tn6 (19.68 KB, 下载次数: 29)
回复

使用道具 举报

小樱 | 2022-5-24 08:11:32 | 显示全部楼层
谢谢楼主的分享
回复 支持 反对

使用道具 举报

老股童 | 2022-5-24 06:07:11 | 显示全部楼层
谢谢楼主的分享
回复 支持 反对

使用道具 举报

红色中原 | 2022-5-23 22:35:39 | 显示全部楼层
感谢分享!!!!
回复

使用道具 举报

红色中原 | 2022-5-23 22:33:54 | 显示全部楼层
感谢分享。
回复

使用道具 举报

陈浩 | 2022-5-23 12:57:42 | 显示全部楼层
看看再说看看再说
回复 支持 反对

使用道具 举报

金戈 | 2022-5-23 11:57:57 | 显示全部楼层
可惜是电脑版的
回复 支持 反对

使用道具 举报

御天飞龙 | 2022-5-23 11:46:46 | 显示全部楼层
感谢分享。
回复

使用道具 举报

张明敏 | 2022-5-23 09:26:01 | 显示全部楼层
谢谢楼主的分享
回复 支持 反对

使用道具 举报

金戈 | 2022-5-23 08:58:30 | 显示全部楼层
谢谢楼主分享
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则