زمینه و هدف: نوشتن یک کد کامپیوتری برای محاسبه متوسط دوز جذبی غده ای در ماموگرافی برای تخمین دوز دقیق و سریع، موثر است.روش بررسی: در این پژوهش، با استفاده از پارامترهای محاسبه شده توسط Sobol-Wu، یک کد برای محاسبه دوز به زبان فرترن نوشته شده است. این کد کامپیوتری، دوز را برای ماموگرامهای با هدف- فیلتر Rh-Rh, Mo-Mo و Mo-Rh به ازای پارامترهای ورودی: ولتاژ، ضخامت نیم لایه اشعه X، ضخامت پستان، و کسر غده ای بافت پستان محاسبه می کند.یافته ها: با اجرای کد، تغییرات متوسط دوز جذبی غده ای برای سه آرایش هدف- فیلتر و به ازای HVL=0.34 mm, d=4 cm، و g=0.5 بر حسب ولتاژ لامپ اشعه X دستگاه ماموگرام، و تغییرات آن بر حسب درصد غده ای بافت پستان به ازای HVL=0.34 mm, kV=25، و d=4 cm محاسبه شده است. همچنین تغییرات متوسط دوز جذبی غده ای بر حسب HVL اشعه X دستگاه ماموگرام به ازای d=4, kV=28، و g=0.6 گزارش شده و نتایج بدست آمده از این کد در توافق بسیار خوبی با نتایج دیگران است.نتیجه گیری: علاوه بر جامعیت، سرعت و قدرت دوز محاسبه شده و استفاده آسان کد توسط کاربر، می توان از آن برای بهینه سازی دوز تابشی در ماموگرافی استفاده کرد.