- 神奇指标
- 缺口
-
ts加bs加未封缺口 （源码）
以下是ts加bs加未封缺口 （源码） 提供 Code复制内容到剪贴板a:="STSFunc@CALSTSL"; R1:="STSFunc@STS_RISK1"; R2:="STSFunc@STS_RISK2"; S1:="STSFunc@STS_STS1"; S2:="STSFunc@STS_STS2"; TBS:="STSFunc@STS_STSBS"; DN:="STSFunc@STS_STSDN"; UP:="STSFunc@STS_STSUP"; 压力位:UP,linethick0,culor0000ff,PRECIS2; 支撑位:DN,linethick0,culor00ff00,PRECIS2; 警示位:IF(R1<>0,ABS(R1),IF(R2<>0,ABS(R2),0)),linethick0,culorff00ff,PRECIS2; MA5:MA(CLOSE,5),culorFFFFff,PRECIS2; MA10:MA(CLOSE,10),culor00FFff,PRECIS2; DRAWLINE(UP>0,UP,UP<>REF(UP,1) OR C=DYNAINFO(7),REF(ABS(UP),1),0),dotline,culor0000ff,LINETHICK1; DRAWLINE(DN>0,DN,DN<>REF(DN,1) OR C=DYNAINFO(7),REF(ABS(DN),1),0),dotline,culor00ff00,LINETHICK1; DRAWLINE(UP<0,-UP,UP<>REF(UP,1) OR C=DYNAINFO(7),REF(ABS(UP),1),0),culor0000ff; DRAWLINE(DN<0,-DN,DN<>REF(DN,1) OR C=DYNAINFO(7),REF(ABS(DN),1),0),culor00ff00; DRAWLINE(R1>0,R1,R1<>REF(R1,1) OR C=DYNAINFO(7),REF(ABS(R1),1),0),dotline,culorEE88ff; DRAWLINE(R2>0,R2,R2<>REF(R2,1) OR C=DYNAINFO(7),REF(ABS(R2),1),0),dotline,culorEE88ff; DRAWLINE(R1<0,-R1,R1<>REF(R1,1) OR C=DYNAINFO(7),REF(ABS(R1),1),0),culorEE88ff; DRAWLINE(R2<0,-R2,R2<>REF(R2,1) OR C=DYNAINFO(7),REF(ABS(R2),1),0),culorEE88ff; drawbmp(TBS=1,l*0.96,'STSbuy1.bmp'),align1,valign0; drawbmp(TBS=-1,h*1.07,'STSsell1.bmp'),align1,valign0; drawbmp(S2=14,l*0.94,'STSbuy.bmp'),align1,valign0; drawbmp(S2=-14,h*1.09,'STSsell.bmp'),align1,valign0; drawtext(S1>0,L,STR(S1)),culor00FF00,LINETHICK1,align1,valign0; drawtext(S1<0,H*1.03,STR(-S1)),culor00FF00,LINETHICK1,align1,valign0; drawtext(S2>0 and S2<13,l*0.97,STR(S2)),culor0000FF,LINETHICK1,align1,valign0; drawtext(S2<0 and S2>-13,H*1.06,STR(-S2)),culor0000FF,LINETHICK1,align1,valign0; drawtext(S2=13,l*0.97,'+'),culor0000FF,LINETHICK1,align1,valign0; drawtext(S2=14,l*0.97,'13'),culor0000FF,LINETHICK1,align1,valign0; drawtext(S2=-13,h*1.06,'+'),culor0000FF,LINETHICK1,align1,valign0; drawtext(S2=-14,h*1.06,'13'),culor0000FF,LINETHICK1,align1,valign0; b:="LTFunc6@FORLT2"; s11:="LTFunc6@LT_S1"; hs:="LTFunc6@LT_HS"; ls:="LTFunc6@LT_LS"; p1:="LTFunc6@LT_P1"; upp:="LTFunc6@LT_UPP"; udd:="LTFunc6@LT_UDD"; d1:=ema(abs("ddx.ddx"),60); d2:=max("ddx.ddx"/d1+7.5,7.5); d3:=min("ddx.ddx"/d1,10); fb:=if(s11=0,hs,ls); tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点','若明日收盘价> '+numtostrn(upp,2)+',出现B点'); tr1:=ifs(s11=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价> '+numtostrn(hs,2)+'短线买入机会'); tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币')); tr3:=ifs(s11=0,'向下,','向上,'); tr4:='3.能量级别:'+numtostrn(d3,1)+'级'; bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+' 买卖点决策系统提示'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS 点:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2. 短线:'+tr3+tr1+''+'<*t=E7FFFF*><*c=000000*><*p=95*> '+tr4; drawflagtext(1,fb,bs); STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),culor5454ff; STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),culorblack; STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),culor5454ff; STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),culor5454ff; STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),culor5454ff; STICKLINE(p1=1 and c<=o,o,c,7.5,1),culor5454ff; STICKLINE(p1=1 and c<=o,l,c,0.5,1),culor5454ff; STICKLINE(p1=1 and c<=o,h,o,0.5,1),culor5454ff; STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),culorffff54; STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),culorffff54; STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),culorffff54; drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0; drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2; drawbmp(s11=1 and ref(s11,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0; drawbmp(s11=0 and ref(s11,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2; zg8:=FINANCE2(35);{总股} lta8:=FINANCE2(36);{流通A} sy8:=FINANCE2(3);{收益} sl8:=DYNAINFO(39);{市盈率} wf8:=FINANCE2(8);{未分} gj8:=FINANCE2(7);{公积}; jz8:=FINANCE2(4);{净资} cw8:='总股:'+zg8+' 流通A:'+lta8+' 收益:'+sy8+' 市盈率:'+sl8+' 未分:'+wf8+' 公积:'+gj8+' 净资:'+jz8; DRAWTEXTREL(20,10,BKNAME),Culoryellow; DRAWTEXTREL(20,60,cw8),COLORAAEEEE; I1:=0; flag1:=0; while I1<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2) DO IF REF(H,I1)<REF(L,I1+1) AND REF(L,I1+1)>HHV(H,I1+1) THEN BEGIN FLAG1:=1; S1:=I1; I1:=BARSLAST(DISPSTATUS=1); END ELSE I1:=I1+1; STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),CulorC0C0C0,ALIGN1,LAYER7; DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(h,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLORgreen; I:=0; flag:=0; while I<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2) DO IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)<LLV(LOW,I+1) THEN BEGIN FLAG:=1; S:=I; I:=BARSLAST(DISPSTATUS=1); END ELSE I:=I+1; STICKLINE(FLAG,REF(h,S+1),LLV(LOW,S+1),20*(s+1),500),CulorC0C0C0,ALIGN1,LAYER7; DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLORgreen;
2022-10-20 14:42
9286次浏览 -
通达信 缺口 指标
以下是通达信 缺口 指标 A1:EMA(C,6),COLOR0080FF,LINETHICK1; A2:EMA(C,14),COLORGREEN,LINETHICK1; A3:EMA(C,26),COLORBROWN,LINETHICK1; A4:EMA(C,36),COLORRED,LINETHICK1; A5:EMA(C,55),COLORMAGENTA,LINETHICK1; {上下缺口提示线} KOH:=LOW>REF(HIGH,1); KOL:=HIGH<REF(LOW,1); HIF:=LOW>REF(HIGH,BARSLAST(KOH)+1); NHIF:=LOW<=REF(HIGH,BARSLAST(KOH)+1); LIF:=HIGH<REF(LOW,BARSLAST(KOL)+1); NLIF:=HIGH>=REF(LOW,BARSLAST(KOL)+1); 上缺口:DRAWTEXT(HIF AND BARSLAST(KOH)<BARSLAST(NHIF) AND BARSLAST(HIF) <BARSLAST(NHIF),REF(HIGH,BARSLAST(KOH)+1),'→'),COLORGREEN; 下缺口:DRAWTEXT(LIF AND BARSLAST(KOL)<BARSLAST(NLIF) AND BARSLAST(LIF) <BARSLAST(NLIF),REF(LOW,BARSLAST(KOL)+1),'→'),COLORRED;
2022-09-05 09:383345次浏览 -
跳空涨停有缺口 在跳空涨停k线前一k线最高价向右画直线
编写条件：请老师帮写一个跳空涨停有缺口 在跳空涨停k线前一k线最高价向右画直线 指标公式 谢谢 编写方法： TJ1:=L>REF(H,1) AND C/REF(C,1)>1.09645 AND C=H;stICKLINE(REF(TJ1,BArslAST(TJ1)),REF(REF(H,1),BARSLAST(TJ1)),REF(REF(H,1),BARSLAST(TJ1)),5,0),COLORYELLOW;
2022-09-05 09:35487次浏览 -
通达信跳空缺口 向上（源码选股贴图）
以下是通达信跳空缺口 向上（源码选股贴图） LOW>(REF(HIGH,1)+0.001) {向上跳空缺口} AND NOT(DYNAINFO(4)=0) {无停牌,非未来} AND NOT(NAMELIKE('S') OR NAMELIKE('*')) {无ST} AND ((O-REF(C,1))/REF(C,1))<0.098 ;
2022-09-05 09:359785次浏览 -
通达信最牛的综合主图 节气 平台 筹码 缺口 BOLL
以下是通达信最牛的综合主图 节气 平台 筹码 缺口 BOLL 通达信最牛的综合主图 节气 平台 筹码 缺口 BOLL {通达信最牛的综合主图 节气 平台 筹码 缺口 BOLL N:1 300 1 S:0 3 1} 突破跳升缺口是走强的信号， 突破bull下轨是回升的标志，站上５日线还阳的信号 站上10线是增强的信号：24节气是变盘的信号｛24节气是用阳历计算的，有一至两天的误差） 每个量能平台的突破 都是走强的信号． 这些走强的信号也是买入的信号．卖出反过来理解就是了．还有功能大家在实践足去发现吧！这是个人应用最上手的主图！目前绝对没有完全相同的．敬请珍惜！ 易歌综合主图源码如下： DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130); DA:=IF(CURRBARSCOUNT>DA1,0,DA1); HI:=REFDATE(HHV(H,DA),DATE); LO:=REFDATE(LLV(L,DA),DATE); C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL); GZ:=EXP(LN(HI/LO)/10); LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA); LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA); LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA); LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA); LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA); LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA); LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA); LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA); LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA); LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA); L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0; L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0; L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0; L4:=REFDATE(HHV(LH4,DA),DATE); L5:=REFDATE(HHV(LH5,DA),DATE); L6:=REFDATE(HHV(LH6,DA),DATE); L7:=REFDATE(HHV(LH7,DA),DATE); L8:=REFDATE(HHV(LH8,DA),DATE); L9:=REFDATE(HHV(LH9,DA),DATE); L10:=REFDATE(HHV(LH10,DA),DATE); SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10); STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*99/100,HI/GZ,9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*99/100,HI/POW(GZ,2),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*99/100,HI/POW(GZ,4),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*99/100,HI/POW(GZ,6),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*99/100,9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*99/100,9,0)COLOR3C3C3A,LINETHICK3; STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*99/100,9,0)COLOR3C3C3A,LINETHICK3; N:=10; LL:=REF(L,1); HH:=REF(H,1); SQK:=L>HH; XQK:=H<LL; 向上跳几元钱:IF(SQK=1,L-HH,DRAWNULL),COLORGREEN,CROSSDOT,LINETHICK3,NODRAW; 逃命跳空元:IF(XQK=1,H-LL,DRAWNULL),COLORYELLOW,CROSSDOT,LINETHICK3,NODRAW; DRAWTEXT(SQK,L*0.92,' 跳升'),COLORRED; DRAWTEXT(XQK,H*1.08,' 跳跌'),COLORGREEN; STICKLINE(SQK,L,HH,5*N,1),COLORRED; STICKLINE(XQK,H,LL,5*N,2),COLORGREEN; DRAWKLINE(H,O,L,C); DRAWTEXT(CURRBARSCOUNT=98,LOW*0.88,'☆压力越大暗条越长,做多越短越好★'),COLORYELLOW; N250:=250; PT250:=CONST(HHVBARS(V,N250)); T250:IF(CURRBARSCOUNT<=N250,CONST(IF(PT250=0,C,REF(C,PT250))),DRAWNULL),COLOR990000,LINETHICK2; IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000; N120:=120; PT120:=CONST(HHVBARS(V,N120)); T120:IF(CURRBARSCOUNT<=N120,CONST(IF(PT120=0,C,REF(C,PT120))),DRAWNULL),COLORAAAA00,LINETHICK2; IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00; N60:=60; PT60:=CONST(HHVBARS(V,N60)); T60:IF(CURRBARSCOUNT<=N60,CONST(IF(PT60=0,C,REF(C,PT60))),DRAWNULL),COLOR00BB00,LINETHICK2; IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00; N30:=30; PT30:=CONST(HHVBARS(V,N30)); T30:IF(CURRBARSCOUNT<=N30,CONST(IF(PT30=0,C,REF(C,PT30))),DRAWNULL),COLOR0000CC,LINETHICK2; IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC; N20:=20; PT20:=CONST(HHVBARS(V,N20)); T20:IF(CURRBARSCOUNT<=N20,CONST(IF(PT20=0,C,REF(C,PT20))),DRAWNULL),COLORDD00DD,LINETHICK2; IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD; N10:=10; PT10:=CONST(HHVBARS(V,N10)); T10:IF(CURRBARSCOUNT<=N10,CONST(IF(PT10=0,C,REF(C,PT10))),DRAWNULL),COLOR00EEEE,LINETHICK2; IF(CURRBARSCOUNT=PT10+1,T10,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N10,T10,'10'),COLOR00EEEE; N5:=5; PT5:=CONST(HHVBARS(V,N5)); T5:IF(CURRBARSCOUNT<=N5,CONST(IF(PT5=0,C,REF(C,PT5))),DRAWNULL),COLORFFFFFF,LINETHICK2; IF(CURRBARSCOUNT=PT5+1,T5,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK2; DRAWTEXT(CURRBARSCOUNT=N5,T5,'5'),COLORFFFFFF; DRAWKLINE(H,O,L,C); 股浪:=CROSS(C,T5),COLORFFFFFF,LINETHICK2; T1:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1; 量能平台:IF(CURRBARSCOUNT<=N+15,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLOR4080FF,LINETHICK3; 新量能点:IF(CURRBARSCOUNT=T1+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK9; DRAWTEXT(ISLASTBAR,量能平台,' 量能平台'),COLOR00F0F0; DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLOR00FFFF; DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR00FFFF; DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLOR00FFFF; DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK)COLOR00FFFF; DRAWTEXT_FIX(1,0.30,0.00,0,'主题投资：')COLOR00FFFF; DRAWTEXT_FIX(1,0.36,0.00,0,EXTERNSTR(0,2))COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.05,0,'主营业务：')COLOR00FFFF; DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3))COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.10,0,'解禁日期：')COLOR00FFFF; DRAWTEXT_FIX(1,0.06,0.10,0,EXTERNSTR(0,4))COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.15,0,'愚民概念：'),COLOR00FFFF; DRAWTEXT_FIX(1,0.06,0.15,0,EXTERNSTR(0,5)),COLOR00FFFF; DRAWRECTREL(0,500,135,999.4,IF(120,RGB(10,0,0),0)); 超B:=L2_AMO(0,2)/10000.0; 大B:=L2_AMO(1,2)/10000.0; 中B:=L2_AMO(2,2)/10000.0; 小B:=L2_AMO(3,2)/10000.0; 超S:=L2_AMO(0,3)/10000.0; 大S:=L2_AMO(1,3)/10000.0; 中S:=L2_AMO(2,3)/10000.0; 小S:=L2_AMO(3,3)/10000.0; TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0); 主力进:=(超B)+(大B),NODRAW; 主力出:=(超S)+(大S),NODRAW; 小散进:=(中B)+(小B),NODRAW; 小散出:=(中S)+(小S),NODRAW; DAZHIV:=CONST(MAX(ABS(主力进),MAX(ABS(主力出),MAX(ABS(小散进),ABS(小散出))))),NODRAW; DRAWRECTREL(0,CONST(940-(ABS(主力进)*250/DAZHIV)),30,960,IF(CONST(主力进>0),RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(32,CONST(940-(ABS(主力出)*250/DAZHIV)),62,960,IF(CONST(主力出>0),RGB(23,125,255),RGB(255,0,0))); DRAWRECTREL(70,CONST(940-(ABS(小散进)*250/DAZHIV)),100,960,IF(CONST(小散进>0),RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(102,CONST(940-(ABS(小散出)*250/DAZHIV)),132,960,IF(CONST(小散出>0),RGB(23,125,255),RGB(255,0,0))); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.85,0,STRCAT('',CON2STR(主力进/10,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,0.85,0,STRCAT('',CON2STR(主力出/10,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.07,0.85,0,STRCAT('',CON2STR(小散进/10,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.101,0.85,0,STRCAT('',CON2STR(小散出/10,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,1,0,'（X10万元)'),COLOR00FFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0,1,0,'主进出'),COLORCYAN; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.09,1,0,'散进出'),COLORCYAN; 主力买力度:=LARGEINTRDVOL*1000/VOL; 主力卖力度:=LARGEOUTTRDVOL*1000/VOL; AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW; DRAWRECTREL(0,515,CONST(ABS(主力买力度)*500/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))); DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*500/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))); DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORYELLOW; DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORYELLOW; 涨家数:INDEXADV,COLOR0080FF,NODRAW; 跌家数:INDEXDEC,COLORGREEN,NODRAW; K1:=REF(C,1)=DYNAINFO(3) AND O=DYNAINFO(4) AND C=DYNAINFO(7) AND H=DYNAINFO(5) AND L=DYNAINFO(6); K2:=BARSLAST(V=HHV(V,20)); K3:=BACKSET(K1,K2+1); STICKLINE(K2=0 AND K3=1,H,H*1.003,8*N,0),COLORYELLOW; 收:C,NODRAW; DRAWTEXT(S=1&&K2=0&&K3=1,H*1.02,'20天内最高量的'),COLORGREEN; DRAWTEXT(S=1&&K2=0&&K3=1,H*0.98,'当天最高价划线'),COLORGREEN; STICKLINE((CLOSE>(REF(C,1)))AND(CLOSE/(REF(C,1))>1.05),CLOSE,OPEN,2,0),COLORFF00FF ; STICKLINE((CLOSE<(REF(C,1)))AND((REF(C,1))/CLOSE>1.05),CLOSE,OPEN,2,0),COLOR009900; ST1:=NAMELIKE('ST'); ST2:=NAMELIKE('*ST'); {涨停K线图} ZT:=(C-REF(C,1))/REF(C,1)*100>9.92; ZTST:=(C-REF(C,1))/REF(C,1)*100>4.92; 涨停:=ST1=0 AND ST2=0 AND ZT; 涨停ST:=(ST1=1 OR ST2=1) AND ZTST; STICKLINE(涨停 OR 涨停ST,C,O,3,0),COLORYELLOW; STICKLINE(涨停 OR 涨停ST,C,O,2,0),COLORYELLOW; STICKLINE(涨停 OR 涨停ST,C,O,1,0),COLORYELLOW; {跌停K线图} DT:=(C-REF(C,1))/REF(C,1)*100<-9.92; DTST:=(C-REF(C,1))/REF(C,1)*100<-4.92; 跌停:=ST1=0 AND ST2=0 AND DT; 跌停ST:=(ST1=1 OR ST2=1) AND DTST; STICKLINE(跌停 OR 跌停ST,C,O,3,0),COLORFF0000 ; STICKLINE(跌停 OR 跌停ST,C,O,2,0),COLORFF0000 ; STICKLINE(跌停 OR 跌停ST,C,O,1,0),COLORFF0000 ; MA5:MA(CLOSE,4),DOTLINE,COLORGREEN; IF(MA5>REF(MA5,1),MA5,DRAWNULL)COLORYELLOW,LINETHICK3; MA10:MA(CLOSE,10),COLORRED,DOTLINE; IF(MA10>REF(MA5,1),MA10,DRAWNULL)COLORRED,DOTLINE,COLORGREEN; MA250:MA(CLOSE,250),COLORRED; IF(MA250>REF(MA5,1),MA250,DRAWNULL)COLORRED,COLORGREEN; AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW; A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1); AHZ:=HHV(H,200); ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40; STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF; 节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分', IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满', IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署', IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分', IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪', IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒', DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF; 月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日', IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日', IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日', IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日', IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日', IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日', DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW; 输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节)); DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE; 提示:=0; 五:MA(CLOSE,5),LINETHICK0,COLORMAGENTA,NODRAW; 十:MA(CLOSE,10),LINETHICK0,COLORMAGENTA,NODRAW; 离A:MA(CLOSE,7)*1.05,COLORC0C0C0; 离C:MA(CLOSE,7)*0.955,COLORC0C0C0; β0:=(H-L)/2+L; α:=β0,LINETHICK0; β:=REF(β0,1),LINETHICK0,COLORGREEN; γ:=REF(β0,2),LINETHICK0,COLORMAGENTA;
2022-09-05 09:356702次浏览
