公式网 股票指标公式源码分享 登录 注册
公式指标平网
未来函数检测
首页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 东财通公式 飞狐公式 操盘手公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式网 > 其他公式 > 金字塔公式 > 正文 → 正文

金字塔虚拟期货5档行情源代码[金字塔模型]

发布时间:2015/10/23 6:14:43  浏览次数:

相关标签:

虚拟期货5档行情源代码
 


金字塔公式 金字塔模型策略源码:
 

1 variable:askprice2=0,askvol2=0,bidprice2=0,bidvol2=0;
 2 variable:askprice3=0,askvol3=0,bidprice3=0,bidvol3=0;
 3 variable:askprice4=0,askvol4=0,bidprice4=0,bidvol4=0;
 4 variable:askprice5=0,askvol5=0,bidprice5=0,bidvol5=0;
 5 variable:askprice6=0,askvol6=0,bidprice6=0,bidvol6=0;
 6
 7
 8
 9 refaskprice:=ref(askprice,1);
 10 refaskvol:=ref(askvol,1);
 11 refbidprice:=ref(bidprice,1);
 12 refbidvol:=ref(bidvol,1);
 13
 14 if askprice<refaskprice then begin
 15     askprice6:=askprice5;
 16     askvol6:=askvol5;
 17     askprice5:=askprice4;
 18     askvol5:=askvol4;
 19     askprice4:=askprice3;
 20     askvol4:=askvol3;
 21     askprice3:=askprice2;
 22     askvol3:=askvol2;
 23     askprice2:=refaskprice;
 24     askvol2:=refaskvol;
 25 end;
 26
 27 if askprice>refaskprice then begin
 28     askprice2:=askprice3;
 29     askvol2:=askvol3;
 30     askprice3:=askprice4;
 31     askvol3:=askvol4;
 32     askprice4:=askprice5;
 33     askvol4:=askvol5;
 34     askprice5:=askprice6;
 35     askvol5:=askvol6;
 36 end;
 37
 38 if bidprice>refbidprice then begin
 39     bidprice6:=bidprice5;
 40     bidvol6:=bidvol5;
 41     bidprice5:=bidprice4;
 42     bidvol5:=bidvol4;
 43     bidprice4:=bidprice3;
 44     bidvol4:=bidvol3;
 45     bidprice3:=bidprice2;
 46     bidvol3:=bidvol2;
 47     bidprice2:=refbidprice;
 48     bidvol2:=refbidvol;
 49 end;
 50
 51 if bidprice<refbidprice then begin
 52     bidprice2:=bidprice3;
 53     bidvol2:=bidvol3;
 54     bidprice3:=bidprice4;
 55     bidvol3:=bidvol4;
 56     bidprice4:=bidprice5;
 57     bidvol4:=bidvol5;
 58     bidprice5:=bidprice6;
 59     bidvol5:=bidvol6;   
 60 end;
 61
 62 x1:=900;
 63 x2:=970;
 64 y1:=75;
 65 y2:=25;
 66
 67 n:=0;
 68
 69 drawtextex(1,1,x1,0,\'--------------------\',colorgreen);
 70
 71 drawtextex(1,1,x1,25,\'卖五 \'+numtostr(askprice5,n),colorwhite);
 72 drawtextex(1,1,x2,25,numtostr(askvol5,0),coloryellow);
 73
 74 drawtextex(1,1,x1,50,\'--------------------\',colorgreen);
 75
 76 drawtextex(1,1,x1,75,\'卖四 \'+numtostr(askprice4,n),colorwhite);
 77 drawtextex(1,1,x2,75,numtostr(askvol4,0),coloryellow);
 78
 79 drawtextex(1,1,x1,100,\'--------------------\',colorgreen);
 80
 81 drawtextex(1,1,x1,125,\'卖三 \'+numtostr(askprice3,n),colorwhite);
 82 drawtextex(1,1,x2,125,numtostr(askvol3,0),coloryellow);
 83
 84 drawtextex(1,1,x1,150,\'--------------------\',colorgreen);
 85
 86 drawtextex(1,1,x1,175,\'卖二 \'+numtostr(askprice2,n),colorwhite);
 87 drawtextex(1,1,x2,175,numtostr(askvol2,0),coloryellow);
 88
 89 drawtextex(1,1,x1,200,\'--------------------\',colorgreen);
 90
 91 drawtextex(1,1,x1,225,\'卖一 \'+numtostr(askprice,n),colorwhite);
 92 drawtextex(1,1,x2,225,numtostr(askvol,0),coloryellow);
 93
 94 drawtextex(1,1,x1,250,\'--------------------\',colorred);
 95
 96 drawtextex(1,1,x1,275,\'买一 \'+numtostr(bidprice,n),colorwhite);
 97 drawtextex(1,1,x2,275,numtostr(bidvol,0),coloryellow);
 98
 99 drawtextex(1,1,x1,300,\'--------------------\',colorgreen);
 100
 101 drawtextex(1,1,x1,325,\'买二 \'+numtostr(bidprice2,n),colorwhite);
 102 drawtextex(1,1,x2,325,numtostr(bidvol2,0),coloryellow);
 103
 104 drawtextex(1,1,x1,350,\'--------------------\',colorgreen);
 105
 106 drawtextex(1,1,x1,375,\'买三 \'+numtostr(bidprice3,n),colorwhite);
 107 drawtextex(1,1,x2,375,numtostr(bidvol3,0),coloryellow);
 108
 109 drawtextex(1,1,x1,400,\'--------------------\',colorgreen);
 110
 111 drawtextex(1,1,x1,425,\'买四 \'+numtostr(bidprice4,n),colorwhite);
 112 drawtextex(1,1,x2,425,numtostr(bidvol4,0),coloryellow);
 113
 114 drawtextex(1,1,x1,450,\'--------------------\',colorgreen);
 115
 116 drawtextex(1,1,x1,475,\'买五 \'+numtostr(bidprice5,n),colorwhite);
 117 drawtextex(1,1,x2,475,numtostr(bidvol5,0),coloryellow);
 118
 119 drawtextex(1,1,x1,500,\'--------------------\',colorgreen);

 

资源下载链接   资源大小:unknow

手机移动版 - 关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - TOP
湘ICP备09016573号-3 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZX.COM.CN ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识