全体の構造が見えてないので、組み込めるかどうか分かりませんが、一般的に、一定時間(例として1秒)置きに、何かするのであればメインループから、60カウント毎に、サブルーチンに飛ばす、と言う方法が有ります。 IF !(T MOD 60) THEN GOSUB@TEKI @TEKI HP=HP-5 (みたいにここで何かする) RETURN (Tはメインループ中で1ループ毎に1増やす、1ループ1/60として60カウントでおよそ1秒) (但し、Tはそのままだと、無制限に数字が大きくなるので、適当なところでリセットするなり、加算を止める必要が有ります。)(他にも方法は、いろいろ有りますが)