schinit.lst

这是一个合作式内核的实时系统,开发平台式KEIl51.

C51 COMPILER V8.02   SCHINIT                                                               04/12/2007 20:35:27 PAGE 1   


C51 COMPILER V8.02, COMPILATION OF MODULE SCHINIT
OBJECT MODULE PLACED IN SCHInit.OBJ
COMPILER INVOKED BY: F:\电子\ElectronicsSoftware\KEIL\UV3\C51\BIN\C51.EXE SCHInit.c BROWSE DEBUG OBJECTEXTEND

line level    source

   1          #include "SCHInit.h"
   2          
   3          //数据区
   4          extern sTask SCH_tasks_G[SCH_MAX_TASKS];
   5          extern tByte Error_code_G;
   6          
   7          /*------------------------------------------------------------------*-
   8          
   9            SCH_Init_T2()
  10          系统调度器初始化
  11          
  12          -*------------------------------------------------------------------*/
  13          void SCH_Init_T2(void) 
  14             {
  15   1         tByte i;
  16   1      
  17   1         for (i = 0; i < SCH_MAX_TASKS; i++)  //把任务送入调度器队列
  18   1            {
  19   2            SCH_Delete_Task(i);
  20   2            }
  21   1         Error_code_G = 0;                   //系统报错复位  
  22   1      
  23   1      
  24   1         T2CON = 0x04;                           //系统时钟基准设置,间隔1ms
  25   1         T2MOD = 0x00;   
  26   1         TH2    = 0xFC;
  27   1         RCAP2H = 0xFC;  
  28   1         TL2    = 0x18; 
  29   1         RCAP2L = 0x18;  
  30   1         
  31   1         ET2   = 1;  
  32   1        
  33   1         }
  34          
  35          
  36          /*------------------------------------------------------------------*-
  37          
  38            SCH_Start()
  39           系统启动
  40          
  41          -*------------------------------------------------------------------*/
  42          void SCH_Start(void) 
  43             {
  44   1       EA = 1;
  45   1       TR2   = 1;  
  46   1         }
  47          
  48          
  49          /*------------------------------------------------------------------*-
  50          
  51            SCH_Update()
  52            调度器任务队列处理函数
  53          
  54          -*------------------------------------------------------------------*/
  55          void SCH_Update(void) interrupt INTERRUPT_Timer_2_Overflow  
C51 COMPILER V8.02   SCHINIT                                                               04/12/2007 20:35:27 PAGE 2   

  56             {
  57   1         tByte Index;
  58   1      
  59   1         TF2 = 0; 
  60   1         for (Index = 0; Index < SCH_MAX_TASKS; Index++)
  61   1            {
  62   2            if (SCH_tasks_G[Index].pTask)
  63   2               {
  64   3               if (SCH_tasks_G[Index].Delay == 0)
  65   3                  {
  66   4                  SCH_tasks_G[Index].RunMe += 1;  
  67   4      
  68   4                  if (SCH_tasks_G[Index].Period)
  69   4                     {
  70   5                     SCH_tasks_G[Index].Delay = SCH_tasks_G[Index].Period;
  71   5                     }
  72   4                  }
  73   3               else
  74   3                  {
  75   4                  SCH_tasks_G[Index].Delay -= 1;
  76   4                  }
  77   3               }         
  78   2            }
  79   1         }  


MODULE INFORMATION:   STATIC OVERLAYABLE
   CODE SIZE        =    170    ----
   CONSTANT SIZE    =   ----    ----
   XDATA SIZE       =   ----    ----
   PDATA SIZE       =   ----    ----
   DATA SIZE        =   ----       1
   IDATA SIZE       =   ----    ----
   BIT SIZE         =   ----    ----
END OF MODULE INFORMATION.


C51 COMPILATION COMPLETE.  0 WARNING(S),  0 ERROR(S)