明代陆人龙编拟话本《型世言》中人物。字君楫，朝邑人。祖父曾仕宋。程自小聪明，过目成诵，二十岁时，与高翔同在维摩寺读书。程为人谦和委婉，高则慷慨激昂，两人生性迥异，却意气相投。一个西僧游方到寺，高对其甚不礼貌，程则常与他交谈相从，西僧临去时送给程一本观星望气、奇门遁甲的书，嘱他好生习读，可保全性命，并约定三十年後再见。程时常研读，只是正值洪武末年，天下太平，无英雄用武之地。不久，娶妻。又值双亲病故，他守墓三年，不与妻子同房，也无心出仕。不料圣旨令举明经，程被授予四川岳池县教谕，高授试御史。程携妻赴任，洪武甲戌十月间，他见星象有凶，上奏朝廷说明年北方有兵事。建文皇帝责他妄言惑众，要处死他，程请求皇帝等明年不验时再杀自己。皇帝开恩，同意先把他关入牢中。程无钱买通狱卒，受尽折磨，幸好高翔保护，处境才大有好转。半年後，燕王起兵，天下大乱。程带罪随兵征战，虽立了些战功，但燕王势力太猛，直扑京城。程之妻自缢身死，程入宫助建文皇帝削发为僧，自己妆作道人，陪同建文从宫中地道逃走了。高翔以为建文被火烧死，披麻戴孝入宫哭奠，被燕王处死，又将九族诛灭。程伴随建文，自湖广入川，往来云贵间十多年。忍饥受冻，备尝凄楚。正统庚申年，建文考虑自己年老，决定公开身份，以使自己能归骨皇陵、明成祖答应接他入宫，这时程与三十年前的西僧相遇，决心斩断尘缘，与西僧同去。朝廷来召他，已不知所终。