金魔方 kt交易师的五彩K线指标组合优化框架代码-世界杯巴西克罗地亚-梅西世界杯_世界杯多久一次

返回列表

发新帖

金魔方 kt交易师的五彩K线指标组合优化框架代码

[复制链接]

电梯直达

楼主

365

2025-3-17 15:15:10

只看该作者

|倒序浏览

|阅读模式

金魔方 kt交易师的五彩K线指标组合优化框架代码

使用说明：

1.引入金魔方后，打开K线图，日线；kt交易师本质上也是支持的，只不过每次需要单独在另外一个公式中将全局变量 G_currentIndex 重置为0。金魔方也可以在软件菜单里面，程式交易->全局变量里面查看、修改和删除。

2.打开浦发银行600000K线图

3、将这个公式拖入附图指标中，等待附图窗口出现一条白线，表明已经计算完毕。如果你的机器慢的话，可能在主图窗口右上角有一个显示运行中的小黄圆圈，不断旋转。

4、由于软件的bug，有时候前面几个股票计算完毕后，并不会自动跳转到下一个股票，所以需要手动翻到下一个，我一般用键盘上的PgDn,也就是下一页完成，鼠标滚动有的是缩放功能，有的是太快，翻过很多个股票了。

5、等待，公式运行完毕混自动将附图指标设定为kdj指标，同时再次跳转到浦发银行那个K线图上。这表示完成了所有统计。

6、在excel里面查看csv文件，可以对不同的参数组合分别统计总数和成功次数，这里面经常用到excel的sumifs函数，可以了解一下，网上很多帮助。

7、很明显，公式的两头的是框架。这个框架的作用就是能够完全控制的实现自己的思路，并对所有的数据进行测试，得出自己思路的全部回测结果。

8、这个框架能干什么呢:

1)任意多个指标的组合，用多重循环可以搞定，不过这里面有个计算量的问题需要注意；毕竟3000多个A股，一个一秒，就需要1小时了，我曾经最长的用时24小时，不过对优化确实很有效，不是自己翻几个K线图看看能比的。

2单个指标的参数优化，比如都说macd金叉如何，那么12 26 9这个参数是最适合的吗？未必，可以按自己的优化目标进行参数优化，之后自己优化的才是自己的，才心理有谱，用起来也得心应手。

3 更复杂一点，多个指标的组合和参数一起优化，工作量肯定不小，可以通过多个机器分开跑，比如第一个机器只跑前面1000只股票，第二个接力，第三个再接力，结果是可以直接合并的。

9.结果中，需要按照股票代码和参数一起做一个唯一值，对结果进行去重，理论上不应该重复，或者只有一条重复，但软件有bug，这个去重还是需要做一下，有一半的机会是没有重复结果的。}stkblkName:='A股板块';

stkblkcount:=STKCOUNT(stkblkName);

currentIndex := GetGlobalVar('G_currentIndex');

if currentindex<1 then

currentindex:=1;

Else

currentindex+=1;

setGlobalVar('G_currentIndex',currentindex);//下面加入需要统计的内容Function getCondi

input:

CondiNumber(1,1,30000); Begin

cond1:= REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND

REF(OPEN,1) < REF(CLOSE,2) AND

ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);//早晨之星

cond2:=REF(CLOSE,1)/REF(OPEN,1)<0.97 AND

CLOSE/OPEN>1.03 AND

OPEN

CLOSE>REF(CLOSE,1);//曙光初现

cond3:=REF(CLOSE,2)>REF(OPEN,2) AND

REF(CLOSE,1)>REF(OPEN,1) AND

CLOSE>OPEN AND

REF(CLOSE,1)>REF(CLOSE,2) AND

CLOSE>REF(CLOSE,1); //三个白武士

cond4:=HIGH=CLOSE AND HIGH<>LOW; //光头阳线

cond5:=CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018; //大阳烛继续看涨或者见底

cond6:=LOW>REF(HIGH,1); //向上突破缺口

cond7:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667 and Range(abs(close/ref(close,1)-1),0.009,0.031); //仙人指路

cond8:=1;//"000diFenXing.ot"(0) ;,原本为缠论中底分型条件，这里暂时取消，不影响测试，可以换成自己的任何其他指标

cond9:=cross("dmi-ql.pdi","dmi-ql.mdi" );//

if(CondiNumber>0) then Begin

i:=INTPART((CondiNumber-1)/2)+1;//七个指标中的哪一个

j:=CondiNumber-(i-1)*2;//1 2 3表示一个指标的ref(,1),exist(,1)状态，

cond:=false;

Switch (i) Begin

case 1: Begin

cond:=cond1;

end

case 2: Begin

cond:=cond2;

end

case 3: Begin

cond:=cond3;

end

case 4: Begin

cond:=cond4;

end

case 5: Begin

cond:=cond5;

end

case 6: Begin

cond:=cond6;

end

case 7: Begin

cond:=cond7;

end

case 8: Begin

cond:=cond8;

end

case 9: Begin

cond:=cond9;

end

end;

Switch (j) Begin

case 1: Begin

cond:=ref(cond,1);

end

case 2: Begin

//cond:=cond;

end

end;

Else//其它因子默认为true

cond:=true;

Return cond;

end;close_zhangTing:=round(ref(close,1),3)+round(round(ref(close,1),3)*0.1,3);

close_new:=round(close,3);

FeiZhangTingcond01:=iif(close_new>=close_zhangTing,0, close_zhangTing-close_new>=0.010) ;//非涨停严格条件 TotalNums:=18;

GroupNums:=2;

Cond005:=close*1.005<=max(refx(high,1),refx(high,2));//成功条件，对公式优化很关键,可以改成自己的任意条件，比如两日内收盘价创新高

Cond010:=close*1.01<=max(refx(high,1),refx(high,2));//

outStr = '';

filename:='d:/paras/'+FormulaName(0)+ '_'+NumToStr(DataType,0)+'.csv';

for i=1 to TotalNums do Begin //两个一组，可以设置三个或者四个一组，这里是表示一个指标的ref(,1),exist(,1)状态，

for j=(INTPART((i-1)/GroupNums)+1)*GroupNums+1 to TotalNums do Begin allcond:=getCondi(i) and getCondi(j) and FeiZhangTingcond01;//

if count(allcond>0,0)>0 then Begin

for k=0 to TotalNums do Begin

if k=0 or k>= (INTPART((j-1)/GroupNums)+1)*GroupNums+1 then Begin

allcond:=getCondi(i) and getCondi(j) and getCondi(k) and FeiZhangTingcond01;//

allcount:=count(allcond>0,0);

if allcount>0 then Begin

outStr := NumToStr(i,0) + ',' + NumToStr(j,0) + ',' + NumToStr(k,0) + ',' + //

NumToStr( allcount,0) + ',' +

NumToStr( count( allcond and Cond005,0),0) + ',' +

NumToStr( count( allcond and Cond010,0),0) ;

FileAppend(filename,STKLABEL,',',outStr);

end;

//切换股票

if currentindex<=stkblkcount then

OpenChartView(STKFROMBLK(stkblkName,currentindex),'',P_Day);

Else

Begin

OpenChartView(STKFROMBLK(stkblkName,1),'kdj',P_Day);

PLAYSOUND(1,0,'D:\\KT\\Sound\\ALERT7.WAV');

end;

赏

已有 0 人打赏作者

转播

淘帖0

支持0

反对0

使用道具

提升卡

置顶卡

沉默卡

喧嚣卡

变色卡

千斤顶

照妖镜

返回列表

发新帖

高级模式

Color

Image

Link

Quote

Code

Smilies

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

本版积分规则

发表回复

回帖并转播

回帖后跳转到最后一页

谈股者

回帖346

积分14

股份

中级会员

中级会员, 积分 346, 距离下一级还需 654 积分

积分346

加好友

发消息

回复楼主

返回列表

通达信指标

大智慧指标

同花顺指标

东方财富通

飞狐指标

通达信股票池

大智慧股票池

博易大师

益盟操盘手

文华财经

金字塔

公式帮助

彻的成语
TCL电视与华为电视深度对比：哪个更值得入手？

金魔方 kt交易师的五彩K线指标组合优化 框架代码

金魔方 kt交易师的五彩K线指标组合优化框架代码