软件名称：[B]自动划线 唐[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2012-06-23 04:47:10
软件简介:

input: k(1,0,3),n1(4,1,255),n(10,1,255),p1(3,1,255);
DRAWGBK(CLOSE>0,COLORRGB(95,95,95),COLORRGB(0,0,0),1);
F:EMA(C,5);
X:EMA(C,34),COLORGRAY,linethick1;
KS:=if(BARSCOUNT(c)=1,c/10000,(1-C/SMA(C,13,1))*100);
RKS:=REF(KS,1);
MLS:=RKS/KS>1.23 AND RKS>10 AND C/REF(C,1)>1.02;
J:STICKLINE(KS>=10,H,L,0,1),colorwhite,linethick2;
权:EMA(C,13),colorred,linethick2;
证:EMA(KS*C/100+权,3), COLORff9933,linethick1;
反弹:STICKLINE(MLS=1,H,L,0,1),colorff00ff,linethick2;
STICKLINE(权>证,权,证,4,1),COLORFF00FF;
STICKLINE(C>=O,H,L,0,0),COLORred;
STICKLINE(C>=O,C,O,8,0),COLORred;
STICKLINE(C<O,H,L,0,0),COLORGRAY;
STICKLINE(C<O,C,O,8,0),COLORGRAY;
STICKLINE(KS>10,H,L,0,0),colorwhite,linethick1;
STICKLINE(KS>10,O,C,8,1),colorwhite,linethick1;
STICKLINE(MLS,H,L,0,0),color00ffff,linethick1;
STICKLINE(MLS,O,C,8,0),color00ffff,linethick1;
Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
Var2:=CROSS(Var1,0.9);
Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
Var4:=CROSS(Var3,0.9);
压力: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),ColorEA91B5;
支撑: REF(LOW,BARSLAST(Var4)), POINTDOT,Color00b4ff;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),Color00b4ff;
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
aRSV:=SMA(下档线,3,1);
aK:=SMA(aRSV,3,1);
aD:=((3 * aRSV) - (2 * aK));
aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
aRSV24:=SMA(aJ12,3,1);
aK24:=SMA(aRSV24,3,1);
aD24:=((3 * aRSV24) - (2 * aK24));
撑压位:=IF(CROSS(aD24,aD),HIGH,REF(HIGH,BARSLAST(CROSS(aD24,aD))));
底:=LLV(HIGH,30);
STICKLINE(BARSTATUS=2 ,撑压位,撑压位,30,1),LINETHICK1,COLORFFFFFF;
DRAWTEXT(BARSTATUS=2 ,撑压位,'    撑压'),COLORFFFFFF,PXUP20;
STICKLINE(BARSTATUS=2 ,底,底,30,1),COLOR00FF00,LINETHICK1;
DRAWTEXT(BARSTATUS=2 ,底,'    底线'),COLOR00FF00;
partline(c>0,c*2-ref(c,3)),SHIFT3,color005555;
partline(c>0,ref(c,1)*2-ref(c,4)),SHIFT2,color005500;
partline(c>0,ref(c,2)*2-ref(c,5)),SHIFT1,color553355;
if k=1 then begin
aa:=ref(h,n1)=hhv(h,2*n1+1);
aaa:=filter(aa,n1);
bb:=backset(aaa,n1+1);
cc1:=filter(bb,n1);
cc:=cc1 or BARSTATUS=2;
aa2:=ref(l,n1)=llv(l,2*n1+1);
aaa2:=filter(aa2,n1);
bb2:=backset(aaa2,n1+1);
cc22:=filter(bb2,n1);
cc2:=cc22 and not(cc1);
ea:=backset(cc,ref(barslast(cc2),1)+1);
eb:=ea>ref(ea,1);
ee:=backset(eb,2);
ff1:=ee>ref(ee,1);
ee2:=backset(ff1 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff2:=ee2>ref(ee2,1);
ee3:=backset(ff2 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);
ff3:=ee3>ref(ee3,1);
js:=if(cc,count(cc2,ref(barslast(cc),1)+1),0);
g1:=if(js=1 and cc,barslast(ff1),0);
ga:=if(cc and ref(l,barslast(ff1))>=ref(l,barslast(ff2)),barslast(ff2),barslast(ff1));
g2:=if(js=2 and cc,ga,0);
g3:=if(js>=3 and cc,if(cc and ref(l,ga)>=ref(l,barslast(ff3)),barslast(ff3),ga),0);
gg:=g1+g2+g3;
ja:=backset(cc,gg);
jb:=ja>ref(ja,1);
jj:=backset(jb,2);
ld:=jj>ref(jj,1);
ld1:=ld or BARSTATUS=2;
hea:=backset(ld1,ref(barslast(cc),1)+1);
heb:=hea>ref(hea,1);
hee:=backset(heb,2);
hff1:=hee>ref(hee,1);
hee2:=backset(hff1 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff2:=hee2>ref(hee2,1);
hee3:=backset(hff2 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);
hff3:=hee3>ref(hee3,1);
hjs:=if(ld1,count(cc1,ref(barslast(ld1),1)+1),0);
hg1:=if(hjs=1 and ld1,barslast(hff1),0);
hga:=if(ld1 and ref(h,barslast(hff1))<=ref(h,barslast(hff2)),barslast(hff2),barslast(hff1));
hg2:=if(hjs=2 and ld1,hga,0);
hg3:=if(hjs>=3 and ld1,if(ld1 and ref(h,hga)<=ref(h,barslast(hff3)),barslast(hff3),hga),0);
hgg:=hg1+hg2+hg3;
hja:=backset(ld1,hgg);
hjb:=hja>ref(hja,1);
hjj:=backset(hjb,2);
hd:=hjj>ref(hjj,1);
x1:=backset(BARSTATUS=2,barslast(ld)+1);
x2:=x1>ref(x1,1);
y1:=backset(BARSTATUS=2,barslast(hd)+1);
y2:=y1>ref(y1,1);
z1:=if(barslast(x2)<barslast(y2),x2,y2);
z2:=if(barslast(x2)<barslast(y2),l,h);
drawline(z1,z2,BARSTATUS=2,c,0),pointdot,colorff9900;
uu:=backset(BARSTATUS=2,barslast(ld)+1);
vv:=uu>ref(uu,1);
ww:=backset(vv,ref(barslast(ld),1)+2);
xx:=ww>ref(ww,1);
drawline(xx,l,vv,l,1),color00ffff;
uu2:=backset(BARSTATUS=2,barslast(hd)+1);
vv2:=uu2>ref(uu2,1);
ww2:=backset(vv2,ref(barslast(hd),1)+2);
xx2:=ww2>ref(ww2,1);
drawline(xx2,h,vv2,h,1),color00ffff;
END;
if k=2 then begin
V7:=BARSTATUS=2;
V8:=(REF(HIGH,n) = HHV(HIGH,((2 * n) + 1)));
V9:=FILTER(V8,n);
VA:=BACKSET(V9,(n + 1));
VB:=FILTER(VA,n);
VC:=(VB OR V7);
VD:=(REF(LOW,n) = LLV(LOW,((2 * n) + 1)));
VE:=FILTER(VD,n);
VF:=BACKSET(VE,(n + 1));
V10:=FILTER(VF,n);
V11:=(V10 AND NOT(VB));
V12:=BACKSET(VC,(REF(BARSLAST(V11),1) + 1));
V13:=(V12 > REF(V12,1));
V14:=BACKSET(V13,2);
V15:=(V14 > REF(V14,1));
V16:=BACKSET((V15 AND (COUNT(VC,(REF(BARSLAST(V11),1) + 2)) = 0)),(REF(BARSLAST(V11),1) + 2));
V17:=(V16 > REF(V16,1));
V18:=BACKSET((V17 AND (COUNT(VC,(REF(BARSLAST(V11),1) + 2)) = 0)),(REF(BARSLAST(V11),1) + 2));
V19:=(V18 > REF(V18,1));
V1A:=IF(VC,COUNT(V11,(REF(BARSLAST(VC),1) + 1)),0);
V1B:=IF(((V1A = 1) AND VC),BARSLAST(V15),0);
V1C:=IF((VC AND (REF(LOW,BARSLAST(V15)) >= REF(LOW,BARSLAST(V17)))),BARSLAST(V17),BARSLAST(V15));
V1D:=IF(((V1A = 2) AND VC),V1C,0);
V1E:=IF(((V1A >= 3) AND VC),IF((VC AND (REF(LOW,V1C) >= REF(LOW,BARSLAST(V19)))),BARSLAST(V19),V1C),0);
V1F:=((V1B + V1D) + V1E);
V20:=BACKSET(VC,V1F);
V21:=(V20 > REF(V20,1));
V22:=BACKSET(V21,2);
V23:=(V22 > REF(V22,1));
V24:=(V23 OR V7);
V25:=BACKSET(V24,(REF(BARSLAST(VC),1) + 1));
V26:=(V25 > REF(V25,1));
V27:=BACKSET(V26,2);
V28:=(V27 > REF(V27,1));
V29:=BACKSET((V28 AND (COUNT(V24,(REF(BARSLAST(VC),1) + 2)) = 0)),(REF(BARSLAST(VC),1) + 2));
V2A:=(V29 > REF(V29,1));
V2B:=BACKSET((V2A AND (COUNT(V24,(REF(BARSLAST(VC),1) + 2)) = 0)),(REF(BARSLAST(VC),1) + 2));
V2C:=(V2B > REF(V2B,1));
V2D:=IF(V24,COUNT(VB,(REF(BARSLAST(V24),1) + 1)),0);
V2E:=IF(((V2D = 1) AND V24),BARSLAST(V28),0);
V2F:=IF((V24 AND (REF(HIGH,BARSLAST(V28)) <= REF(HIGH,BARSLAST(V2A)))),BARSLAST(V2A),BARSLAST(V28));
V30:=IF(((V2D = 2) AND V24),V2F,0);
V3B:=IF(((V2D >= 3) AND V24),IF((V24 AND (REF(HIGH,V2F) <= REF(HIGH,BARSLAST(V2C)))),BARSLAST(V2C),V2F),0);
V3C:=((V2E + V30) + V3B);
V3D:=BACKSET(V24,V3C);
V3E:=(V3D > REF(V3D,1));
AA:=BACKSET(V3E,2);
AAA:=(AA > REF(AA,1));
BB:=BACKSET(V7,(BARSLAST(AAA) + 1));
CC1:=(BB > REF(BB,1));
CC:=BACKSET(CC1,(REF(BARSLAST(AAA),1) + 2));
AAA2:=(CC > REF(CC,1));
DRAWLINE(AAA2,HIGH,CC1,HIGH,1),POINTDOT,color00AAAA;
BB2:=(REF(HIGH,4) = HHV(HIGH,((2 * 4) + 1)));
CC22:=FILTER(BB2,4);
CC2:=BACKSET(CC22,(4 + 1));
EA:=FILTER(CC2,4);
EB:=(EA OR BARSTATUS=2);
A6:=(REF(LOW,4) = LLV(LOW,((2 * 4) + 1)));
EE:=FILTER(A6,4);
FF1:=BACKSET(EE,(4 + 1));

[url=http://www.70822.com/soft/sort013/sort02/down-49962.html]自动划线 唐[/url]