LINE1やLINE2という配列は何を指しているのでしょうか。
まずはテトリスのフィールドをFIELD[10,20」のように表現しなおすことをお勧めします。(もしくはFIELD[10*20]。テトリスの枠は10x20だと想定)
何故かというとsoulblackさんの添付画像のソースコードは同じ事が何度も書いてあるためです。これらの処理はテトリスのフィールド全体を指すデータに修正すれば一回書くだけで済むはずです。
ラインが成立して削除する際の処理は
・削除ラインをクリアする
・削除ラインよりも上のフィールド領域を全て1段下に下げる
という処理で実現できるはずです。