中で使う変数(SとかHHとかH$とか)は一応DEFの中で宣言　(VAR S)する方がいいと思うよ。 一応。