查看完整版本: 公式制作第二讲仿写

公式制作第二讲仿写

;)且说《公式制作速成》发表后，在论坛上引起了较大的反响，肯定赞誉之辞甚多，据说此贴惊动了股中央，在常委扩大会议上被列为“始终代表广大股民根本利益”的案例。本大师倍感荣耀激动万分导致血压升高，急服***地平强制调控血压上升的势头得以抑制，药物的作用使得大师脸上潮红不退，在论坛上行走到也显得神采奕奕！:D正应了歇后语：新婚的媳妇--痛并快乐着。:p      
     公式制作第一讲说了快速制作公式的方法--组装，就是充分利用论坛上的源码公式，把多个公式整理组合到一起，加上背景色、装饰指标信号、编写解盘、做上自己的标记、完成公式用法注释。这是制作公式的基础，经过这一阶段的练习，可以很快的熟悉许多的公式编写技巧，明白公式语句表达的意义，掌握公式的基本构成，为进一步提高公式制作能力做好准备。:smokin:
      在这中秋万家团圆的时刻，大师开始了公式制作提高讲义的写作向国庆献礼！祝朋友们阖家幸福！中秋快乐！:yes::yes:
      第二讲是公式制作的提高阶段--仿写。仿写有一定的难度，是通过对论坛上的各种公式图示解读，感知其所表达的意思，与自己积累的炒股理念、公式编写知识相对应形成共振，并还原成公式函数语句--源码。
      一位朋友给《公式制作速成》回帖说“太复杂，股道至简 ”，太伤自尊呢！:@别以为你脱了马甲我就不认识你--一条蛇...一条线，对咱就从一条线仿起，看01号附图
这是股经软件的一个特色指标--黄金线

从图示看该黄金线与黄金分割无关，它的颜色被选为黄色表示这条线在看盘中被常用且尊贵，它对股价走势起到拟合和滤波的作用，反映出估价运行的本质和规律，它就是均线。
      均线具有追踪趋势、稳定、助涨助跌、支撑压力、滞后5大特性，通常短线判市用k线组合即可，中长线常用60、90、半年、年线，西方看中200，这些因为周期长滞后效应较为突出，所以我们常用来看盘的均线周期定在20至35范围，这里我们选择25（五个交易周）。于是公式源码为：
//黄金线 主图
MA(C,25),COLORYELLOW;

效果图见02号附图。

哼哼，一个函数就搞定，咱大师告诉你什么是“股道至简”。其用法3句话18个字：同向顺势而为，异向均线为主，太远必须回归。
还不明白？我怕说多了有“太复杂”之嫌，
是你们要求的，我就多说几句：
1、若股价与黄金线同向运行则趋势确立，操盘策略为上涨买下跌卖。
2、若股价与黄金线反向运行时，当股价下落至黄金线获支撑买，股价上行至黄金线受阻卖。
3、股价与黄金线短时拉开距离过远时，股价会向黄金线回归，上行过大卖，下行过大买。

搞定了黄金线（HJX）股经的黄金布林（HJBoll）自不在话下，添加上布林轨道即可，源码为

中:ma(c,25),COLORYELLOW;
上:=中 + 2*STD(CLOSE,20);
下:=中 - 2*STD(CLOSE,20);
上轨:EMA(上,3),COLOR4080ff;
下轨:EMA(下,3),COLOR69e072;

用法注释：黄金布林线(HJBoll)是一个路径型指标，由上轨和下轨两条曲线构成一个带状的路径，宛如一条通道。与轨道线一样，HJBoll对股价有比较明显的约束作用，而且会根据股价的变动及时做出调整。在正常市态下，股价会维系在通道之内运行，当出现突发性的暴涨暴跌行情时，可以根据HJBoll中轨的运行方向及上下轨的变动特征来进行判断，是股经的特色指标之一。
补充几点：
1、中轨即黄金线，18字用法依然。
2、黄金布林不仅对股价有支撑压力的约束作用，它亦具有超买超卖的特质，配合KDJ类指标可以弥补相互的盲点。
3、当上下轨逐步收敛越来越狭窄时，股价正孕育着大风大浪。

下接第8楼

[color=Teal][align=right] 本贴由 yngs 于 2005-9-22 14:43 最后编辑 [/align][/color]

多谢分享

在交流中提高， 在实战中获利！

谢谢

辛苦了

(h)炒股获利的关键在于把握机会，紧跟市场热点机会较多！制作公式也要紧跟论坛热点，近期的热点自然是**王了，尽管已有部分源码问世，我们在这里还是从仿写的角度作分析。:d首先仿制要塞部分。
1、解读图示
      从说明上看有“本指标为该股的重要...支撑及阻力”的文字”，图示中我们看到除个股处级要塞外，各级要塞都是k线+两条彩带，这样的特质与均线相符，因此所谓的“要塞”就是均线构成的对股价的压力支撑区域，通过两组周期不同的均线按照多空定义着色即可。大家注意，中高级要塞的彩带都是阶梯型的--这是引用了大于当前周期指标的重要特征！中级要塞每一个平台5根k线--引用了周线（5个交易日），高级要塞正好一个平台对应一个月--肯定是月线的引用。:D另外我们发现个股3蛟龙出海与大盘１初级要塞图形一致，故将其纳入要塞部分，个股０初级要塞摆在后一部分。

[color=Teal][align=right] 本贴由 yngs 于 2005-9-20 02:51 最后编辑 [/align][/color]

2、确定均线的函数和参数
       这一步骤要求对各个均线函数的定义、图形非常熟悉，了然于胸。我们复习一下
----------------------------------------------------------------------------------------------------
别名: 简单移动平均
所属类别: 引用函数  参数数量: 2

求简单移动平均。
用法:
MA(X,N),求X的N日简单移动平均值。
算法：
(X1+X2+X3+...+Xn)/N
例如:
MA(CLOSE,20)
表示求20日均价
--------------------------------------------------------------------------------------------------------
别名: 动态移动平均
所属类别: 引用函数  参数数量: 2

求动态移动平均。
用法:
DMA(X,A),求X的动态移动平均。
算法:
若Y=DMA(X,A) 则 Y=A*X+(1-A)*Y', 其中Y'表示上一周期Y值,A必须小于1。
例如:
DMA(CLOSE,VOL/CAPITAL)
表示求以换手率作平滑因子的平均价
-------------------------------------------------------------------------------------------------------------
别名: 指数平滑移动平均
所属类别: 引用函数  参数数量: 2

求指数平滑移动平均。
用法:
EMA(X,N),求X的N日指数平滑移动平均。
算法:
若Y=EMA(X,N) 则Y=[2*X+(N-1)*Y']/(N+1), 其中Y'表示上一周期Y值。
例如:
EMA(CLOSE,20)
表示求20日指数平滑均价
-----------------------------------------------------------------------------------------------------------------
别名: 加权移动平均
所属类别: 引用函数  参数数量: 2

求加权移动平均。
用法:
WMA(X,A),求X的加权移动平均。
算法:
若Y=WMA(X,A) 则 Y=(N*X0+(N-1)*X1+(N-2)*X2)+...+1*XN)/(N+(N-1)+(N-2)+...+1)X0表示本周期值，X1表示上一周期值...
例如:
WMA(CLOSE,20)
表示求20日加权均价

下接第12楼

[color=Teal][align=right] 本贴由 yngs 于 2005-9-22 14:44 最后编辑 [/align][/color]

有意思

[quote]Originally posted by [i]清风斜阳[/i] at 2005-9-20 12:37 AM:
有意思 [/quote]

因为已经有了一些源码我这里就不再费口舌，这一步决定了公式的仿真度，制作者丰富的指标经验--见多识广是关键。选择加权移动平均函数（WMA）的意义在于--时间距离越远对当前趋势的影响就越小，权重就越轻。
3、调试完成
      对照仿写公式的图示，反复修改参数、色码使输出的公式图和数据尽量与被仿者一致。

-----------------------------------------------------------------------------------------------------------------------------
**王的要塞部分仿制源码如下：

//大盘１初级要塞
{当股指有效站到本指标上方时，

　　　　　股指犹如＂蛟龙出海＂，视为多头市场！

　　　　　相反＂龙潜海底＂，视为空头市场！}

a:=(3*indexc+indexl+indexo+indexh)/6;
b:=WMA(a,20);
d1:ma(b,3);
d2:ma(b,5);
d3:ma(b,21);
d4:ma(b,34);
yngs:ma(b,13),LINETHICK0;
fillrgn(d1>d2,d1,d2),colorff;
fillrgn(d1<d2,d1,d2),colorffff00;
fillrgn(d3>d4,d3,d4),colorff;
fillrgn(d3<d4,d3,d4),colorffff00;
stickline(indexc>=ref(indexc,1),indexc,indexo,4,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexh,0,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexl,0,0),colorff;
stickline(indexc<ref(indexc,1),indexc,indexo,4,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexl,0,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexh,0,0),colorff00;

//大盘２中级要塞
{本指标中的彩色区域为大盘的重要中级支撑及阻力，

　　　　　用以区分大盘的牛熊市以及大盘的上涨及下跌空间！}
a1:"大盘１初级要塞.d1##WEEK",colorffffff;
a2:"大盘１初级要塞.d2##WEEK",colorffffff;
b1:"大盘１初级要塞.yngs##WEEK",colorffff00;
b2:"大盘１初级要塞.d3##WEEK",colorffff00;
b3:="大盘１初级要塞.d4##WEEK";
b:if(b3>max(a1,max(a2,max(b1,b2))),b3,b2),colorff;
fillrgn(a1>a2,a1,a2),colorff00ff;
fillrgn(a1<a2,a1,a2),colorffffff;
fillrgn(b1>b2,b1,b2),colorffff;
fillrgn(b1<b2,b1,b2),colorffff00;
fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080;
stickline(indexc>=ref(indexc,1),indexc,indexo,4,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexh,0,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexl,0,0),colorff;
stickline(indexc<ref(indexc,1),indexc,indexo,4,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexl,0,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexh,0,0),colorff00;

//大盘３高级要塞
{}
a1:"大盘１初级要塞.d1##MONTH",colorffffff;
a2:"大盘１初级要塞.d2##MONTH",colorffffff;
b1:"大盘１初级要塞.yngs##MONTH",colorffff00;
b2:"大盘１初级要塞.d3##MONTH",colorffff00;
b3:="大盘１初级要塞.d4##MONTH";
b:if(b3>max(a1,max(a2,max(b1,b2))),b3,b2),colorff;
fillrgn(a1>a2,a1,a2),colorff00ff;
fillrgn(a1<a2,a1,a2),colorffffff;
fillrgn(b1>b2,b1,b2),colorffff;
fillrgn(b1<b2,b1,b2),colorffff00;
fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080;
stickline(indexc>=ref(indexc,1),indexc,indexo,4,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexh,0,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexl,0,0),colorff;
stickline(indexc<ref(indexc,1),indexc,indexo,4,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexl,0,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexh,0,0),colorff00;


//个股１中级要塞
{本指标中的彩色区域为该股的重要中级支撑及阻力，

　　　　　您所选中的目标故必须经该指标检验其是否具有上

　　　　　升及下跌空间！}
a1:"个股３蛟龙出海.d1##WEEK",colorffffff;
a2:"个股３蛟龙出海.d2##WEEK",colorffffff;
b1:"个股３蛟龙出海.yngs##WEEK",colorffff00;
b2:"个股３蛟龙出海.d3##WEEK",colorffff00;
b3:="个股３蛟龙出海.d4##WEEK";
b:if(b3>max(a1,max(a2,max(b1,b2))),b3,b2),colorff;
fillrgn(a1>a2,a1,a2),colorff00ff;
fillrgn(a1<a2,a1,a2),colorffffff;
fillrgn(b1>b2,b1,b2),colorffff;
fillrgn(b1<b2,b1,b2),colorffff00;
fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080;
stickline(c>=ref(c,1),c,o,8,0),colorff;
stickline(c>=ref(c,1),c,h,0,0),colorff;
stickline(c>=ref(c,1),c,l,0,0),colorff;
stickline(c<ref(c,1),c,o,8,0),colorff00;
stickline(c<ref(c,1),c,l,0,0),colorff00;
stickline(c<ref(c,1),c,h,0,0),colorff00;

//个股２高级要塞
{本指标中的彩色区域为该股的重要高级支撑及阻力，

　　　　　您所选中的目标故必须经该指标检验其是否具有上

　　　　　升及下跌空间！}
a1:"个股３蛟龙出海.d1##MONTH",colorffffff;
a2:"个股３蛟龙出海.d2##MONTH",colorffffff;
b1:"个股３蛟龙出海.yngs##MONTH",colorffff00;
b2:"个股３蛟龙出海.d3##MONTH",colorffff00;
b3:="个股３蛟龙出海.d4##MONTH";
b:if(b3>max(a1,max(a2,max(b1,b2))),b3,b2),colorff;
fillrgn(a1>a2,a1,a2),colorff00ff;
fillrgn(a1<a2,a1,a2),colorffffff;
fillrgn(b1>b2,b1,b2),colorffff;
fillrgn(b1<b2,b1,b2),colorffff00;
fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080;
stickline(c>=ref(c,1),c,o,8,0),colorff;
stickline(c>=ref(c,1),c,h,0,0),colorff;
stickline(c>=ref(c,1),c,l,0,0),colorff;
stickline(c<ref(c,1),c,o,8,0),colorff00;
stickline(c<ref(c,1),c,l,0,0),colorff00;
stickline(c<ref(c,1),c,h,0,0),colorff00;

//个股３蛟龙出海
{使用时间：自＂顺势而为＂交易系统发出＂大盘见底＂信号至今，

　　　　　　　股指从没有发生过击穿＂股指风险栅栏＂下轨的现象，

　　　　　　　在此期间方可动用本决策系统选股操作！

具体用法：在以上所述大盘环境下，股价每一次回探＂蛟龙出海＂所显示的

　　　　　支撑位均可以对该股进行逢低吸纳．}
ga:=(3*c+l+o+h)/6;
gb:=WMA(ga,20);
d1:ma(gb,3);
d2:ma(gb,5);
d3:ma(gb,21);
d4:ma(gb,34);
yngs:ma(gb,13),LINETHICK0;
fillrgn(d1>d2,d1,d2),colorff;
fillrgn(d1<d2,d1,d2),colorffff00;
fillrgn(d3>d4,d3,d4),colorff;
fillrgn(d3<d4,d3,d4),colorffff00;
stickline(c>=ref(c,1),c,o,8,0),colorff;
stickline(c>=ref(c,1),c,h,0,0),colorff;
stickline(c>=ref(c,1),c,l,0,0),colorff;
stickline(c<ref(c,1),c,o,8,0),colorff00;
stickline(c<ref(c,1),c,l,0,0),colorff00;
stickline(c<ref(c,1),c,h,0,0),colorff00;

[color=Teal][align=right] 本贴由 yngs 于 2005-9-20 02:53 最后编辑 [/align][/color]

:cool: :cool: :cool:
:clap: :clap: :clap: :clap: :clap:
:smokin:

d

00000000000000

高

感谢指导！

拜读，学习。

顶 顶  



《公式制作速成》在那啊

找到了

哇！高手原来是这样的！！！

绝对高人，建议中央给予表彰！！！

可惜不能用，或者不会用

大盘二系统无引用指标

是否需要另行设置参数？

玩不转

高手原来是这样的！！！

支持高手讲解，呵呵:smokin: