当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：均线筹码主图（通达信公式 主图 源码 测试图）
软件名称：[B]均线筹码主图（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：分享版
软件大小：9.00 KB
官方主页：Home Page
更新时间：2024-12-08 00:11:21
软件简介:
均线筹码主图
分析家:=STRCAT(HYBLOCK,' ');
公式:=STRCAT(分析家,DYBLOCK);
源码:=STRCAT(公式,' ');
DRAWTEXT_FIX(1,0.02,0.05,0,STRCAT(源码,GNBLOCK)),COLORYELLOW;
DRAWKLINE(H,O,L,C);
GSPT1:=SUM((WINNER(C)*100),30)/30*0.1;
GSPT2:=SUM((WINNER(C)*100),20)/20*0.4;
GSPT3:=SUM((WINNER(C)*100),10)/10*0.3;
GSPT4:=SUM((WINNER(C)*100),5)/5*0.1;
GSPT5:=SUM((WINNER(C)*100),3)/3*0.1;
GSPTZ:=GSPT1+GSPT2+GSPT3+GSPT4+GSPT5;
赚钱效应:IF(GSPTZ>38,GSPTZ,GSPTZ*1.3),NODRAW;
活跃度:IF(SUMBARS(VOL,CAPITAL)<100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;
获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
DRAWKLINE(H,O,L,C);
{网红}
JRH:=HHV(C,2);
JRL:=LLV(C,2);
MA3:=MA(CLOSE,3);
YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR3:=(REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR4:=(REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR5:=(REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR6:=(REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR7:=(REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR8:=(REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR9:=(REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARA:=(REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));
VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1);
VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD);
红色持股:=VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW;
机构离场:=IF(红色持股,JRL,DRAWNULL);
明离场价:=机构离场,COLORFF99FF,NODRAW;
今离场价:=REF(机构离场,1)COLOR0000FF,NODRAW;
青色观望:=VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORFFFF00,NODRAW;
进:=IF(青色观望,JRH,DRAWNULL);
明进场价:=进,COLOR33AACC,NODRAW;
今进场价:=REF(明进场价,1),COLORFF0000,NODRAW;
机构短买:=VAR19,COLOR33AACC,NODRAW;
品红离场:=VAR1A,COLORFF99FF,NODRAW;
急速超跌:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORFFFFFF,NODRAW;
辰星线:=(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLOR0000FF;
牵牛线:=MA(CLOSE,26),COLORFF00FF;
等待:=IF(MA3>辰星线,辰星线,MA3);
STICKLINE(ISLASTBAR AND (红色持股 OR REF(红色持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF;
STICKLINE(ISLASTBAR AND (青色观望 OR REF(青色观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00;
STICKLINE(C>=O,L,H,0,0),COLOR0000CC;
STICKLINE(C<O,L,H,0,0),COLOR999900;
STICKLINE(1,C,O,3.5,0),COLOR858500;
STICKLINE(红色持股,CLOSE,O,2.8,0),COLOR000055;
STICKLINE(红色持股,CLOSE,O,2,0),COLOR000088;
STICKLINE(红色持股,CLOSE,O,1.5,0),COLOR0000AA;
STICKLINE(红色持股,CLOSE,O,1,0),COLOR0000CC;
STICKLINE(红色持股,CLOSE,O,0.5,0),COLOR0000EE;
STICKLINE(青色观望,CLOSE,O,2.8,0),COLOR555500;
STICKLINE(青色观望,CLOSE,O,2,0),COLOR888800;
STICKLINE(青色观望,CLOSE,O,1.5,0),COLORAAAA00;
STICKLINE(青色观望,CLOSE,O,1,0),COLORCCCC00;
STICKLINE(青色观望,CLOSE,O,0.5,0),COLOREEEE00;
CO:=(C-O);
STICKLINE(急速超跌,O,C-CO/2,2.8,0),COLOR555555;
STICKLINE(急速超跌,O,C-CO/2,2,0),COLOR888888;
STICKLINE(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA;
STICKLINE(急速超跌,O,C-CO/2,1,0),COLORCCCCCC;
STICKLINE(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE;
STICKLINE(机构短买,O,O+CO/3,2.8,0),COLOR335555;
STICKLINE(机构短买,O,O+CO/3,2,0),COLOR338888;
STICKLINE(机构短买,O,O+CO/3,1.5,0),COLOR33AAAA;
STICKLINE(机构短买,O,O+CO/3,1,0),COLOR33CCCC;
STICKLINE(机构短买,O,O+CO/3,0,0),COLOR33EEEE;
STICKLINE(品红离场,O,O+CO/3,2.8,0),COLOR550055;
STICKLINE(品红离场,O,O+CO/3,2,0),COLOR880088;
STICKLINE(品红离场,O,O+CO/3,1.5,0),COLORAA00AA;
STICKLINE(品红离场,O,O+CO/3,1,0),COLORCC00CC;
STICKLINE(品红离场,O,O+CO/3,0.5,0),COLOREE00EE;
SN1:=(L+H)/2;
N5:IF(BARSCOUNT(C),SMA(SN1,3,1),C),COLORWHITE;
N10:MA(CLOSE,10),COLORCYAN,LINETHICK1;
N20:MA(CLOSE,20),COLORGREEN,LINETHICK1;
N30:MA(CLOSE,30),COLORRED,LINETHICK1;
N60:MA(CLOSE,60),COLORLIRED,LINETHICK1;
N120:MA(CLOSE,120),COLORMAGENTA,LINETHICK1;
N250:MA(CLOSE,250),COLORBLUE,LINETHICK1;
底:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),20,''),LINETHICK2,COLORYELLOW;
DRAWICON(底,L*0.99,9);
顶:DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),20,''),LINETHICK2,COLORYELLOW;
DRAWICON(顶,H*1.01,15);
P:=21;
擒股指标1:=IF(L=LLV(L,P),L,DRAWNULL);
擒股指标2:=CONST(BARSLAST(擒股指标1!=DRAWNULL));
擒股指标3:=CONST(IF(擒股指标2=0,H,REF(H,擒股指标2)));
擒股指标4:=CONST(REF(BARSLAST(H>擒股指标3),擒股指标2+1)+擒股指标2+1);
擒股指标5:=CONST(IF(擒股指标4=0,H,REF(H,擒股指标4)));
擒股指标6:=CONST(REF(BARSLAST(H>擒股指标5),擒股指标4+1)+擒股指标4+1);
进场:IF(CURRBARSCOUNT<=擒股指标2+21,CONST(IF(擒股指标6=0,H,REF(H,擒股指标6))),DRAWNULL),COLORYELLOW;
IF(CURRBARSCOUNT<=擒股指标2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORYELLOW;
A:=HHV(HIGH,6)=HIGH AND HIGH>REF(HIGH,1);
A1:=FILTER(A,5);
TS1:=BARSLAST(A1);
短期压力:REF(HIGH,TS1),COLORLIBLUE,NODRAW;STICKLINE(1,短期压力,短期压力,4,0),COLORLIBLUE;
TJ0:=REF(C,1)<REF(短期压力,1) AND C>REF(短期压力,1);
DRAWICON(TJ0,L*0.99,1);
H1:=REF(C,9)=HHV(C,2*9+1);
{N,10}
H2:=FILTER(H1,9);
H3:=BACKSET(H2,9+1);
H4:=FILTER(H3,9);
小压:=REF(C*0.999,BARSLAST(H4)),COLORWHITE,NODRAW;
{STICKLINE(C*0.998,小压,小压,3,1), COLORGREEN;}
H5:=ABS(REF(小压,1)-小压)>小压*0.075 AND H4;
小压2:REF(C*0.999,BARSLAST(H5)),COLORLIGREEN,{NODRAW}DOTLINE;
STICKLINE(C*0.999,小压2,小压2,1,1), COLORLIGREEN;
TJ:=REF(C,1)<REF(小压2,1) AND C>REF(小压2,1);
DRAWICON(TJ,L*0.99,38);
SJ1:=(REF(HIGH,3) = HHV(HIGH,((2 * 3) + 1)));
SJ2:=FILTER(SJ1,3);
SJ3:=BACKSET(SJ2,(3 + 1));
SJ4:=FILTER(SJ3,3);
SJ5:=(REF(LOW,3) = LLV(LOW,((2 * 3) + 1)));
SJ6:=FILTER(SJ5,3);
SJ7:=BACKSET(SJ6,(3 + 1));
SJ8:=FILTER(SJ7,3);
SJ9:=((REF(LLV(LOW,(2 * 3)),1) + REF(HHV(HIGH,(2 * 3)),1)) / 2);
SJ10:=((HIGH + LOW) / 2);
SJ11:=(((SJ4 AND NOT((SJ8 AND (SJ9 >= SJ10)))) OR BARSTATUS) OR (BARSCOUNT(CLOSE) = 1));
SJ12:=(SJ8 AND NOT((SJ4 AND (SJ9 < SJ10))));
SJ13:=(SJ4 AND NOT((SJ8 AND (SJ9 >= SJ10))));
SJ14:=(REF(BARSLAST(SJ11),1) + 1);
SJ15:=BACKSET((SJ11 AND (COUNT(SJ12,SJ14) > 0)),LLVBARS(IF(SJ12,LOW,10000),SJ14));
SJ16:=(SJ15 > REF(SJ15,1));
SJ17:=BACKSET(SJ16,2);
SJ18:=(SJ17 > REF(SJ17,1));
SJ19:=((SJ18 OR BARSTATUS) OR (BARSCOUNT(CLOSE) = 1));
SJ20:=(REF(BARSLAST(SJ19),1) + 1);
SJ21:=BACKSET((SJ19 AND (COUNT(SJ13,SJ20) > 0)),HHVBARS(IF(SJ13,HIGH,0),SJ20));
SJ22:=(SJ21 > REF(SJ21,1));
SJ23:=BACKSET(SJ22,2);
SJ24:=(SJ23 > REF(SJ23,1));
SJ25:=BACKSET(BARSTATUS,(BARSLAST(SJ18) + 1));
SJ26:=(SJ25 > REF(SJ25,1));
SJ27:=BACKSET(BARSTATUS,(BARSLAST(SJ24) + 1));
SJ28:=(SJ27 > REF(SJ27,1));
底0:REF(LOW,BARSLAST(SJ26)),COLORRED;
頂0:REF(HIGH,BARSLAST(SJ28)),COLORGREEN;
DRAWTEXT(ISLASTBAR,頂0,STRCAT((''),CON2STR(頂0,2))),COLORGREEN;
DRAWTEXT(ISLASTBAR,底0,STRCAT((''),CON2STR(底0,2))),COLORRED;
STICKLINE(SJ26,頂0,底0,0,0),COLORBLUE,LINETHICK2;
DRAWLINE(SJ28,HIGH,SJ26,LOW,0),COLORBLUE,LINETHICK2;
DRAWLINE(SJ28,HIGH,SJ26,頂0,1),COLORGREEN,LINETHICK2;
STICKLINE(SJ28,頂0,底0,0,0),COLORBLUE,LINETHICK2;
DRAWLINE(SJ26,LOW,SJ28,HIGH,0),COLORBLUE,LINETHICK2;
DRAWLINE(SJ26,LOW,SJ28,底0,1),COLORRED,LINETHICK2;
{洗盘}
XP1:=V=HHV(V,60) AND C<O;
XP2:=V<REF(V,1) AND H/C>1.04 AND C<O AND EXIST(H>HHV(L,60),5);
STICKLINE(XP2,O,C,2,0), COLORGREEN;
AH:=HHV(H,60);
AL:=LLV(L,60);
A0:=(AH-AL)/21;
{九转}
A01:=C>REF(C,4);
NT:=BARSLASTCOUNT(A01);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;
DRAWTEXT(NT=9,H+1.1*A0,'9'),COLORGREEN;
DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORGREEN;
DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORGREEN;
B01:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B01);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN;
DRAWTEXT(NT0=9,H+1.1*A0,'9'),COLORYELLOW;
DRAWTEXT(NT0=13,H+1.1*A0,'13'),COLORYELLOW;
DRAWTEXT(NT0=18,H+1.1*A0,'18'),COLORYELLOW;
[url=http://www.70822.com/soft/sort013/sort05/down-175791.html]均线筹码主图（通达信公式 主图 源码 测试图）[/url]