無視しても良いですが IF C==0 THEN の後にGOTOと書かなくても。 IF C==0 THEN @S でいけますよ。