友情提示:如果本网页打开太慢或显示不完整,请尝试鼠标右键“刷新”本网页!阅读过程发现任何错误请告诉我们,谢谢!! 报告错误
热门书库 返回本书目录 我的书架 我的书签 TXT全本下载 进入书吧 加入书签

公式编写入门(系列讲座)-第8章

按键盘上方向键 ← 或 → 可快速上下翻页,按键盘上的 Enter 键可回到本书目录页,按键盘上方向键 ↑ 可回到本页顶部!
————未阅读完?加入书签已便下次继续阅读!



我也没编过类似公式。
请会的同学直接出手。






第七讲从源码中提取选股公式

  要点:从后往前找,删除没用条,去掉修饰符,个别加等号。

例一:找出买点
VAR1:=(((HHV(HIGH;36) … CLOSE) / (HHV(HIGH;36) … LLV(LOW;36))) * 100);
VAR2:=SMA(VAR1;5;1);
VAR3:=SMA(VAR2;8;1);
H1:EMA(CLOSE;8);LINETHICK1;
H2:EMA(H1;20);LINETHICK1;
VAR4:=(CROSS(VAR2;VAR3) AND (VAR3 《 20));
VAR5:=((CLOSE 》 (LLV(CLOSE;60) + (0。3 * LLV(CLOSE;60)))) AND VAR4);
VAR6:=IF((CLOSE 》 1000);VAR4;VAR5);
M1:EMA(CLOSE;60);
M2:EMA(CLOSE;89);
M3:EMA(CLOSE;233);LINETHICK1;
M4:EMA(CLOSE;583);LINETHICK1;
STICKLINE((H1 》 H2);H1;H2;1;0。8);
STICKLINE((H1 《 H2);H1;H2;1;0。8);
DRAWTEXT((CROSS(H1;H2) AND (CLOSE 《 EMA(CLOSE;60)));(LOW * 0。92);'买');
DRAWTEXT(VAR6;(HIGH * 1。08);'卖');


分解说明:

VAR1:=(((HHV(HIGH;36) … CLOSE) / (HHV(HIGH;36) … LLV(LOW;36))) * 100);
VAR2:=SMA(VAR1;5;1);
VAR3:=SMA(VAR2;8;1);
H1:EMA(CLOSE;8);LINETHICK1;
H2:EMA(H1;20);LINETHICK1;
VAR4:=(CROSS(VAR2;VAR3) AND (VAR3 《 20));
VAR5:=((CLOSE 》 (LLV(CLOSE;60) + (0。3 * LLV(CLOSE;60)))) AND VAR4);
VAR6:=IF((CLOSE 》 1000);VAR4;VAR5);
M1:EMA(CLOSE;60);
M2:EMA(CLOSE;89);
M3:EMA(CLOSE;233);LINETHICK1;
M4:EMA(CLOSE;583);LINETHICK1;
STICKLINE((H1 》 H2);H1;H2;1;0。8);
STICKLINE((H1 《 H2);H1;H2;1;0。8);



第一步{从后往前找}找到下面这行“买”的输出语句。然后看这条语句的基本条件。
     DRAWTEXT((CROSS(H1;H2) AND (CLOSE 《 EMA(CLOSE;60)));(LOW * 0。92);'买');
查看结果:输出文字  交叉 条件,条件   直 接 输 出 语 句     输出位置  文字
DRAWTEXT(VAR6;(HIGH * 1。08);'卖');
知道“基本条件”为 H1;H2,那么与此没有任何关系的语句从后往前删除。删的办法有两种:一是直接删掉;二是先用{}括上,待没问题时再一次性删除。加蓝色的为找到的不输出语句。

第二步{删除没用条}后,剩下的有用语句:
H1:EMA(CLOSE;8);LINETHICK1; {加蓝的为修饰类函数,原则一律删除。}
H2:EMA(H1;20);LINETHICK1;
DRAWTEXT((CROSS(H1;H2) AND (CLOSE 《 EMA(CLOSE;60)));(LOW * 0。92);'买');

第三步{去掉修饰符} 分别去掉:指标线粗细、显示文字、文字位置函数和文字
H1:EMA(CLOSE;8);
H2:EMA(H1;20);
CROSS(H1;H2) AND CLOSE 《 EMA(CLOSE;60);

第四步{个别加等号} 条件选股只能输出一条语句,上面这三行为全部输出,所以,作为“条件”的前两行还必须在冒号后面加上等号,表达不输出。结果:
H1:=EMA(CLOSE;8);
H2:=EMA(H1;20);
CROSS(H1;H2) AND CLOSE 《 EMA(CLOSE;60);



















例二、找出笑脸和买入信号
以本人发过的《跟庄建仓》为例。
A01:=DYNAINFO(7);
A03:=BARSCOUNT(CLOSE);
A04:=(SMA((CLOSE / HHV(HIGH;120));3;1) * 100);
A05:=IF((A03 》 20);A04;0);
A06:=IF((LOW 》 A01);0;IF((HIGH 《 A01);1;(((A01 … LOW) + 0。009) / ((HIGH … LOW) + 0。009))));
A07:=DMA(A06;(VOL / CAPITAL)) * 60;
A09:=IF((((A07 》 0) AND (A07 》 REF(A07;1))) AND (A05 80;趋势;80);
DRAWICON(CROSS(趋势;0);0;1);
FILLRGN((A09 》 0 AND (趋势REF(趋势;1)AND 趋势90;100;105;10;2);COLORRED; 
STICKLINE(CROSS(Var4;…40);10;55;6;0);COLORRED; 
Var10:=(Var9…LLV(Var9;4))/(HHV(Var9;4)…LLV(Var9;4))*100; 
DRAWTEXT(IF(CROSS(Var9;Var10) AND Var9》87;95;0);88;'险');Color00FF00;ALIGN1;
DRAWICON(CROSS(90;Var9);95;9);
Var11:=SMA(ABS(L…REF(L;1));3;1)/SMA(MAX(L…REF(L;1);0);3;1)*100;
Var12:=HHV(Var11;30)*8;
火焰山:EMA(IF(LOW 0) AND (A07 》 REF(A07;1))) AND (A05 80;趋势;80);
DRAWICON(CROSS(趋势;0);0;1);
FILLRGN((A09 》 0 AND (趋势REF(趋势;1)AND 趋势3/100AND(VOL/VOL;1)》2;
但我完成测试时电脑不给通过 上面提示说〃行2:缺少;〃
请问我是哪里错了?谢谢!

大庆老杨
以这个题目讲解一下。
1、收盘价等专用函数如(C,O,H,L,V,AND,OR)是不
返回目录 上一页 下一页 回到顶部 0 0
未阅读完?加入书签已便下次继续阅读!
温馨提示: 温看小说的同时发表评论,说出自己的看法和其它小伙伴们分享也不错哦!发表书评还可以获得积分和经验奖励,认真写原创书评 被采纳为精评可以获得大量金币、积分和经验奖励哦!