Subversion Repositories svnkaklik

Rev

Rev 186 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 186 Rev 188
Line 1... Line 1...
1
#include ".\camerus.h"
1
#include ".\camerus.h"
2
 
2
 
3
#USE FAST_IO (C)     // Brana C je ve FAST_IO modu, aby slo rychle cteni z kamery
3
#USE FAST_IO (C)     // Brana C je ve FAST_IO modu, aby slo rychle cist z kamery
4
 
4
 
5
// A/D vstupy
5
// A/D vstupy
6
#define  DALKOMER 4  // AN4/RA5 - dalkomer na cihlu
6
#define  DALKOMER 4  // AN4/RA5 - proximity sensor na ruku startera
7
#define  CERNA    3  // AN3/RA3
7
#define  CERNA    3  // AN3/RA3
8
#define  CERVENA  2  // AN2/RA2 - cervene kroutitko
8
#define  CERVENA  2  // AN2/RA2 - cervene kroutitko
9
#define  ZELENA   1  // AN1/RA0 - zelene kroutitko
9
#define  ZELENA   1  // AN1/RA0 - zelene kroutitko
10
#define  MODRA    0  // AN0/RA1 - modre kroutitko
10
#define  MODRA    0  // AN0/RA1 - modre kroutitko
11
 
11
 
Line 16... Line 16...
16
#define MOT_L  PIN_B5      // Smer otaceni leveho motoru; druhy pol je RC2
16
#define MOT_L  PIN_B5      // Smer otaceni leveho motoru; druhy pol je RC2
17
#define MOT_R  PIN_B6      // Smer otaceni praveho motoru; druhy pol je RC1
17
#define MOT_R  PIN_B6      // Smer otaceni praveho motoru; druhy pol je RC1
18
#define DATA   PIN_B2      // K modulu LEDbar data
18
#define DATA   PIN_B2      // K modulu LEDbar data
19
#define CP     PIN_B1      // K modulu LEDbar hodiny
19
#define CP     PIN_B1      // K modulu LEDbar hodiny
20
#define ODO    PIN_A4      // Ze snimace z odometrie z praveho kola
20
#define ODO    PIN_A4      // Ze snimace z odometrie z praveho kola
21
//#define CIHLA  PIN_B0      // Vstup INT, generuje preruseni pri prekazce
21
#define IRRX   PIN_B0      // Vstup INT, generuje preruseni pri prekazce
22
#define IRLED  PIN_C0      // Modulovani vysilaci IR LED na detekci prekazky
22
#define IRTX   PIN_C0      // Modulovani vysilaci IR LED na detekci prekazky
23
 
23
 
24
#define CASMIN 6           // Rozsah radku snimace
24
#define CASMIN 6           // Rozsah radku snimace
25
#define CASMAX 192
25
#define CASMAX 192
26
#define CASAVR ((CASMAX+CASMIN) / 2)
26
#define CASAVR ((CASMAX+CASMIN) / 2)
27
 
27
 
Line 62... Line 62...
62
}
62
}
63
 
63
 
64
#int_EXT
64
#int_EXT
65
EXT_isr()   // Preruseni od prekazky
65
EXT_isr()   // Preruseni od prekazky
66
{
66
{
-
 
67
   // Ujistime se, ze prijaty signal je z naseho IR vysilace
-
 
68
   output_high(IRTX);   // Vypni LED na detekci prekazky
-
 
69
   set_pwm1_duty(0);    // Vypni motory
-
 
70
   set_pwm2_duty(0);
-
 
71
   output_low(MOT_L);
-
 
72
   output_low(MOT_R);
-
 
73
   delay_ms(2);
-
 
74
   if (!input(IRRX)) return;
-
 
75
   output_low(IRTX);    // Zapni LED na detekci prekazky
-
 
76
   delay_ms(10);
-
 
77
   if (input(IRRX)) return;
-
 
78
 
67
   set_pwm1_duty(0);    // reverz (zabrzdi)
79
   set_pwm1_duty(0);    // reverz (zabrzdi)
68
   set_pwm2_duty(0);
80
   set_pwm2_duty(0);
69
   output_high(MOT_L);
81
   output_high(MOT_L);
70
   output_high(MOT_R);
82
   output_high(MOT_R);
71
   delay_ms(400);
83
   delay_ms(400);
Line 73... Line 85...
73
   output_low(MOT_R);
85
   output_low(MOT_R);
74
   if (stav==cihla) while(true); // Zastav na furt
86
   if (stav==cihla) while(true); // Zastav na furt
75
   if(stav==jizda)
87
   if(stav==jizda)
76
   {
88
   {
77
      int n;
89
      int n;
78
 
90
/*
79
      SetServo(CASAVR-CASMIN);
91
      SetServo(CASAVR-CASMIN);
80
      set_pwm1_duty(40); // pomalu couvej
92
      set_pwm1_duty(40); // pomalu couvej
81
      set_pwm2_duty(40);
93
      set_pwm2_duty(40);
82
      output_high(MOT_L);
94
      output_high(MOT_L);
83
      output_high(MOT_R);
95
      output_high(MOT_R);
Line 96... Line 108...
96
      delay_ms(100);
108
      delay_ms(100);
97
      set_pwm1_duty(0);  // Zastav
109
      set_pwm1_duty(0);  // Zastav
98
      set_pwm2_duty(0);
110
      set_pwm2_duty(0);
99
      output_low(MOT_L);
111
      output_low(MOT_L);
100
      output_low(MOT_R);
112
      output_low(MOT_R);
-
 
113
*/
101
      delay_ms(1000);
114
      delay_ms(1000);
102
 
115
 
103
      SetServo((CASAVR-CASMIN)-20);   // doleva
116
      SetServo((CASAVR-CASMIN)-20);   // doleva
104
      set_pwm1_duty(150);  // vpred
117
      set_pwm1_duty(150);  // vpred
105
      set_pwm2_duty(200);
118
      set_pwm2_duty(200);
Line 180... Line 193...
180
      while(true)
193
      while(true)
181
      {
194
      {
182
         while(input(ODO));
195
         while(input(ODO));
183
         while(!input(ODO));
196
         while(!input(ODO));
184
         n++;
197
         n++;
185
         if(n==10) break;
198
         if(n==12) break;
186
      }
199
      }
187
      set_pwm1_duty(0);  // Zastav
200
      set_pwm1_duty(0);  // Zastav
188
      set_pwm2_duty(0);
201
      set_pwm2_duty(0);
189
      output_low(MOT_L);
202
      output_low(MOT_L);
190
      output_low(MOT_R);
203
      output_low(MOT_R);
Line 263... Line 276...
263
   set_pwm1_duty(0);   // Zastav motory
276
   set_pwm1_duty(0);   // Zastav motory
264
   set_pwm2_duty(0);
277
   set_pwm2_duty(0);
265
   output_low(MOT_L);
278
   output_low(MOT_L);
266
   output_low(MOT_R);
279
   output_low(MOT_R);
267
 
280
 
268
   output_low(IRLED);   // Zapni LED na detekci prekazky
281
   output_low(IRTX);   // Zapni LED na detekci prekazky
269
   
282
 
270
   NightRider(1);    // Aby se poznalo, ze byl RESET
283
   NightRider(1);    // Aby se poznalo, ze byl RESET
271
                     // Musi se pockat, nez se rozjede kamera, nez se do ni zacnou posilat prikazy
284
                     // Musi se pockat, nez se rozjede kamera, nez se do ni zacnou posilat prikazy
272
 
285
 
273
   //... Nastaveni kamery ...
286
   //... Nastaveni kamery ...
274
   i2c_start();      // Soft RESET kamery
287
   i2c_start();      // Soft RESET kamery
Line 282... Line 295...
282
   i2c_write(0x28);
295
   i2c_write(0x28);
283
   i2c_write(0b01000001);
296
   i2c_write(0b01000001);
284
   i2c_stop();
297
   i2c_stop();
285
 
298
 
286
/*
299
/*
287
   i2c_start();      // Contrast
300
   i2c_start();      // Contrast (nema podstatny vliv na obraz)
288
   i2c_write(0xC0);
301
   i2c_write(0xC0);
289
   i2c_write(0x05);
302
   i2c_write(0x05);
290
   i2c_write(0xA0);  // 48h
303
   i2c_write(0xA0);  // 48h
291
   i2c_stop();
304
   i2c_stop();
292
 
305
 
293
   i2c_start();      // Brightness
-
 
294
   i2c_write(0xC0);
-
 
295
   i2c_write(0x06);
-
 
296
   i2c_write(0x0);  // 80h //9Ah
-
 
297
   i2c_stop();
-
 
298
 
-
 
299
   i2c_start();      // Band Filter
306
   i2c_start();      // Band Filter (pokud by byl problem se zarivkama 50Hz)
300
   i2c_write(0xC0);
307
   i2c_write(0xC0);
301
   i2c_write(0x2D);
308
   i2c_write(0x2D);
302
   i2c_write(0x04 | 0x03);
309
   i2c_write(0x04 | 0x03);
303
   i2c_stop();
310
   i2c_stop();
304
*/
311
*/
Line 321... Line 328...
321
   i2c_write(118);
328
   i2c_write(118);
322
   i2c_stop();
329
   i2c_stop();
323
 
330
 
324
   NightRider(1);    // Musi se dat cas kamere na AGC a AEC
331
   NightRider(1);    // Musi se dat cas kamere na AGC a AEC
325
 
332
 
326
{ // Kalibrace kamery
333
   { // Mereni expozice
327
   int8 t1,t2;
334
      int8 t1,t2;
328
 
-
 
329
   for(offset=0;offset<=255;offset+=0x04) // Cita porad dokola
-
 
330
   {
335
   
331
      i2c_start();      // Brightness
336
      i2c_start();      // Brightness, zacni od uplne tmy
332
      i2c_write(0xC0);
337
      i2c_write(0xC0);
333
      i2c_write(0x06);
338
      i2c_write(0x06);
334
      i2c_write(offset);  // 80h default
339
      i2c_write(0);  // 80h default
335
      i2c_stop();
340
      i2c_stop();
336
      disp(offset);
-
 
337
      delay_ms(50);
341
      delay_ms(50);
338
 
342
   
-
 
343
      for(offset=0x60;offset<=254;offset+=0x04)   // Zacni od jasu 60h
-
 
344
      {
-
 
345
         i2c_start();      // Brightness
-
 
346
         i2c_write(0xC0);
-
 
347
         i2c_write(0x06);
-
 
348
         i2c_write(offset);  // 80h default
-
 
349
         i2c_stop();
-
 
350
         disp(offset);
-
 
351
         delay_ms(50);
-
 
352
   
339
      t1=0;
353
         t1=0;
340
      t2=0;
354
         t2=0;
341
      while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
355
         while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
342
      delay_ms(5);
356
         delay_ms(5);
343
      while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
357
         while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
344
      set_timer0(0);          // Vynuluj pocitadlo casu
358
         set_timer0(0);          // Vynuluj pocitadlo casu
345
      if(!input(PIX)) continue;
359
         if(!input(PIX)) continue;
346
      while(input(PIX));
360
         while(input(PIX));
347
      t1=get_timer0();    // Precti cas z citace casu hrany
361
         t1=get_timer0();    // Precti cas z citace casu hrany
348
      set_timer0(0);          // Vynuluj pocitadlo casu
362
         set_timer0(0);          // Vynuluj pocitadlo casu
349
      while(!input(PIX));
363
         while(!input(PIX));
350
      t2=get_timer0();
364
         t2=get_timer0();
351
 
365
   
352
      if((t1>60) && (t1<140) && (t2>5) && (t2<=10)) break;
366
         if((t1>60) && (t1<140) && (t2>5) && (t2<=10)) break; // Vidis, co mas?
353
 
367
   
-
 
368
         delay_ms(2);   // Preskoc druhou radku z kamery
354
      delay_ms(2);
369
      };
-
 
370
      delay_ms(1000);   // Nech chvili na displayi zmerenou hodnotu
355
   }
371
   }
356
}
-
 
357
 
372
 
-
 
373
   set_adc_channel(CERVENA);   // --- Kroutitko pro jas ---
358
delay_ms(1000);
374
   delay_ms(1);
-
 
375
   offset=read_adc()>>1;   // 0-127
-
 
376
   offset &= 0b11111100;   // Dva nejnizsi bity ignoruj
-
 
377
   disp(offset);
-
 
378
   i2c_start();            // Brightness
-
 
379
   i2c_write(0xC0);
-
 
380
   i2c_write(0x06);
-
 
381
   i2c_write(offset+0x70);  // 80h default
-
 
382
   i2c_stop();
-
 
383
   delay_ms(1000);   // Nech hodnotu chvili na displayi
-
 
384
   
-
 
385
   set_adc_channel(ZELENA);   // --- Kroutitko pro vykon motoru ---
-
 
386
   delay_ms(1);
-
 
387
   rr=read_adc()>>2; // 0-31  // Pokud by se zvetsil rozsah, tak zkontrolovat jakonasobeni !!!
359
 
388
 
360
   cas=CASAVR-CASMIN;  // Inicializace promenych, aby neslo servo za roh a aby se to rozjelo jeste dneska
389
   cas=CASAVR-CASMIN;  // Inicializace promenych, aby neslo servo za roh a aby se to rozjelo jeste dneska
361
   stav=start;
390
   stav=start;
362
   trasa=0;
391
   trasa=0;
363
 
392
 
Line 370... Line 399...
370
      pom=0;
399
      pom=0;
371
      while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
400
      while(!input(HREF));    // Cekej nez se zacnou posilat pixely z radky
372
      set_timer0(0);          // Vynuluj pocitadlo casu
401
      set_timer0(0);          // Vynuluj pocitadlo casu
373
      while(input(HREF))      // Po dobu vysilani radky cekej na hranu W/B
402
      while(input(HREF))      // Po dobu vysilani radky cekej na hranu W/B
374
      {
403
      {
375
// !!!!Dodelat rozpoznani cerne cary napric pro zastaveni
404
// !!!!Dodelat rozpoznani cerne cary napric pro zastaveni ?
376
         if(!input(PIX))   // Pokud se Xx za sebou precetla CERNA
405
         if(!input(PIX))   // Pokud se X-krat za sebou precetla CERNA
377
         if(!input(PIX))
406
         if(!input(PIX))
378
//         if(!input(PIX))
407
//         if(!input(PIX))
379
         {
408
         {
380
            pom=get_timer0();    // Precti cas z citace casu hrany
409
            pom=get_timer0();    // Precti cas z citace casu hrany
381
            break;
410
            break;
Line 398... Line 427...
398
      delay_us(offset);
427
      delay_us(offset);
399
      delay_us(cas);
428
      delay_us(cas);
400
      delay_us(cas);
429
      delay_us(cas);
401
      output_low(SERVO);
430
      output_low(SERVO);
402
 
431
 
403
      set_adc_channel(ZELENA);   // Kroutitko pro vykon motoru
-
 
404
      Delay_ms(1);
-
 
405
      rr=read_adc()>>2; //!!! // 0-31
-
 
406
 
-
 
407
      // Elektronicky diferencial
432
      // Elektronicky diferencial
408
      if(cas<CASAVR) {r1=cas-CASMIN; r2=CASAVR-CASMIN;}; // Normovani vystupni hodnoty radkoveho snimace
433
      if(cas<CASAVR) {r1=cas-CASMIN; r2=CASAVR-CASMIN;}; // Normovani vystupni hodnoty radkoveho snimace
409
      if(cas==CASAVR) {r1=cas-CASMIN; r2=cas-CASMIN;};   // pro rizeni rychlosti motoru
434
      if(cas==CASAVR) {r1=cas-CASMIN; r2=cas-CASMIN;};   // pro rizeni rychlosti motoru
410
      if(cas>CASAVR) {r1=CASAVR-CASMIN; r2=CASMAX-cas;}; // Rozsah 1 az 92
435
      if(cas>CASAVR) {r1=CASAVR-CASMIN; r2=CASMAX-cas;}; // Rozsah 1 az 92
411
 
436
 
Line 436... Line 461...
436
         INT0IF=0;                     // Zruseni predesle udalosti od startera
461
         INT0IF=0;                     // Zruseni predesle udalosti od startera
437
         enable_interrupts(INT_EXT);
462
         enable_interrupts(INT_EXT);
438
         enable_interrupts(GLOBAL);
463
         enable_interrupts(GLOBAL);
439
      };
464
      };
440
 
465
 
441
      if(stav==start)
466
      if(stav==start)         // Snimkuje, toci servem a ceka na start
442
      if(read_adc()<128)
467
      if(read_adc()<128)
443
      {
468
      {
444
         disp(0x55);
469
         disp(0x80);
445
         while(read_adc()<128); // Cekej, dokud starter neda ruku pryc
470
         while(read_adc()<128); // Cekej, dokud starter neda ruku pryc
446
         set_pwm1_duty(255);
471
         set_pwm1_duty(255);    // Rychly rozjezd  !!! Zkontrolovat na oscyloskopu 
447
         set_pwm2_duty(255);
472
         set_pwm2_duty(255);
448
         disp(0xAA);
473
         disp(0x1);
449
         delay_ms(200);
474
         delay_ms(200);       
450
         stav=jizda;
475
         stav=jizda;
451
      }
476
      }
452
 
477
 
453
      pom=0x80;
478
      pom=0x80;    // Zobrazeni pozice cary na displayi
454
      for(n=CASMAX/8; n<cas; n+=CASMAX/8)
479
      for(n=CASMAX/8; n<cas; n+=CASMAX/8) pom>>=1;
455
      {
-
 
456
         pom>>=1;
-
 
457
      }
-
 
458
      disp(pom);
480
      disp(pom);
459
 
-
 
460
   };
481
   };
461
}
482
}