 | |  |  |
指南针短线强弱源码公式：
//HIGH, CLOSE, LOW, OPEN, VOL, 流通盘
//LS01, LS02, LS03, LS1, LS2, LS3, LS4, LS5, LS6, LS7, LS8, LS9, LS10, LS11, LS12, LS13, LS14, LS15, LS16, LS17, LS18, LS19, LS20, LS21, LS22, LS23, LS24, LS25, LS26, LS27, LS28, LSA, LSB, LSE, LSF, LS1A, LS1B, LS1C, LSS1E, LS1F, LS91, LSA1, LS152, LS151, LS162, LS161, LS181, LS182, LS1B1, LS1B2, LSCC, LS1CB, LS1CA, LS1D, LS1E
//快线, 快平, 慢线, 慢平
LS01=SMA(LS01,CHOOSE(CLOSE>REF(CLOSE,1), CLOSE-REF(CLOSE,1),0),3,1);
LS02=SMA(LS02,CHOOSE(CLOSE<=REF(CLOSE,1),ABS(CLOSE-REF(CLOSE,1)),0),3,1);
LS03=100*LS01/(LS01+LS02);
快线=EMA(快线,LS03,3);
快平=EMA(快平,快线,3);
CURVELINE(快线,clrRed);
CURVELINE(快平,clrGreen);
LS1=1/COSTD(CLOSE,0);//?
LS2=MA(CLOSE,13);
LS3=100-ABS((CLOSE-LS2)/LS2*100);
LS4=LLV(LOW,75);
LS5=HHV(HIGH,75);
LS6=(LS5-LS4)/100;
LS7=SMA(LS7,(CLOSE-LS4)/LS6,20,1);
LS8=SMA(LS8,(OPEN-LS4)/LS6,20,1);
LS9=3*LS7-2*SMA(LS91,LS7,15,1);
LSA=3*LS8-2*SMA(LSA1,LS8,15,1);
LSB=100-LSA;
LSE=REF(LOW,1)*0.9;
LSF=LOW*0.9;
LS10=(LSF*VOL+LSE*(流通盘-VOL))/流通盘;
LS11=EMA(LS11,LS10,30);
LS12=CLOSE-REF(CLOSE,1);
LS13=MAX(LS12,0);
LS14=ABS(LS12);
LS15=SMA(LS151,LS13,7,1)/SMA(LS152,LS14,7,1)*100;
LS16=SMA(LS161,LS13,13,1)/SMA(LS162,LS14,13,1)*100;
LS17=BLAST(CLOSE,0);
LS18=SMA(LS181,MAX(LS12,0),6,1)/SMA(LS182,ABS(LS12),6,1)*100;
LS19=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
LS1A=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
LS1B=SMA(LS1B2,(SMA(LS1B1,LS1A,4,1)-50)*2,3,1);
LS1Ca=S000001(CLOSE[0]);
LS1Cb=LLV(S000001(LOW),14);
lscc=HHV(S000001(HIGH),14);
LS1C=(LS1Ca-LS1Cb)/(lscc-LS1Cb)*100;
LS1D=SMA(LS1D,LS1C,4,1);
LS1E=SMA(LS1E,LS1D,3,1);
LS1F=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
LS20=LS18<=25 & LS19<-95 & LS1F>20 & LS1B<-30 & LS1E<30 & LS11-CLOSE>=-0.25 & LS15<22 & LS16<28 & LS17>50;
LS21=(HIGH+LOW+CLOSE)/3;
LS22=(LS21-MA(LS21,14))/(0.015*AVEDEV(LS21,14));
LS23=(LS21-MA(LS21,70))/(0.015*AVEDEV(LS21,70));
LS24=CHOOSE(LS22>=150 & LS22<200 & LS23>=150 & LS23<200,10,0);
LS25=CHOOSE(LS22<=-150 & LS22>-200 & LS23<=-150 & LS23>-200,-10,LS24);
LS26=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
LS27=LS26*(-1);
LS28=SMA(LS28,LS26,3,1);
慢线= SMA(慢线,LS28,3,1);
CURVELINE(慢线,clrYellow);
慢平= SMA(慢平,慢线,3,1);
CURVELINE(慢平,clrBlue);
SPLITTER(sptAbsolute,20,clrSky,50,clrWhite,80,clrPurple);
TITLE("快线",快线,"",clrRed
,"快平",快平,"",clrGreen
,"慢线",慢线,"",clrYellow
,"慢平",慢平,"",clrBlue); |
| |  | |  |
|
