发新话题
打印

[其他] 会员经常遇到的难题!想知道的问题!

本主题由 一发千钧 于 2008-6-19 13:51 解除置顶

会员经常遇到的难题!想知道的问题!

本文来自:理想论坛  www.55188.com     作者:一发千钧     点击13602
原文:http://www.55188.com/viewthread.php?tid=1989090
当了三个月的版主,这期间回复求助帖多达200与件。
有很多重复的问题。
比如:
今日阳线、昨日阴线怎么写?等等

我把这三个月来回复大家的、具有代表性的问题,汇了一下总。
现发个专贴,供大家查阅:

编写公式 疑难问题1000例(全部)--由【山峡378】编制
http://221.5.47.32/thread-986148-1-1.html


1、我想选出、股价在开盘一小时内,一直在均价上方运行的股票;
答:
IF(OPENMINUTES(HOUR<1),C>DYNAINFO(11),0);

2、N日最高的涨跌幅、运行空间的相对位置怎么求?
答:
今收盘对于N日内最低收盘价的涨幅:(c-llv(c,n))/llv(c,n)*100;
今收盘价对于N日最高收盘价的跌幅:(HHV(C,N)-C)/HHV(C,N)*100;
在过去N日内运行空间的相对位置:(C-LLV(L,N))/(HHV(H,N)-LLV(L,N))*100;

3、选出股价N天内曾出现过涨停,怎么表达?
答:
f:=ref(c,1)*1.1-c<0.01;
count(f,n)>0;//N天内出现过涨停

4、创新高后返回均线附近怎么写?
答:
COUNT(C>=HHV(C,N),5)=1 AND C/MA(C,m)>=1 AND C/MA(C,m)<1.02;//N=日期 M=均线

5、低开收大阳、低开收大阴怎么写?
答:
{01-低开收大阳}
qj1:O<ref(l,1) and (C/REF(C,1)-1)*100>6;
{02-低开收大阴}
qj2:O<ref(l,1) and (C/REF(C,1)-1)*100<-5.1;

6、我想在一个指标中、同时引用30、60、日线、周线MACD能办到吗?
答:
qj1:="macd.macd#min30";//30分钟
qj2:="macd.macd#min60";//60分钟
qj3:="macd.macd";//日线
qj4:="macd.macd#WEEK";//周线

7、均线斜率怎么写?
答:
XL:ATAN(MA(C,N)/REF(MA(C,N),1)-1)*100;
{XL为N日均线的斜率}。

8、千钧老师听说过“空中加油”,怎么写呀?
答:
{空中加油}
barslast(cross(c,MA(c,250)))<barslast(cross(MA(c,250),c)) and
BARSLAST(CROSS(C,MA(C,20)))<BARSLAST(CROSS(MA(C,20),C));

9、求两个价位之间的最大值、和最小值,怎么写?
答:
最大值:MAX(CLOSE,REF(CLOSE,N));
最小值:MIN(CLOSE,REF(CLOSE,N));

10、选股时怎样去掉“ST”股?
答:把这个加到你的选股指标中。
STRNCMP(STKNAME, 'ST', 2)=0 and STRNCMP(STKNAME, '*ST', 3)=0;
INBLOCK('ST')=0


11、MACD死叉10天后、又金叉怎么写?
答:
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:= EMA(DIFF,9);
MACD:= 2*(DIFF-DEA);
qj:=BARSLAST(CROSS(DEA,DIFF));
xu:IF(COUNT(qj,10)>=10,CROSS(DIFF,DEA)  AND DIFF<0,0);

12、四连阳怎样写?
答:
四连阳:C>O and COUNT(C>REF(C,1),4)=4;

13、千钧老师、我发现无量创新高的股票、值得注意,可我不知道怎么写?
答:
vol/capital<0.02 and h>=hhv(high,20) and close>open;

14、老师你好,我把连续两天以上收阴线、今日成交量大于昨日的30%以上、且均线系统依然多头排列的,判断是主力洗盘。
老师能帮我写一下吗?
答:
xu:COUNT(C<REF(C,1),2)>=2 and C<O and VOL>REF(VOL, 1)*1.30
and (MA(C,3)>MA(C,5) and MA(C,5)>MA(C,10)) and (ma(C,13)>ma(C,26)
and ma(C,26)>ma(C,120));

15、我想求指定日期的收盘价,怎样写?
答:
IF(DATE>1070530,CLOSE,0);
这是去年5月30日的收盘价,时间你可以自己调整。

16、老师、股价在10日均线和20日均线之间运行,且10日均线是上升趋势,如何表达?
答:
RANGE(CLOSE,MA(CLOSE,20),MA(CLOSE,10)) and COUNT(ma(CLOSE,10)>REF(MA(CLOSE,10),1),3)>=3;

17、千钧老师、我想在飞狐上、画像大智慧L那样的直方图、飞狐可以吗?
答:
你好:
飞狐以其强大的编辑功能著称、如果运用好的话、在它的身上几乎没有做不到的事。
这是直方图的画法、你可以举一反三。

input:left(500,0,999),top(450,0,999),right(550,0,999),bottom(550,0,999);
k1:=SYSPARAM(4)-((SYSPARAM(4)-SYSPARAM(5))/1000*top);
k2:=SYSPARAM(4)-((SYSPARAM(4)-SYSPARAM(5))/1000*bottom);
k3:=ROUND((SYSPARAM(3)-SYSPARAM(2))/1000*left)+2+SYSPARAM(2);
k4:=ROUND((SYSPARAM(3)-SYSPARAM(2))/1000*right)+2+SYSPARAM(2);
STICKLINE(BARPOS>=k3 and BARPOS<=k4,K1,K2,60,0),colorred;

18、老师你好、飞狐有没有这样的功能?就是当信号出现时、写出文字。过了这天我就不需要看这个提示了,让它消失、再次出现信号时再出来。这能做的到吗?
答:
你好:
当然可以!主图叠加。

AA:MA(C,10);
BB:MA(C,21);
CC:MA(C,120);
P:=SYSPARAM(1);
DRAWTEXT(IF(ISLASTBAR,CROSS(MA(C,10),C),0),MA(C,10),'中线做空');
DRAWTEXT(IF(ISLASTBAR,CROSS(MA(C,21),MA(C,120)),0),MA(C,120),'长线做多');

19、我想在日线下画内外盘的两条线或柱线,可是只能看当天的,老师怎样才能看历史内外盘?
答:
变通一下不就可以了吗?
外盘:vol-DYNAINFO(22);
内盘:vol-DYNAINFO(23);

20、我想在看个股的同时、也能看到大盘,是在主图上,可能叫主图叠加大盘吧。
老师可以吗?
答:
input:N(1070101,0,9999999);
yfqj:=barssince(ref(date,1)<N and date>=N);
qj:=ref(o,yfqj)/ref(indexo, yfqj);
qj1:=indexo*qj;
qj2:=indexh*qj;
qj3:=indexl*qj;
qj4:=indexc*qj;
stickline(qj4>=qj1,qj3,qj2, 0.1, 0 ), colormagenta;
stickline(qj4>=qj1,qj1,qj4, 5, 0 ), colormagenta;
stickline(qj4<qj1,qj3,qj2, 0.1, 0 ), colorgreen;
stickline(qj4<qj1,qj1,qj4, 5, 0 ), colorgreen;


21、千钧老师你好:
我想在公式中随时能看到交易时间的时、分、秒、就像在指标中安装了一个电子钟。我有其它的用途。老师飞狐能做到吗?

答:
你好
尽管我不知道你用它来做什么?但起码我觉得你是在做捕捉主力大单的出现频率统计工作、很有想法!
后期运用我就不喧宾夺主了、你自己把握和运用吧。
P:=SYSPARAM(1);
AA:=TIME-OPENMINUTES(HOUR)-OPENMINUTES(MINUTE);
DRAWTEXTEX(C,1,20,50,'当前时刻:'+NUMTOSTR(AA[P],0)+' 秒');

22、老师你好,我想随时查看每一分、每一秒的成交量,请老师能不能给我写个这样的语句?我的问题是不是有些过分?
答:
你好:
爱思考、爱钻研,是大好事,应该得到支持与鼓励!加:10分。
P:=SYSPARAM(1);
DV:IF(CURRENTDATE,vol,0);
DRAWTEXTEX(C,1,10,10,' 当前时刻成交量:'+NUMTOSTR(DV[P],0));

可以通过光标、随时查阅毎一时刻的成交量,包括各个周期,全天候。

23、老师你好:
主图上有文字这对看盘及时了解个股的运行情况很有帮助,但太多时就有些乱了。
我想让它们随光标移动,就是不用光标时,文字在后台、使用光标时、文字随光标移动。
老师能帮我吗?
答:
这时你要的,文字随光标移动:
DRAWTEXT(SYSPARAM(1)=BARPOS,CLOSE,'制作:一发千钧');

24、我想把副图的左半部分用什么办法遮住,然后在那上面写文字。
答:
遮挡副图的左半部分:
把它放在你的源码的最后面,我把颜色定位黑色,因为一般的软件底色都是黑色、这样可以不露声色的遮挡左半部分。写文字部分的源码、放在这段源码的后面就行了。

STICKLINE(BARPOS=DATACOUNT-120,0,1000,900,0),COLOR000000;  

25、请高人帮编一个在n天内,maN1二次上穿maN2的选股指标.
例:在20天内,出现ma5二次上穿ma10

答:
INPUT:N(20),N1(5,1,300),N2(10,5,900);
M1:=MA(C,N1);
M2:=MA(C,N2);
TJ:COUNT(CROSS(M1,M2),N)>1;

26、收盘价上穿周线和月线如何编写公式?谢谢

答:
01、
Y10:"MA.M2#MONTH";//不要线显示可加上等号
金叉:CROSS(C,Y10),LINETHICK;
DRAWICON(金叉,L,4);

02、
{背景色}
DRAWGBK(1, COLORRGB(255,0,0), COLORRGB(190,190,190),1);
写在第一句,颜色自己调整。
死叉:CROSS(Y10,C),LINETHICK;
DRAWTEXT(金叉,L,'金叉'),COLOR8000EE,ALIGN;

27、求两点之间的距离【天数】

答:
你好:
假设第一点为【AA】、第二点为【BB】、求两点间距离:
AA:=FILTER(CROSS(ma(C,5),ma(C,20)) and COUNT(ma(c,5)>REF(ma(c,5),1),3)=3,13);
BB:=FILTER(CROSS(ma(C,20),ma(C,5)) and COUNT(ma(c,20)<REF(ma(c,20),1),3)=3,13);
点A:=barslast(AA);
点B:=barslast(BB);
起点:=if(点A>0 and 点A<点B,点A,0);
终点:=if(点B>0 and 点B<点A,点B,0);
DRAWTEXTEX(c,1,20,10,'进入上拐点:'+NUMTOSTR(起点[SYSPARAM(1)],0)+' 天'),Color00A8FF;
DRAWTEXTEX(c,1,20,150,'跌进下拐点:'+NUMTOSTR(终点[SYSPARAM(1)],0)+' 天'),Color00A8FF;


28、这可能是个很简单的问题,但对我来说很难,还请版主帮忙。就是如何编写这个选股条件,即MACD底部二次金叉,谢谢

答:
你好:
1、首先界定金叉条件:
JC:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
2、定位金叉的次数:
CS:=CROSS(DIFF,DEA) AND DEA<0 AND JC=2;
3、完整的选股公式:
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
JC:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
选股:CROSS(DIFF,DEA) AND DEA<0 AND JC=2;


今天先到这,不断添加!

[ 本帖最后由 一发千钧 于 2008-6-13 22:35 编辑 ]

TOP

未经商量,占领558班长的2楼宝地,先行致歉。
公式1{计算自然日间隔天数函数} 提出人:广陵子,解答人:毕继本

N:=30;{间隔天数可选择}
GG:=HHV(H,365)=H;{条件可另设}
AAA:=BARSLAST(GG=1);
NIAN:=REF(YEAR,AAA);
YUE:=REF(MONTH,AAA);
RI:=REF(DAY,AAA);
RN:=IF(NIAN/4=FLOOR(NIAN/4),1,0);
NIAN1:=YEAR;
YUE1:=MONTH;
RI1:=DAY;
RN1:=IF(NIAN1/4=FLOOR(NIAN1/4),1,0);
RS:=IF(YUE=1,RI,IF(YUE=2,1*31+RI,IF(YUE=3,1*31+IF(RN=0,28,29)+RI,IF(YUE=4,2*31+IF(RN=0,28,29)+RI,
IF(YUE=5,2*31+1*30+IF(RN=0,28,29)+RI,IF(YUE=6,2*31+2*30+IF(RN=0,28,29)+RI,
IF(YUE=7,3*31+2*30+IF(RN=0,28,29)+RI,IF(YUE=8,4*31+2*30+IF(RN=0,28,29)+RI,
IF(YUE=9,5*31+2*30+IF(RN=0,28,29)+RI,IF(YUE=10,5*31+3*30+IF(RN=0,28,29)+RI,
IF(YUE=11,6*31+3*30+IF(RN=0,28,29)+RI,6*31+4*30+IF(RN=0,28,29)+RI)))))))))));
RS1:=IF(YUE1=1,RI1,IF(YUE1=2,1*31+RI1,IF(YUE1=3,1*31+IF(RN1=0,28,29)+RI1,IF(YUE1=4,2*31+IF(RN1=0,28,29)+RI1,
IF(YUE1=5,2*31+1*30+IF(RN1=0,28,29)+RI1,IF(YUE1=6,2*31+2*30+IF(RN1=0,28,29)+RI1,
IF(YUE1=7,3*31+2*30+IF(RN1=0,28,29)+RI1,IF(YUE1=8,4*31+2*30+IF(RN1=0,28,29)+RI1,
IF(YUE1=9,5*31+2*30+IF(RN1=0,28,29)+RI1,IF(YUE1=10,5*31+3*30+IF(RN1=0,28,29)+RI1,
IF(YUE1=11,6*31+3*30+IF(RN1=0,28,29)+RI1,6*31+4*30+IF(RN1=0,28,29)+RI1)))))))))));
TS:=IF(NIAN=NIAN1,RS1-RS,IF(RN=1,366-RS+RS1,365-RS+RS1));
DRAWTEXT(TS=N OR (REF(TS,1)<N AND TS>N),L*0.99,'30日'),COLORYELLOW;


公式2:近日最高  解答人:听雪寻股
aa:=hhv(h,20)=h;
bb:=BARSLAST(aa);
见高日:ref(DATE,bb),LINETHICK0;
cc:=见高日;
dd:=DATETOD1970(cc);
ee:=DATETOD1970(DATE);
yy:=(ee-dd)=13;

aaa:=NUMTOSTR(REF(cc,BARPOS-SYSPARAM(STRTONUM(NUMTOSTR(yy,0))))-1000000,0);
bbb:=STRLEFT(aaa,1);
ccc:=STRMID(aaa,2,2);
ddd:=STRMID(aaa,4,2);

DRAWTEXT( yy and BARPOS=SYSPARAM(1),0,'13日前为近日最高,\n日期是200'+bbb+'年'+ccc+'月'+ddd+'日'),ALIGN2;{移动光标可见}

[ 本帖最后由 大庆老杨 于 2008-6-13 22:43 编辑 ]

TOP

快点!板凳要没有了!!

TOP

板凳也没了,坐地板.老师好!

TOP

學習了,謝謝。。。。。。。。。。。

TOP

坐地板.老师好!

TOP

顶~~~~~~~~~~~~~~~~~再顶

TOP

谢谢老师,不断学习中

TOP

站着学习吧!谢谢老师

TOP

谢谢老师,不断学习中

TOP

我也来顶,,,感谢,,学习。

TOP

学习一下!感谢老师!

TOP

谢谢老师~~~学习学习!!!

TOP

感谢千均班长整理。
大家若发现符合本主题的内容,也可跟帖推荐,然后由千均班长统一纳入总帖中。

TOP

现在的理想指标区越来越有学习的氛围了!来到这儿每天都有提高!谢谢各位版主,你们辛苦了!

TOP

发新话题

理想论坛上的网友发表的帖子纯属个人意见,理想论坛不负任何责任! 免责声明
共同建设网络精神文明,欢迎广大网友举报论坛上的不良信息,我们会在最短的时间内及时处理

信息产业部信息备案:津ICP备05011481号      天津市通信管理局电子公告专项备案:060006号
茂名市公安局网警备案:4409013011161号 感谢茂名群英网络提供带宽支持
理想论坛值班电话[8:30~17:30]: 022-23707282  022-23707281 022-23707280 15902230709(紧急)