source: projects/magnetic-tape-show/spielplan.c @ 87

Last change on this file since 87 was 87, checked in by sven, 6 years ago

Implementierung und Testen des Geraetes und neusten Spielplans im Musem am Di 10.09.2013.

File size: 4.0 KB
Line 
1/*
2 * spielplan.c
3 *
4 * Created: 10.08.2013 14:02:58
5 *  Author: Sven
6 */ 
7
8#include "wiring.h"
9#include "pseudosprache.h"
10
11void abspielen() {
12        // Testprogramm: Alle Relais gleichzeitig an und aus
13        /*
14        while(1) {
15                PORTA = 0xFF;
16                PORTC = 0xFF;
17                PORTD = 0xFF;
18                _delay_ms(2000.0);
19                PORTA = 0;
20                PORTC = 0;
21                PORTD = 0;
22                _delay_ms(2000.0);
23        }
24        */
25        // Testprogramm: Mit jedem Tastendruck einen Punkt weiter im Spielplan 28.08.13
26        /*
27        int i = 0;
28        while(1) {
29                while(is_button()) {
30                        switch(i) {
31        case 1: sound_on;           break; // REL 16            Text1
32        case 2: tape1_on;           break; // REL 01    2 
33        case 3: tape2_on;           break; // REL 05    2,5     
34        case 4: tape1_for(AN);  break; // REL 02        4       Text2
35        case 5: tape2_for(AN);  break; // REL 06        8       Text3
36        case 6: tape1_for(AUS); break; // REL 02        13      Text4
37        case 7: tape2_for(AUS); break; // REL 06        16      Text5
38        case 8: tape1_read(AN); break; // REL 15        20      Text6
39        case 9: tape1_read(AUS);break; // REL 15        27     
40        case 10: tape0_on;          break; // REL 09    28      Text7
41        case 11: tape0_for(AN);  break; // REL 10       30     
42        case 12: tape0_for(AUS); break; // REL 10       35
43        case 13: tape0_read(AN); break; // REL 11       36      Text9
44        case 14: tape0_read(AUS);break; // REL 11       41
45        case 15: tape1_for(AN);  break; // REL 02       42      Text10
46        case 16: tape2_for(AN);  break; // REL 06       42
47        case 17: tape0_for(AN);  break; // REL 10       42
48        case 18: tape1_for(AUS); break; // REL 02       47
49        case 19: tape0_for(AUS); break; // REL 10       47
50        case 20: tape2_for(AUS); break; // REL 06       47
51        case 21: tape0_read(AN); break; // REL 11       48      Text11
52        case 22: tape1_read(AN); break; // REL 15       48
53        case 23: tape0_read(AUS);break; // REL 11       55
54        case 24: tape1_read(AUS);break; // REL 15       55
55        case 25: tape1_rew;      break; // REL 03       56      Text12
56        case 26: tape0_rew;      break; // REL 12       57
57        case 27: tape2_rew;      break; // REL 07       58
58        case 28: tape0_lp;       break; // REL 13       70      Text13
59        case 29: tape0_off;      break; // REL 14       76      Text14
60        case 30: tape1_off;      break; // REL 04       78
61        case 31: tape2_off;      break; // REL 08       78,5    Text15
62                        }
63                        warte(1 * SEKUNDE);
64                        i++;
65                }
66        }
67        */
68       
69       
70       
71       
72        // Stand des Plans: 28.08.2013, hinter REL-Nr. stehen die absoluten Zeiten und Textnummern
73        warte(1   * SEKUNDEN); sound_on;            // REL 16           Text1
74        warte(1   * SEKUNDEN); tape1_on;            // REL 01   2 
75        warte(0.5 * SEKUNDEN); tape2_on;            // REL 05   2,5     
76        warte(1.5 * SEKUNDEN); tape1_for(AN);  // REL 02        4       Text2
77        warte(4   * SEKUNDEN); tape2_for(AN);  // REL 06        8       Text3
78        warte(5   * SEKUNDEN); tape1_for(AUS); // REL 02        13      Text4
79        warte(3   * SEKUNDEN); tape2_for(AUS); // REL 06        16      Text5
80        warte(4   * SEKUNDEN); tape1_read(AN); // REL 15        20      Text6
81        warte(7   * SEKUNDEN); tape1_read(AUS);// REL 15        27     
82        warte(1   * SEKUNDEN); tape0_on;            // REL 09   28      Text7
83        warte(2   * SEKUNDEN); tape0_for(AN);  // REL 10        30     
84        warte(5   * SEKUNDEN); tape0_for(AUS); // REL 10        35
85        warte(1   * SEKUNDEN); tape0_read(AN); // REL 11        36      Text9
86        warte(5   * SEKUNDEN); tape0_read(AUS);// REL 11        41
87        warte(1   * SEKUNDEN); tape1_for(AN);  // REL 02        42      Text10
88        warte(0   * SEKUNDEN); tape2_for(AN);  // REL 06        42
89        warte(0   * SEKUNDEN); tape0_for(AN);  // REL 10        42
90        warte(5   * SEKUNDEN); tape1_for(AUS); // REL 02        47
91        warte(0   * SEKUNDEN); tape0_for(AUS); // REL 10        47
92        warte(0   * SEKUNDEN); tape2_for(AUS); // REL 06        47
93        warte(1   * SEKUNDEN); tape0_read(AN); // REL 11        48      Text11
94        warte(0   * SEKUNDEN); tape1_read(AN); // REL 15        48
95        warte(7   * SEKUNDEN); tape0_read(AUS);// REL 11        55
96        warte(0   * SEKUNDEN); tape1_read(AUS);// REL 15        55
97        warte(1   * SEKUNDEN); tape1_rew;      // REL 03        56      Text12
98        warte(1   * SEKUNDEN); tape0_rew;      // REL 12        57
99        warte(1   * SEKUNDEN); tape2_rew;      // REL 07        58
100        warte(12  * SEKUNDEN); tape0_lp;       // REL 13        70      Text13
101        warte(6   * SEKUNDEN); tape0_off;      // REL 14        76      Text14
102        warte(2   * SEKUNDEN); tape1_off_set(AN); // REL 04     78
103        warte(0.5 * SEKUNDEN); tape2_off_set(AN);      // REL 08        78,5    Text15
104        warte(0.5 * SEKUNDEN); tape1_off_set(AUS);
105        warte(0.5 * SEKUNDEN); tape2_off_set(AUS);
106       
107}
Note: See TracBrowser for help on using the repository browser.
© 2008 - 2013 technikum29 • Sven Köppel • Some rights reserved
Powered by Trac
Expect where otherwise noted, content on this site is licensed under a Creative Commons 3.0 License