//股市DNA+股市振荡波DRAWGBK(CLOSE>0, COLORRGB(1,3333,6666), COLORRGB(1,8888,8888),3); var0:=(((LOW + HIGH) + CLOSE) / 3); VAR4T:=MA(var0,5); 操作T:=HHV(VAR4T,13); 拉升T:=LLV(VAR4T,13); 买卖T:=(0 - (((操作T - VAR4T) / VAR4T) * 100)); J1T:=(0 - (((操作T - 拉升T) / 拉升T) * 100)); J2T:=(买卖T - J1T); J3T:=IF((买卖T < (0 - 15)),(买卖T + 15),0); DBXJ1:=IF(((买卖T < (0 - 10)) AND (J1T < (0 - 15))),(J1T + 15),0); DBXJ2:=((J3T + DBXJ1) / 2); D:IF((DBXJ2 > 0),0,DBXJ2),POINTDOT; DBXJ:=INTPART((((SMA(MAX((CLOSE - REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),6,1)) * 10) - 2)); N:IF((DBXJ < 0),0,DBXJ),POINTDOT; STICKLINE((DBXJ2 < (0 - 50)),0,(0 - 60),10,0),colorFF00FF; STICKLINE((DBXJ2 < (0 - 40)),0,(0 - 50),10,0),colorFF; STICKLINE((DBXJ2 < (0 - 30)),0,(0 - 40),10,0),colorFFFF; STICKLINE((DBXJ2 < (0 - 20)),0,(0 - 30),10,0),colorFF00; STICKLINE((DBXJ2 < (0 - 10)),0,(0 - 20),10,0),colorFFFF00; STICKLINE((DBXJ2 < 0),0,(0 - 10),10,0),colorFFFFFF; STICKLINE((DBXJ > 5),0,60,10,0),colorFF00FF; STICKLINE((DBXJ > 4),0,50,10,0),colorFF; STICKLINE((DBXJ > 3),0,40,10,0),colorFFFF; STICKLINE((DBXJ > 2),0,30,10,0),colorFF00; STICKLINE((DBXJ > 1),0,20,10,0),colorFFFF00; STICKLINE((DBXJ > 0),0,10,10,0),colorFFFFFF; A:STICKLINE((CLOSE > 0),(0 - 3),3,10,0),colorFF0000; DBXK:=INBLOCK('ST板块'); KB:=INBLOCK('*ST板块'); KC:=IF(((DBXK = 1) OR (KB = 1)),0,1); ST:=MAX((0 - D),(0 - REF(D,1))); DC:=IF((SYSPARAM(1) = (BARSSINCE((CLOSE > 0)) + 1)),1,0); DRAWTEXT(((DC > 0) AND ((N = REF(N,1)) OR (N < REF(N,1)))),80,'请先参考并完成昨日的指示操作\n昨日无指示则今日无需操作。'),ALIGN0,colorFFFF00; DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (D = 0)) AND (REF(D,1) = 0)) AND (N = 1)),80,'请先参考并完成昨日的指示操作!\n昨日无指示则今日无需操作。'),ALIGN0,colorFFFF00; DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (((J3T > REF(J3T,1)) OR (DBXJ1 > REF(DBXJ1,1))) OR (DBXJ2 = REF(DBXJ2,1)))),80,'今日可适量买进,仓量%:\n如果是补仓增仓则必须有较多空闲资金或处于亏损才操作!'),ALIGN2,colorFF00; DRAWTEXT((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (J3T < REF(J3T,1))),80,'请先参考并完成昨日的指示操作!\n昨日无指示则今日无需操作!'),ALIGN2,colorFFFF00; DRAWNUMBER((((((DC > 0) AND (N > REF(N,1))) AND (N = 1)) AND ((D < 0) OR (REF(D,1) < 0))) AND (((J3T > REF(J3T,1)) OR (DBXJ1 > REF(DBXJ1,1))) OR (DBXJ2 = REF(DBXJ2,1)))),80,ST,0),ALIGN1,colorFF; DRAWTEXT(((((DC > 0) AND (N > REF(N,1))) AND (N = 2)) AND ((D < 0) OR (REF(D,1) < 0))),80,'如果已经持股,那么亏则买进,仓量%:\n盈利则减半!'),ALIGN2,colorFFFF00; DRAWNUMBER(((((DC > 0) AND (N > REF(N,1))) AND (N = 2)) AND ((D < 0) OR (REF(D,1) < 0))),80,ST,0),ALIGN1,colorFF; DRAWTEXT((((((DC > 0) AND (N = 2)) AND (N > REF(N,1))) AND (D = 0)) AND (REF(D,1) = 0)),80,'如果已经持股,那么盈利则卖出,亏损则继续持股!'),ALIGN0,colorFFFF; DRAWTEXT((((DC > 0) AND (N = 3)) AND (N > REF(N,1))),80,'如果已经持股,那么盈利则卖出!亏损则继续持股!'),ALIGN0,colorFFFF; DRAWTEXT((((DC > 0) AND (N = 4)) AND (N > REF(N,1))),80,'如果已经持股,那么盈利则卖出,亏损则减三分之一!'),ALIGN0,colorFFFF; DRAWTEXT((((DC > 0) AND (N = 5)) AND (N > REF(N,1))),80,'如果已经持股,那么盈利则卖出,亏损则减半!'),ALIGN0,colorFFFF; DRAWTEXT((((DC > 0) AND (N > 5)) AND (N > REF(N,1))),80,'如果还有持股,那么请立即无条件卖出!'),ALIGN0,colorFF00FF; DRAWTEXT(((DC > 0) AND (CLOSE > 0)),(0 - 15),'买卖参考价(元):'),ALIGN2,colorFF0000; DRAWNUMBER(((DC > 0) AND (CLOSE > 0)),(0 - 15),CLOSE,2),ALIGN1,colorFF; 初选范围:10*IF(((D < 0) OR (REF(D,1) < 0)),1,0),POINTDOT,color808080; 出击时机:10*IF((((N > REF(N,1)) AND ((N = 1) OR (N = 2))) AND ((D < 0) OR (REF(D,1) < 0))),1,0),POINTDOT,colorFF00; Var1:=(HIGH+LOW+CLOSE)/3; Var2:=(Var1-MA(Var1,14))/(0.015*AVEDEV(Var1,14)); Var3:=(Var1-MA(Var1,70))/(0.015*AVEDEV(Var1,70)); Var4:=IF(Var2>=150 AND Var2<200 AND Var3>=150 AND Var3<200,-10,0); Var5:=IF(Var2<=-150 AND Var2>-200 AND Var3<=-150 AND Var3>-200,10,0); 天线:IF(BARSCOUNT(CLOSE)<70,120,IF(Var3>=200 AND Var2>=150,-15,Var4)+120),Linethick2,colorccff66; 地线:IF(BARSCOUNT(CLOSE)<70,-120,IF(Var3<=-200 AND Var2<=-150,15,Var5)-120),Linethick2,colorff99cc; Var6:=SMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100,4,1); var60:SMA((Var6-50)*2,3,1),Linethick2,colorff0033; Var7:=SMA((CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*100,4,1); var70:SMA((Var7-50)*2,3,1),Linethick2,colorff2233; var71:(SMA((Var7-50)*2,3,1)+SMA((Var6-50)*2,3,1))/2,Linethick2,colorff4433; Var8:=SMA((CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100,4,1); var80:SMA((Var8-50)*2,3,1),Linethick2,colorff6633; VAR81:(SMA((Var8-50)*2,3,1)+SMA((Var7-50)*2,3,1))/2,Linethick2,colorff8833; Var9:=SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100,4,1); Vara:SMA((Var9-50)*2,3,1),Linethick2,colorff9933; VARb:(SMA((Var9-50)*2,3,1)+SMA((Var8-50)*2,3,1))/2,Linethick2,colorffaa33; Var10:=SMA((CLOSE-LLV(LOW,14))/(HHV(HIGH,14)-LLV(LOW,14))*100,4,1); VAR100:SMA((Var10-50)*2,3,1),Linethick2,colorffbb33; Var11:=SMA((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100,4,1); 波浪线:SMA((Var11-50)*2,3,1)+SMA((Var10-50)*2,3,1)/2,COLORSTICK,color888888;Var12:=(Var11-50)*6-2*SMA((Var11-50)*2,3,1); Var13:=FILTER(波浪线>REF(波浪线,1)AND 波浪线<-20,10); Var14:=FILTER(波浪线<REF(波浪线,3)AND 波浪线>REF(波浪线,1)AND 波浪线<-10,7); Var15:=FILTER(波浪线<REF(波浪线,1),10); Var16:=FILTER(波浪线<REF(波浪线,1)AND 波浪线>110,10); Var17:=Var11<REF(Var11,3)AND Var11>REF(Var11,2)AND Var11<30; DRAWICON(FILTER(Var13 OR Var14 OR Var17,5)AND Vara>REF(Vara,1),波浪线,1); DRAWICON(FILTER(CROSS(波浪线,Var12)OR Var15,5)AND Var12>60,波浪线*1.05,2); DRAWTEXT(FILTER(CROSS(100,波浪线)OR Var16,3),110,'顶部'),COLOR00FF00; DRAWTEXT(CROSS(波浪线,地线),地线*0.6,'抄底'),colorred; {点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |