方波脉冲热源的加载？

各位高手：
     我现在需要把一个方波脉冲热源加载到模型当中去，脉冲的脉宽200微秒，周期1毫秒，脉冲峰值生热率大概2e+13，请问一下怎么加载上去，怎么把它变成函数形式加载？急需帮助，谢谢阿。

你需要模拟的周期有多长，如果是几十分钟的，能不能不考虑脉冲，把热生成平均一下加载？

一个个脉冲模拟，你可以用*Do 命令，进行循环
*do,i,1,NUM,1
（进行加载，和求解）
*enddo

是不是每个循环中前200微秒生热率用2e+13，而其余的800微秒就用0代替？