范一再精改主图指标 监控提示 可进场线

{范一再精改源码}

DIRECTION:=ABS(CLOSE-REF(C,10));

VOLATILITY:=SUM(ABS(CLOSE-REF(C,1)),10);

ER:=DIRECTION/VOLATILITY;

FASTEST:=2/3;

SLOWEST:=2/30;

SMOOTH:=ER*(FASTEST-SLOWEST)+SLOWEST;

SC:=POW(SMOOTH,2);

范:=DMA(C,SC),COLORMAGENTA,LINETHICK1;

范一:DMA(C,SC)+2*STD(DMA(C,SC),4),COLORRED,LINETHICK2;

DRAWTEXT(ISLASTBAR,范一,STRCAT(' 范一线上强:',CON2STR(范一,2))),COLORRED;

操作:=MA(C,3);

界:HHV(操作,15),LINETHICK1,COLORLIGREEN,DOTLINE;

DRAWTEXT(ISLASTBAR,界,STRCAT(' 减仓界:',CON2STR(界,2))),COLORLIGREEN;

STICKLINE(CROSS(界,C),C,O,3.4,0),COLORLIGREEN;

STICKLINE(CROSS(界,C),H,L,0.01,0),COLORLIGREEN;

DRAWTEXT(CROSS(界,C),H*1.015,'少&卖&点'),COLORLIGREEN;

ZLCM:=EMA(WINNER(CLOSE)*70,3);

SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);

ZSHTL:=SHCM/(ZLCM+SHCM)*100;

ZZLKP:=ZLCM/(ZLCM+SHCM)*100;

ZCMZL:=MA(ZLCM+SHCM,13);

ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);

ZSHJJ:=EMA(ZSHTL,89);

ZZLJJ:=EMA(ZZLKP,89);

DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);

RSVB:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;

KK1:=SMA(RSVB,10,1);

D1:=SMA(KK1,5,1);

KK:=INTPART(KK1);

DDB:=INTPART(D1);

TFXXS:=KK+DDB;

T1:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=1);

T2:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=0);

T3:=CONST( ZCMZL=REF(ZCMZL,1));

T4:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=1);

T5:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=0);

T12:=CONST( ZSHTL>90 );

T13:=CONST( ZZLKP>75 );

T14:=CONST(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );

T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );

T16:=CONST( CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1));

T17:=CONST( CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1));

T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );

DRAWTEXT_FIX(T1 ,0.87,0.4,0,'监控:主力增仓'),COLOR8080FF;

DRAWTEXT_FIX(T2 ,0.85,0.4,0,'监控:主力减仓'),COLORFFFF00;

DRAWTEXT_FIX(T3 ,0.85,0.4,0,'监控:多空平衡'),COLORGRAY;

DRAWTEXT_FIX(T4 ,0.85,0.4,0,'监控:主力回补'),COLORFF9933;

DRAWTEXT_FIX(T5 ,0.85,0.4,0,'监控:主力出逃'),COLORFFFF00;

DRAWTEXT_FIX(T12,0.84,0.36,0,'提示:筑底散兵坑 '),COLOR66FFCC;

DRAWTEXT_FIX(T13,0.84,0.36,0,'提示:铸顶风险区'),COLORFFFF00;

DRAWTEXT_FIX(T14,0.84,0.36,0,'提示:穿越主力 '),COLOR8080FF;

DRAWTEXT_FIX(T15,0.84,0.36,0,'提示:穿越主力 '),COLORYELLOW;

DRAWTEXT_FIX(T16,0.84,0.36,0,'提示:穿越散户 '),COLORGREEN;

DRAWTEXT_FIX(T17,0.84,0.36,0,'提示:全盘穿越 '),COLOR3399FF;

DRAWTEXT_FIX(T18,0.84,0.36,0,'提示:神秘黑洞 '),COLOR9966FF;

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

WH1:=IF(L=LLV(L,9),L,0);

WH2:=CONST(BARSLAST(WH1!=0));

WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));

WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);

WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));

WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);

WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORYELLOW,DOTLINE;

DRAWTEXT(ISLASTBAR,WH7,STRCAT('可进场线:',CON2STR(WH7,2))),COLORYELLOW;

原理解析：
{范一再精改源码}
DIRECTION赋值:收盘价-10日前的C的绝对值
VOLATILITY赋值:SUM(收盘价-1日前的C的绝对值,10)
ER赋值:DIRECTION/VOLATILITY
FASTEST赋值:2/3
SLOWEST赋值:2/30
SMOOTH赋值:ER*(FASTEST-SLOWEST)+SLOWEST
SC赋值:POW(SMOOTH,2)
范赋值:DC的SC日简单移动平均,画洋红色,LINETHICK1
范一:DC的SC日简单移动平均+2*STD(DC的SC日简单移动平均,4),画红色, 线宽为2
DRAWTEXT(ISLASTBAR,范一,STRCAT(' 范一线上强:',CON2STR(范一,2))),画红色
操作赋值:C的3日简单移动平均
输出界:15日内操作最高值,LINETHICK1,COLORLIGREEN,DOTLINE
DRAWTEXT(ISLASTBAR,界,STRCAT(' 减仓输出界:',CON2STR(界,2))),COLORLIGREEN
STICKLINE(界上穿C,C,O,3.4,0),COLORLIGREEN
STICKLINE(界上穿C,H,L,0.01,0),COLORLIGREEN
DRAWTEXT(界上穿C,H*1.015,'少&卖&点'),COLORLIGREEN
ZLCM赋值:EMA(收盘价计算的获利盘比例*70,3)
SHCM赋值:EMA((收盘价*1.1计算的获利盘比例-WINNER(收盘价*0.9))*80,3)
ZSHTL赋值:SHCM/(ZLCM+SHCM)*100
ZZLKP赋值:ZLCM/(ZLCM+SHCM)*100
ZCMZL赋值:ZLCM+SHCM的13日简单移动平均
ZZNTS赋值:上次ZSHTL<90 AND 1日前的ZSHTL>90距今天数
ZSHJJ赋值:ZSHTL的89日指数移动平均
ZZLJJ赋值:ZZLKP的89日指数移动平均
DKB赋值:IF(ZZLKP-1日前的ZZLKP>ZSHTL-1日前的ZSHTL,1,0)
RSVB赋值:(收盘价-15日内最低价最低值)/(15日内最高价最高值-15日内最低价最低值)*100
RSVB的10日[1日权重]移动平均
KK1的5日[1日权重]移动平均
KK赋值:INTPART(KK1)
DDB赋值:INTPART(D1)
TFXXS赋值:KK+DDB
T1赋值:CONST( ZCMZL>1日前的ZCMZL AND DKB=1)
T2赋值:CONST( ZCMZL>1日前的ZCMZL AND DKB=0)
T3赋值:CONST( ZCMZL=1日前的ZCMZL)
T4赋值:CONST( ZCMZL<1日前的ZCMZL AND DKB=1)
T5赋值:CONST( ZCMZL<1日前的ZCMZL AND DKB=0)
T12:=CONST( ZSHTL>90 )
T13:=CONST( ZZLKP>75 )
T14:=CONST(ZCMZL上穿ZZLJJ AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>1日前的ZZLJJ AND ZCMZL>1日前的ZCMZL )
T15:=CONST(ZCMZL上穿ZZLKP AND ZZLKP>ZZLJJ AND ZZLKP10 AND ZZLJJ>1日前的ZZLJJ AND ZCMZL>1日前的ZCMZL )
T16:=CONST( ZCMZL上穿ZSHTL AND ZSHTL>ZZLKP AND ZCMZL>1日前的ZCMZL)
T17:=CONST( ZCMZL上穿100 AND ZCMZL>1日前的ZCMZL)
T18:=CONST(1日前的ZSHTL>90 AND ZSHTL<90 )
当满足条件T1 时,在横轴0.87纵轴0.4位置书写文字
当满足条件T2 时,在横轴0.85纵轴0.4位置书写文字
当满足条件T3 时,在横轴0.85纵轴0.4位置书写文字
当满足条件T4 时,在横轴0.85纵轴0.4位置书写文字
当满足条件T5 时,在横轴0.85纵轴0.4位置书写文字
当满足条件T12时,在横轴0.84纵轴0.36位置书写文字
当满足条件T13时,在横轴0.84纵轴0.36位置书写文字
当满足条件T14时,在横轴0.84纵轴0.36位置书写文字
当满足条件T15时,在横轴0.84纵轴0.36位置书写文字
当满足条件T16时,在横轴0.84纵轴0.36位置书写文字
当满足条件T17时,在横轴0.84纵轴0.36位置书写文字
当满足条件T18时,在横轴0.84纵轴0.36位置书写文字
MID赋值:(3*收盘价+最低价+开盘价+最高价)/6
WH1赋值:IF(L=9日内L最低值,L,0)
WH2赋值:CONST(上次WH1!=0距今天数)
WH3赋值:CONST(IF(WH2=0,H,WH2日前的H))
WH4赋值:CONST(REF(上次H>WH3距今天数,WH2+1)+WH2+1)
WH5赋值:CONST(IF(WH4=0,H,WH4日前的H))
WH6赋值:CONST(REF(上次H>WH5距今天数,WH4+1)+WH4+1)
输出WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,WH6日前的H)),DRAWNULL),画黄色,DOTLINE
DRAWTEXT(ISLASTBAR,WH7,STRCAT('可进场线:',CON2STR(WH7,2))),画黄色