解決法は2つ 18,19行目を IF (T MOD 4)!=0 THEN RETURN とするか、 IF (T MOD 4)!=0 THEN RETURN ENDIF とするかです。 条件を満たしたときの命令が1つや2つなら前者、たくさんあって1行にしたくないときは後者の方法をとると良いです。この場合は前者が適しています。