程一宁，元顺帝宠妃也。未得幸时，尝于春夜登翠鸾楼，倚栏弄玉龙之笛。吹一词云：
“兰径香销玉辇踪，梨花不忍负春风。绿窗深锁无人见，自碾朱砂养守宫。”
帝忽于月下闻之，问宫人曰：“此何人吹也？"有知者对曰："程才人所吹。"帝虽知之，未召也。及后夜，帝复游此，又闻歌一词曰：
“牙床锦被绣芙蓉，金鸭香消宝帐重。竹叶羊车来别院，何人空听景阳钟。”
又继一词曰：
“淡月轻寒透碧纱，窗屏睡梦听啼鸦。春风不管愁深浅，日日开门扫落花。”
歌中音语咽塞，情极悲怆。帝因谓宫人曰：“闻之使人能不凄怆？深宫中有人愁恨如此，谁得知乎？”遂乘金根车至其所。宁见宝炬簇拥，遂趋出叩头俯伏。帝亲以手扶之曰：“卿非玉笛中自道其意，朕安得至此？”乃携手至柏香堂。命宝光天禄厨设开颜宴，进兔丝之膳，翠涛之酒；雩仙乐部坊奏鸿韶乐，列朱戚之舞，鸣雎之曲。笑谓宁曰：“今夕之夕，情圆意聚。然玉笛，卿之三青也，可封为圆聚侯。”自是宠爱日隆，改楼为“奉御楼”，堂为“天怡堂”。
按：顺帝宫嫔进御无纪，佩夫人、贵妃印者不下百数。淑妃则龙瑞娇、程一宁、戈小娥。丽嫔则张阿玄、支祁氏。才人则英英、疑香儿，尤其宠爱。所好成之，所恶除之，位在皇后之下，而权则重于禁闱。宫中称为七贵云。
