{每次权证资料变动时需要手动改写公式!源码如下:}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;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |