软件名称:[B]权证辅助[/B]
软件类型:国产软件
运行环境:Win9X/2000/XP/2003/
软件语言:简体中文
授权方式:解密版
软件大小:2.00 KB
官方主页:Home Page
更新时间:2008-12-06 21:26:58
软件简介:
{每次权证资料变动时需要手动改写公式!源码如下:}
DRAWTEXTEX(STKNAME='云化CWB1',1,0,10,'行权起始日:2009/02/23'),coloryellow;
DRAWTEXTEX(STKNAME='武钢CWB1',1,0,10,'行权起始日:2009/04/10'),coloryellow;
DRAWTEXTEX(STKNAME='深高CWB1',1,0,10,'行权起始日:2009/10/23'),coloryellow;
DRAWTEXTEX(STKNAME='上汽CWB1',1,0,10,'行权起始日:2009/12/31'),coloryellow;
DRAWTEXTEX(STKNAME='赣粤CWB1',1,0,10,'行权起始日:2010/02/21'),coloryellow;
DRAWTEXTEX(STKNAME='中远CWB1',1,0,10,'行权起始日:2009/08/19'),coloryellow;
DRAWTEXTEX(STKNAME='石化CWB1',1,0,10,'行权起始日:2010/02/25'),coloryellow;
DRAWTEXTEX(STKNAME='上港CWB1',1,0,10,'行权起始日:2009/03/02'),coloryellow;
DRAWTEXTEX(STKNAME='青啤CWB1',1,0,10,'行权起始日:2009/10/13'),coloryellow;
DRAWTEXTEX(STKNAME='国电CWB1',1,0,10,'行权起始日:2010/05/17'),coloryellow;
DRAWTEXTEX(STKNAME='康美CWB1',1,0,10,'行权起始日:2009/05/19'),coloryellow;
DRAWTEXTEX(STKNAME='宝钢CWB1',1,0,10,'行权起始日:2010/06/28'),coloryellow;
DRAWTEXTEX(STKNAME='葛洲CWB1',1,0,10,'行权起始日:2010/01/04'),coloryellow;
DRAWTEXTEX(STKNAME='江铜CWB1',1,0,10,'行权起始日:2010/10/04'),coloryellow;
DRAWTEXTEX(STKNAME='钢钒GFC1',1,0,10,'行权起始日:2008/11/28'),coloryellow;
DRAWTEXTEX(STKNAME='国安GAC1',1,0,10,'行权起始日:2009/09/11'),coloryellow;
DRAWTEXTEX(STKNAME='中兴ZXC1',1,0,10,'行权起始日:2008/06/27'),coloryellow;
DRAWTEXTEX(STKNAME='阿胶EJC1',1,0,10,'行权起始日:2010/02/01'),coloryellow;
IF STKNAME='云化CWB1' THEN 行权价:=17.83;
IF STKNAME='云化CWB1' THEN 行权比例:=1;
IF STKNAME='云化CWB1' THEN 正股现价:=STKINDI('600096','MA.M1(1)',0,6);
IF STKNAME='武钢CWB1' THEN 行权价:=9.58;
IF STKNAME='武钢CWB1' THEN 行权比例:=1;
IF STKNAME='武钢CWB1' THEN 正股现价:=STKINDI('600005','MA.M1(1)',0,6);
IF STKNAME='深高CWB1' THEN 行权价:=13.48;
IF STKNAME='深高CWB1' THEN 行权比例:=1;
IF STKNAME='深高CWB1' THEN 正股现价:=STKINDI('600548','MA.M1(1)',0,6);
IF STKNAME='上汽CWB1' THEN 行权价:=26.97;
IF STKNAME='上汽CWB1' THEN 行权比例:=1;
IF STKNAME='上汽CWB1' THEN 正股现价:=STKINDI('600104','MA.M1(1)',0,6);
IF STKNAME='赣粤CWB1' THEN 行权价:=20.53;
IF STKNAME='赣粤CWB1' THEN 行权比例:=1;
IF STKNAME='赣粤CWB1' THEN 正股现价:=STKINDI('600548','MA.M1(1)',0,6);
IF STKNAME='中远CWB1' THEN 行权价:=19.62;
IF STKNAME='中远CWB1' THEN 行权比例:=1;
IF STKNAME='中远CWB1' THEN 正股现价:=STKINDI('600428','MA.M1(1)',0,6);
IF STKNAME='石化CWB1' THEN 行权价:=19.43;
IF STKNAME='石化CWB1' THEN 行权比例:=1;
IF STKNAME='石化CWB1' THEN 正股现价:=STKINDI('600028','MA.M1(1)',0,6);
IF STKNAME='上港CWB1' THEN 行权价:=8.28;
IF STKNAME='上港CWB1' THEN 行权比例:=1;
IF STKNAME='上港CWB1' THEN 正股现价:=STKINDI('600018','MA.M1(1)',0,6);
IF STKNAME='青啤CWB1' THEN 行权价:=28.06;
IF STKNAME='青啤CWB1' THEN 行权比例:=1/0.5;
IF STKNAME='青啤CWB1' THEN 正股现价:=STKINDI('600600','MA.M1(1)',0,6);
IF STKNAME='国电CWB1' THEN 行权价:=7.5;
IF STKNAME='国电CWB1' THEN 行权比例:=1;
IF STKNAME='国电CWB1' THEN 正股现价:=STKINDI('600795','MA.M1(1)',0,6);
IF STKNAME='康美CWB1' THEN 行权价:=10.77;
IF STKNAME='康美CWB1' THEN 行权比例:=1/0.5;
IF STKNAME='康美CWB1' THEN 正股现价:=STKINDI('600518','MA.M1(1)',0,6);
IF STKNAME='宝钢CWB1' THEN 行权价:=12.5;
IF STKNAME='宝钢CWB1' THEN 行权比例:=1/0.5;
IF STKNAME='宝钢CWB1' THEN 正股现价:=STKINDI('600019','MA.M1(1)',0,6);
IF STKNAME='葛洲CWB1' THEN 行权价:=9.19;
IF STKNAME='葛洲CWB1' THEN 行权比例:=1/0.5;
IF STKNAME='葛洲CWB1' THEN 正股现价:=STKINDI('600068','MA.M1(1)',0,6);
IF STKNAME='江铜CWB1' THEN 行权价:=15.44;
IF STKNAME='江铜CWB1' THEN 行权比例:=4/1;
IF STKNAME='江铜CWB1' THEN 正股现价:=STKINDI('600362','MA.M1(1)',0,6);
IF STKNAME='国安GAC1' THEN 行权价:=17.692;
IF STKNAME='国安GAC1' THEN 行权比例:=1/1.003;
IF STKNAME='国安GAC1' THEN 正股现价:=STKINDI('000839','MA.M1(1)',0,6);
IF STKNAME='中兴ZXC1' THEN 行权价:=55.582;
IF STKNAME='中兴ZXC1' THEN 行权比例:=1/0.703;
IF STKNAME='中兴ZXC1' THEN 正股现价:=STKINDI('000063','MA.M1(1)',0,6);
IF STKNAME='阿胶EJC1' THEN 行权价:=5.434;
IF STKNAME='阿胶EJC1' THEN 行权比例:=1/1;
IF STKNAME='阿胶EJC1' THEN 正股现价:=STKINDI('000423','MA.M1(1)',0,6);
溢价率:=100*((行权价+C*行权比例)/正股现价-1),linethick0;
DRAWTEXTEX(STKINBLOCK(STKLABEL,'凭证权证'),1,200,10,'溢价率:'+NUMTOSTR(溢价率,0)+'%'),COLORGREEN;
[url=http://www.70822.com/soft/sort013/sort02/down-4866.html]权证辅助[/url]