找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
楼主: 意有

和横有钱战友,把你的指标改成选股公式了。

   火... [复制链接]
发表于 2010-6-29 23:20 | 显示全部楼层
成功率很高,谢谢提高源码。改成选股公式,方便大家选股
回复

使用道具 举报

发表于 2010-6-29 23:21 | 显示全部楼层
DIF:EMA(CLOSE,13)-EMA(CLOSE,21);
DEA:EMA(DIF,2);
CDDIF-DEA)*7,COLORRED,LINETHICK2;
DRAWBAND(DIF,RGB(255,50,0),DEA,RGB(0,255,50));
界: 0,COLORFFFF00,LINETHICK1;
DRAWTEXT(ISLASTBAR AND DIF>REF(DIF,1),DIF,' ↑趋势'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR AND DIF<REF(DIF,1),DIF,' ↓趋势'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR AND CD>REF(CD,1),CD,' ↑柱'),COLOR0000FF;
DRAWTEXT(ISLASTBAR AND CD<REF(CD,1),CD,' ↓柱'),COLOR00FF00;
STICKLINE((CD > 0),0,CD,1,0),COLOR0000CC;
STICKLINE((CD > 0),0,CD*0.9,1,0),COLOR0000EE;
STICKLINE((CD > 0),0,CD*0.8,1,0),COLOR0011FF;
STICKLINE((CD > 0),0,CD*0.7,1,0),COLOR0033FF;
STICKLINE((CD > 0),0,CD*0.6,1,0),COLOR0055FF;
STICKLINE((CD > 0),0,CD*0.5,1,0),COLOR0077FF;
STICKLINE((CD > 0),0,CD*0.4,1,0),COLOR0099FF;
STICKLINE((CD > 0),0,CD*0.3,1,0),COLOR00BBFF;
STICKLINE((CD > 0),0,CD*0.2,1,0),COLOR00DDFF;
STICKLINE((CD > 0),0,CD*0.1,1,0),COLOR00FFFF;
STICKLINE((CD < 0),0,CD,1,0),COLORCC0033;
STICKLINE((CD < 0),0,CD*0.9,1,0),COLOREE0033;
STICKLINE((CD < 0),0,CD*0.8,1,0),COLORFF1133;
STICKLINE((CD < 0),0,CD*0.7,1,0),COLORFF3333;
STICKLINE((CD < 0),0,CD*0.6,1,0),COLORFF5533;
STICKLINE((CD < 0),0,CD*0.5,1,0),COLORFF7733;
STICKLINE((CD < 0),0,CD*0.4,1,0),COLORFF9933;
STICKLINE((CD < 0),0,CD*0.3,1,0),COLORFFBB33;
STICKLINE((CD < 0),0,CD*0.2,1,0),COLORFFDD33;
STICKLINE((CD < 0),0,CD*0.1,1,0),COLORFFFF33;
DI:=EMA(C,12)-EMA(C,26);
DE:=EMA(DI,9);
DRAWICON(CROSS(DI,DE),DIF,17);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DRAWICON(CROSS(K,D) AND K>20 AND D<50,CD,23);
DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,CD,'  KD金叉'),COLORFFFFFF;
RR2:=TROUGHBARS(3,15,1)<10;
RR3:=PEAKBARS(3,15,1)<10;
RR4:=IF(RR2=1,50,0);
RR5:=IF(RR3=1,50,0);
底部:=IF(RR4=50,10,0);
DRAWICON(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,0,9);
R1:=(C>REF(C,1) AND C>REF(C,2));
R2:=(REF(R1,1) AND C<=REF(C,1) AND C>=REF(C,2));
R3:=(REF(R2,1) AND C>=REF(C,1) AND C<=REF(C,2));
R4:=(REF(R3,1) AND C<=REF(C,1) AND C>=REF(C,2));
R5:=(REF(R4,1) AND C>=REF(C,1) AND C<=REF(C,2));
R6:=(REF(R5,1) AND C<=REF(C,1) AND C>=REF(C,2));
R7:=(REF(R6,1) AND C>=REF(C,1) AND C<=REF(C,2));
R8:=(REF(R7,1) AND C<=REF(C,1) AND C>=REF(C,2));
R9:=(REF(R8,1) AND C>=REF(C,1) AND C<=REF(C,2));
RA:=(REF(R9,1) AND C<=REF(C,1) AND C>=REF(C,2));
RB:=(REF(RA,1) AND C>=REF(C,1) AND C<=REF(C,2));
RC:=(REF(RB,1) AND C<=REF(C,1) AND C>=REF(C,2));
RD:=(C<REF(C,1) AND C<REF(C,2));
RE:=(REF(RD,1) AND C>=REF(C,1) AND C<=REF(C,2));
RF:=(REF(RE,1) AND C<=REF(C,1) AND C>=REF(C,2));
R10:=(REF(RF,1) AND C>=REF(C,1) AND C<=REF(C,2));
R11:=(REF(R10,1) AND C<=REF(C,1) AND C>=REF(C,2));
R12:=(REF(R11,1) AND C>=REF(C,1) AND C<=REF(C,2));
R13:=(REF(R12,1) AND C<=REF(C,1) AND C>=REF(C,2));
R14:=(REF(R13,1) AND C>=REF(C,1) AND C<=REF(C,2));
R15:=(REF(R14,1) AND C<=REF(C,1) AND C>=REF(C,2));
R16:=(REF(R15,1) AND C>=REF(C,1) AND C<=REF(C,2));
R17:=(REF(R16,1) AND C<=REF(C,1) AND C>=REF(C,2));
R18:=(REF(R17,1) AND C>=REF(C,1) AND C<=REF(C,2));
R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);
DRAWICON(R1A,DIF,15);
DRAWICON(R19,CD,1);
回复

使用道具 举报

发表于 2010-6-29 23:24 | 显示全部楼层
ddddddddddddddddddddd
回复

使用道具 举报

发表于 2010-6-29 23:24 | 显示全部楼层
会送鲜花,没学会扔鸡蛋!
回复

使用道具 举报

发表于 2010-6-29 23:25 | 显示全部楼层
和横有钱战友,
回复

使用道具 举报

发表于 2010-6-29 23:28 | 显示全部楼层
谢谢楼主分享!
回复

使用道具 举报

发表于 2010-6-29 23:29 | 显示全部楼层
和横有钱战友
回复

使用道具 举报

发表于 2010-6-29 23:52 | 显示全部楼层
谢谢分享,真诚的感谢
回复

使用道具 举报

发表于 2010-6-29 23:53 | 显示全部楼层
回复

使用道具 举报

发表于 2010-6-29 23:56 | 显示全部楼层
向高手学习学习
回复

使用道具 举报

发表于 2010-6-30 00:06 | 显示全部楼层
和横有钱战友
回复

使用道具 举报

发表于 2010-6-30 01:02 | 显示全部楼层
指标改成选股公式
回复

使用道具 举报

发表于 2010-6-30 10:37 | 显示全部楼层
回复 1# 意有
回复

使用道具 举报

发表于 2010-6-30 10:40 | 显示全部楼层
量:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:=IF(CLOSE>OPEN,量*(HIGH-LOW),IF(CLOSE<OPEN,量*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
卖量:=(IF(CLOSE>OPEN,0-量*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-量*(HIGH-LOW),0-VOL/2)))*-1;
总量:=买量+卖量;
净量:=买量-卖量;
五日净量:=SUM(净量,5);
十日净量:=SUM(净量,10);
二十日净量:=SUM(净量,20);
五十日净量:=SUM(净量,50);
停牌:=(DYNAINFO(4)=0);

XG:总量=净量 AND NOT(停牌);
回复

使用道具 举报

发表于 2010-6-30 20:19 | 显示全部楼层
LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR);
MDI:=((DMM * 100) / TR);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
0,COLORFF00FF;
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
阶段底部:=(AV + NEWVOL);
STICKLINE((阶段底部 >= 0),0,阶段底部,0.3,1),LINETHICK2,COLORCC6600;
STICKLINE((阶段底部 < 0),0,阶段底部,0.8,1),LINETHICK6,COLORRED;
趋势线LV(阶段底部,1),COLORFFFFFF;
STICKLINE((趋势线 >230 ),250,趋势线,0.8,1),LINETHICK6,COLORGREEN;
230,COLORFFFFFF
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-11-24 03:25 , Processed in 0.097401 second(s), Total 9, Slave 8 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表