数字181 完整数学分析（结合殷保华181周线背景）
一、纯粹基础数论性质
1. 181 是质数（素数）
只能被 1 和自身整除，无其他因数。
除数：{1,181}
2. 回文质数
正反书写都是 1-8-1：181，属于数字理论里特殊一类；
3. 孪生质数
相邻质数 179、181，二者相差2；
4. 奇数，无法被 2、3、5、7、11、13 整除
√181≈13.45，验证到13即可判定为质数。
5. 数字和：1+8+1=10
⚠重点：181不属于标准斐波那契数列
斐波那契：89，144，233……中间没有181。
网上很多传言“属于斐波那契”是以讹传讹。
二、股市周期换算角度（殷保华体系核心）
市场流传公式：
40月 ≈ 181周 ≈ 905交易日
演算验证：
1个月平均4.525周
40 × 4.525 = 181周
每周5个交易日：181 ×5 = 905日
这就是181数字最现实来源：
殷保华想要一根40个月长期牛熊分界线，换算周线得到181，并不是凭空挑选神秘数字。
三、江恩理论角度澄清（非常关键）
1. 原版江恩著作里没有181这个周期数字！
江恩常用：30、45、60、90、120、144、180、240、360。
江恩经典周期是180（360一半，圆周1/2）
👉推测：殷保华复盘A股历史，在180基础上微调得到181，适配国内早期市场。
2. 180（理论圆周对半） vs 181（实战复盘优化）
很多人混淆：江恩180周期 ≠ 殷保华181周线。
四、和殷保华其他密码线数字对比
日线核心：14，25，144，453
周线核心：33，99，181，272
规律：
- 25、33、99 偏小，中短周期
- 181、272属于长期趋势分水岭
质数数字（181）用来做长期均线，优点：
不会和大量常见均线（120、180、200）重合，减少主力利用大众通用均线制造假突破。
五、实战层面数学逻辑（为什么质数均线有人推崇）
1. 大众通用均线：60，120，180，200（整齐整数），主力容易刻意做线诱多诱空；
2. 181质数、非整数，属于小众参数；早期软件普及度低，人为骗线成本更高；
客观提醒：这是经验假说，不是数学定理，不存在必然有效。
六、总结梳理
1. 本源：40自然月换算周线得到181，是现实周期换算产物；
2. 数学属性：回文质数，不在斐波那契数列；
3. 渊源：不是江恩原生数字，是殷保华结合A股复盘，由180微调演化而来；
4. 优势：区别市场通用整数均线，一定程度规避标准化骗线；
5. 重要提醒：数字本身没有“魔力”，有效性来源于长期趋势成本均线（EMA）+不除权K线规则+严格交易纪律，不要神话数字。
如果你需要，我可以写一段【周线收盘价站稳/回踩181周EMA】通达信选股公式。
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O;
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O;
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=IF(O>REF(C,1),(REF(C,1)+C)/2,(O+C)/2);
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,M) AND EXIST(ZT1,M) AND DIF>=DEA AND RANGE(缩量,0,1) AND 流通,缩量,DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
连续缩量2:IF(ISVALID(连续缩量1) AND C>=MA(C,20),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
V1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
V2:=IF(REF(MONTH=12,1),MONTH<REF(MONTH,1),MONTH>REF(MONTH,1));
V3:=BARSLAST(V2);
V0:=COUNT(V1,V3+1);
近一年:COUNT(ZT,250),NODRAW;
今年:COUNT(V1,BARSLAST(V=V#YEAR)+1),NODRAW;
１:V0;
２:REF(V0,SUMBARS(V2,1));
３:REF(V0,SUMBARS(V2,2));
４:REF(V0,SUMBARS(V2,3));
５:REF(V0,SUMBARS(V2,4));
６:REF(V0,SUMBARS(V2,5));
７:REF(V0,SUMBARS(V2,6));
８:REF(V0,SUMBARS(V2,7));
９:REF(V0,SUMBARS(V2,8));
１０:REF(V0,SUMBARS(V2,9));
１１:REF(V0,SUMBARS(V2,10));
１２:REF(V0,SUMBARS(V2,11));
１３:REF(V0,SUMBARS(V2,12));
１４:REF(V0,SUMBARS(V2,13));
１５:REF(V0,SUMBARS(V2,14));
细分行业:DRAWTEXT(1,0,HYBLOCK);
{涨停价一半划线并标注价格最新修改版}
ZT0:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR6:=BARSLAST(ZT0);
VAR7:=(MIN(C,MIN(O,REF(C,1)))+MAX(C,H))/2;
DRAWSL(PERIOD=5,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(PERIOD=5 AND REFX(ZT0,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O;
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O;
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=(MIN(C,MIN(O,REF(C,1)))+MAX(C,H))/2;
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,55) AND EXIST(ZT1,55) AND DIF>=DEA AND RANGE(缩量,0,0.618) AND 流通,缩量,DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
高低量比:IF(ISVALID(连续缩量1),V/REF(V,高量天数)*100,DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
连续缩量2:IF(ISVALID(连续缩量1) AND C>=MA(C,20),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
十字星:IF(ISVALID(连续缩量1) AND C>=MA(C,20),(C/O-1)*100,DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
{倍量后连续缩量排序好低量群}
X:=REF(C,1)<REF(O,1) AND C>O AND ZF<3.82;
BT:=V/REF(V,1)>=2 AND C>O AND C>REF(C,1) AND REFX(V,1)/V<0.9;
NUM:BARSLAST(BT);
BTV:=REF(V,NUM);
NUM2:=COUNT(V<BTV*0.382,NUM);
缩量统计:IF(C<20 AND DIF>=REF(DIF,1),NUM2/NUM*100,DRAWNULL);
{涨停价一半划线并标注价格最新版}
ZT0:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR6:=BARSLAST(ZT0);
VAR7:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
DRAWSL(PERIOD=5,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(PERIOD=5 AND REFX(ZT0,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
UPPER:=(1+9/100)*MA(CLOSE,10);
LOWER:=(1-11/100)*MA(CLOSE,10);
ENE1:=(UPPER+LOWER)/2;
ENEJD:=ATAN((ENE1/REF(ENE1,1)-1)*100)*180/3.1416;
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O;
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O;
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,55) AND EXIST(ZT1,55) AND DIF>=DEA AND RANGE(缩量,0,0.618) AND 流通 AND BETWEEN(C/ENE1,0.99,1.0236) AND ENEJD>=0,缩量,DRAWNULL);
BY:=C>O AND V/REF(V,1)>=2;
小倍阳:IF(ISVALID(连续缩量1),COUNT(BY,35),DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
高低量比:IF(ISVALID(连续缩量1),V/REF(V,高量天数)*100,DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
连续缩量2:IF(ISVALID(连续缩量1) AND C>=MA(C,20),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
十字星:IF(ISVALID(连续缩量1) AND C>=MA(C,20),(C/O-1)*100,DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
{倍量后连续缩量排序好低量群}
X:=REF(C,1)<REF(O,1) AND C>O AND ZF<3.82;
BT:=V/REF(V,1)>=2 AND C>O AND C>REF(C,1) AND REFX(V,1)/V<0.9;
NUM:=BARSLAST(BT);
BTV:=REF(V,NUM);
NUM2:=COUNT(V<BTV*0.382,NUM);
缩量统计:IF(C<20 AND DIF>=REF(DIF,1),NUM2/NUM*100,DRAWNULL);
{黄金柱 向右横线+价格标注 修正版}
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLAST(HJZ1);
HJZ_PRICE:=REF(C,HJZ2);
STICKLINE(HJZ1,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ1,OPEN,CLOSE,0.1,0),COLORRED;
DRAWSL(1,HJZ_PRICE, 0, 1, 0),COLORYELLOW;
DRAWTEXT(REFX(HJZ1,1) OR HJZ1 OR ISLASTBAR OR CURRBARSCOUNT=1, HJZ_PRICE, VAR2STR(HJZ_PRICE,2)),COLORYELLOW,DRAWABOVE;
UPPER:=(1+9/100)*MA(CLOSE,10);
LOWER:=(1-11/100)*MA(CLOSE,10);
ENE1:=(UPPER+LOWER)/2;
ENEJD:=ATAN((ENE1/REF(ENE1,1)-1)*100)*180/3.1416;
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000 AND FINANCE(38)>0;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,55) AND EXIST(ZT1,55) AND DIF>=DEA AND RANGE(缩量,0,0.618) AND 流通 AND BETWEEN(C/ENE1,0.98,1.0236),缩量,DRAWNULL);
BY:=C>O AND V/REF(V,1)>=2;
小倍阳:IF(ISVALID(连续缩量1),COUNT(BY,35),DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
高低量比:IF(ISVALID(连续缩量1),V/REF(V,高量天数)*100,DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
连续缩量2:IF(ISVALID(连续缩量1) AND C>=MA(C,20),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
十字星:IF(ISVALID(连续缩量1) AND C>=MA(C,20),(C/O-1)*100,DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
{倍量后连续缩量排序好低量群}
X:=REF(C,1)<REF(O,1) AND C>O AND ZF<3.82;
BT:=V/REF(V,1)>=2 AND C>O AND C>REF(C,1) AND REFX(V,1)/V<0.9;
NUM:=BARSLAST(BT);
BTV:=REF(V,NUM);
NUM2:=COUNT(V<BTV*0.382,NUM);
缩量统计:IF(C<20 AND DIF>=REF(DIF,1),NUM2/NUM*100,DRAWNULL);
UPPER:=(1+9/100)*MA(CLOSE,10);
LOWER:=(1-11/100)*MA(CLOSE,10);
ENE1:=(UPPER+LOWER)/2;
ENEJD:=ATAN((ENE1/REF(ENE1,1)-1)*100)*180/3.1416;
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000 AND FINANCE(38)>0;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,55) AND EXIST(ZT1,55) AND DIF>=DEA AND RANGE(缩量,0,0.618) AND 流通,缩量,DRAWNULL);{ AND BETWEEN(C/ENE1,0.98,1.0236)}
BY:=C>O AND V/REF(V,1)>=2;
小倍阳:IF(ISVALID(连续缩量1),COUNT(BY,35),DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
高低量比:IF(ISVALID(连续缩量1),V/REF(V,高量天数)*100,DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
连续缩量2:IF(ISVALID(连续缩量1) AND C>=MA(C,20),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
十字星:IF(ISVALID(连续缩量1) AND C>=MA(C,20),(C/O-1)*100,DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
{倍量后连续缩量排序好低量群}
X:=REF(C,1)<REF(O,1) AND C>O AND ZF<3.82;
BT:=V/REF(V,1)>=2 AND C>O AND C>REF(C,1) AND REFX(V,1)/V<0.9;
NUM:=BARSLAST(BT);
BTV:=REF(V,NUM);
NUM2:=COUNT(V<BTV*0.382,NUM);
缩量统计:IF(C<20 AND DIF>=REF(DIF,1),NUM2/NUM*100,DRAWNULL);
{顶底趋势浪自动画线}
A1:=REF(HIGH,10)=HHV(HIGH,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
D1:=FILTER(C1,10);{高点}
A2:=REF(LOW,10)=LLV(LOW,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
D2:=FILTER(C2,10);{低点}
E1:=(REF(LLV(LOW,2*10),1)+REF(HHV(HIGH,2*10),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2)));
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);{过滤后高点}
浪折线上:= DRAWLINE(LD,L,HD,H,0),COLORRED,LINETHICK1;
浪折线下:= DRAWLINE(HD,H,LD,L,0),COLORGREEN,LINETHICK1;
J1:=BACKSET(ISLASTBAR ,MIN(BARSLAST(HD),BARSLAST(LD))+1);
J2:=J1>REF(J1,1);
新浪顶底线:= DRAWLINE(J2,IF(HD,H,L),ISLASTBAR ,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORYELLOW;
{每个高点画水平线}
WR1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); WS1:=WR1>REF(WR1,1);
WR2:=BACKSET(WS1,REF(BARSLAST(HD),1)+2); WS2:=WR2>REF(WR2,1);
WR3:=BACKSET(WS2,REF(BARSLAST(HD),1)+2); WS3:=WR3>REF(WR3,1);
WR4:=BACKSET(WS3,REF(BARSLAST(HD),1)+2); WS4:=WR4>REF(WR4,1);
WR5:=BACKSET(WS4,REF(BARSLAST(HD),1)+2); WS5:=WR5>REF(WR5,1);
WT1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); WU1:=WT1>REF(WT1,1);
WT2:=BACKSET(WU1,REF(BARSLAST(LD),1)+2); WU2:=WT2>REF(WT2,1);
WT3:=BACKSET(WU2,REF(BARSLAST(LD),1)+2); WU3:=WT3>REF(WT3,1);
WT4:=BACKSET(WU3,REF(BARSLAST(LD),1)+2); WU4:=WT4>REF(WT4,1);
一高:REF(H,BARSLAST(WS1>REF(WS1,1))),DOTLINE,COLORRED;
二高:REF(H,BARSLAST(WS2>REF(WS2,1))),DOTLINE,COLORYELLOW;
三高:REF(H,BARSLAST(WS3>REF(WS3,1))),DOTLINE,COLORGREEN;
四高:REF(H,BARSLAST(WS4>REF(WS4,1))),DOTLINE,COLORCYAN;
五高:REF(H,BARSLAST(WS5>REF(WS5,1))),DOTLINE,COLORMAGENTA;
{标注每个高低点价格}
VAR1:=DATE<>REF(DATE,1);
DRAWTEXT(VAR1 AND WS1,H,VAR2STR(H,2)),COLORRED,DRAWABOVE;
DRAWTEXT(VAR1 AND WS2,H,VAR2STR(H,2)),COLORYELLOW,DRAWABOVE;
DRAWTEXT(VAR1 AND WS3,H,VAR2STR(H,2)),COLORGREEN,DRAWABOVE;
DRAWTEXT(VAR1 AND WS4,H,VAR2STR(H,2)),COLORCYAN,DRAWABOVE;
DRAWTEXT(VAR1 AND WS5,H,VAR2STR(H,2)),COLORMAGENTA,DRAWABOVE;
DRAWTEXT(VAR1 AND WU1,L*0.995,VAR2STR(L,2)),COLORMAGENTA;
DRAWTEXT(VAR1 AND WU2,L*0.995,VAR2STR(L,2)),COLORYELLOW;
DRAWTEXT(VAR1 AND WU3,L*0.995,VAR2STR(L,2)),COLORGREEN;
DRAWTEXT(VAR1 AND WU4,L*0.995,VAR2STR(L,2)),COLORRED;
{每个交叉点画竖线}
MA22:MA(C,22),COLORMAGENTA;
DRAWSL(CROSS(MA22,一高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,二高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,三高),L,10000,360,1),COLORYELLOW;
DRAWSL(CROSS(MA22,四高),L,10000,360,1),COLORYELLOW;
MA5:EMA(C,5),COLORWHITE;
MA10:EMA(C,10),COLORYELLOW;
MA55:EMA(C,55),COLORGREEN;
MA120:EMA(C,120),COLORGRAY;
MA233:EMA(C,233),COLORBLUE;
EMA181:IF(PERIOD=6,EMA(C,181),DRAWNULL),COLORRED;
{画涨停跌停涨停试盘K线并标注字}
ZT1:=IF(FINANCE(3)=3 OR FINANCE(3)=4,(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H),(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H));
DT1:=IF(FINANCE(3)=3 OR FINANCE(3)=4,(C<=DTPRICE(REF(CLOSE,1),0.2) AND C=L),(C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L));
SZT1:=H=ZTPRICE(REF(C,1),0.1) AND C<>H;
YUZ:=O/REF(C,1)>1.05 AND C<O AND C>REF(C,1);
STICKLINE(ZT1,C,O,-1,0),COLORRED;
STICKLINE(DT1,C,O,-1,0),COLORGREEN;
STICKLINE(YUZ,C,O,-1,0),COLORGREEN;
{STICKLINE(SZT1,C,O,-1,0),COLORRED;}
DRAWTEXT(ZT1 AND PERIOD=5,H,'涨'),COLORYELLOW,DRAWABOVE;
DRAWTEXT(DT1 AND PERIOD=5,H,'跌'),COLORGREEN,DRAWABOVE;
DRAWTEXT(YUZ AND PERIOD=5,H,'预'),COLORGREEN,DRAWABOVE;
DRAWTEXT(SZT1 AND PERIOD=5,H,'试'),COLORMAGENTA,DRAWABOVE;
{K线图显示分时图的均价线}
B:=CURRBARSCOUNT;
BA:=DAY<>REF(DAY,1);
BB2:=BARSLAST(BA)+1;
B3:=MA(C,BB2);
B4:=SUM(AMO,BB2)/SUM(VOL,BB2)/100;
B5:=IF(CAPITAL>0,B4,B3);
均价1:=IF(B<=CONST(BB2) AND (PERIOD=1 OR PERIOD=0 OR PERIOD=8),B5,DRAWNULL),COLORYELLOW,LINETHICK2;
均价:IF(B<=48 AND (PERIOD=1 OR PERIOD=0 OR PERIOD=8),B4,DRAWNULL),COLORYELLOW,LINETHICK2;
{涨停价一半划线并标注价格}
ZT0:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR6:=BARSLAST(ZT0);
VAR7:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
DRAWSL(PERIOD=5,REF(VAR7,VAR6),0,1,0),COLORYELLOW;
DRAWTEXT(PERIOD=5 AND REFX(ZT0,1) OR ISLASTBAR,REF(VAR7,VAR6),VAR2STR(REF(VAR7,VAR6),2)),COLORYELLOW,DRAWABOVE;
{黄金柱 向右横线+价格标注 修正版}
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLAST(HJZ1);
HJZ_PRICE:=REF(C,HJZ2);
STICKLINE(HJZ1,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(HJZ1,OPEN,CLOSE,0.1,0),COLORRED;
DRAWSL(1,HJZ_PRICE, 0, 1, 0),COLORYELLOW;
DRAWTEXT(REFX(HJZ1,1) OR ISLASTBAR OR CURRBARSCOUNT=1, HJZ_PRICE, VAR2STR(HJZ_PRICE,2)),COLORYELLOW,DRAWABOVE;
{画昨日收盘价线}
RI1:=DATE<>REF(DATE,1);
RI2:=BARSLAST(RI1)+1;
RI3:=REF(C,RI2);
昨天:STICKLINE(PERIOD=1 AND RI2,RI3,RI3,4,1),COLORWHITE;
{主图标注日期星期}
星期几:=VARCAT(' 星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',''))))));
日期:=VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(YEAR,0),'年'),VAR2STR(MONTH,0)),'月'),VAR2STR(DAY,0)),'日'),星期几);
DRAWTEXT_FIX(ISLASTBAR,0.85,1,0,日期),COLORYELLOW;
{易变盘时间画箭头}
DRAWICON(TIME=1305, L*0.998, 1);
板块涨幅:(HY_INDEXC-REF(HY_INDEXC,1))/REF(HY_INDEXC,1)*100;
板块涨幅:(HY_INDEXC/REF(HY_INDEXC,1)-1)*100;
板块涨幅: (HY_INDEXC-REF(HY_INDEXC,1))/REF(HY_INDEXC,1)*100;
板块涨幅: (HY_INDEXC/REF(HY_INDEXC,1)-1)*100;
UPPER:=(1+9/100)*MA(CLOSE,10);
LOWER:=(1-11/100)*MA(CLOSE,10);
ENE1:=(UPPER+LOWER)/2;
ENEJD:=ATAN((ENE1/REF(ENE1,1)-1)*100)*180/3.1416;
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000 AND FINANCE(38)>0;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:=(MIN(C,MIN(O,REF(C,1)))+H)/2;
一半:=REF(VAR2,VAR1);
M:=21;
缩量:=IF(HHVBARS(V,M)>2,COUNT(V>REF(V,1),HHVBARS(V,M))/HHVBARS(V,M),DRAWNULL);
连续缩量1:IF(EXIST(HJZ1,55) AND EXIST(ZT1,55) AND DIF>=DEA AND RANGE(缩量,0,0.618) AND 流通,缩量,DRAWNULL);{ AND BETWEEN(C/ENE1,0.98,1.0236)}
BY:=C>O AND V/REF(V,1)>=2;
小倍阳:IF(ISVALID(连续缩量1),COUNT(BY,35),DRAWNULL);
高量天数:IF(ISVALID(连续缩量1),HHVBARS(V,M),DRAWNULL);
高量后缩量:IF(ISVALID(连续缩量1),REF(V,高量天数-1)/REF(V,高量天数),DRAWNULL);
月涨幅:IF(ISVALID(连续缩量1),ZF#MONTH,DRAWNULL);
MACD数:IF(ISVALID(连续缩量1),MACDD,DRAWNULL);
明天涨幅:IF(ISVALID(连续缩量1),REFX(ZF,1),DRAWNULL);
离横线距离:IF(ISVALID(连续缩量1),IF(ABS(HJZC-C) < ABS(一半-C), (C/HJZC-1)*100, (C/一半-1)*100),DRAWNULL);
十字星:IF(ISVALID(连续缩量1) AND C>=MA(C,20),(C/O-1)*100,DRAWNULL);
安全分:IF(ISVALID(连续缩量1),SAFESCORE,DRAWNULL);
板块涨幅: IF(ISVALID(连续缩量1),(HY_INDEXC/REF(HY_INDEXC,1)-1)*100,DRAWNULL);
板块名: DRAWTEXT(1,0,HYBLOCK);
流通:=C<12 AND CAPITAL<16180000 AND FINANCE(40)<16180000000 AND FINANCE(38)>0;
SPJ:=C<=REFX(C,1) AND C<=REFX(C,2) AND C<=REFX(C,3);
CJL:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3;
CJL1:=V>=(REFX(V,1)+REFX(V,2)+REFX(V,3))/3 AND V/REF(V,1)>=2 AND V/REF(V,1)<5;
ZDJ:=O<=REFX(L,1) AND O<=REFX(L,2) AND O<=REFX(L,3);
HJZ1:=SPJ AND CJL AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZ2:=BARSLASTS(HJZ1,1);
HJZ3:=SPJ AND CJL1 AND ZDJ AND C>O AND ISVALID(REFX(V,3));
HJZC:=REF(C,HJZ2);
HJZ4:=BARSLASTS(HJZ3,1);
HJZ5:=REF(C,HJZ4);
DIF:=EMA(C,12)-EMA(C,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;
MACDD:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
ZT1:=IF(FINANCE(3)=1,H>=ZTPRICE(REF(CLOSE,1),0.1),H>=ZTPRICE(REF(CLOSE,1),0.2));
VAR1:=BARSLAST(ZT1);
VAR2:= (MIN(C,MIN(O,REF(C,1)))+H)/2;
一半:=REF(VAR2,VAR1);
距离:IF(流通 AND HJZ2<35 AND BETWEEN(COUNT(ZT1,HJZ2),1,2),(C/HJZC-1)*100,DRAWNULL);
数MACD:IF(ISVALID(距离),MACDD,DRAWNULL);
放量缩量:IF(流通 AND HJZ2<35 AND HHVBARS(V,21)<>0,REF(V,HHVBARS(V,21)-1)/REF(V,HHVBARS(V,21)),DRAWNULL);
缩量距离:IF(放量缩量<0.618,(C/HJZC-1)*100,DRAWNULL);
板块名:DRAWTEXT(ISVALID(距离),0,HYBLOCK);
板块涨幅:IF(ISVALID(距离),(HY_INDEXC/REF(HY_INDEXC,1)-1)*100,DRAWNULL);
板块代码:DRAWTEXT(ISVALID(距离),0,HYZSCODE);