同花顺收费公式sfgs.doc

同花顺收费公式SFGS-同花顺指标公式源码
减小字体增大字体
{SFGS收费公式THS}   
Var1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;   
Var2:=2*ABS(Var1);   
Var3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);   
Var4:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);   
Var5:=(HIGH+LOW+CLOSE)/3;   
Var6:=(Var5-MA(Var5,14))/(*AVEDEV(Var5,14));   
Var7:=(Var5-MA(Var5,70))/(*AVEDEV(Var5,70));   
Var8:=IF(Var6>=150 AND Var6<200 AND Var7>=150 AND Var7<200,10,0);   
Var9:=IF(Var6<=-150 AND Var6>-200 AND Var7<=-150 AND Var7>-200,-10,Var8);   
VarA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;   
VarB:=100-ABS(VarA);   
VarC:=3*SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);   
VarD:=3*SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);   
VarE:=REF(LOW,1)*;   
VarF:=LOW*;   
Var10:=(VarF*VOL+VarE*(CAPITAL-VOL))/CAPITAL;   
Var11:=EMA(Var10,30);   
  
Var12:=Var11-CLOSE;   
Var13:=REF(CLOSE,1);   
Var14:=SMA(MAX(CLOSE-Var13,0),7,1)/SMA(ABS(CLOSE-Var13),7,1)*100;