「翔博精选指标」多空博弈，源码

顶:82,COLORFFFF00,LINETHICK1;
顶A:90,COLORFF0000,LINETHICK9;
低:18,COLOR208FFF,LINETHICK1;
VAR2:=(C-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR3:=SMA(VAR2,13,8);
多方: SMA(VAR3,13,8),COLORRED,LINETHICK2;
IF(多方<50,多方,DRAWNULL),LINETHICK2,COLORFF0000;
LSG:=多方-45;
STICKLINE(LSG >=0,(多方- LSG *0.05),(多方- LSG *0.15),0,0) ,COLOR00FFFF;
STICKLINE(LSG >=0,(多方- LSG *0.2),(多方- LSG *0.35),0,0) ,COLOR00CCFF;
STICKLINE(LSG >=0,(多方- LSG *0.4),(多方- LSG *0.55),0,0) ,COLOR0099FF;
STICKLINE(LSG >=0,(多方- LSG *0.6),(多方- LSG *0.75),0,0) ,COLOR0066FF;
STICKLINE(LSG >=0,(多方- LSG *0.8),(多方- LSG *0.95),0,0) ,COLOR0000CC;
STICKLINE(LSG <0,(45+ LSG *0.05),(45+ LSG *0.15),0,0) ,COLOR006600;
STICKLINE(LSG <0,(45+ LSG *0.2),(45+ LSG *0.35),0,0) ,COLOR009900;
STICKLINE(LSG <0,(45+ LSG *0.4),(45+ LSG *0.55),0,0) ,COLOR00CC00;
STICKLINE(LSG <0,(45+ LSG *0.6),(45+ LSG *0.75),0,0) ,COLOR00FF00;
STICKLINE(LSG <0,(45+ LSG *0.8),(45+ LSG *0.95),0,0) ,COLOR66FF00;
中轴:45,COLORFFFFCC;
B:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
YJD: (EMA(CS,3)),COLOR00FFFF,LINETHICK1;
短期线:B+100,COLOREEEEEE,LINETHICK2;
DRAWTEXT(ISLASTBAR AND YJD>REF(YJD,1),YJD,'↑'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND YJD<REF(YJD,1),YJD,'↓'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,顶,' 顶'),COLORFFFF00;
DRAWTEXT(ISLASTBAR,低,' 低'),COLOR208FFF;
R2:=TROUGHBARS(3,15,1)<10;
R4:=IF(R2=1,50,0);
底部:=IF(R4=50,10,0);
买入:IF(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,7,0),COLOR0000FF,LINETHICK3;
DRAWICON(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,10,11);
买入延迟线:IF(底部=10 AND REF(底部,1)=10,5,0),COLOR00CCFF,LINETHICK1;
STICKLINE(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,0,3,2,0),COLOR00FFFF;
VA:=(C*2+H+L)/4;
SK:=EMA(VA,13)-EMA(VA,21);
SD:=EMA(SK,2);
SF:=SD>REF(SD,1);
缘:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
中:=SMA(缘,3,1);
慢:=SMA(中,3,1);
快:=3*中-2*慢;
DRAWICON(CROSS(快,中) AND SF,2,15);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
DRAWICON(CROSS(DIFF,DEA),10,23);
DRAWTEXT(CROSS(DIFF,DEA),12,' MACD金叉');
DRAWTEXT(CROSS(快,中) AND SF,3,' KD金叉');
OK:=SMA((C-LLV(L,8))/(HHV(H,8)-LLV(L,8))*100,2.5,1);

BY:=OK>REF(OK,1) AND CROSS(OK,SMA(OK,2.5,1)) AND OK<50;
DRAWICON(BY,低,26);