宝塔镇河妖主图原码{主图1}箱顶:EMA(REF(HHV(C,30),1),2),COLORBB5500,LINETHICK1;箱底:EM
A(REF(LLV(C,30),1),2),COLOR9955BB,LINETHICK1;中轨:(箱顶+箱底)/2,NODRAW,
COLORFFFF00,LINETHICK2;EMA13:=EMA(C,13),COLORWHITE;EMA21:=EMA(C,
21),COLORYELLOW;EMA34:=EMA(C,34),COLORFF00FF;EMA60:=MA(C,60),CO
LORFFCC66;VAR2:=(2CLOSE+HIGH+LOW)/4;VAR3:=IF(YEAR>=2099ANDMO
NTH>2,0,1);VAR4:=LLV(LOW,5);VAR5:=HHV(HIGH,4);KS1:=IF(EMA13>EM
A21,EMA13,EMA21);DRAWBAND(EMA((2C+H+L)/4,5),RGB(150,100,0),KS1,R
GB(0,100,100));散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)100,4)VAR3;庄家:=E
MA(0.667REF(散户,1)+0.333散户,2)VAR3;DRAWTEXT(CROSS(散户,庄家)AND散户
<30,0.99L,''←低吸''),COLOR00FFFF;DRAWTEXT(CROSS(庄家,散户)AND散户>70,1.
01H,''←高抛''),COLORGREEN;DRAWICON(CROSS(散户,庄家)AND散户<30,0.99L,1)
;DRAWICON(CROSS(庄家,散户)AND散户>70,1.01H,2);VAR9:=CLOSE-REF(CLOS
E,5);VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5);VARC:=EMA
(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20);卖出:=IF(VARA>0ANDCR
OSS(VARC,VARA),90,100);DRAWICON(卖出<0,H+0.05,2);买线:=EMA(CLOSE,2)
;卖线:=EMA(SLOPE(CLOSE,21)20+CLOSE,42);死叉:=IF(CROSS(买线,卖线),L-0.0
2,DRAWNULL),CROSSDOT,LINETHICK2,COLOR00FFFF;金叉:=IF(CROSS(80,RSI)
30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK2,COLORFF3300;VC:=((CLOSE
-MA(CLOSE,6))/MA(CLOSE,6)100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)1
00+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)100)/3;S2:=IF(VC>20ANDFIL
TER(VCREEN;EMA5:EMA(C,5),COLOR00FF00,LINETHICK2;IF(EMA5>REF(EMA5,1),E
MA5,DRAWNULL),COLORFF00FF,LINETHICK2;{神奇线}均价:=(2C+H+L+O)/5;修正:=E
MA(均价,5)2-MA(均价,5);修正价:=SMA(SMA(EMA(均价,5)2-MA(均价,5),3,1),3,1);补
偿:=FLOOR(((修正价-MA(修正价,5))/MA(修正价,5)100));再修正:=EMA(修正,5)2-MA(修正,
5);神奇线:SMA(SMA((EMA(修正,(5+ABS(补偿)))),2,1),2,1),LINETHICK1,COLOR00
6633;神奇上线:HHV(神奇线,2),COLOR006633;神奇中线:=(神奇线+神奇上线)/2,COLOR006633;转
换:IF(神奇线<神奇上线,(2神奇线-神奇上线),神奇上线),COLOR006633;IF(转换>=REF(转换,1),转换,
DRAWNULL),COLOR0000FF,LINETHICK2;{多彩K线}{蓝}STICKLINE(OPEN>=CLOSE,C
LOSE,OPEN,2.5,0),COLORFF8800;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.0
,0),COLORFFAA00;STICKLINE(OPEN>=CLOSE,L,H,0,0),COLORFFCC00;{红}ST
ICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.5,0),COLOR000099;STICKLINE(CLOSE>
OPEN,CLOSE,OPEN,1.0,0),COLOR0000FF;STICKLINE(CLOSE>OPEN,L,H,0,0)
,COLOR0000FF;A0:=(L+H+C2)/4;多空线:=EMA(A0,13),COLOR33FF00,LINETHIC
K1;A2:=EMA(A0,23),COLORLIBLUE,LINETHICK2;A1X:=(多空线-REF(多空线,1))/RE
F(多空线,1)100,NODRAW;A2X:=(A2-REF(A2,1))/REF(A2,1)100,NODRAW;多线:=
IF(A1X>=0ANDBARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS
(A1X,0))),DRAWNULL),COLORBB00BB;空线:=IF(A1X<0ANDBARSLAST(CROSS(0
,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL),COLORBBBB0
0;买入持股:IF(A1X>=0,多空线,DRAWNULL),COLORFF00FF,LINETHICK1;STICKLINE(C
ROSS(A1X,0),C,O,2.5,0),COLOR00FFFF;STICKLINE(CROSS(A1X,0),C,O,0.
3,0),COLOR0000FF;STICKLINE(CROSS(0,A1X),C,O,2.5,0),COLORFF3300;S
TICKLINE(CROSS(0,A1X),C,O,0.3,0),COLOR00FF00;{压力支撑}周期:=5;参数:=H;{压
力线}高点:=REF(参数,周期)=HHV(参数,2周期+1);高点过滤:=FILTER(高点,周期);高点周期变换:=BACK
SET(高点过滤,周期+1);前高:=FILTER(高点周期变换,周期);{高点}高点统计:=BACKSET(ISLASTBAR,
BARSLAST(前高)+1);后高:=高点统计>REF(高点统计,1);压力线5:DRAWLINE(前高,参数,后高,参数,1
),LINETHICK1,COLOR00FF00,LINETHICK1;{支撑线}参数1:=L;低点:=REF(参数1,周期)=L
LV(参数1,2周期+1);低点过滤:=FILTER(低点,周期);低点周期变换:=BACKSET(低点过滤,周期+1);前低:
=FILTER(低点周期变换,周期);{低点统计}低点统计:=BACKSET(ISLASTBAR,BARSLAST(前低)+1);
后低:=低点统计>REF(低点统计,1);支撑线5:DRAWLINE(前低,参数1,后低,参数1,1),COLORFF3399,L
INETHICK1;高低线:=DRAWLINE(前高,参数1,后低,参数1,1),POINTDOT,COLORFFFF00,LIN
ETHICK1;底:=STICKLINE(CROSS(支撑线5,0.9995高低线),L,0.96L,1,0),COLORFF
FFFF;{量能平台}N:=10;TT11:=CONST(HHVBARS(V,N+17));TT00:IF(CURRBARSCOU
NT<=N+17,CONST(IF(TT11=0,H,REF(H,TT11))),DRAWNULL),COLORFF3399,PO
INTDOT,LINETHICK4;IF(CURRBARSCOUNT=TT11+1,TT00,DRAWNULL),CIRCLED
OT;T1:=CONST(HHVBARS(V,N));T0:IF(CURRBARSCOUNT<=N+7,CONST(IF(T1=0
,H,REF(H,T1))),DRAWNULL),COLOR33FF33;IF(CURRBARSCOUNT=T1+1,T0,DR
AWNULL),CIRCLEDOT,COLOR00FFFF;{未来顶底}VBB1:=TROUGHBARS(3,15,1)<10;V
BB2:=PEAKBARS(3,15,1)<5;VBB3:=IF(VBB1=1,50,0);VBB4:=IF(VBB2=1,50,
0);底部:=IF(VBB3=50,10,0);头部:=IF(VBB4=50,20,80);未来底:STICKLINE(IF(底部
=10ANDREF(底部,1)=10ANDREF(底部,2)=0,30,0),L0.985,L0.99,15,0),L
INETHICK2,COLORFFFFFF;未来底买:DRAWTEXT(IF(底部=10ANDREF(底部,1)=10AND
REF(底部,2)=0,1,0),L0.985,''底''),COLORFFFFFF;未来顶:STICKLINE(IF(头部=20
ANDREF(头部,1)=20ANDREF(头部,2)=80,30,0),H1.01,H1.012,15,0),LIN
ETHICK2,COLORFFFFFF;未来顶卖:DRAWTEXT(IF(头部=20ANDREF(头部,1)=20ANDR
EF(头部,2)=80,1,0),H1.02,''顶''),COLOR00FF00;{精准底}JZD10:=C-REF(C,1);J
ZD11:=100EMA(EMA(JZD10,6),6)/EMA(EMA(ABS(JZD10),6),6);JZD12:=EMA
(CLOSE,7);JZD13:=EMA(CLOSE,19);JZD14:=DRAWLINE(L=LLV(L,BARSLAST(C
ROSS(JZD13,JZD12))+1),LLV(L,BARSLAST(CROSS(JZD13,JZD12))+1),H=HHV
(H,BARSLAST(CROSS(JZD12,JZD13))+1),HHV(H,BARSLAST(CROSS(JZD12,JZD
13))+1),0);JZD15:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(JZD12,JZD13))+1
),HHV(H,BARSLAST(CROSS(JZD12,JZD13))+1),L=LLV(L,BARSLAST(CROSS(JZ
D13,JZD12))+1),LLV(L,BARSLAST(CROSS(JZD13,JZD12))+1),0);精准底:DRAWI
CON((LLV(JZD11,2)=LLV(JZD11,7)ANDCOUNT(JZD11<0,2)ANDCROSS(JZD
11,MA(JZD11,2)))ANDREF(JZD15,1)REF(JZD1
5,1),0.97L,5);精准底选股:=DRAWICON(精准底,L,1);{转折指示}上转折:=ZIG(3,10);下转折:
=MA(上转折,2);买转折:DRAWICON(CROSS(上转折,下转折),0.98L,7);卖转折:DRAWICON(CRO
SS(下转折,上转折),1.02H,8);{弄点钱玩}JJ:=(H+L+C)/3;QJ0:=VOL/IF(H=L,4,H-L);
J:="KDJ.J";QJ1:=IF(CAPITAL=0,QJ0(JJ-MIN(C,O)),QJ0(MIN(O,C)-L));
QJ2:=IF(CAPITAL=0,QJ0(MIN(O,C)-L),QJ0(JJ-MIN(C,O)));QJ3:=QJ0(H-MAX(O,C));QJ4:=QJ0(MAX(C,O)-JJ);QJ5:=QJ1+QJ2;QJ6:=QJ3+QJ4;DDD:=(QJ5-QJ6)/(QJ5+QJ6)100;DDX:=((QJ1+QJ2)-(QJ3+QJ4))/SUM(VOL,10)100;DDZ:=DDD17;DDY:=((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)100;弄点钱玩:=CROSS(J,0)AND((DDX>0ANDDDY>0)ORDDZ>400);弄点钱玩选股:DRAWICON(弄点钱玩,L0.98,17); |
|
