{轴线 分界线}
stICKLINE(1,0,0.5,0,1),COLORWHITE;{0分界线}
STICKLINE(1,75.3,75.7,0,1),COLORRED;{76分界线}
STICKLINE(1,78.7,79,0,1),COLORRED;{80分界线}
STICKLINE(1,100,100.8,0,0),COLORYELLOW;{主力线---100分界线}
STICKLINE(1,95,96,0,0),COLORYELLOW; {主力线---95分界线}
STICKLINE(1,90,91,0,0),COLORCYAN; {主力线---90分界线}
{1. 总司令-趋势线}
LCZSL:=REF(CLOSE,1);rsi5:=((SMA(maX((CLOSE-LCZSL),0),5,1)/SMA(Abs((CLOSE-LCZSL)),5,1))*100); TRT:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((LOW-REF(CLOSE,1)))),10);
HD:=(HIGH-REF(HIGH,1));LD:=(REF(LOW,1)-LOW);DMP:=SUM(IF(((HD> 0) AND (HD>LD)),HD,0),10); DMM:=SUM(IF(((LD >0) AND (LD>HD)),LD,0),10);pdi:=((DMP*100)/TR);mdi:=((DMM*100)/TR);
ADX:=MA(((ABS((MDI-PDI))/(MDI+PDI))*100),5);AV:=(RSI5+ADX); DXR:=(((ADX+REF(ADX,5))/2)+RSI5);wr10:=((100*(HHV(HIGH,10)-CLOSE))/(HHV(HIGH,10)-LLV(LOW,10)));NEWvol:=(RSI5-WR10);
阶段底部:=(AV+NEWVOL)/2; {因整合到一幅图故除以2}
总司令:LLV(阶段底部,1),COLORBLUE; {总司令线}
草地:(阶段底部 <=-15),COLORGREEN,NODRAW; {底区间}
STICKLINE((阶段底部 <=0),-0.3,总司令,0,0),COLORBLUE; {重要-底区间}
STICKLINE((阶段底部 <=0),-0.1,0.3,0.4,0),COLORBLUE; {重要-底区间}
STICKLINE((阶段底部 <=-15),-15.3,总司令,0.6,0),COLORBLUE;{重要-底区间}
STICKLINE(草地,-1,-3,0.6,0),COLORGREEN; {重要-底区间}
STICKLINE((REF(总司令,1)>95 AND REF(总司令,1)>REF(总司令,2) AND 总司令95 小顶部点-下拐}
STICKLINE((REF(总司令,1)>95 AND REF(总司令,1)>REF(总司令,2) AND 总司令95 小顶部点-下拐}
STICKLINE((REF(总司令,1)>115) AND REF(总司令,1)>REF(总司令,2) AND 总司令115 大顶卖点-下拐}
STICKLINE(1,115,115.8,0,0),COLORBLUE;{总司令 115分界线}
{2. 获利筹码}
情报:WINNER(CLOSE)*100,COLORYELLOW;{获利筹码线}
STICKLINE(1,95.3,100,0,0),COLOR363636; {高部区间宽带}
STICKLINE(情报>0,情报*0.95,0,0,0),COLOR363636;
STICKLINE(情报>6 AND REF(情报*0.95,1)<6,5,6.2,0.1,0),COLORYELLOW; {提醒}
STICKLINE(1,5.7,6,0,0),COLORYELLOW;{获利筹码--6分界线}
{4. cci 柱状红绿提示}
STICKLINE(1,20.8,20,0,0),COLORWHITE; {CCI-200顶部区间宽带!重要}
STICKLINE(1,15.8,15,0,0),COLOR363636; {CCI-150顶部区间宽带!重要}
STICKLINE(1,-15.3,-20,0,0),COLOR363636; {CCI- -150~-200底部区间宽带!重要}
STICKLINE(1,-15.8,-15,0,0),COLORWHITE; {CCI-150顶部区间宽带!重要}
STICKLINE(1,-20.8,-20,0,0),COLORWHITE; {CCI-200顶部区间宽带!重要}
毛主席:CCI/10,COLORWHITE; {CCI线,除以10}
CCI3:=EMA(CCI,3);DIFFCCI:=MA(CCI3,2);
AAA:=CCI BBB:=CCI>REF(CCI,1); STICKLINE(BBB,-45,-42,0,0),COLORRED; {CCI大于前一日提示} {柱状图}
CCC:=CCI3>DIFFCCI; STICKLINE(CCC,-45,-48,0,0),COLORRED; {CCI上升区间-可靠} {柱状图}
DDD:=CCI3 STICKLINE(CCI<-150,-42,-44,0.8,0),COLORWHITE; {提示-CCI 底区间} {柱状图}
STICKLINE((crOSS(CCI,-150)),-45,-42,1,0),COLORRED; {提示-CCI CROSS -150跨越底区间} {柱状图}
STICKLINE((CROSS(150,CCI)),-45,-42,1,0),COLORGREEN;{提示-CCI CROSS 150 下穿顶区间} {柱状图}
STICKLINE(CCI<-200,-20,毛主席,0.4,0),COLORWHITE; {重要提醒-CCI大底部区间-表示在CCI线上}
STICKLINE(CCI> 200, 20,毛主席,0.4,0),COLORWHITE; {重要提醒-CCI大顶部区间-表示在CCI线上}
{3. 红军主力线-筹码分布}
主力:MA(WINNER(CLOSE*0.95)*100,3),COLORCYAN; {重要-主力线}
VAR2:=1/WINNER(CLOSE); VAR3:=MA(CLOSE,13); VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100); {涨跌幅偏离}
VAR5:=LLV(LOW,75); VAR6:=HHV(HIGH,75); VAR7:=(VAR6-VAR5)/100; VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1); VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);
VARA:=3*VAR8-2*SMA(VAR8,15,1); VARB:=3*VAR9-2*SMA(VAR9,15,1); VARC:=100-VARB;
空袭:=(100-IF(VAR2>5,IF(VAR2<100,VAR2,VAR4-10),0));
VARD:=主力>VAR4; VARE:=REF(LOW,1)*0.9; VARF:=LOW*0.9;
VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL; VAR11:=EMA(VAR10,30); VAR12:=CLOSE-REF(CLOSE,1);
VAR13:=MAX(VAR12,0); VAR14:=ABS(VAR12); VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100; VAR17:=BARSCOUNT(CLOSE); VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100; VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1); VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1); VAR1E:=SMA(VAR1D,3,1); VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
红河谷:VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50,COLORRED,NODRAW;
雪山:VARD,COLORWHITE,NODRAW;
STICKLINE(红河谷,75,80,0.6,0),COLORRED; {红河谷-基本面好会大涨--长红针}
STICKLINE(红河谷,60,80,0,0),COLORRED; {红河谷-基本面好会大涨--长红针}
STICKLINE(主力>REF(主力,1),-53,-55,1,0),COLORRED; {柱状图}
STICKLINE(主力>REF(主力,1) AND REF(主力,1)<3,-53,-55,1,0),COLORRED; {柱状图 粗柱体：表示主力在低位}
STICKLINE(主力<=REF(主力,1),-53,-55,1,0),COLORGREEN;{柱状图}
STICKLINE(VARD,89,91,0.5,0),COLORWHITE; {雪山--警戒--VAR4与主力线交叉区域}
STICKLINE(VARD AND REF(主力,1)>REF(主力,2) AND 主力88,107,110,0.6,0),COLORCYAN; {大顶信号}
STICKLINE(VARD AND REF(主力,1)>REF(主力,2) AND 主力88,102,110,0,0),COLORCYAN; {大顶信号}
STICKLINE(REF(主力,1)>88 AND 主力REF(主力,2),105,110,0.5,0),COLORCYAN; {(主力,1)>88顶信号}
STICKLINE(REF(主力,1)>88 AND 主力REF(主力,2),102,110,0,0),COLORCYAN; {(主力,1)>88顶信号}
{日月CCI超跌大底将来}
TJ11:=MA(CCI,3);TJ22:=TJ11<=-190 OR REF(CCI,1)<=-190;
日落:TJ22>REF(TJ22,1) AND 主力<3,COLORWHITE,NODRAW; {第二天}
STICKLINE(日落,-42,-44,1,0),COLORWHITE;{提示-CCI超跌大底将来} {柱状图}
STICKLINE(日落,73,75,1,0),COLORWHITE;{提示-CCI超跌大底将来} {80线提示点}
{5. 日月bias超跌}
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;乖离:=MA(BIAS,3);
日出:CROSS(BIAS,乖离) AND 乖离<-9,COLORRED,NODRAW;
STICKLINE(日出,75,77,1,0),COLORRED; {BIAS超跌}
{6. RSI 柱状红绿提示}
赤水深:RSI,COLORYELLOW,NODRAW;
RSIMA3:=EMA(RSI,3);DIFFRSI:=EMA(RSIMA3,2);
AA:=RSI>=REF(RSI,1); STICKLINE(AA,-41,-35,0,0),COLORRED; {RSI大于上一日} {柱状图}
BB:=RSI<=REF(RSI,1); STICKLINE(BB,-41,-35,0,0),COLORGREEN; {RSI小于上一日} {柱状图}
CC:=CROSS(RSIMA3,DIFFRSI);STICKLINE(CC,-41,-38,0,0),COLORRED; {RSIMA3上穿DIFF}{柱状图}
DD:=CROSS(DIFFRSI,RSIMA3);STICKLINE(DD,-41,-38,0,0),COLORGREEN; {RSIMA3下穿DIFF}{柱状图}
STICKLINE(RSI<20,-35,-37,1,0),COLORWHITE; {提示-RSI 底区间} {柱状图}
STICKLINE((CROSS(RSI,20)),-35,-38,1,0),COLORRED; {提示-RSI CROSS 20 跨越底区间} {柱状图}
STICKLINE((CROSS(80,RSI)),-35,-38,1,0),COLORGREEN; {提示-RSI CROSS 80 下穿顶区间} {柱状图}
{日月RSI下限底}
LCXX:=REF(CLOSE,1);
RSI20:=SMA(MAX(