gsd

DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');上市日期:=STRCAT(' 上市天数: ',CON2STR(FINANCE(42),0));股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期));{}市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));利润同比:=STRCAT(' 利润同比: ',CON2STR(FINANCE(43),2));收入同比:=STRCAT(' 收入同比: ',CON2STR(FINANCE(44),2));当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率), 利润同比), 收入同比));{}X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替};X3:=FINANCE(23)/FINANCE(10)*3.3;X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}X5:=FINANCE(20)/FINANCE(15)*0.999;Z值:=X1+X2+X3+X4+X5;预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警'));财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,3))));优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准};现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警,优质资产率),现金负债比));{}DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,财务系数),COLORCYAN;DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,当前业绩),COLORLIMAGENTA;DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLORYELLOW;VAR1:=ZIG(3,10)REF(ZIG(3,10),2);{ZIG 有未来}VAR2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)TC2,HP,LP),LOWER1,UPPER1,0,0),COLOR628962;STICKLINE(IF(BC2>TC2,LP,HP),LOWER1,UPPER1,0,0),COLOR628962;NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));{用时}LR1:=FORCAST(C,NOD+1);NP:IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;{近点}LR2:=SLOPE(C,NOD+1);LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)));FP:NP-LR3*(NOD),POINTDOT,COLOR93BDA8;{远点}EQU:(NP+FP)/2,POINTDOT,COLOR93BDA8;AD:=ABS(NP-FP);{高差};DBL:=BARSLAST(BC1!=DRAWNULL)+1;DBH:=BARSLAST(TC1!=DRAWNULL)+1;BSP:=IF(BC2>TC2,DBL,DBH)-1;LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL);AT2:=HHV(AT1-LRL,MAX(BC2,TC2));AT3:=CONST(BARSLAST(AT1-LRL=AT2));AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));ATL:=LRL+AT5;UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11)));{限制高}

RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11)));{限制低}

中轨1:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORF57474,LINETHICK1,CROSSDOT;

上轨1:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORFF8000,LINETHICK1,CROSSDOT;

下轨1:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORMAGENTA ,LINETHICK1,CROSSDOT;

MA5:MA(CLOSE,5),COLORFFCC66,LINETHICK3;

MA14:MA(CLOSE,14),COLORFFFFFF,LINETHICK2;

上轨:MA(HIGH,20),POINTDOT,COLORBLUE,LINETHICK4;

下轨:MA(LOW,20),POINTDOT,COLORCYAN,LINETHICK4;

DRAWICON(CROSS(MA5,上轨),MA5,1),LINETHICK2;

DRAWICON(CROSS(MA5,下轨),MA5,1),LINETHICK2;

单阳:=C/REF(C,1)>=1.09 ;

不破价:=REF(C,BARSLAST(单阳));

DRAWTEXT(单阳,H-H*0.02,'阳'),COLOR00FFFF;

LS0:=BARSLAST(单阳);

LS11:=IF(1,LS0=1,单阳);

LS21:=IF(1,LLV(L,1)>REF(L,1),1);

单阳不破:=LS11 AND LS21;

STICKLINE(单阳不破,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破,不破价-不破价*0.02,'1'),COLORGREEN;

LS12:=IF(2,LS0=2,单阳);

LS22:=IF(2,LLV(L,2)>REF(L,2),1);

单阳不破2:=LS12 AND LS22;

STICKLINE(单阳不破2,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破2,不破价-不破价*0.02,'2'),COLORGREEN;

LS13:=IF(3,LS0=3,单阳);

LS23:=IF(3,LLV(L,3)>REF(L,3),1);

单阳不破3:=LS13 AND LS23;

STICKLINE(单阳不破3,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破3,不破价-不破价*0.02,'3'),COLORGREEN;

LS14:=IF(4,LS0=4,单阳);

LS24:=IF(4,LLV(L,4)>REF(L,4),1);

单阳不破4:=LS14 AND LS24;

STICKLINE(单阳不破4,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破4,不破价-不破价*0.02,'4'),COLORGREEN;

LS15:=IF(5,LS0=5,单阳);

LS25:=IF(5,LLV(L,5)>REF(L,5),1);

单阳不破5:=LS15 AND LS25;

STICKLINE(单阳不破5,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破5,不破价-不破价*0.02,'5'),COLORGREEN;

LS16:=IF(6,LS0=6,单阳);

LS26:=IF(6,LLV(L,6)>REF(L,6),1);

单阳不破6:=LS16 AND LS26;

STICKLINE(单阳不破6,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破6,不破价-不破价*0.02,'6'),COLORGREEN;

LS17:=IF(7,LS0=7,单阳);

LS27:=IF(7,LLV(L,7)>REF(L,7),1);

单阳不破7:=LS17 AND LS27;

STICKLINE(单阳不破7,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破7,不破价-不破价*0.02,'7'),COLORGREEN;

LS18:=IF(8,LS0=8,单阳);

LS28:=IF(8,LLV(L,8)>REF(L,8),1);

单阳不破8:=LS18 AND LS28;

STICKLINE(单阳不破8,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破8,不破价-不破价*0.02,'8'),COLORGREEN;

LS19:=IF(9,LS0=9,单阳);

LS29:=IF(9,LLV(L,9)>REF(L,9),1);

单阳不破9:=LS19 AND LS29;

STICKLINE(单阳不破9,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破9,不破价-不破价*0.02,'9'),COLORGREEN;

LS110:=IF(10,LS0=10,单阳);

LS210:=IF(10,LLV(L,10)>REF(L,10),1);

单阳不破10:=LS110 AND LS210;

STICKLINE(单阳不破10,不破价-不破价*0.002,不破价,4,0),COLORRED;

DRAWTEXT(单阳不破10,不破价-不破价*0.02,'10'),COLORGREEN;

N1:=30;

TS:=BARSLAST(L=LLV(L,N));

开始信号:=FILTERX(TS=0,BARSSINCE(C));

开始天数:=BARSLAST(开始信号);

天数横线:=CONST(开始天数);

低点:DRAWLINE(L=LLV(L,N),L,ISLASTBAR,REF(L,TS),1),COLORGRAY;

高点:DRAWLINE(L=LLV(L,N),CONST(HHV(H,天数横线)),ISLASTBAR,REF(CONST(HHV(H,天数横线)),

TS),1),COLORGRAY;

STICKLINE(开始信号,L,CONST(HHV(H,天数横线)),0,0),COLORGRAY;

STICKLINE(ISLASTBAR,低点,高点,0,0),COLORGRAY;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

C2:=REF(C,1),NODRAW;

涨停1:=REF(C,11)*1.1-C<0.01 AND H=C,NODRAW;

STICKLINE(涨停1,OPEN,CLOSE,1,0),COLORRED;

STICKLINE(涨停1,H,L,0,0),COLORRED;

跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2) AND L=C,1,0),NODRAW;

STICKLINE(跌停,OPEN,CLOSE,1,0),COLORGREEN;

STICKLINE(跌停,H,L,0,1),COLORGREEN;

差:=(高点-低点)/天数横线;

收盘差:=CONST(C)-低点;

对角差:=高点-低点;

对角角度:ATAN((对角差/(对角差*((天数横线-1)/天数横线))-1)*100)*57.3,COLORFF00FF,NODRAW;

对角线:IF(TS>=0 AND 低点+差*TS<=高点,低点+差*TS,DRAWNULL),COLORYELLOW,LINETHICK2;

{DRAWBAND(对角线,RGB(255,0,255),对角线,RGB(255,0,255)),LINETHICK2;}

JX1:=MA(C,5);

JX2:=MA(C,10);

JX3:=MA(C,20);

JTTJ1:=BARSLAST(CROSS(JX1,JX2));

JTTJ2:=BARSLAST(CROSS(JX1,JX3));

JTTJ3:=BARSLAST(CROSS(JX2,JX3));

JTTJ4:=JTTJ1>=JTTJ2;

JTTJ5:=JTTJ2>=JTTJ3;

JTTJ6:=JTTJ3=0;

月价托:=JTTJ4 AND JTTJ5 AND JTTJ6;

JX4:=MA(C,40);

JX5:=MA(C,60);

JTTJ7:=BARSLAST(CROSS(JX3,JX4));

JTTJ8:=BARSLAST(CROSS(JX3,JX5));

JTTJ9:=BARSLAST(CROSS(JX4,JX5));

JTTJ10:=JTTJ7>=JTTJ8;

JTTJ11:=JTTJ8>=JTTJ9;

JTTJ12:=JTTJ9=0;

季价托:=JTTJ10 AND JTTJ11 AND JTTJ12;

JTTJ13:=BARSLAST(CROSS(JX1,JX2));

JTTJ14:=BARSLAST(CROSS(JX1,JX5));

JTTJ15:=BARSLAST(CROSS(JX2,JX5));

JTTJ16:=JTTJ13>=JTTJ14;

JTTJ17:=JTTJ14>=JTTJ15;

JTTJ18:=JTTJ15=0;

短长托:=JTTJ16 AND JTTJ17 AND JTTJ18;

BOLL:=MA(C,20);

UPPER:=BOLL+2*STD(C,20);

LOWER:=BOLL-2*STD(C,20);

大黑马:=CROSS(C,UPPER) AND C/REF(C,1)>1.05,COLORRED;

DRAWTEXT(大黑马 AND C>MA(C,60) AND C>MA(C,90) AND C>MA(C,120) AND C>MA(C,250),H*1.03,'敢死队'),COLORYELLOW;

DRAWTEXT(月价托,L*0.98,'月价托'),COLORWHITE;

DRAWTEXT(季价托,H+0.05,'季价托'),COLORWHITE;

DRAWTEXT(短长托,L-0.1,'短长托'),COLORWHITE;

VARC01:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;

DRAWICON(CROSS(82,VARC01),H*1.02,2);

{DRAWTEXT(CROSS(82,VARC),2,'|逃庄'),COLORWHITE ;}

VAR034:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);

VAR035:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);

VAR036:=IF(VAR034>0.010, 0.900, 1) AND IF(VAR034>(-0.025), 1, 1.200);

VAR037:=VAR036*(VAR035-VAR034)*100;

VAR038:=SUM(VAR037, 10);

VAR310:=VAR038>20;

VAR326:=IF(CLOSE AND MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,1,0);{VAR38>VAR39;}

空:=EMA(C,5);

VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;

VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5);

VARC:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;

VAR11:=(HIGH+LOW+OPEN+2*CLOSE)/5;

VAR12:=REF(VAR11,1);

VAR3:=SMA(MAX(VAR1-VAR12,0),10,1)/SMA(ABS(VAR11-VAR12),10,1)*100;

VAR4:=FILTER(IF(COUNT(VAR3<20,5)>=1 AND COUNT(VAR11=LLV(VAR11,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0),5);

DRAWTEXT_FIX(1,0.02,0.90,0,'财神705-正品标志'),COLOR00FFFF;

DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLORCYAN;

DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORWHITE;

DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLORCYAN;

DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.65,0.8,0,HYBLOCK),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.75,0.8,0,DYBLOCK),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.65,0.9,0,GNBLOCK),COLORYELLOW;

{以上为显示所属板块，地域，概念等}

DRAWTEXT_FIX(1,0.00,0.05,0,'主营业务：'),COLORRED;

DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3)),COLORWHITE;

最后编辑于 ：
©著作权归作者所有,转载或内容合作请联系作者
  • 人面猴
    序言：七十年代末，一起剥皮案震惊了整个滨河市，随后出现的几起案子，更是在滨河造成了极大的恐慌，老刑警刘岩，带你破解...
    沈念sama阅读 194,319评论 5赞 459
  • 死咒
    序言：滨河连续发生了三起死亡事件，死亡现场离奇诡异，居然都是意外死亡，警方通过查阅死者的电脑和手机，发现死者居然都...
    沈念sama阅读 81,801评论 2赞 371
  • 救了他两次的神仙让他今天三更去死
    文/潘晓璐 我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
    开封第一讲书人阅读 141,567评论 0赞 319
  • 道士缉凶录：失踪的卖姜人
    文/不坏的土叔 我叫张陵，是天一观的道长。 经常有香客问我，道长，这世上最难降的妖魔是什么？ 我笑而不...
    开封第一讲书人阅读 52,156评论 1赞 263
  • 港岛之恋（遗憾婚礼）
    正文 为了忘掉前任，我火速办了婚礼，结果婚礼上，老公的妹妹穿的比我还像新娘。我一直安慰自己，他们只是感情好，可当我...
    茶点故事阅读 61,019评论 4赞 355
  • 恶毒庶女顶嫁案：这布局不是一般人想出来的
    文/花漫 我一把揭开白布。 她就那样静静地躺着，像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上，一...
    开封第一讲书人阅读 46,090评论 1赞 272
  • 城市分裂传说
    那天，我揣着相机与录音，去河边找鬼。 笑死，一个胖子当着我的面吹牛，可吹牛的内容都是我干的。 我是一名探鬼主播，决...
    沈念sama阅读 36,500评论 3赞 381
  • 双鸳鸯连环套：你想象不到人心有多黑
    文/苍兰香墨 我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
    开封第一讲书人阅读 35,192评论 0赞 253
  • 万荣杀人案实录
    序言：老挝万荣一对情侣失踪，失踪者是张志新（化名）和其女友刘颖，没想到半个月后，有当地人在树林里发现了一具尸体，经...
    沈念sama阅读 39,474评论 1赞 290
  • 护林员之死
    正文 独居荒郊野岭守林人离奇死亡，尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 34,566评论 2赞 309
  • 白月光启示录
    正文 我和宋清朗相恋三年，在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 36,338评论 1赞 326
  • 活死人
    序言：一个原本活蹦乱跳的男人离奇死亡，死状恐怖，灵堂内的尸体忽然破棺而出，到底是诈尸还是另有隐情，我是刑警宁泽，带...
    沈念sama阅读 32,212评论 3赞 312
  • 日本核电站爆炸内幕
    正文 年R本政府宣布，位于F岛的核电站，受9级特大地震影响，放射性物质发生泄漏。R本人自食恶果不足惜，却给世界环境...
    茶点故事阅读 37,572评论 3赞 298
  • 男人毒药：我在死后第九天来索命
    文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹，春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 28,890评论 0赞 17
  • 一桩弑父案，背后竟有这般阴谋
    文/苍兰香墨 我抬头看了看天上的太阳。三九已至，却和暖如春，着一层夹袄步出监牢的瞬间，已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 30,169评论 1赞 250
  • 情欲美人皮
    我被黑心中介骗来泰国打工， 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留，地道东北人。 一个月前我还...
    沈念sama阅读 41,478评论 2赞 341
  • 代替公主和亲
    正文 我出身青楼，却偏偏与公主长得像，于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子，可洞房花烛夜当晚...
    茶点故事阅读 40,661评论 2赞 335

推荐阅读更多精彩内容

  • 鱼一样的记忆
    所谓脸盲，就是见到你，觉得好像在哪里见过，就是莫大的开恩。班长要我发本子，然后我满班喊“呼叫某某某，快点应一声”。...
    冷话阅读 225评论 0赞 0
  • 说声“谢谢”吧
    如果可以，请对周围的人说声谢谢，无论他是否给你帮助，无论你自认为是否必要，但是，这句“谢谢”对他人来说，会是满满的...
    溯鲲251314阅读 288评论 2赞 2
  • 《利用python进行数据分析》
    python数据分析入门学习笔记 - 杨柳依依雨雪霏霏 - 博客园 http://www.cnblogs.com...
    葡萄喃喃呓语阅读 902评论 0赞 2
  • 我回来啦
    在阔别简书半年后，最终还是带着新增的20斤肥肉回归了。 人啊，老是喜欢为自己找借口，就像之前把简书卸掉，美其名曰:...
    知了小姐阅读 238评论 0赞 0
  • 我的微商路
    今天跟大家聊一下我刚刚加入威海联合代理黄金视力眼贴时的顾虑和遇到的困难： 我做眼贴代理首先是想着自己用着便宜，正常...
    冰姿风韵阅读 349评论 0赞 0