数据块清零
郑志武
发布于2012-12-04 21:40
4
0
标签：
我想定时给db块清零，时间问题已经解决，就是不知道如何清零，代码也看过一些，没太看懂，请哪位给段代码，并解释下，我的块里都是real型数据，谢谢
佳答案
如果db块内容很多，比如说有几百个实数，那么一一赋值会很麻烦，不如用循环语句。参见以下程序。
lp#0.0//
lar1//给ar1赋值指针p#0.0
opndbno.//打开你要复0的数据块
l300//假设你的数据块中有300个实数
cyc1:tmw0//将循环次数送入mw0
l0.0
tdbd[ar1,p#0.0]//将实数0.0依次送入dbd0,dbd4....
lp#4.0
+ar1//将地址指针加4.0,ar1中的内容加p#4.0
lmw0
loopcyc1//将mw0的值减1,如果大于0,就返回cyc1,继续将db块中
其余地址中的内容复0.
nop0//当所有的数据都归0后,继续别外的工作.
