Musik-Tanz-Programm - der Quelltext
Der Quelltext
#define __NOTETIME  10
#define __WAITTIME  12
void Melody1(){
  PlayTone(262,4**__NOTETIME); Wait(4**__WAITTIME);
  PlayTone(277,4**__NOTETIME); Wait(4**__WAITTIME);
  PlayTone(294,4**__NOTETIME); Wait(4**__WAITTIME);
  PlayTone(440,4**__NOTETIME); Wait(4**__WAITTIME);
  PlayTone(466,4**__NOTETIME); Wait(4**__WAITTIME);
  PlayTone(494,4**__NOTETIME); Wait(4**__WAITTIME);
}
void Back( int z){
            On(OUT_A + OUT_C);
            Rev(OUT_A + OUT_C);
            Wait(z);
            Rev(OUT_A + OUT_C);
}
void Drehen( int x){
            OnFwd(OUT_A);
            Off(OUT_A);
            Wait(x); 
            On(OUT_A);
}
void Stop(){
          Off(OUT_A);
          Off(OUT_C);
}
void Run(int y){
          OnFwd(OUT_A + OUT_C);
          Wait(y);
}
task main() { 
int X, Y, Z; 
SetSensor(SENSOR_3,SENSOR_LIGHT);
SetSensor(SENSOR_1,SENSOR_TOUCH);
while(true)  {
        X = 100;
        Run(X);  
        
  if (SENSOR_3 > 70) {
        Stop();
        Melody1();
        ClearSensor(SENSOR_3);
  }
        X = 50;        
        Drehen(X);
        
  if (SENSOR_3 > 70) {
        Stop();
        Melody1();
        ClearSensor(SENSOR_3);
  }
        Z = 70;
        Back(Z);
        
  if (SENSOR_3 > 70) {
        Stop();
        Melody1();
        ClearSensor(SENSOR_3);
  }
        X = 130;        
        Drehen(X);
  if (SENSOR_3 > 70) {
        Stop();
        Melody1();
        ClearSensor(SENSOR_3);
  }
    
        
  }
}  
~
Autorin / Autor: Wencke, Carina, Julia, Esther - Stand: 13. Juni 2001