|
{太極波段} Var1:=SUM(HIGH-OPEN,21)/SUM(OPEN-LOW,21)*100-65; Var2:=(SUM(MAX(0,HIGH-REF(CLOSE,1)),21)/SUM(MAX(0,REF(CLOSE,1)-LOW),21)*100-65)*0.7; Var3:=VOL*CLOSE; Var4:=EMA(Var3,13)/EMA(VOL,13); Var5:=((EMA(CLOSE,5)-Var4)/Var4*100+5)*8; Var6:=(HIGH+LOW+CLOSE)/3; Var7:=(SUM(MAX(0,HIGH-REF(Var6,1)),34)/SUM(MAX(0,REF(Var6,1)-LOW),34)*100-75)*0.7; Var8:=MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,20)+MA(CLOSE,30)+MA(CLOSE,60)/5; Var9:=MA(VOL,5)+MA(VOL,10)+MA(VOL,20)+MA(VOL,30)+MA(VOL,60)/5; VarA:=MA(HIGH,5)+MA(HIGH,10)+MA(HIGH,20)+MA(HIGH,30)+MA(HIGH,60)/5; VarB:=MA(LOW,5)+MA(LOW,10)+MA(LOW,20)+MA(LOW,30)+MA(LOW,60)/5; VarC:=(MA(Var8*Var9,2)/CAPITAL-1.2)*10; VarD:=(MA(VarA*Var9,2)/CAPITAL-1.2)*10; VarE:=(MA(VarB*Var9,2)/CAPITAL-1.2)*10; VarF:=(HHV(HIGH,100)-CLOSE)/(HHV(HIGH,100)-LLV(LOW,100))*(-100); Var10:=SMA(VarF,10,1)+98; Var11:=SMA(Var10,8,1); Var12:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+98; Var13:=3*Var10-2*Var11; Var14:=3*Var11-2*Var10; Var15:=(MA(CLOSE,7)-MA(CLOSE,55)+0.4)*31.2; Var16:=("1A0001$CLOSE"-REF("1A0001$CLOSE",1))/REF("1A0001$CLOSE",1); Var17:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1); Var18:=IF(Var16>0.01,0.9,IF(Var16>-0.025,1,1.2)); Var19:=Var18*(Var17-Var16)*100; Var1A:=(SUM(Var19,30)+15)*1.62; Var1B:=(INDEXC-REF(INDEXC,1))/REF(INDEXC,1); Var1C:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1); Var1D:=IF(Var16>0.01,0.9,IF(Var16<-0.05,1,1.2)); Var1E:=Var1D*(Var1C-Var1B)*100; Var1F:=(SUM(Var1E,9)+15)*2.43; Var20:=INDEXA/100000000; Var21:=INDEXADV; Var22:=INDEXDEC; Var23:=Var21/(Var21+Var22)*Var20; Var24:=Var22/(Var21+Var22)*Var20; Var25:=EMA(Var23,30); Var26:=EMA(Var24,30); Var27:=EMA(Var25,21); Var28:=EMA(Var26,20); Var29:=(EMA(Var25,3)-12)*0.98; Var2A:=EMA(Var27,6)*0.98; Var2B:=EMA(Var28,2); Var2C:=EMA(EMA(EMA(CLOSE,13),13),13); Var2D:=((Var2C-REF(Var2C,1))/REF(Var2C,1)*100+0.45)*50; Var2E:=MA(Var2D,21); Var2F:=((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15))*(-1)+0.96)*106; Var30:=((HHV(HIGH,100)-CLOSE)/(HHV(HIGH,100)-LLV(LOW,100))*(-1)+0.96)*106; Var31:=(HIGH+LOW+CLOSE)/3; Var32:=((Var31-MA(Var31,14))/(0.015*AVEDEV(Var31,14))+200)/4; Var33:=(HIGH+LOW+CLOSE*2)/4; Var34:=EMA(Var33,13); Var35:=STD(Var33,13); Var36:=(Var33-Var34)*100/Var35; Var37:=EMA(Var36,5); Var38:=EMA(Var37,13); Var39:=(EMA(Var37,13)+100)/2-5; Var3A:=EMA(Var39,10); Var3B:=EMA(VOL/CAPITAL,21)*13; Var3C:=(92-100/(1+Var3B))*2.38; Var3D:=REF(CLOSE,1); Var3E:=WINNER(CLOSE)*100; Var3F:=WINNER(REF(CLOSE,1))*100; Var40:=REF(INDEXC,1); Var41:=(CLOSE-Var3D)/Var3D; Var42:=(INDEXC-Var40)/Var40; Var43:=Var41-Var42; Var44:=SMA(MAX(CLOSE-Var3D,0),4,1)/SMA(ABS(CLOSE-Var3D),4,1)*100; Var45:=SMA(MAX(CLOSE-Var3D,0),8,1)/SMA(ABS(CLOSE-Var3D),8,1)*100; Var46:=SMA(MAX(CLOSE-Var3D,0),12,1)/SMA(ABS(CLOSE-Var3D),12,1)*100; Var47:=SMA(MAX(CLOSE-Var3D,0)*(1+VOL/CAPITAL),12,1)/SMA(ABS(CLOSE-Var3D)*(1+VOL/CAPITAL),12,1)*100; Var48:=SMA(MAX(Var3E-Var3F,0),12,1)/SMA(ABS(Var3E-Var3F),12,1)*100; Var49:=SMA(MAX(Var43,0),12,1)/SMA(ABS(Var43),12,1)*100; Var4A:=(Var44+Var45+Var46)/3; Var4B:=(Var47+Var48+Var49+Var4A)/4; Var4C:=(Var4B-31)*2.3; Var4D:=(EMA(EMA(EMA(EMA(Var4C,4),3),2),1)-10)*1.43; Var4E:=(HIGH+LOW+CLOSE*2)/4; Var4F:=EMA(Var4E,13); Var50:=STD(Var4E,13); Var51:=(Var4E-Var4F)*100/Var50; Var52:=EMA(Var51,5); Var53:=EMA(Var52,13); Var54:=(EMA(Var53,13)+100)/2-5; Var55:=EMA(Var54,10); Var56:=3*Var54-2*Var55; Var57:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*100; Var58:=SMA(Var57,7,1); Var59:=SMA(Var58,10,1); Var5A:=3*Var58-2*Var59; Var5B:=POW(MA(CLOSE,5),2)+MA(CLOSE,5); Var5C:=POW(MA(LOW,5),2)+MA(LOW,5); Var5D:=POW(MA(HIGH,5),2)+MA(HIGH,5); Var5E:=(Var5B-LLV(Var5C,100))/(HHV(Var5D,100)-LLV(Var5C,100))*100-15; Var5F:=SMA(Var5E,21,1)*1.5; Var60:=SMA(Var5F,3,1); Var61:=3*Var5F-2*Var60; Var62:=POW(MA(CLOSE,5),2)+MA(CLOSE,5); Var63:=POW(MA(LOW,5),2)+MA(LOW,5); Var64:=POW(MA(HIGH,5),2)+MA(HIGH,5); Var65:=(Var62-LLV(Var63,64))/(HHV(Var64,64)-LLV(Var63,64))*100; Var66:=SMA(Var65,2,1); Var67:=SMA(Var66,2,1); Var68:=3*Var66-2*Var67; Var69:=EMA(VOL/CAPITAL,21)*100; Var6A:=(100/(1+Var69)*(-1)+92)*1.57; Var6B:=DMA(AMOUNT/VOL/100,VOL/CAPITAL); Var6C:=(HIGH+LOW+CLOSE)/3; Var6D:=((Var6C-MA(Var6C,5))/(0.015*AVEDEV(Var6C,5))+Var6B+140)/4; Var6E:=EMA(Var6D,5); Var6F:=EMA(EMA(EMA(CLOSE,100),100),100); Var70:=((Var6F-REF(Var6F,1))/REF(Var6F,1)*100+0.28)*179; Var71:=EMA(Var70,20); Var72:=(Var5A+Var61)/2; Var73:=(Var66+Var67+Var68+Var54+Var58+Var5F+Var6A+Var55+Var59+Var60+Var56+Var5A+Var61+Var6D+Var6E*5)/20; Var74:=(Var2F+Var30+Var32+Var6E+Var12*2+Var1F*3+Var1A)/10; Var75:=(Var54+Var58+Var5F+Var6A+Var72+Var70+Var71)/7; Var76:=(Var55+Var59+Var60+Var6A+Var72+Var70+Var71)/7; Var77:=(Var75+Var76)/2; Var78:=(EMA((Var72+Var77+EMA(Var73,5))/3,89)-12)*1.72; Var79:=(Var31-MA(Var31,21))/(0.015*AVEDEV(Var31,21)); Var7A:=EMA(EMA(Var79,2),3); Var7B:=SMA(Var79,2,1); Var7C:=Var77*1.22; Var7D:=Var78; Var7E:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; Var7F:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100; Var80:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100; Var81:=(Var7E+Var7F+Var80)/3; Var82:=(Var2F+Var30+Var32+Var6E+Var81+Var39+Var3A+Var4C+Var4D+Var2D+Var2E+Var3C+Var54+Var55+Var56+Var58+Var59+Var5A+Var5F+Var60+Var61+Var66+Var67+Var68+Var6A+Var70+Var71+Var78+Var72+Var73+Var75+Var76+Var7A+Var7B+Var1+Var2+Var7+Var12+Var15+Var1F+Var1A+Var5+Var10+Var11+Var13+Var14+Var29+Var2A+Var2B+VarC+VarE+VarD)/52; m10:=ma(c,10); 太極: Var82,coloryellow; 進(jìn):if((太極>15 and c>m10),35,0),colorred,linethick2; 出:if(cross(85,太極),65,100),colorgreen,linethick2; 買:IF(CROSS((4*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1)- 3*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1),3,1)),(8)),58,0),stick,colorred,linethick3; drawtext(買,45,'-我買'),coloryellow; Vat3:=REF(CLOSE,1); Vat4:=SMA(MAX(CLOSE-Vat3,0),6,1)/SMA(ABS(CLOSE-Vat3),6,1)*100; 賣: stickline ( CROSS( 80 ,Vat4),100,66,8,0),colorgreen ; drawtext(CROSS( 80 ,Vat4),70,'→我賣'),colorffff00; 陰: 15; 陽: 85;股票論壇 www.55188.com |
|
|
