郭靖 天罡北斗阵:曹学理及其他公式初学朋友请进

太冷老师你好！我看到你帮一位朋友优化了" 觅庄建仓" 指标, 这正是我也想求人帮助的想法, 在此表示感谢了！！我是退之人, 炒股、电脑是今年初刚学的, 对指标一窍不通, 很苦恼也无奈。还需努力学习。今天我下了个指标(源码), 想请老师帮我优化改一下, 附源码:
[多空双量]
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2))));
买卖差:=(买盘 + 卖盘);
STICKLINE((买卖差 < 0),0,买卖差,5,0),COLOR33FF33;
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:(买盘 / VAR30);
鬼比:(卖盘 / VAR30);
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));  VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));
VARD:=REF(CLOSE,1);
VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100);
DRAWTEXT(((DATE > 700101) AND CROSS(84,VARE)),HIGH,'■卖出'),COLORF2A3A4;
VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,买盘) + 买盘) / 2);
VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,买盘) + 买盘) / 2);
VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,买盘) + 买盘) / 2);
VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,卖盘) + 卖盘) / 2);
三日上攻:MA((((VAR40 + VAR41) + VAR42) / 3),JY2);
三日下攻:MA(VAR50,JY2);
多头:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,5,1),COLOR0000FF;
空头:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,5,1),COLOR00FF00;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,4,0),COLOR00FFFF;
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,4,0),COLORFF0000;
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,4,0),COLORFFFFFF;
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,4,0),COLORFF00FF;
STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,2,0);
STICKLINE((买盘 > 0),买盘,0,2,0),COLOR0000FF;
上攻均量:=MA(买盘,JY1);
下攻均量:=MA(卖盘,JY1);
DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA > 2)) AND (VAR9 > VAR8)) AND (CLOSE > MA(CLOSE,5))) AND (CLOSE > MA(CLOSE,30))) AND (HIGH > MA(CLOSE,60))) AND (VOL > MA(VOL,5))) AND (VAR7 >= MA(VOL,5))),VOL,'▼出货');
DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'●低进');
DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'◆强势');
hsl:=DYNAINFO(37);
DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (hsl > 1)),(VOL * 1.1),'●量变'),COLOR00FFFF;
MA1:MA(VOL,5),colorwhite;
MA2:MA(VOL,10),coloryellow;
MA3:MA(VOL,20),colorff00ff;
我的想法是(因我不懂,说错了莫见笑, 全当没说): 怎样把"神比"数值在股价下跌时数值反而增大做成一个选股的。举例: 000823(超声电子) 10月8日神比值0.228 , 10月9日神比值0.627, 股价下跌了-1.78% , 其值反而大了, 次日该股涨仃板。如老师肯帮我优化一并请把" 低进"、"出货"也做成选股的。祝你及你的家人安康幸福！！！谢谢了！！！！！！
曹学理先生:
我好象没帮人优化" 觅庄建仓" 指标,别人的指标,我一般不感去动,去改人家的意思,以表示尊敬,是不是您记错了,呵
因为发图和附件,也为给更多需要的朋友看,所以,就直接发贴了.
因为1:00-7:00,我不能发贴,机器噪音太大,学习其它软件知识,习惯性不看回贴,所以,我正在减少来理想频率,现在才回复您的来信,抱歉.
您说了很多客气话,我表示感谢,其实和我没必要太客气,尽管第一次接触,当然,您也是为了求人办事嘛,说客气话也是正常的,我知道,现在确实找人办事太难了,拿我来说,我找论坛里一名人帮我破一套飞狐指标(当然,我没用这名字),已经好几个月了,哎!不提了,人心太冷啊,我的名字没起错,我以前帮过很多人改指标,结果,他们学会了,却不再肯帮更多的人,有人找他们解决问题,可那些人却直接推到我这里,哎!不说了.
所以许多和您一样的公式新手,都不知道如何入手学习,没学习资料.很烦恼,
公式反映写手的选股思路,公式不是万能的,多借鉴,不迷恋.
其实,我的建议就是把现有的公式看懂就可以,积少成多.明白写公式人的意思.
飞狐下,编辑用 中文公式前打钩.通达信下,就直接是中文的翻译.
多看,就会了.没有捷径.
你的公式其实是理想小子的加密公式,(说是小子,可我怎么看象是丫头.呵!),而且是去掉了背景图的,
你说的0823的例子是背离,背离我看有2种,一是2段时间中某指标线条的低点连线的计较,一是今天与昨天或前天,的比较
这指标,我看用第二种,
看懂公式就知道公式的禁忌在哪里,至于改选股公式最简单的方法就是找你想要的那些字,的那一行.做为最后一句,去掉等号,以前所有的句子在冒号后加等号,(因为选股公式是只有一个输出语句的,就是最后一句,),再补充说句:每句一分号结尾,以冒号等号赋值,要是只有冒号,那么那句的指标线就可以显示,加了等号,指标线就不显示.
你的那个例子,实际,我看是因为当天的成交量放大,在计算中分子大,使的形成背离的,
选股用收盘小于昨天收盘,而神比大于昨天,
{多空双量神比昨背离}
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30);
神比昨背离:cref(神比,1);
为了减少选股后的范围,可以这样把最后一句改为:
神比昨背离:cref(神比,1)*2;是昨天的2倍,
神比昨背离:cref(神比,1)*2;或前面改改:改收盘下跌至少2个百分点,随你的意思,
我们也可以改与前天的比较:
{多空双量神比前背离}
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30);
神比前背离:cref(神比,2);
可以改与大前天的比较:
{多空双量神比大前背离}
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30);
神比大前背离:cref(神比,3);
看到区别了吗,就是最后一句,当然可以组合下,与昨天且与前天,都背离了,
那么看
{多空双量神比组合背离}
VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
JX1:=BARSSINCE(买盘);
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 / VAR30);
神比组合背离: cref(神比,1) and  cref(神比,2);
这指标就与大前天比较就可以了,别多了,再多,用的是另一种方法了.个人看法.
选股后要看看实际结果,成功率怎么样,用的时候,别迷信指标的选股.指标失败也是常事.
低进的选股,你看下就知道了,就是先找你要的那字的行,再找条件,改等号,去掉所有的画线函数的句字,,当然了,我把没用的句字去掉了,其实就算不去,都在冒号后加等号,让它不显示,就行,不过好的程序员是不该让电脑无意义劳累的.所以该去掉费句的就去掉,但对初学者,不去,也不为错,不影响使用.
//[多空双量低进]
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
低进:((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10)));
其实现在论坛里活跃的指标不是自编的而是改编人家以前的,或是组合的,这就有很多问题的出现,
其实你给我这公式里就有矛盾,当然,不影响使用,但是
至于0823,是好股,别看K线组合的假象,早晚有戏.我有2朋友都有它呢.
许多资料可能因为论坛更新等原因,不好找了,所以最后送几个网上收集来的公式学习的资料.
祝:学习顺利,投资顺利!
太冷.
附件: 您所在的用户组无法下载或查看附件，请先登陆。如果您还不是本站会员，请先进行免费注册，然后才能下载或查看。
查看本帖全部评分记录抽风的蚯蚓 理想币 +2 我喜欢帮助别人的人。不过这个论坛这样 ... 2007-10-14 19:33
发短消息加为好友个人主页 理想币
7166 个
彩币
0 个
注册时间
2005-10-19
TOP
太冷

指标公式专家团

2楼只看该作者 大 中 小 发表于 2007-10-14 15:41
机构研究报告大全原创精华指标精选合集
发现附件丢失,再传.

发短消息加为好友个人主页 理想币
7166 个
彩币
0 个
注册时间
2005-10-19
TOP
太冷

指标公式专家团

3楼只看该作者 大 中 小 发表于 2007-10-14 15:45
发现附件丢失,再传.
[ 本帖最后由 太冷 于 2007-10-14 15:48 编辑 ]
附件: 您所在的用户组无法下载或查看附件，请先登陆。如果您还不是本站会员，请先进行免费注册，然后才能下载或查看。
发短消息加为好友个人主页 理想币
7166 个
彩币
0 个
注册时间
2005-10-19
TOP
太冷

指标公式专家团

4楼只看该作者 大 中 小 发表于 2007-10-14 16:04

发现附件丢失,再传.
实在是传不上去,
只发一个文字的吧,
0001--主图显示代码及板块
一、显示板块
例一：
DRAWTEXT(BARPOS=SYSPARAM(2),H,'\N所属板块:'+BLKNAME),ALIGN4,COLORYELLOW;
例二：
DRAWTEXT(SYSPARAM(2)=BARPOS,C,'所属板块:'+BLKNAME),ALIGN4,COLORYELLOW;
例三：
DRAWTEXT(SYSPARAM(2)=BARSCOUNT(C),H,'[所属版块]:'+BLKNAME),ALIGN4,COLORYELLOW;
二、显示代码及板块
S:=STKLABEL;
DRAWTEXT(SYSPARAM(2)=BARPOS,C,S),ALIGN4,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),H,'\N 所属板块:'+BLKNAME),ALIGN4,COLORYELLOW;{N与所属板块之间空六格，以显示代码}
工具箱
【 ? 发布:于瑶　 2004-10-04 17:07 】
0002--主图显示成交量
前四例可实际使用，后三例的思路不错，但量柱过高，部分遮住K线，有待完善。
例一：
BB:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2));
HH:=SYSPARAM(4);
LL:=SYSPARAM(5);
TT:=IF(HH-LL<=2.5,0.25,IF(HH-LL<=5,0.8,IF(HH-LL<=10,2,IF(HH-LL<=20,3,IF(HH-LL<=31,4,IF(HH-LL<=41,5,IF(HH-LL<=50,6,IF(HH-LL<=60,7,IF(HH-LL<=70,8,IF(HH-LL<=80,9,1))))))))));
MA(V/BB*0.9*TT+LL,5)-0.04;
MA(V/BB*0.9*TT+LL,10)-0.04;
MA(V/BB*0.9*TT+LL,34)-0.04;
STICKLINE(C>=REF(C,1),V/BB*0.9*TT+LL-0.04,LL-0.04,4,1)COLOR9090EE;
STICKLINE(C< REF(C,1 ),V/BB*0.9*TT+LL-0.04,LL-0.04,4,1)COLORBLUE;
STICKLINE(C>=O,C,O,8,0),COLOR0055AA;
STICKLINE(C<=O,C,O,8,0),COLOR006600;
STICKLINE(C>=O,C,O,5,0),COLOR0077CC;
STICKLINE(C>=O,C,O,3,0),COLOR0099DD;
STICKLINE(C>=O,H,L,0,0),COLOR00BBFF;
STICKLINE(C<=O,C,O,5,0),COLOR009900;
STICKLINE(C<=O,C,O,3,0),COLOR00BB00;
STICKLINE(C<=O,H,L,0,0),COLOR00EE00
例二：
BB:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2));
HH:=SYSPARAM(4);
LL:=SYSPARAM(5);
TT:=IF(HH-LL<4,0.5,1);
STICKLINE(C>=REF(C,1),VOL/BB*0.8*TT+LL,LL,4,1)COLOR9090EE;
STICKLINE(C< REF(C,1 ),VOL/BB*0.8*TT+LL,LL,4,1)COLORBLUE;
STICKLINE(C>=O,C,O,8,0),COLOR0055AA;
STICKLINE(C<=O,C,O,8,0),COLOR006600;
STICKLINE(C>=O,C,O,5,0),COLOR0077CC;
STICKLINE(C>=O,C,L,3,0),COLOR0099DD;
STICKLINE(C>=O,H,L,0,0),COLOR00BBFF;
STICKLINE(C<=O,C,O,5,0),COLOR009900;
STICKLINE(C<=O,C,O,3,0),COLOR00BB00;
STICKLINE(C<=O,H,L,0,0),COLOR00EE00
例三：
A1:=VOL;
A2:=VOL/CAPITAL*100/15;
A3:=SYSPARAM(5);
A4:=A3-0.3;
STICKLINE(C>0 AND C>REF(C,1),A4,A4+A2,7,1),COLORRED;
STICKLINE(C>0 AND C<=REF(C,1),A4,A4+A2,7,0),COLORCCFF99;
DRAWNUMBER(SYSPARAM(1)=BARPOS AND C>0,A4,A1,1),COLOR00FFFF;
DRAWTEXT(SYSPARAM(1)=BARPOS,A4,'成交量：'),COLOR00FFFF,ALIGN2;
{A2中的15可调；A4中的0.3可调}
例四：
可以调节量柱的高度，不会覆盖K线。使用时，请打开光标。注意，在“管理→系统选项→图形→主图坐标仅随K线变动”处不要打钩。亦显示换手率的数值。
A1:=VOL/CAPITAL*100/15;
A2:=SYSPARAM(5);
A3:=A2-0.3;
STICKLINE(C>=O,A3,A3+A1,7,1),COLORRED;
STICKLINE(C< O,A3,A3+A1,7,0),COLORCCFF99;
换:VOL/CAPITAL*100,LINETHICK0,COLORRED;
例五：
STICKLINE(C>REF(C,1),VOL*0.00001+SYSPARAM(5),SYSPARAM(5),8,1)COLORRED;
STICKLINE(C< REF(C,1),VOL*0.00001+SYSPARAM(5),SYSPARAM(5),8,0)COLORCYAN;
VMA5:MA(VOL*0.00001+SYSPARAM(5),5);
VMA15:MA(VOL*0.00001+SYSPARAM(5),15);
{可通过修改“V*0.00001”中的“0.00001”进行优化}
例六：
STICKLINE(C>REF(C,1)AND C<10,VOL*0.000001+SYSPARAM(5),SYSPARAM(5),8,1)COLORRED;
STICKLINE(C< REF(C,1)AND C<10,VOL*0.000001+SYSPARAM(5),SYSPARAM(5),8,0)COLORCYAN;
{主图一般用百分比坐标，加限定不是好的解决办法}
例七：
MA5:MA(C,P1); { P1:5 P2:10 P3:20 P4:30 N:0.6 M:1}
MA10:MA(C,P2);
MA20:MA(C,P3);
MA30:MA(C,P4);
现价: DYNAINFO(7),COLORWHITE,LINETHICK1 POINTDOT;
STICKLINE(C>O,O,C,7,0),COLORRED;
STICKLINE(C>O,O,C,2,0),COLORB0B0FF;
STICKLINE(C>O,O,C,1,0),COLORYELLOW;
STICKLINE(C>O,L,H,0.1,0),COLORYELLOW;
STICKLINE(C< O,O,C,7,0),COLORFF2020;
STICKLINE(C< O,O,C,4,0),COLORFF6600;
STICKLINE(C< O,O,C,2,0),COLORCYAN;
STICKLINE(C< O,L,H,0.1,0),COLORCYAN;
STICKLINE(C=O AND C>=REF(C,1),O,C,7,0),COLORRED;
STICKLINE(C=O AND C>=REF(C,1),O,C,4,0),COLORB0B0FF;
STICKLINE(C=O AND C>=REF(C,1),O,C,2,0),COLORYELLOW;
STICKLINE(C=O AND C>=REF(C,1),L,H,0.1,0),COLORYELLOW;
STICKLINE(C=O AND C< REF(C,1),O,C,7,0),COLORFF2020;
STICKLINE(C=O AND C< REF(C,1),O,C,4,0),COLORFF6600;
STICKLINE(C=O AND C< REF(C,1),O,C,2,0),COLORCYAN;
STICKLINE(C=O AND C< REF(C,1),L,H,0.1,0),COLORCYAN;
YYTTGG:=BARSCOUNT(HHV(V,0));
BB:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2));//画面中的最大成交量
LL:=SYSPARAM(5);//主图可见K线最低价
STICKLINE(C>=REF(C,1),VOL/BB+LL*M,LL*M,8,1)COLOR50CCEE;
STICKLINE(C< REF(C,1),VOL/BB+LL*M,LL*M,8,0)COLORBLUE;
工具箱
【 ? 发布:于瑶　 2004-10-04 17:46 】
0003--预测全天成交量、换手率
例一：
根据分时成交量预测
IF(OPENMINUTES(CURRENTTIME)=1,V,(V/OPENMINUTES(CURRENTTIME))*240);
例二：
预测量:STICKLINE(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VOL,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),7,1),COLORGREEN;
例三：
STICKLINE(DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT,DYNAINFO(17)*REF(MA(VOL,5),1),0,4,1);
DRAWTEXT(DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT,V,'←实际V'),COLORRED;
例四：
预换手％:MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1))/CAPITAL*100,COLORFFFF00;
工具箱
【 ? 发布:于瑶　 2004-10-04 17:48 】
0004--收盘线（主图）
IF(DYNAINFO(7)>0,DYNAINFO(7),MA(C,3));
工具箱
【 ? 发布:于瑶　 2004-10-04 18:02 】
0005--时间周期线示例（主图叠加）