打印

[飞狐] 清晰买卖

华山论剑

版主

Rank: 11

帖子: 11780
积分: 24
红币: 14276

财富勋章

1^# 大中小发表于 2007-4-14 07:43 只看该作者

清晰买卖

复制内容到剪贴板

代码:

Var1:=有效值周期数(收盘价);

Var2:=最高值(最高价,200);

Var3:=最低值(最低价,200);

Var4:=(Var2-Var3)/40;

Var5:=最高价+Var4;

画柱线(Var1/30=向下舍入(Var1/30),Var5,Var5+3*Var4,8,0);

画柱线(Var1/30=向下舍入(Var1/30),Var5,Var5+2*Var4,7,0);

Var6:=条件函数(年份>=2009 AND 月份>1,0,1);

Var7:=向前引用(收盘价-开盘价,2);

Var8:=向前引用(收盘价,1);

Var9:=向前引用(收盘价,2);

VarA:=向前引用(收盘价,3);

VarB:=向前引用(收盘价,4);

VarC:=最大值(最大值(最大值(收盘价,Var8),Var9),VarA);

VarD:=最小值(最小值(最小值(收盘价,Var8),Var9),VarA);

红色持股: 画柱线(收盘价=VarC AND (Var8>=Var9 OR Var8>=VarA) OR Var8=VarC AND (Var9=VarD OR VarA=VarD) AND 收盘价>=Var9 OR Var9=VarC AND VarA=VarD AND 收盘价>=Var8 OR VarA=VarC AND 收盘价>=Var8 AND 收盘价>=Var9,Var8,收盘价,5,1),colorred;

品红变盘: 画柱线(收盘价=VarC AND Var8=VarD,Var9,收盘价,5,1),COLORMAGENTA;

黄色下跌: 画柱线(收盘价=VarD AND (Var8<Var9 OR Var8<VarA) OR Var8=VarD AND (Var9=VarC OR VarA=VarC) AND 收盘价<Var9 OR Var9=VarD AND VarA=VarC AND 收盘价<Var8 OR VarA=VarD AND 收盘价<Var8 AND 收盘价<Var9,Var8,收盘价,5,0),COLORyellow;

绿色买: 画柱线(Var8=VarC AND 收盘价=VarD,Var9,收盘价,5,0),colorgreen;

画柱线(Var8=VarD AND 收盘价>=Var9 OR (Var9=VarD AND Var8<=VarA OR VarA=VarD AND Var8<=Var9) AND Var9<VarB AND 收盘价>=Var8,Var8,Var9,5,0);

兰色抛售: 画柱线(Var8=VarC AND 收盘价<Var9 OR (Var9=VarC AND Var8>VarA OR VarA=VarC AND Var8>Var9) AND Var9>=VarB AND 收盘价<Var8,Var8,Var9,5,1),colorblue;

VarE:=抛物转向(5,1,5);

VarF:=指数平滑移动平均(收盘价,30);

Var10:=条件函数(收盘价>450,8,条件函数(收盘价>=20 AND 收盘价<150,0.2,条件函数(收盘价<20 AND 收盘价>=10,0.07,条件函数(收盘价<10,0.03,0.07))));

变色龙: 画柱线(收盘价>VarE,VarF,VarF+Var10,6,0);

画柱线(收盘价<VarE,VarF,VarF-Var10,6,0);

画柱线(交叉函数(收盘价,VarE),VarF,VarF-Var10,6,0);

画柱线(交叉函数(VarE,收盘价),VarF,VarF+Var10,6,0);

画柱线(范围(日期,6,9) OR 范围(日期,27,30),VarF+0.01,VarF-0.01,6,0);

生命线: 线性回归预测值(收盘价,30), 小圆圈线,colorgreen;

支撑: 简单移动平均(收盘价,13)*0.955,colorred;