源码如下:
n 14 5 250 rsv:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100; K:EMA(rsv,3); D:EMA(K,3); j:=(3*K-2*D); 火山底部信号灯出现:if(j<=0,80,0),COLORred; STICKLINE(j<=0,80,100,0,0),COLORred; kdj1:=ref(count(j<ref(j,1),5)>=3,1) and ref(j,1)<20; kdj2:=j>ref(j,1); 反转:if(FILTER(kdj1 and kdj2,3),100,0),ALIGN; IFF:=EMA(CLOSE,12) - EMA(CLOSE,26); BIAS1W:=((CLOSE - MA(CLOSE,6))/MA(CLOSE,6))*100; BIAS2W:=((CLOSE - MA(CLOSE,12))/MA(CLOSE,12))*100; BIAS3W:=((CLOSE - MA(CLOSE,24)) /MA(CLOSE,24))*100; MM:=((BIAS1W+(2*BIAS2W))+(3*BIAS3W))/6; MN:=MA(MM,3); VAR2:=MA(CLOSE*0.5,30)*0.83; dd:=MA((CLOSE*0.5/VAR2),3)<1; VAR1E:=((CLOSE - LLV(LOW,20)) / (HHV(HIGH,20) - LLV(LOW,20))) * 100; VAR2E:=SMA(SMA(VAR1E,3,1),3,1); VAR3E:=EMA(VAR2E,5); GZ:=3*VAR2E-2*VAR3E; 趋势J:EMA(GZ,3),colorgreen,linethick3; partline(趋势J>ref(趋势J,1),趋势J),colorred,linethick3; STICKLINE(GZ <10,-10,-15,6,0),colorFFFF00; 见底:if(gz<10,0,-15),colorffff00; STICKLINE((GZ > VAR3E),20,VAR3E,0,0),colorred; STICKLINE((GZ <= VAR3E),20,VAR3E,0,0),colorgreen; {STICKLINE((GZ >趋势J),GZ,趋势J,0,0),colorFF; STICKLINE((GZ >趋势J),GZ,趋势J,6,0),color99FF; STICKLINE((GZ >趋势J),GZ,趋势J,2,0),colorFFFF; STICKLINE((GZ <趋势J),GZ,趋势J,0,0),colorFF0000; STICKLINE((GZ <趋势J),GZ,趋势J,6,0),colorFF9900; STICKLINE((GZ <趋势J),GZ,趋势J,2,0),colorFF00; STICKLINE(MN<-6,0,-5,8,1),colorFF00; STICKLINE(MN<-9,0,-5,8,1),colorFFFFFF; STICKLINE(MN<-12,0,-5,8,0),colorFF; DRAWICON((CROSS(GZ,趋势J) AND COUNT(GZ<4,5)>= 1),-10,8); DRAWICON((CROSS(GZ,趋势J) AND COUNT(GZ<10,5)>= 1),0,6); DRAWICON((CROSS(GZ,趋势J) AND COUNT(MN<-6,3)>= 1),-5,4); explain((CROSS(GZ,趋势J) AND COUNT(GZ<4,5)>= 1) or (CROSS(GZ,趋势J) AND COUNT(GZ<10,5)>= 1) or (CROSS(GZ,趋势J) AND COUNT(MN<-6,3)>= 1), 底部信号灯出现,股价有从底部翻转的趋向,注意观察,及时坐轿),colorred; cl:=CLOSE/LOW>1.04; STICKLINE(cl AND COUNT(MN<-12,3)>= 1,95,20,8,0),colorFF; DRAWTEXT(FILTER((cl AND COUNT(MN<-12,3) >= 1),15),95,--严重超跌),colorred; STICKLINE((cl AND COUNT(MN<-9,3)>= 1),85,20,8,0),colorFFFF; DRAWTEXT(FILTER((cl AND COUNT(MN<-9,2)>=1),15),80,--中级超跌),coloryellow; STICKLINE((((COUNT(DD,3)>=1) AND cl) AND CLOSE > REF(CLOSE,1)),95,20,8,0),colorFF; DRAWTEXT(FILTER((COUNT(DD,3)>= 1 AND cl AND CLOSE > REF(CLOSE,1)),10),115,--抢金),colorred; STICKLINE(cl AND COUNT((MN<-7),2) >= 1,70,20,8,0),colorFF00; DRAWTEXT(FILTER((cl AND COUNT((MN<-7),2) >= 1),10),60,--超跌),colorFF00; STICKLINE(((CLOSE / REF(CLOSE,1))>1.025 AND COUNT((龙 <-1.6),2) >= 1),80,0,8,0),colorFF00FF; MM1:=(SMA(MAX((CLOSE -REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE -REF(CLOSE,1))),6,1)) * 100; MD1:=CROSS(80,MM1); AR1:=(AMOUNT/VOL)/1000; AR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7; AR3:=(SUM(AMOUNT,13)/AR1)/1000; AR4:=DMA(AR2,VOL/AR3); SK:=((CLOSE - AR4)/AR4)*1000; MD2:=CROSS(40,SK); VAR5I:=(REF(HIGH,1)+REF(LOW,1))/2; VAR6I:=MA(CLOSE,20)+2*STD(CLOSE,20); DB1:=CROSS(VAR5I,VAR6I); VA4H:=((CLOSE - LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*100; VA5H:=SMA(VA4H,13,8); 走势:=CEILING(SMA(VA5H,13,8)); 见顶:IF(MD1,80,100),colorFF00; explain(DIFF > DEA and md1=0,股价现在是上升区间,持股坐轿,注意股价见顶,随时准备撤离),colorFFFFFF; explain(DIFF > DEA and md1,股价现在是上升区间,注意股价见顶已发出,随时股价回调风险,准备撤离),colorFF00; RSI1:=(SMA(MAX((CLOSE -REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE -REF(CLOSE,1))),6,1)) * 100; LY1:=EMA(RSI1,5); STICKLINE((LY1>70),100,105,6,0),colorFFFF; DRAWICON(CROSS(70,LY1),110,5),LINETHICK1,colorFFFFFF; CC:=AA-BB; EE:=((CC < 3) AND (DD1<0.5)) AND (OPEN <> LOW); A2:=IF((LOW > A1),0,IF((HIGH < A1),1,(((A1 - LOW) + 0.01) / ((HIGH - LOW) + 0.01)))); A4:=REF(HHV(CLOSE,120),1); A5:=REF(LLV(CLOSE,120),1); A6:=(100*(CLOSE - A5)) /(A4 - A5); A7:=A2>0 OR A2=1; A8:=(A7 AND ((A3 / REF(A3,3))>= 3)) AND (A6<80); A9:=((REF(A8,1) OR REF(A8,2)) OR REF(A8,3)) OR REF(A8,4); A10:=A8 AND A9; A11:=IF(FILTER(A8,3),5,0); A12:=IF((FILTER(A10,3) OR EE),10,0); DRAWTEXT(A11,8,进场),coloryellow; DRAWTEXT(A12,17,加仓),colorFFFFFF; {STICKLINE(DD,10,-5,3,0),colorFFFF;} P:=(2*CLOSE+HIGH+LOW+OPEN)/5; BB:=MA(P,3); CC:=(SUM(IF((P > REF(P,1)),P*VOL,0),4))/(SUM(IF((P < REF(P,1)),P*VOL,0),4)); DD:=REF(100 - (100)/(1 + CC),1); A1:=HHV(P,15); A2:=LLV(P,15); A3:=A1 - A2; A4:=(EMA((P - A2)/A3,2))*100; B1:=HHV(P,60); B2:=LLV(P,60); B3:=B1 - B2; B4:=(EMA((P - B2)/(B3),2))*(100); 中风险:B4,ColorAA7755; 短风险:A4,Color44AABB; DRAWTEXTEX(1,1,20,880, 耐 心 等 待 时 机),COLORRED; DRAWTEXTEX(1,1,20,150,决 策 在 人 脑 严 格 执 行 纪 律),COLORRED; 拉升力:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,30)-LLV(LOW,36))*0.6*CLOSE; 拉升力A:=SMA(拉升力,6.3,1); {DRAWICON(做空<=REF(做空,1) AND REF(做空,1)>REF(做空,2),做空,19);} RSV:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100; K:=EMA(RSV,3); D:=EMA(K,3); J:=(3*K-2*D); 火山:=IF(J<=0,20,0); KDJ1:=REF(COUNT(J<REF(J,1),5)>=3,1) AND REF(J,1)<20; KDJ2:=J>REF(J,1); 反转:=IF(FILTER(KDJ1 AND KDJ2,3),30,0); 火山反转:IF((火山 AND 反转),30,0); RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100); K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; X:=LLV(J,2)=LLV(J,8); DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,-10,←低进),COLORFFFF00; RSV:=(((CLOSE - LLV(LOW,29)) / (HHV(HIGH,29) - LLV(LOW,29))) * 100); K:=MA(RSV,5); D:=MA(K,2); J:=((3 * K) - (2 * D)); 顶天立地明天涨:IF((J < 5),50,0),COLORMAGENTA; VARO5:=LLV(LOW,27); VARO6:=HHV(HIGH,34); VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25; 建仓区: IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1; VAR12:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VAR13:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) * 100); VAR14:=(((CLOSE - MA(CLOSE,21)) / MA(CLOSE,21)) * 100); VAR15:=(((VAR12 + (2 * VAR13)) + (3 * VAR14)) / 6); VAR16:=MA(VAR15,3); 底部:IF((VAR16 < (0 - 10)),40,0),LINETHICK1,colorFFFF: |
|
|
|