通达信行情密码主图未加密选股指标公式源码

源码正文：

日:=500;昨前:=60{XG51};
高:=REF(HHV(H,日),昨前){XG51};
低:=REF(LLV(L,日),昨前){XG51};
H1:=高-(高-低)*1{XG51};
H2:=高-(高-低)*0.91{XG51};
H3:=高-(高-低)*0.85{XG51};
H4:=高-(高-低)*0.809{XG51};
H5:=高-(高-低)*0.777{XG51};
H6:=高-(高-低)*0.707{XG51};
H7:=高-(高-低)*0.666{XG51};
H8:=高-(高-低)*0.618{XG51};
H9:=高-(高-低)*0.563{XG51};
H10:=高-(高-低)*0.5{XG51};
H11:=高-(高-低)*0.424{XG51};
H12:=高-(高-低)*0.382{XG51};
H13:=高-(高-低)*0.309{XG51};
H14:=高-(高-低)*0.25{XG51};
H15:=高-(高-低)*0.191{XG51};
H16:=高-(高-低)*0.1375{XG51};
H17:=高-(高-低)*0.0807{XG51};
一:REFDATE(H2,DATE),COLORLICYAN{XG51};
二:REFDATE(H3,DATE),COLORBLUE{XG51};
三:REFDATE(H4,DATE),COLORLIGREEN{XG51};
四:REFDATE(H5,DATE),COLORLICYAN{XG51};
五:REFDATE(H6,DATE),COLORBLUE{XG51};
六:REFDATE(H7,DATE),COLORLIGREEN{XG51};
七:REFDATE(H8,DATE),COLORLICYAN{XG51};
八:REFDATE(H9,DATE),COLORBLUE{XG51};
九:REFDATE(H10,DATE),COLORLIGREEN{XG51};
十:REFDATE(H11,DATE),COLORLICYAN{XG51};
十一:REFDATE(H12,DATE),COLORBLUE{XG51};
十二:REFDATE(H13,DATE),COLORLIGREEN{XG51};
十三:REFDATE(H14,DATE),COLORLICYAN{XG51};
十四:REFDATE(H15,DATE),COLORBLUE{XG51};
十五:REFDATE(H16,DATE),COLORLIGREEN{XG51};
十六:REFDATE(H17,DATE),COLORLIGREEN{XG51};
底:REFDATE(H1,DATE),COLORBLUE{XG51};
顶:REFDATE(高,DATE),COLORBLUE{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
ma1:MA(CLOSE,15){XG51};
MA2:MA(CLOSE,60){XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORLIGREEN{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORLIMAGENTA{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORWHITE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,60)<=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIMAGENTA{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORWHITE{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,60)<=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIGREEN{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,60),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORRED{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1) AND MA(CLOSE,60)<REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIMAGENTA{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
DRAWTEXT(CURRBARSCOUNT=1 ,MA1*1.0,'1'){XG51};
DRAWTEXT(CURRBARSCOUNT=5 ,MA1*1.0,'5'){XG51};
DRAWTEXT(CURRBARSCOUNT=10,MA1*1.0,'10'){XG51};
DRAWTEXT(CURRBARSCOUNT=15,MA1*1.0,'15'){XG51};
DRAWTEXT(CURRBARSCOUNT=20,MA1*1.0,'20'){XG51};
DRAWTEXT(CURRBARSCOUNT=30,MA1*1.0,'30'){XG51};
DRAWTEXT(CURRBARSCOUNT=35,MA1*1.0,'35'){XG51};
DRAWTEXT(CURRBARSCOUNT=44,MA1*1.0,'40'){XG51};
DRAWTEXT(CURRBARSCOUNT=50,MA1*1.0,'50'){XG51};
DRAWTEXT(CURRBARSCOUNT=60,MA1*1.0,'60'){XG51};
DRAWICON(crOSS(MA(CLOSE,15),MA(CLOSE,60)),MA(CLOSE,60),17){XG51};
DRAWICON(CROSS(MA(CLOSE,60),MA(CLOSE,15)),MA(CLOSE,15),19){X!G~5~1!C!N!{};

源码正文：

B1:=ma(C,1){XG51};
B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1){XG51};
SMA2:=MA(B2,3){XG51};
三枪买入:IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2){XG51};
IF(B2>SMA2,B2,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(B2<SMA2,B2,DRAWNULL),COLORCYAN,LINETHICK4{XG51};
三枪卖出:HHV(MA(B2,1),13),COLORBLUE{XG51};
VAR1:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2:=MA(VAR1,7){XG51};
VAR3:=VAR2-MA(VAR1,7/2)<0{XG51};
VAR4:=VAR2-MA(VAR1,7/2)>0{XG51};
VAR5:=BArslAst(VAR3){XG51};
VAR6:=0-BARSLAST(VAR4){XG51};
VAR7:=IF(VAR3<=0,VAR5,VAR6){XG51};
STICKLINE(三枪卖出>B2 AND B2>SMA2,三枪卖出,B2,0,1),COLORLIGREEN{XG51};
STICKLINE(三枪卖出>SMA2 AND B2<SMA2,三枪卖出,SMA2,0,1),COLORYELLOW{XG51};
VAR11:=(CLOSE*2+HIGH+LOW)/4{XG51};
VAR21:=ema(VAR11,13)-EMA(VAR11,34){XG51};
VAR31:=EMA(VAR21,5){XG51};
STICKLINE((C>=O),OPEN,LOW,0,0),COLOR0726CA{XG51};
STICKLINE((C>=O),CLOSE,HIGH,0,0),COLOR0726CA{XG51};
STICKLINE((C<O),CLOSE,LOW,0,0),COLORDE9100{XG51};
STICKLINE((C<O),OPEN,HIGH,0,0),COLORDE9100{XG51};
STICKLINE((C<O),CLOSE,OPEN,4,0),COLORFF5B00{XG51};
STICKLINE((C<O),CLOSE,OPEN,3.4,0),COLORFF6C00{XG51};
STICKLINE((C<O),CLOSE,OPEN,2.8,0),COLORFF7B00{XG51};
STICKLINE((C<O),CLOSE,OPEN,2.2,0),COLORFF9C00{XG51};
STICKLINE((C<O),CLOSE,OPEN,1.6,0),COLORFFBE00{XG51};
STICKLINE((C<O),CLOSE,OPEN,1,0),COLORFFCC00{XG51};
STICKLINE((C<O),CLOSE,OPEN,0.3,0),COLORFFFF00{XG51};
STICKLINE((C>O),CLOSE,OPEN,4,0),COLOR070084{XG51};
STICKLINE((C>O),CLOSE,OPEN,3.4,0),COLOR0000A3{XG51};
STICKLINE((C>O),CLOSE,OPEN,2.8,0),COLOR0000B7{XG51};
STICKLINE((C>O),CLOSE,OPEN,2.2,0),COLOR0000CD{XG51};
STICKLINE((C>O),CLOSE,OPEN,1.6,0),COLOR0000E9{XG51};
STICKLINE((C>O),CLOSE,OPEN,1,0),COLOR0754E9{XG51};
STICKLINE((C>O),CLOSE,OPEN,0.5,0),COLOR076EF3{XG51};
STICKLINE((C>O),CLOSE,OPEN,0.2,0),COLOR077BF3{XG51};
VAR2A:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))){XG51};
VAR3A:=((REF(VAR2A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR4A:=((REF(VAR3A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR5A:=((REF(VAR4A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR6A:=((REF(VAR5A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR7A:=((REF(VAR6A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR8A:=((REF(VAR7A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR9A:=((REF(VAR8A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARAA:=((REF(VAR9A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARBA:=((REF(VARAA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARCA:=((REF(VARBA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARDA:=((REF(VARCA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAREAA:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))){XG51};
VARFA:=((REF(VAREAA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR10A:=((REF(VARFA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR11A:=((REF(VAR10A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR12A:=((REF(VAR11A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR13A:=((REF(VAR12A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR14A:=((REF(VAR13A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR15A:=((REF(VAR14A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR16A:=((REF(VAR15A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR17A:=((REF(VAR16A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR18A:=((REF(VAR17A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR19A:=((REF(VAR18A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR1A:=(REF((((((((((((VAREAA OR VARFA) OR VAR10A) OR VAR11A) OR VAR12A) OR
VAR13A) OR VAR14A) OR VAR15A) OR VAR16A) OR VAR17A) OR VAR18A) OR VAR19A),1) ANDVAR2A){XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,4,0),COLOR1029FF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,3.4,0),COLOR1040FF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,2.8,0),COLOR1083FF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,2.2,0),COLOR10ABFF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,1.6,0),COLOR10D0FF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,1,0),COLOR10FFFF{XG51};
STICKLINE(VAR1A,O,O+(C-O)/3,0.3,0),COLOR00FFFF{XG51};
AA:=(REF((((((((((((VAR2A OR VAR3A) OR VAR4A) OR VAR5A) OR VAR6A) OR VAR7A) OR
VAR8A) OR VAR9A)OR VARAA) OR VARBA) OR VARCA) OR VARDA),1) AND VAREAA){XG51};
STICKLINE(AA,O,O+(C-O)/3,4.3,0),COLOR009900{XG51};
STICKLINE(AA,O,O+(C-O)/3,3.2,0),COLOR00AA00{XG51};
STICKLINE(AA,O,O+(C-O)/3,2.4,0),COLOR00BB00{XG51};
STICKLINE(AA,O,O+(C-O)/3,1.7,0),COLOR00CC00{XG51};
STICKLINE(AA,O,O+(C-O)/3,1.1,0),COLOR00DD00{XG51};
STICKLINE(AA,O,O+(C-O)/3,0.5,0),COLOR00EE00{XG51};
STICKLINE(AA,O,O+(C-O)/3,0.2,0),COLOR00FF00{XG51};
A13:=EMA(CLOSE,55){XG51};
A14:=MA(CLOSE,75){XG51};
A15:=EMA(A14,3){XG51};
A16:=EMA(A15,3){XG51};
A17:=(HIGH + LOW) / 5{XG51};
A18:=(MA(A17,4)) - (MA(A17,34)){XG51};
A19:=crOSS(A18,0){XG51};
A20:=CROSS(0,A18){XG51};
A21:=BARSLAST(A19){XG51};
A22:=BARSLAST(A20){XG51};
A23:=REF(A19,1){XG51};
A24:=REF(A20,1){XG51};
A25:=BARSLAST(A23){XG51};
A26:=BARSLAST(A24){XG51};
A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26))){XG51};
A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22){XG51};
A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21){XG51};
A30:=A28 AND ((COUNT(A28,A21)) = 1){XG51};
A31:=A29 AND ((COUNT(A29,A22)) = 1){XG51};
A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1))){XG51};
A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))){XG51};
DRAWTEXT(A32,SMA2*0.99,'←锁喉'),COLORBLUE{XG51};
ac:=AMOUNT/(vol){XG51};
YY:=MA(AC,13){XG51};
LLL:=(C-YY)/YY*100{XG51};
MIDC := MA(CLOSE,22){XG51};
UPPERC:= MIDC + 2*STD(C,22){XG51};
LOWERC:= MIDC - 2*STD(C,22){XG51};
BBA:=(C-LOWERC)/(UPPERC-LOWERC){XG51};
LIFENGcyc:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1)){XG51};
STICKLINE(LIFENGCYC,LOW*0.93,LOW*0.95,6,0)COLORWHITE{XG51};
STICKLINE(LIFENGCYC>0,C,O,4,0),COLORWHITE{XG51};
STICKLINE(LIFENGCYC>0,C,O,3.4,0),COLOR1029FF{XG51};
STICKLINE(LIFENGCYC>0,C,O,2.8,0),COLOR1040FF{XG51};
STICKLINE(LIFENGCYC>0,C,O,2.2,0),COLOR1083FF{XG51};
STICKLINE(LIFENGCYC>0,C,O,1.6,0),COLOR10ABFF{XG51};
STICKLINE(LIFENGCYC>0,C,O,1,0),COLOR10D0FF{XG51};
STICKLINE(LIFENGCYC>0,C,O,0.3,0),COLOR10FFFF{XG51};
DRAWTEXT(LIFENGCYC>0,LOW*0.98,'$'),COLORFF00FF{XG51};
DRAWTEXT(LIFENGCYC>0,LOW*0.92,'探头'),COLORFF00FF{X+G_5!1+C+N+{};