通达信左峰九转主图选股指标公式源码

通达信左峰九转主图选股指标公式源码

源码正文：

VAR1:=CONst(HHV(REF(HIGH,1),240)){XG51};
VAR2:=CONST(LLV(REF(LOW,1),240)){XG51};
VAR3:=VAR1-VAR2{XG51};
VAR4:=LOW-VAR3*0.03{XG51};
VAR5:=HIGH+VAR3*0.03{XG51};
VAR6:=CLOSE>500{XG51};
VAR7:=maX(CLOSE,OPEN){XG51};
VAR8:=MIN(CLOSE,OPEN){XG51};
VAR9:=0{XG51};
VAR10:=1{XG51};
VAR11:=IF(VAR6,HIGH,VAR7){XG51};
VAR12:=IF(VAR6,LOW,VAR8){XG51};
VAR13:=IF(CLOSE>OPEN,IF(VAR10=0,LOW,VAR12),IF(VAR10=0,HIGH,VAR11)){XG51};
VAR14:=2/1000{XG51};
VAR15:=CURRBARSCOUNT{XG51};
VAR16:=120{XG51};
VAR17:=VAR15<=VAR16{XG51};
VAR18:=LOW{XG51};
VAR19:=IF(VAR9=0,VAR18,REF(VAR9,VAR9)){XG51};
基准价:IF(VAR17,CONST(VAR19),DRAWNULL),DOTLINE,COLORWHITE{XG51};
VAR20:=基准价{XG51};
VAR21:=VAR20*VAR14{XG51};
VAR22:=Abs(LOW-VAR20)<=VAR21{XG51};
VAR23:=ABS(OPEN-VAR20)<=VAR21{XG51};
VAR24:=ABS(CLOSE-VAR20)<=VAR21{XG51};
VAR25:=ABS(HIGH-VAR20)<=VAR21{XG51};
VAR26:=VAR22 OR VAR23 OR VAR24 OR VAR25 AND VAR17 AND VAR15!=1{XG51};
VAR27:=COUNT(VAR26,VAR16){XG51};
精准点个数:IF(VAR27>0,VAR27+1,0),NODRAW,COLORWHITE{XG51};
VAR28:=AMOUNT/vol/100{XG51};
VAR29:=CLOSE>OPEN AND REF(CLOSE,1)>VAR28 AND CLOSE>VAR28 AND CLOSE<300{XG51};
STICKLINE(VAR29,OPEN,CLOSE,1,0),COLORLIRED{XG51};
VAR30:=OPEN>CLOSE AND CLOSE<VAR28 AND VAR28>REF(CLOSE,1){XG51};
STICKLINE(VAR30,OPEN,CLOSE,1,0),COLORWHITE{XG51};
VAR31:=VOL>REF(VOL,1)*0.95 AND VOL<REF(VOL,1)*1.05{XG51};
VAR32:=WINNER(CLOSE)-WINNER(OPEN)>=0.2 AND VAR31{XG51};
STICKLINE(VAR32,OPEN,CLOSE,1,0),COLORYELLOW{XG51};
VAR33:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100{XG51};
VAR34:=NAMELIKE(1) OR NAMELIKE(2) OR NAMELIKE(3) AND VAR33>=4.945{XG51};
VAR35:=NAMELIKE(1) OR NAMELIKE(2) OR NAMELIKE(3) AND VAR33<=(-4.945){XG51};
涨停价:IF(VAR34,REF(CLOSE,1)*1.05,REF(CLOSE,1)*1.1),NODRAW,COLORWHITE{XG51};
跌停价:IF(VAR35,REF(CLOSE,1)*0.95,REF(CLOSE,1)*0.9),NODRAW,COLORCYAN{XG51};
VAR36:=REF(CLOSE,1){XG51};
VAR37:=CLOSE=ZTPRICE(REF(CLOSE,1),0.1){XG51};
STICKLINE(VAR37,OPEN,CLOSE,2,0),COLORLIMAGENTA{XG51};
STICKLINE(VAR37,OPEN,CLOSE,1,0),COLORLIMAGENTA{XG51};
VAR38:=CLOSE=DTPRICE(REF(CLOSE,1),0.1){XG51};
STICKLINE(VAR38,OPEN,CLOSE,2,0),COLORCYAN{XG51};
STICKLINE(VAR38,HIGH,LOW,0,1),COLORCYAN{XG51};
VAR39:=CLOSE{XG51};
VAR40:=REF(VAR39,10)=HHV(VAR39,2*10+1){XG51};
VAR41:=FILTER(VAR40,10){XG51};
VAR42:=BacKSET(VAR41,10+1){XG51};
VAR43:=FILTER(VAR42,10){XG51};
VAR44:=REF(VAR39,10)=LLV(VAR39,2*10+1){XG51};
VAR45:=FILTER(VAR44,10){XG51};
VAR46:=BACKSET(VAR45,10+1){XG51};
VAR47:=FILTER(VAR46,10){XG51};
VAR48:=REF(CLOSE,BArslAST(VAR47)){XG51};
VAR49:=REF(CLOSE,BARSLAST(VAR43)){XG51};
STICKLINE(CLOSE,VAR49,VAR49,8,0),COLORLIMAGENTA{XG51};
STICKLINE(CLOSE,VAR48,VAR48,8,0),COLORWHITE{XG51};
STICKLINE(VAR43,CLOSE,OPEN,1,0),COLORGRAY{XG51};
STICKLINE(VAR43,CLOSE,OPEN,1,0),COLORGRAY{XG51};
STICKLINE(VAR47,CLOSE,OPEN,1,0),COLORYELLOW{XG51};
STICKLINE(VAR47,CLOSE,OPEN,1,0),COLORYELLOW{XG51};
VAR50:=OPEN-(OPEN-CLOSE)/3{XG51};
VAR51:=(OPEN+CLOSE)/2{XG51};
VAR52:=OPEN-2*(OPEN-CLOSE)/3{XG51};
STICKLINE((OPEN+CLOSE)/2 AND CLOSE/REF(CLOSE,1)>=1.035 OR REF(CLOSE,1)/CLOSE>=1.035,(OPEN+CLOSE)/2,(OPEN+CLOSE)/2,3,0),COLORGRAY{XG51};
VAR53:=MAX(CLOSE,OPEN){XG51};
VAR54:=MIN(CLOSE,OPEN){XG51};
VAR55:=VAR54-0.01>=REF(VAR53,1){XG51};
流通市值:FINANCE(40)/100000000,NODRAW{XG51};
MA5角度:ATAN((MA(CLOSE,5)/REF(MA(CLOSE,5),1)-1)*100)*180/3.142,NODRAW,COLORWHITE{XG51};
循环年位置:(CLOSE-LLV(CLOSE,225))/(HHV(CLOSE,225)-LLV(CLOSE,225))*100,NODRAW,COLORCYAN{XG51};
VAR56:=HHV(VOL,10){XG51};
VAR57:=BARSLAST(VAR56=VOL){XG51};
VAR58:=crOSS(REF(MAX(CLOSE,OPEN),VAR57),CLOSE){XG51};
STICKLINE(VAR58,MAX(CLOSE,OPEN)*1.02,MIN(CLOSE,OPEN)*0.98,0,1),COLORWHITE{XG51};
STICKLINE(VAR58,(OPEN+CLOSE)/2,(OPEN+CLOSE)/2,10,0),COLORWHITE{XG51};
DRAWICON(OPEN>REF(MAX(CLOSE,OPEN),1) AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1) AND CLOSE>MA(CLOSE,5),LOW*0.97,11){XG51};
VAR59:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5){XG51};
VAR60:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1) AND REFX(CLOSE,4)<CLOSE AND REFX(CLOSE,5)<REFX(CLOSE,1) AND REFX(CLOSE,6)<REFX(CLOSE,2) AND REFX(CLOSE,7)<REFX(CLOSE,3) AND REFX(CLOSE,8)<REFX(CLOSE,4){XG51};
VAR61:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6){XG51};
VAR62:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1) AND REFX(CLOSE,4)<CLOSE AND REFX(CLOSE,5)<REFX(CLOSE,1) AND REFX(CLOSE,6)<REFX(CLOSE,2) AND REFX(CLOSE,7)<REFX(CLOSE,3){XG51};
VAR63:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7){XG51};
VAR64:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1) AND REFX(CLOSE,4)<CLOSE AND REFX(CLOSE,5)<REFX(CLOSE,1) AND REFX(CLOSE,6)<REFX(CLOSE,2){XG51};
VAR65:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8){XG51};
VAR66:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1) AND REFX(CLOSE,4)<CLOSE AND REFX(CLOSE,5)<REFX(CLOSE,1){XG51};
VAR67:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8) AND REF(CLOSE,5)>REF(CLOSE,9){XG51};
VAR68:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1) AND REFX(CLOSE,4)<CLOSE{XG51};
VAR69:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8) AND REF(CLOSE,5)<REF(CLOSE,9) AND REF(CLOSE,6)>REF(CLOSE,10){XG51};
VAR70:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2) AND REFX(CLOSE,3)<REF(CLOSE,1){XG51};
VAR71:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8) AND REF(CLOSE,5)<REF(CLOSE,9) AND REF(CLOSE,6)<REF(CLOSE,10) AND REF(CLOSE,7)>REF(CLOSE,11){XG51};
VAR72:=REFX(CLOSE,1)<REF(CLOSE,3) AND REFX(CLOSE,2)<REF(CLOSE,2){XG51};
VAR73:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8) AND REF(CLOSE,5)<REF(CLOSE,9) AND REF(CLOSE,6)<REF(CLOSE,10) AND REF(CLOSE,7)<REF(CLOSE,11) AND REF(CLOSE,8)>REF(CLOSE,12){XG51};
VAR74:=REFX(CLOSE,1)<REF(CLOSE,3){XG51};
VAR75:=CLOSE<REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8) AND REF(CLOSE,5)<REF(CLOSE,9) AND REF(CLOSE,6)<REF(CLOSE,10) AND REF(CLOSE,7)<REF(CLOSE,11) AND REF(CLOSE,8)<REF(CLOSE,12) AND REF(CLOSE,9)>REF(CLOSE,13){XG51};
VAR76:=IF(PERIOD<4,LOW*(1-(PERIOD+1)/10*0.01),LOW*0.98){XG51};
VAR77:=IF(PERIOD<4,HIGH*(1+(PERIOD+1)/10*0.01),HIGH*1.05){XG51};
VAR78:=CURRBARSCOUNT-1{XG51};
DRAWNUMBER(VAR59 AND (VAR60 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72) OR (VAR78=3 AND VAR70) OR (VAR78=4 AND VAR68) OR (VAR78=5 AND VAR66) OR (VAR78=6 AND VAR64) OR (VAR78=7 AND VAR62)),VAR76,1),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR61 AND (VAR62 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72) OR (VAR78=3 AND VAR70) OR (VAR78=4 AND VAR68) OR (VAR78=5 AND VAR66) OR (VAR78=6 AND VAR64)),VAR76,2),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR63 AND (VAR64 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72) OR (VAR78=3 AND VAR70) OR (VAR78=4 AND VAR68) OR (VAR78=5 AND VAR66)),VAR76,3),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR65 AND (VAR66 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72) OR (VAR78=3 AND VAR70) OR (VAR78=4 AND VAR68)),VAR76,4),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR67 AND (VAR68 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72) OR (VAR78=3 AND VAR70)),VAR76,5),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR69 AND (VAR70 OR VAR78=0 OR (VAR78=1 AND VAR74) OR (VAR78=2 AND VAR72)),VAR76,6),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR71 AND (VAR72 OR VAR78=0 OR (VAR78=1 AND VAR74)),VAR76,7),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR73 AND (VAR74 OR VAR78<1),VAR76,8),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR75,VAR76,9),COLORCYAN{XG51};
VAR79:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)<REF(CLOSE,5){XG51};
VAR80:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1) AND REFX(CLOSE,4)>CLOSE AND REFX(CLOSE,5)>REFX(CLOSE,1) AND REFX(CLOSE,6)>REFX(CLOSE,2) AND REFX(CLOSE,7)>REFX(CLOSE,3) AND REFX(CLOSE,8)>REFX(CLOSE,4){XG51};
VAR81:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)<REF(CLOSE,6){XG51};
VAR82:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1) AND REFX(CLOSE,4)>CLOSE AND REFX(CLOSE,5)>REFX(CLOSE,1) AND REFX(CLOSE,6)>REFX(CLOSE,2) AND REFX(CLOSE,7)>REFX(CLOSE,3){XG51};
VAR83:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)<REF(CLOSE,7){XG51};
VAR84:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1) AND REFX(CLOSE,4)>CLOSE AND REFX(CLOSE,5)>REFX(CLOSE,1) AND REFX(CLOSE,6)>REFX(CLOSE,2){XG51};
VAR85:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)<REF(CLOSE,8){XG51};
VAR86:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1) AND REFX(CLOSE,4)>CLOSE AND REFX(CLOSE,5)>REFX(CLOSE,1){XG51};
VAR87:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8) AND REF(CLOSE,5)<REF(CLOSE,9){XG51};
VAR88:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1) AND REFX(CLOSE,4)>CLOSE{XG51};
VAR89:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8) AND REF(CLOSE,5)>REF(CLOSE,9) AND REF(CLOSE,6)<REF(CLOSE,10){XG51};
VAR90:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2) AND REFX(CLOSE,3)>REF(CLOSE,1){XG51};
VAR91:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8) AND REF(CLOSE,5)>REF(CLOSE,9) AND REF(CLOSE,6)>REF(CLOSE,10) AND REF(CLOSE,7)<REF(CLOSE,11){XG51};
VAR92:=REFX(CLOSE,1)>REF(CLOSE,3) AND REFX(CLOSE,2)>REF(CLOSE,2){XG51};
VAR93:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8) AND REF(CLOSE,5)>REF(CLOSE,9) AND REF(CLOSE,6)>REF(CLOSE,10) AND REF(CLOSE,7)>REF(CLOSE,11) AND REF(CLOSE,8)<REF(CLOSE,12){XG51};
VAR94:=REFX(CLOSE,1)>REF(CLOSE,3){XG51};
VAR95:=CLOSE>REF(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,5) AND REF(CLOSE,2)>REF(CLOSE,6) AND REF(CLOSE,3)>REF(CLOSE,7) AND REF(CLOSE,4)>REF(CLOSE,8) AND REF(CLOSE,5)>REF(CLOSE,9) AND REF(CLOSE,6)>REF(CLOSE,10) AND REF(CLOSE,7)>REF(CLOSE,11) AND REF(CLOSE,8)>REF(CLOSE,12) AND REF(CLOSE,9)<REF(CLOSE,13){XG51};
DRAWNUMBER(VAR79 AND (VAR80 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92) OR (VAR78=3 AND VAR90) OR (VAR78=4 AND VAR88) OR (VAR78=5 AND VAR86) OR (VAR78=6 AND VAR84) OR (VAR78=7 AND VAR82)),VAR77,1),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR81 AND (VAR82 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92) OR (VAR78=3 AND VAR90) OR (VAR78=4 AND VAR88) OR (VAR78=5 AND VAR86) OR (VAR78=6 AND VAR84)),VAR77,2),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR83 AND (VAR84 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92) OR (VAR78=3 AND VAR90) OR (VAR78=4 AND VAR88) OR (VAR78=5 AND VAR86)),VAR77,3),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR85 AND (VAR86 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92) OR (VAR78=3 AND VAR90) OR (VAR78=4 AND VAR88)),VAR77,4),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR87 AND (VAR88 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92) OR (VAR78=3 AND VAR90)),VAR77,5),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR89 AND (VAR90 OR VAR78=0 OR (VAR78=1 AND VAR94) OR (VAR78=2 AND VAR92)),VAR77,6),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR91 AND (VAR92 OR VAR78=0 OR (VAR78=1 AND VAR94)),VAR77,7),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR93 AND (VAR94 OR VAR78<1),VAR77,8),COLORLIMAGENTA{XG51};
DRAWNUMBER(VAR95,VAR77,9),COLORCYAN{X~G_5-1~C~N~{};