量学论坛 › 股票公式 › 和横有钱战友，把你的指标改成选股公式了。

一斩堂 发表于 2010-6-29 23:20

成功率很高，谢谢提高源码。改成选股公式，方便大家选股

yuli5199 发表于 2010-6-29 23:21

DIF:EMA(CLOSE,13)-EMA(CLOSE,21);
DEA:EMA(DIF,2);
CD:(DIF-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

和横有钱战友，:handshake

风中有云 发表于 2010-6-29 23:28

谢谢楼主分享！

慧慧 发表于 2010-6-29 23:29

和横有钱战友

高山散户 发表于 2010-6-29 23:52

谢谢分享，真诚的感谢

顺天而动 发表于 2010-6-29 23:53

:handshake

大道至简 发表于 2010-6-29 23:56

向高手学习学习

琦+琦 发表于 2010-6-30 00:06

和横有钱战友

SELECT 发表于 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

查看完整版本: 和横有钱战友，把你的指标改成选股公式了。