编程思路破译 WC赋值:收盘价[取周线数据],线宽为0 WO1赋值:如果星期<1日前的星期,返回开盘价,否则返回无效数 WO赋值:星期日内WO1的最高值,线宽为0 WH赋值:星期日内最高价的最高值,线宽为0 WL赋值:星期日内最低价的最低值,线宽为0 MC赋值:收盘价[取月线数据],线宽为0 MO1赋值:如果日<1日前的日,返回开盘价,否则返回无效数 MO赋值:日日内MO1的最高值,线宽为0 AG赋值:日<1日前的日 BG赋值:上次AG距今天数+1 MH赋值:BG日内最高价的最高值,线宽为0 ML赋值:BG日内最低价的最低值,线宽为0 当满足条件MC>=MO时,在MO和MC位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR5CA8FD 当满足条件MC<MO时,在MO和MC位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR008B00 当满足条件WC>=WO时,在WO和WC位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR003399 当满足条件WC<WO时,在WO和WC位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR993300 K线 程序源码 WC:=C#WEEK,LINETHICK0;{周} WO1:=IF(WEEkdAY<REF(WEEKDAY,1),O,DRAWNULL); WO:=HHV(WO1,WEEKDAY),LINETHICK0;{日} WH:=HHV(H,WEEKDAY),LINETHICK0; WL:=LLV(L,WEEKDAY),LINETHICK0; MC:=C#MONTH,LINETHICK0;{月} MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL); MO:=HHV(MO1,DAY),LINETHICK0; AG:=DAY<REF(DAY,1); BG:=BArslAST(AG)+1; MH:=HHV(H,BG),LINETHICK0; ML:=LLV(L,BG),LINETHICK0; STICKLINE(MC>=MO,MO,MC,4,0),COLOR5CA8FD;{COLOR5CA8FD淡橙色} STICKLINE(MC<MO,MO,MC,4,0),COLOR008B00;{COLOR008B00深绿} STICKLINE(WC>=WO,WO,WC,4,0),COLOR003399;{COLOR003399土红} STICKLINE(WC<WO,WO,WC,4,0),COLOR993300;{COLOR993300深蓝} DRAWKLINE(H,O,L,C); 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|