摘要：基于大型通用有限元软件ABAQUS,利用FORTRAN语言编写了适用于粘弹性人工边界的外源波动输入子程序***.该子程序包含粘弹性边界和加载两部分,粘弹性边界通过子程序UEL结合隐式积分算法定义粘弹性边界单元对整个系统的雅克比矩阵贡献来实现;人工边界上的总波场分解为无局部场地效应影响的自由场与局部场地效应引起的散射场,地震波作用于人工边界的自由场荷载可由设计地震动位移时程和速度时程统一表达,利用描述法向荷载和切向荷载的加载子程序DSLOAD、UTRACLOAD实现,从而可方便实现地震动的有效输入,避免了单独求解自由场.将考虑粘弹性边界条件的外源波动输入和内源地震动输入方法分别应用于某高拱坝的动力响应分析,并与常规无质量地基模型计算结果进行了对比,结果表明,考虑地基辐射阻尼的两种地震动输入方法均会显著降低结构的动力响应,其中采用外源波动输入方法的降幅更大.