// 本程序已经修改过，自用，感谢原作者，很棒的程序。
// 改进计划：1，继续追加线性回归斜率交汇点预测功能； 2，增加喇叭声音提示； 3，完善T+与T-提示的逻辑判断，其中需要避开涨跌停板时的逻辑判断错误。 4，开始完全程序化交易设计。
// 增加变量，识别股票或合约价咯区间，自动调整提示符号的位置，以便于观察。
{
IF N4<=5 THEN // N4取值是为了方便用户端在表头直接修改买线的短线操作级别，
风险偏好:'您选择的参数为：激进型，股市有风险，投资需谨慎！';
ELSE
风险偏好:'您选择的参数为：稳健型，仍需盯盘，A股反复无常，多加小心！',coloryellow;
}
// 求值并画出买线。注意同花顺评台上，“：”是赋值并输出图形，“：=”号则赋值但不输出图形。
买线: MA(CLOSE,N1); // 原作者用的是EMA(),大致上相当于MA3日均线，略有差异，雅益十均线系统用的是简单移动平均，简单而敏锐。
// 补充一条MA7均线吧，短线客喜欢。试过了，没用，因为MA7处于3与21均线通道内，被渐变色垂直柱遮蔽了，看不到。
// 短线买线2: MA(CLOSE,N4);
// 求卖线，卖线的意义大致上就是：21日的收盘价的线性回归斜率，再算出当日以收盘价计，照此斜率再运行21日后的估计收盘价，然后将这些预测的数值，取56个交易日的移动平均值。
// 实际上也就是说，原作者是将21日均线和56日均线对股价的影响，都计算进了线性回归影响因素中，可能会更科学些，预测前瞻性更强些，但也让公式变得复杂了。
// SLOPE函数是线性回归斜率，相当于画出散点取样的正态分布直线，求出相应的斜率。
// 卖线:EMA(SLOPE(CLOSE,N2)*N2+CLOSE, N3); // 原作者代码公式，线性回归，好像是一元线性回归再加移动平均。
// 实际上，可以考虑直接采用MA21均线作为卖线，效果应该也不错，可以试试。
{
卖线: MA(CLOSE,N2); //此处改变了原作者的线性回归斜率之方法，简单处理了。原代码在上方屏蔽保留着，随时可换回。
买卖差:=买线-卖线; // 赋值不输出买卖差曲线
// 增加买卖点指示信号,
DRAWICON (CROSS(买线,卖线)=1,买线*0.9999,1);
DRAWICON (CROSS(卖线,买线)=1,卖线*1.0001,2);
}
// 增加在MA3均线出现波峰拐点时注意减仓信号，以及在谷底拐点时提示考虑增仓信号，对多头而言。
// 有两种研判方式：1，3日穿5日或7日均线（提供界面调整参数，默认为5）； 2，MA3均线斜率改平SLOPE(CLOSE,N1)<=0。
// 判定买线穿N4均线金叉、死叉，发出信号。似乎还要改改，信号位置不太对
// DRAWTEXT (CROSS(买线,MA(CLOSE,N4))=1,买线*0.86,'建/增');
// DRAWTEXT (CROSS(MA(CLOSE,N4),买线)=1,卖线*1.16,'减/平');
{
// 方法二：MA3买线斜率归零为判定依据。符号或文字的位置，可以由根据合约品种价咯区间设置的变量计算出最合适的系数代入公式。
DRAWTEXT ( (买线 < 卖线 AND SLOPE(CLOSE,N1)>= 3), 买线 * 0.9994,'T'),colorred; // 空头趋势中开始反转时的T+小级别机会提示信号。
DRAWTEXT ( (买线 > 卖线 AND SLOPE(CLOSE,N1)>= 1), 买线 * 1.001,'T'),colorred; // 多头趋势中，第二、三、四买点，或做短线T+的提示信号。
DRAWTEXT ( (买线 > 卖线 AND SLOPE(CLOSE,N1)<= 0), 买线*1.001,'T'),colorgreen;
DRAWTEXT ( (买线 < 卖线 AND SLOPE(CLOSE,N1)<= -1), 卖线*0.9994,'T'),colorgreen;
}
{
// 画出两线之间垂直落差柱线，渐变色，这里实际上就是将一根从卖线到买线间的垂直线段，按10%-15%比例切分成了5小段，然后分别上色。
//开始画渐变暖色多头柱，切分比例分别为10%、15%、15%、15%、15%，上下各留出5%空隙，避免遮蔽原有的买卖线，好主意！
STICKLINE(买卖差>=0,(买线-买卖差*0.05),(买线-买卖差*0.15),4,0) ,COLOR00ffff; //此处用的是十六进制代码表示颜色，柱线宽度被我调成4，试试，稍后试试RGB函数来调色(在文华评台上试了成功了)。
STICKLINE(买卖差>=0,(买线-买卖差*0.2),(买线-买卖差*0.35),4,0) ,COLOR00ccff;
STICKLINE(买卖差>=0,(买线-买卖差*0.4),(买线-买卖差*0.55),4,0) ,COLOR0099ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.6),(买线-买卖差*0.75),4,0) ,COLOR0066ff;
STICKLINE(买卖差>=0,(买线-买卖差*0.8),(买线-买卖差*0.95),4,0) ,COLOR0000cc;
//开始画渐变冷色空头线柱，方法同上。
STICKLINE(买卖差<0,(卖线+买卖差*0.05),(卖线+买卖差*0.15),4,0) ,COLOR006600;
STICKLINE(买卖差<0,(卖线+买卖差*0.2),(卖线+买卖差*0.35),4,0) ,COLOR009900;
STICKLINE(买卖差<0,(卖线+买卖差*0.4),(卖线+买卖差*0.55),4,0) ,COLOR00cc00;
STICKLINE(买卖差<0,(卖线+买卖差*0.6),(卖线+买卖差*0.75),4,0) ,COLOR00ff00;
STICKLINE(买卖差<0,(卖线+买卖差*0.8),(卖线+买卖差*0.95),4,0) ,COLOR66ff00;
}
|
