とりあえず頂点を直接操作するのはやめて、ポリゴン面を増やしても描画できる構造にソースを書き直したほうが良いと思います。 理想はDATA分で頂点、線分・面を読み込んでDATA文の書き換えだけで表示も変わるのが理想です。