o: ActiveSupport::Cache::Entry :@compressedF: @value",",
Designs/MRAKOMER4/SW/irmrak4.c
33 33 
void delay(int16 cycles)
34 34 
{
35 35 
   int16 i;
36
36 

  		




  37
  37
  
    
   for(i=0; i<cycles; i++) {toggle_dome(); delay_us(100);}


  		




  38
  38
  
    

  		




  39
  39
  
    
   restart_wdt();


  		




  ......




  93
  93
  
    
   restart_wdt();


  		




  94
  94
  
    
   printf("\n\r* Mrakomer %s (C) 2007 KAKL *\n\r",VER);   // Welcome message


  		




  95
  95
  
    
   printf("* %s *\n\r",REV);


  		




  96
  
  
    
   printf("<#seq.> <ambient temp.> <space temp.> <status>\n\r\n\r");


  		




  
  96
  
    
   printf("<#seq.> <ambient temp.> <space temp.> <heating> <dome>\n\r\n\r");


  		




  97
  97
  
    
   tempa=ReadTemp(SA, RAM_Tamb);       // Dummy read


  		




  98
  98
  
    
   temp=ReadTemp(SA, RAM_Tobj1);


  		




  99
  99
  
    

  		




  ......




  111
  111
  
    
      while(kbhit()) getc();        // Flush USART buffer


  		




  112
  112
  
    
      CREN=0; CREN=1;               // Reinitialise USART


  		




  113
  113
  
    

  		




  114
  
  
    
      do 


  		




  
  114
  
    
      do


  		




  115
  115
  
    
      {


  		




  116
  116
  
    
         delay(MEASURE_DELAY);


  		




  117
  117
  
    
         if (heat>0)


  		




  118
  118
  
    
            {


  		




  119
  119
  
    
               output_high(HEATING);


  		




  120
  
  
    
               heat--;          


  		




  
  120
  
    
               heat--;


  		




  121
  121
  
    
            }


  		




  122
  122
  
    
            else


  		




  123
  123
  
    
            {


  		




  ......




  129
  129
  
    

  		




  130
  130
  
    
      {


  		




  131
  131
  
    
         char ch;


  		




  132
  
  
    
               


  		




  
  132
  
    

  		




  133
  133
  
    
         ch=getc();


  		




  134
  
  
    
         


  		




  
  134
  
    

  		




  135
  135
  
    
         switch (ch)


  		




  136
  136
  
    
         {


  		




  137
  137
  
    
            case 'h':


  		




  138
  138
  
    
               heat=MAXHEAT;           // Needs heating


  		




  139
  139
  
    
               break;


  		




  140
  
  
    
      


  		




  
  140
  
    

  		




  141
  141
  
    
            case 'c':


  		




  142
  142
  
    
               heat=0;                 // Needs colder


  		




  143
  143
  
    
               break;


  		




  144
  
  
    
      


  		




  
  144
  
    

  		




  145
  145
  
    
            case 'o':


  		




  146
  146
  
    
               open=MAXOPEN;           // Open the dome


  		




  147
  147
  
    
               break;


  		




  148
  
  
    
      


  		




  
  148
  
    

  		




  149
  149
  
    
            case 'l':


  		




  150
  150
  
    
               open=0;                 // Lock the dome


  		




  151
  151
  
    
               break;


  		




  ......




  163
  163
  
    
      { // printf


  		




  164
  164
  
    
         char output[30];  // Output buffer


  		




  165
  165
  
    
         int8 j;           // Counter


  		




  166
  
  
    
               


  		




  
  166
  
    

  		




  167
  167
  
    
         sprintf(output,"#%Lu %Ld %Ld %u %u\n\r\0", n, ta, to, heat, open);


  		




  168
  
  
    
   


  		




  
  168
  
    

  		




  169
  169
  
    
         j=0;


  		




  170
  170
  
    
         while(output[j]!=0)


  		




  171
  171
  
    
         {


  		










:@created_atf1426182926.94593Š:@expires_in0