软件名称:[B]临界红蓝[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:12.0 KB
官方主页:Home Page
更新时间:2009-09-26 06:18:22
软件简介:
var1:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
var2:=HIGH-REF(HIGH,1);
var3:=REF(LOW,1)-LOW;
var4:=SMA(IF(var2>0 AND var2>var3,var2,0),12,1);
var5:=SMA(IF(var3>0 AND var3>var2,var3,0),12,1);
var6:=var4*100/var1;
var7:=var5*100/var1;
var8:=SMA(ABS(var7-var6)/(var7+var6)*100,12,1);
var9:=(var8+REF(var8,5))/2;
varA:=SUM(HIGH-OPEN,12)/SUM(OPEN-LOW,12)*100;
varB:=SUM(MAX(0,HIGH-REF(CLOSE,1)),12)/SUM(MAX(0,REF(CLOSE,1)-LOW),12)*100;
varC:=AMOUNT/VOL/100; varD:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
varE:=SUM(AMOUNT,5)/varC/100;
varF:=SUM(AMOUNT,13)/varC/100;
var10:=SUM(AMOUNT,34)/varC/100;
var11:=SUM(AMOUNT,209)/varC/100;
var12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
var13:=var12/CAPITAL;
var14:=VOL/CAPITAL*varD+var13*REF(varC,1);
CYC5: DMA(varD,VOL/varE);
CYC13: DMA(varD,VOL/varF);
CYC34: DMA(varD,VOL/var10);
CYC88: DMA(varD,VOL/CAPITAL);
var15:=100*(CLOSE-CYC5)/CYC5;
var16:=100*(CLOSE-CYC13)/CYC13;
var17:=100*(CLOSE-CYC34)/CYC34;
var18:=100*(CLOSE-CYC88)/CYC88;
var19:=MA(CLOSE,13);
var1A:=100*(var19-REF(var19,1))/REF(var19,1);
var1B:=CLOSE-LOW;
var1C:=HIGH-LOW;
var1D:=CLOSE-HIGH;
var1E:=IF(CLOSE>=0,(var1B/var1C+var1D/var1C)*VOL,(var1D/var1C+var1B/var1C)*VOL);
var1F:=SUM(var1E,10)/10000;
var20:=100*(CYC13-REF(CYC13,1))/REF(CYC13,1);
var21:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
var22:=SMA(var21,3,1);
var23:=SMA(var22,3,1);
var24:=3*var22-2*var23;
var25:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
var26:=SMA(var25,5,1);
var27:=SMA(var26,10,1);
var28:=CROSS(var27,var26);
var29:=var27>80 OR var26>80;
var2A:=var28 AND var29;
var2B:=var1A>0 AND var20>0 AND var1F>0;
var2C:=var1A<0 OR var20<0 OR var1F<0 OR var16<0;
var2D:=CLOSE; var2E:=OPEN; var2F:=HIGH; var30:=LOW;
看涨线: STICKLINE(var2B,var2D,var2E,8,0),COLORRED;
谨慎持: STICKLINE(var2B,var2F,MAX(var2D,var2E),0,1), COLORRED;
持谨慎: STICKLINE(var2B,MIN(var2D,var2E),var30,0,1), COLORRED;
看跌线: STICKLINE(var2C,var2D,var2E,8,0), COLORBLUE;
暂观望: STICKLINE(var2C,var2F,MAX(var2D,var2E),0,1),COLORBLUE;
空仓等: STICKLINE(var2C,MIN(var2D,var2E),var30,0,1),COLORBLUE;
顶部区: STICKLINE(var2A,var2F,var30,8,0), COLORYELLOW;
var31:=1.1*CLOSE;
var32:=0.9*CLOSE;
var33:=100*(WINNER(var31)-WINNER(var32));
var34:=VOL/CAPITAL*100<3;
var35:=100*WINNER(CLOSE)>90;
var36:=var34 AND var35;
var37:=SUM(VOL,34)/CAPITAL;
var38:=100-100/(1+var37)>0;
var39:=100-100/(1+var37)<34;
var3A:=var38 AND var39;
var3B:=100*VOL/CAPITAL;
var3C:=100*(WINNER(CLOSE)-REF(WINNER(CLOSE),1));
var3D:=4;
var3E:=var3C/var3B;
var3F:=var3C/var3B>10;
var40:=100*(WINNER(CLOSE)-REF(WINNER(CLOSE),var3D))/5*MA(var3B,5);
var41:=LLV(LOW,240);
var42:=100*(CLOSE-var41)/var41>15;
var43:=100*(CLOSE-var41)/var41<45;
var44:=100*(CLOSE-var41)/var41;
var45:=var42 AND var43;
var46:=100*(WINNER(CLOSE)-WINNER(OPEN))>18;
var47:=100*(WINNER(CLOSE)-WINNER(OPEN))<100;
var48:=var46 AND var47;
var49:=var48 AND var45 AND var3F AND var3A;
DRAWTEXT(var49,HIGH,'临界');
var4A:=100*(CLOSE-COST(0))/(COST(100)-COST(0));
var4B:=100*(CYC88-COST(0))/(COST(100)-COST(0));
var4C:=var4A<25 AND var4B>50;
var4D:=var33<10 AND var16<-16;
DRAWTEXT(var4D AND var4C,LOW,'超跌看涨');
var4E:=100*WINNER(CLOSE);
var4F:=var16<-16 AND var4E>=40;
var50:=WINNER(CLOSE)/(VOL/CAPITAL);
DRAWTEXT(var2A,HIGH,'顶部临界'),COLORYELLOW;
var51:=(var16-LLV(var16,60))/(HHV(var16,60)-LLV(var16,60))*100;
var52:=LLV(LOW,240);
var53:=100*(CLOSE-var52)/var52;
var54:=WINNER(CLOSE)/SMA(VOL/CAPITAL,13,1);
var55:=(CLOSE-LLV(LOW,240))/(HHV(HIGH,240)-LLV(LOW,240))*100;
var56:=(CLOSE-LLV(LOW,480))/(HHV(HIGH,480)-LLV(LOW,480))*100;
var57:=100*(1-WINNER(CLOSE));
var58:=var44<1 AND var50<0.3 AND var54<0.3 AND var3E<0 AND var55<0.5 AND var56<0.5 AND var33<1.5 AND var4A<1 AND var51=0;
DRAWTEXT(var58,LOW,'超跌狙击'), COLORYELLOW;
var59:=100*(WINNER(CLOSE)-WINNER(0.7*CLOSE));
var5A:=100*(CYC5-REF(CYC5,1))/REF(CYC5,1);
var5B:=var59>70 AND var5A>1 AND var45;
DRAWTEXT(var5B,LOW,'临界区间'), COLORYELLOW;
[url=http://www.70822.com/soft/sort013/sort03/down-12953.html]临界红蓝[/url]