U成本分析+牛精优化 

{U成本分析}

input:N(10,1,30),N1(30,20,50),N2(50,30,80),N3(80,50,100);
u1:COST(n );
u2:COST(n1 );
u3:COST(n2 );
u4:COST(n3);

{牛精优化}
DRAWGBK(1,COLORRGB(0,0,20),COLORRGB(0,60,50),1);
Var1:=(收盘价-最低值(最低价,100))/(最高值(最高价,100)-最低值(最低价,100))*200;
Var2:=移动平均(Var1,3,1);
Var3:=移动平均(Var2,3,1);
Var4:=3*Var2-2*Var3;
Var5:=最低值(最低价,5);
Var6:=最高值(最高价,5);
Var7:=指数平滑移动平均((收盘价-Var5)/(Var6-Var5)*100,4)*2;
Var8:=指数平滑移动平均(0.667*向前引用(Var7,1)+0.333*Var7,2);
Var9:=3*Var7-2*Var8;
VarA:=乘幂(简单移动平均(收盘价,5),2)+简单移动平均(收盘价,5);
VarB:=乘幂(简单移动平均(最低价,5),2)+简单移动平均(最低价,5);
VarC:=乘幂(简单移动平均(最高价,5),2)+简单移动平均(最高价,5);
VarD:=(VarA-最低值(VarB,64))/(最高值(VarC,64)-最低值(VarB,64))*150+65-10;
VarE:=移动平均(VarD,3,1)*1.5-100;
VarF:=移动平均(VarE,3,1);
Var10:=3*VarE-2*VarF;
Var11:=(最高价+最低价+收盘价*2)/4;
Var12:=指数平滑移动平均(Var11,13);
Var13:=估算标准差(Var11,13);
Var14:=(Var11-Var12)*100/Var13;
Var15:=指数平滑移动平均(Var14,5);
Var16:=指数平滑移动平均(Var15,13);
Var17:=指数平滑移动平均(Var15,13)+200-100;
Var18:=指数平滑移动平均(Var17,10);
Var19:=3*Var17-2*Var18;
Var1A:=Var2+Var7+VarE+Var17;
Var1B:=Var3+Var8+VarF+Var18;
Var1C:=Var4+Var9+Var10+Var19;
Var1D:=(最高价+最低价+收盘价)/3;
Var1E:=成交额/成交量/100;
Var1F:=求和(成交额,5)/求和(成交量,5)/100;
Var20:=(Var1D-简单移动平均(Var1D,34))/(0.015*平均绝对偏差(Var1D,34));
Var21:=动态移动平均(成交额/成交量/100,成交量/流通盘大小);
Var22:=(最高价+最低价+收盘价+Var1D)/4;
Var23:=指数平滑移动平均(Var22,24);
Var24:=估算标准差(Var22,24);
Var25:=(Var22-Var23)/Var24*100;
Var26:=(Var1D-简单移动平均(Var1D,24))/(0.015*平均绝对偏差(Var1D,24));
Var27:=指数平滑移动平均(Var25,5);
Var28:=(Var1E-简单移动平均(Var1E,21))/(0.015*平均绝对偏差(Var1E,21));
Var29:=(Var1F-简单移动平均(Var1F,90))/(0.015*平均绝对偏差(Var1F,90));
Var2A:=((Var29+Var28+Var27+Var26+Var20)/5+165)/4;
Var2B:=(指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(Var2A,15),10),5)-25)*2+Var21;
Var2C:=(Var1A+Var1B+Var1C*30)/32/5-15;
Var2D:=指数平滑移动平均(Var2C,13);
Var2E:=(Var2A+Var2C)/2/1.1;
0, 点状线;
50, 点状线;
105, 点状线;
短期: Var2E;
中期: (Var2B+Var2D)/2;
Var2F:=指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(收盘价,13),13),13);
Var30:=((Var2F-向前引用(Var2F,1))/向前引用(Var2F,1)*100+0.45)*50;
Var31:=简单移动平均(Var30,21);
Var32:=((最高值(最高价,15)-收盘价)/(最高值(最高价,15)-最低值(最低价,15))*(-1)+0.96)*106;
Var33:=((最高值(最高价,100)-收盘价)/(最高值(最高价,100)-最低值(最低价,100))*(-1)+0.96)*106;
Var34:=(最高价+最低价+收盘价)/3;
Var35:=((Var34-简单移动平均(Var34,14))/(0.015*平均绝对偏差(Var34,14))+200)/4;
Var36:=(最高价+最低价+收盘价*2)/4;
Var37:=指数平滑移动平均(Var36,13);
Var38:=估算标准差(Var36,13);
Var39:=(Var36-Var37)*100/Var38;
Var3A:=指数平滑移动平均(Var39,5);
Var3B:=指数平滑移动平均(Var3A,13);
Var3C:=(指数平滑移动平均(Var3A,13)+100)/2-5;
Var3D:=指数平滑移动平均(Var3C,10);
Var3E:=指数平滑移动平均(成交量/流通盘大小,21)*13;
Var3F:=(92-100/(1+Var3E))*2.38;
Var40:=向前引用(收盘价,1);
Var41:=获利盘比例(收盘价)*100;
Var42:=获利盘比例(向前引用(收盘价,1))*100;
Var43:=向前引用(对应大盘收盘价,1);
Var44:=(收盘价-Var40)/Var40;
Var45:=(对应大盘收盘价-Var43)/Var43;
Var46:=Var44-Var45;
Var47:=移动平均(最大值(收盘价-Var40,0),4,1)/移动平均(绝对值(收盘价-Var40),4,1)*100;
Var48:=移动平均(最大值(收盘价-Var40,0),8,1)/移动平均(绝对值(收盘价-Var40),8,1)*100;
Var49:=移动平均(最大值(收盘价-Var40,0),12,1)/移动平均(绝对值(收盘价-Var40),12,1)*100;
Var4A:=移动平均(最大值(收盘价-Var40,0)*(1+成交量/流通盘大小),12,1)/移动平均(绝对值(收盘价-Var40)*(1+成交量/流通盘大小),12,1)*100;
Var4B:=移动平均(最大值(Var41-Var42,0),12,1)/移动平均(绝对值(Var41-Var42),12,1)*100;
Var4C:=移动平均(最大值(Var46,0),12,1)/移动平均(绝对值(Var46),12,1)*100;
Var4D:=(Var47+Var48+Var49)/3;
Var4E:=(Var4A+Var4B+Var4C+Var4D)/4;
Var4F:=(Var4E-31)*2.3;
Var50:=(指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(Var4F,4),3),2),1)-10)*1.43;
Var51:=(最高价+最低价+收盘价*2)/4;
Var52:=指数平滑移动平均(Var51,13);
Var53:=估算标准差(Var51,13);
Var54:=(Var51-Var52)*100/Var53;
Var55:=指数平滑移动平均(Var54,5);
Var56:=指数平滑移动平均(Var55,13);
Var57:=(指数平滑移动平均(Var56,13)+100)/2-5;
Var58:=指数平滑移动平均(Var57,10);
Var59:=3*Var57-2*Var58;
Var5A:=(收盘价-最低值(最低价,90))/(最高值(最高价,90)-最低值(最低价,90))*100;
Var5B:=移动平均(Var5A,7,1);
Var5C:=移动平均(Var5B,10,1);
Var5D:=3*Var5B-2*Var5C;
Var5E:=乘幂(简单移动平均(收盘价,5),2)+简单移动平均(收盘价,5);
Var5F:=乘幂(简单移动平均(最低价,5),2)+简单移动平均(最低价,5);
Var60:=乘幂(简单移动平均(最高价,5),2)+简单移动平均(最高价,5);
Var61:=(Var5E-最低值(Var5F,100))/(最高值(Var60,100)-最低值(Var5F,100))*100-15;
Var62:=移动平均(Var61,21,1)*1.5;
Var63:=移动平均(Var62,3,1);
Var64:=3*Var62-2*Var63;
Var65:=乘幂(简单移动平均(收盘价,5),2)+简单移动平均(收盘价,5);
Var66:=乘幂(简单移动平均(最低价,5),2)+简单移动平均(最低价,5);
Var67:=乘幂(简单移动平均(最高价,5),2)+简单移动平均(最高价,5);
Var68:=(Var65-最低值(Var66,64))/(最高值(Var67,64)-最低值(Var66,64))*100;
Var69:=移动平均(Var68,2,1);
Var6A:=移动平均(Var69,2,1);
Var6B:=3*Var69-2*Var6A;
Var6C:=指数平滑移动平均(成交量/流通盘大小,21)*100;
Var6D:=(100/(1+Var6C)*(-1)+92)*1.57;
Var6E:=动态移动平均(成交额/成交量/100,成交量/流通盘大小);
Var6F:=(最高价+最低价+收盘价)/3;
Var70:=((Var6F-简单移动平均(Var6F,5))/(0.015*平均绝对偏差(Var6F,5))+Var6E+140)/4;
Var71:=指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(收盘价,100),100),100);
Var72:=((Var71-向前引用(Var71,1))/向前引用(Var71,1)*100+0.28)*179;
Var73:=指数平滑移动平均(Var72,20);
Var74:=(Var5D+Var64)/2;
Var75:=(Var69+Var6A+Var6B+Var57+Var5B+Var62+Var6D+Var58+Var5C+Var63+Var59
+Var5D+Var64+Var70+指数平滑移动平均(Var35,5)*5)/20;
Var76:=(Var57+Var5B+Var62+Var6D+Var74+Var72+Var73)/7;
Var77:=(Var58+Var5C+Var63+Var6D+Var74+Var72+Var73)/7;
Var78:=(Var76+Var77)/2*1.22;
Var79:=(指数平滑移动平均((Var74+Var78+指数平滑移动平均(Var75,5))/3,89)-12)*1.72;
长期: (Var78+Var79)/2; 
 
下载后，解压公式文件 ****.ALG.htm
改成：****.ALG，就可以引入安装