/************************************************************************
Module# 5

        Title: タイマ割り込み
        
        File : tmint.c          Ver.1.0  written on Jan.23,1996 by J.W.
                                        Ver.2.0             Jan.27,1996

*************************************************************************/
#include  "m9401.h"

extern int Tmc;
extern int Ctrl;
extern int Ps_d;
extern int Ts_d;
extern int S_no;

extern void calc_state();/* CONT2.C */
extern void control();/* CONT3.C */
extern unsigned char outportu();/* IO.C */
extern int outportb();/* IO.C */
extern int inportb();/* IO.C */
extern int t_sss();

interrupt void tmint()
{
        static int i;
        if((Tmc%3)==0)
        {
                calc_state();
                /*t_sss(S_no);*/
                /* control(); */
                /* Ps_d=inportb(PBDR2);*/
                /* Ts_d=inportb(EDRH);*/
                /* disp(); */
        }
        if((Tmc%10)==0){
                if (i>2 || i<0) i=0;
                t_sss(i);
                i++;
        }

        outportb(MSR,0x0c);
        inportb(0xfdfe07); /*    clear interrupt */
        Tmc++;

}