Changeset 82 in projects
- Timestamp:
- Aug 13, 2013, 7:24:01 PM (11 years ago)
- Location:
- magnetic-tape-show
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
magnetic-tape-show/pseudosprache.h
r81 r82 18 18 void abspielen(); // Header signature for main.c 19 19 20 // An/Ausschalten. Achtung - brauche Relaisnummer als Zahl, ansonsten geht das nicht 21 #define anschalten(x) ( PORTB &= ~(1 << x) ) 22 #define ausschalten(x) ( PORTB |= (1 << x) ) 23 24 // Alternativ sowas: 25 #define leser1_einschalten() (PORTA &= ~(1 << RELAIS_01)) 26 #define leser1_ausschalten() (PORTA |= (1 << RELAIS_01)) 27 28 29 20 // Deppen-True/False 21 #define AN TRUE // true in C99 22 #define EIN AN 23 #define AUS FALSE // false in C99 30 24 31 25 // Schlafen/Warten: Einfache Formulierung … … 52 46 53 47 54 // Impulssignale55 inline void impuls(int port, int relais, double dauer) {56 // ..57 }58 59 60 61 62 63 48 #endif /* PSEUDOSPRACHE_H_ */ -
magnetic-tape-show/spielplan.c
r81 r82 10 10 11 11 void abspielen() { 12 12 /* 13 13 while(1) { 14 14 start_led(); … … 18 18 PORTA = 0xFF; 19 19 warte(SEKUNDE); 20 } 21 /* 22 geraet2_impuls(1 * SEKUNDE); 20 } 21 */ 23 22 24 anschalten(RELAIS_02); 25 //warte_sekunden(2); 26 ausschalten(RELAIS_02); 27 */ 23 // Start des Plans, Heribert 13.08.2013, 18:50 24 warte(3 * SEKUNDEN); 25 tape1_on(); 26 warte(SEKUNDE); 27 28 29 30 31 32 33 34 35 28 36 } -
magnetic-tape-show/wiring.h
r80 r82 54 54 // PORT D: No RS232 55 55 56 // Relais zu daran angeschlossenen Geraete-Mapping: 57 //Rel. 1-4 (+15) TAPE1 (ON, FORWARD, REWIND, OFF, LP=LOAD-POINT, READ) 58 //Rel. 5-8 TAPE2 (ebenso) 59 //Rel. 9-14 Tape0 (pneumatisches Laufwerk) 60 61 // C99.. 62 #define TRUE 1 63 #define FALSE 0 64 65 #define set_bit(PORTi, RELAISj, WERT) (\ 66 (WERT == TRUE) ? \ 67 (PORTi &= ~(1 << RELAISj)) : \ 68 (PORTi |= (1 << RELAISj)) ) 69 70 // ON und OFF gehen immer in 1sec-Impulsen. Abkuerzen! 71 72 #define set_impuls(PORTi, RELAISj) ({ \ 73 set_bit(PORTi, RELAISj, TRUE); \ 74 _delay_ms(1000); \ 75 set_bit(PORTi, RELAISj, FALSE); \ 76 }) 77 78 79 #define tape1_on() set_impuls(PORTA, RELAIS_01) 80 #define tape1_for(v) set_bit(PORTA, RELAIS_02, v) 81 #define tape1_rew(v) set_bit(PORTA, RELAIS_03, v) 82 #define tape1_off() set_impuls(PORTA, RELAIS_04) 83 #define tape1_read(v) set_bit(PORTA, RELAIS_15, v) 84 85 #define tape2_on() set_impuls(PORTA, RELAIS_05) 86 #define tape2_for(v) set_bit(PORTA, RELAIS_06, v) 87 #define tape2_rew(v) set_bit(PORTA, RELAIS_07, v) 88 #define tape2_off() set_impuls(PORTA, RELAIS_08) 89 90 #define tape0_on() set_impuls(PORTC, RELAIS_09) 91 #define tape0_for(v) set_bit(PORTC, RELAIS_10, v) 92 #define tape0_read(v) set_bit(PORTC, RELAIS_11, v) 93 #define tape0_rew(v) set_bit(PORTC, RELAIS_12, v) 94 #define tape0_lp(v) set_bit(PORTC, RELAIS_13, v) 95 #define tape0_off() set_impuls(PORTC, RELAIS_14) 96 97 #define sound_start(v) set_bit(PORTC, RELAIS_16, v) 98 99 56 100 57 101 // sic! LED on Olimex devel board
Note: See TracChangeset
for help on using the changeset viewer.