清初李玉所着传奇《千锺禄》(又名《千忠戮》、《千忠录》，见《古本戏曲丛刊》三集)中人物。明代人，建文朝翰林院编修，精通术数，善晓兵机，勇力超群，阵法娴熟，因预言燕王朱棣将起兵叛乱，被监禁天牢。後燕王果然叛乱，程获释，官复原职。其妻染病身亡，留下一女。程日夜与各位大臣共商国策，无奈纨袴掌兵，三军涣散，程有心救国而无力回天。程卜知朱棣将攻破皇宫，吩咐翰林院侍读史仲彬，叫人驾小舟于御沟相候，并与史定下儿女亲事，又托家人抱送女儿回乡。朱棣杀入京城，程匆匆入宫，劝说帝削发为僧，暂且外逃，以图恢复，并改扮道装护送帝乘小舟逃至苏州吴江史仲彬家避乱。两月後，程卜知朝廷追兵将至，与帝远行云南，途中曾险遇追兵，幸吴成学，牛景先舍命相救。到达鹤庆山後，程筑庵居住，为帝化缘，十数年如一日，忠心侍君。後严震直领兵捉拿建文帝，程因出外化缘而侥幸逃脱。但他自投罗网，斥严忘恩负义。严幡然醒悟，放走建文君。後新帝即位，帝入宫自首，受到厚待。程被赐名忠达真人，建院终南山修炼。其女与史仲彬之子成婚。