计算化学公社

 找回密码 Forget password
 注册 Register
Views: 8876|回复 Reply: 1
打印 Print 上一主题 Last thread 下一主题 Next thread

[Fortran] 在CVF和Intel Visual Fortran中对多行添加注释

[复制链接 Copy URL]

5万

帖子

99

威望

5万

eV
积分
112354

管理员

公社社长

Sob注:此文的方法极为重要,笔者长期在Windows下写Fortran程序时本文的方法实在帮了大忙!!!Fortran没有像C那样/* */的批量注释方式实在不便,但用了本文的做法,比起C的这点反倒更方便。

For Compaq Visual Fortran:

(1) 把下面的文件放到..\Microsoft Visual Studio\Common\MSDEV98\MACROS文件夹下
GrpComment.dsm (3.46 KB, 下载次数 Times of downloads: 9)
(2) 启动CVF,选Tools=>Customize=>Add-ins and Macro Files
(3) 在GrpComment前打勾,去掉其他的勾
(4) 在同一对话框中选Commands=>Macros,此时在右边可以看见CommentDel和CommentOut
(5) 选中CommentOut,拖到CVF的工具栏上去(添加工具钮),会弹出Button Appearance对话框
(6) 选Image and text,在下边Button text框中输入名称(默认是CommentOut),如“加注释”
(7) 类似的方法再将CommentDel命令以工具钮的形式添加到工具栏上,名称可取为“去注释”

这时,工具栏上应该多了两个工具钮:“加注释”和“去注释”。

用法:

加注释:选择要加注释的多行代码,点击“加注释”按钮即可;
去注释:选择已经注释的多行代码,点击“去注释”按钮即可。

适用:后缀为f90或f77的代码文件。


For Intel Visual Fortran:

在工具-宏-宏资源管理器中的MyMacros里面新建一个叫做CommentModule的模块(必须是这个名字,注意大小写),对其编辑,把下面的文本文件的内容复制进去:
comment.txt (1.43 KB, 下载次数 Times of downloads: 10)

然后保存。在工具-自定义-命令-宏里面将commontblock和uncommentblock拖到工具条即可。用法同上
北京科音自然科学研究中心http://www.keinsci.com)致力于计算化学的发展和传播,长期开办高质量的各种计算化学类培训:初级量子化学培训班中级量子化学培训班高级量子化学培训班量子化学波函数分析与Multiwfn程序培训班分子动力学与GROMACS培训班CP2K第一性原理计算培训班,内容介绍以及往届资料购买请点击相应链接查看。这些培训是计算化学从零快速入门以及进一步全面系统性提升研究水平的高速路!培训各种常见问题见《北京科音办的培训班FAQ》
欢迎加入“北京科音”微信公众号获取北京科音培训的最新消息、避免错过网上有价值的计算化学文章!
欢迎加入人气非常高、专业性特别强的综合性理论与计算化学交流QQ群“思想家公社QQ群”:1号:18616395,2号:466017436,3号:764390338,搜索群号能搜到哪个说明目前哪个能加,合计9000人。北京科音培训班的学员在群中可申请VIP头衔,提问将得到群主Sobereva的最优先解答。
思想家公社的门口Blog:http://sobereva.com(发布大量原创计算化学相关博文)
Multiwfn主页:http://sobereva.com/multiwfn(十分强大的量子化学波函数分析程序)
ResearchGate:https://www.researchgate.net/profile/Tian_Lu
Money and papers are rubbish, get a real life!

1552

帖子

2

威望

6241

eV
积分
7833

Level 6 (一方通行)

给dalao们倒茶

2#
发表于 Post on 2016-9-16 08:58:57 | 只看该作者 Only view this author
受教了。VS2010+IVF里面就已经有批量加注释和去注释的功能,如图1所示。选中之后按红圈左边的那个就可以加注释,按几下就加几个感叹号。右边的就是去注释的功能。不过sob老师已代码实现的,真是厉害啊。顶。

2016-09-16_085623.jpg (291.25 KB, 下载次数 Times of downloads: 93)

图1

图1
淡泊以明志,宁静以致远。

本版积分规则 Credits rule

手机版 Mobile version|北京科音自然科学研究中心 Beijing Kein Research Center for Natural Sciences|京公网安备 11010502035419号|计算化学公社 — 北京科音旗下高水平计算化学交流论坛 ( 京ICP备14038949号-1 )|网站地图

GMT+8, 2024-11-24 01:30 , Processed in 0.191872 second(s), 24 queries , Gzip On.

快速回复 返回顶部 返回列表 Return to list