求教采用隐式有限差分法求解B-S方程（美式期权定价）具体程序

求教采用隐式有限差分法求解B-S方程（美式期权定价）具体程序。具体理论及思路我懂，但是具体程序我不会编。哪位高手会，希望授教于我，十分感谢！

看看张树德老师编写的《金融衍生品教程》，人大出版社的，上面有MATLAB代码。