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

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

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

File size: 4.0 KB
RevLine 
[79]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() {
[87]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       
[79]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