M0_Übung_5

Dependencies:   mbed

Fork of M0_Lektion05 by Gottfried Enenkel

Committer:
StefanSeebacher
Date:
Thu Apr 21 07:56:15 2016 +0000
Revision:
1:d62ca09b4171
Parent:
0:56dbb8ec442b
M0_?bung_5

Who changed what in which revision?

UserRevisionLine numberNew contents of line
StefanSeebacher 1:d62ca09b4171 1 #include "mbed.h"
StefanSeebacher 1:d62ca09b4171 2
StefanSeebacher 1:d62ca09b4171 3 // **** DEFINITIONEN ****
StefanSeebacher 1:d62ca09b4171 4
StefanSeebacher 1:d62ca09b4171 5 BusOut led(P1_13,P1_12,P1_7,P1_6,P1_4,P1_3,P1_1,P1_0,LED4,LED3,LED2,LED1);
Enenkel 0:56dbb8ec442b 6
StefanSeebacher 1:d62ca09b4171 7 int I;
StefanSeebacher 1:d62ca09b4171 8 double X;
StefanSeebacher 1:d62ca09b4171 9
StefanSeebacher 1:d62ca09b4171 10 // **** HAUPTPROGRAMM ****
StefanSeebacher 1:d62ca09b4171 11
StefanSeebacher 1:d62ca09b4171 12 int main()
StefanSeebacher 1:d62ca09b4171 13 {
StefanSeebacher 1:d62ca09b4171 14 I=1;
StefanSeebacher 1:d62ca09b4171 15 X=2;
Enenkel 0:56dbb8ec442b 16
StefanSeebacher 1:d62ca09b4171 17 while(I<=5)
StefanSeebacher 1:d62ca09b4171 18 {
StefanSeebacher 1:d62ca09b4171 19 led=0x000; //LED **** **** **** 0000 0000 0000
StefanSeebacher 1:d62ca09b4171 20 wait(X);
StefanSeebacher 1:d62ca09b4171 21 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 22 led=0x001; //LED **** **** ***X 0000 0000 0001
StefanSeebacher 1:d62ca09b4171 23 wait (X);
StefanSeebacher 1:d62ca09b4171 24 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 25 led=0x002; //LED **** **** **X* 0000 0000 0010
StefanSeebacher 1:d62ca09b4171 26 wait (X);
StefanSeebacher 1:d62ca09b4171 27 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 28 led=0x004; //LED **** **** *X** 0000 0000 0100
StefanSeebacher 1:d62ca09b4171 29 wait (X);
StefanSeebacher 1:d62ca09b4171 30 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 31 led=0x008; //LED **** **** X*** 0000 0000 1000
StefanSeebacher 1:d62ca09b4171 32 wait (X);
StefanSeebacher 1:d62ca09b4171 33 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 34 led=0x010; //LED **** ***X **** 0000 0001 0000
StefanSeebacher 1:d62ca09b4171 35 wait (X);
StefanSeebacher 1:d62ca09b4171 36 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 37 led=0x020; //LED **** **X* **** 0000 0010 0000
StefanSeebacher 1:d62ca09b4171 38 wait (X);
StefanSeebacher 1:d62ca09b4171 39 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 40 led=0x040; //LED **** *X** **** 0000 0100 0000
StefanSeebacher 1:d62ca09b4171 41 wait (X);
StefanSeebacher 1:d62ca09b4171 42 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 43 led=0x080; //LED **** X*** **** 0000 1000 0000
StefanSeebacher 1:d62ca09b4171 44 wait (X);
StefanSeebacher 1:d62ca09b4171 45 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 46 led=0x100; //LED ***X **** **** 0001 0000 0000
StefanSeebacher 1:d62ca09b4171 47 wait (X);
StefanSeebacher 1:d62ca09b4171 48 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 49 led=0x200; //LED **X* **** **** 0010 0000 0000
StefanSeebacher 1:d62ca09b4171 50 wait (X);
StefanSeebacher 1:d62ca09b4171 51 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 52 led=0x400; //LED *X** **** **** 0100 0000 0000
StefanSeebacher 1:d62ca09b4171 53 wait (X);
StefanSeebacher 1:d62ca09b4171 54 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 55 led=0x800; //LED X*** **** **** 1000 0000 0000
StefanSeebacher 1:d62ca09b4171 56 wait (X);
StefanSeebacher 1:d62ca09b4171 57 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 58 led=0x000; //LED **** **** **** 0000 0000 0000
StefanSeebacher 1:d62ca09b4171 59 wait (X);
StefanSeebacher 1:d62ca09b4171 60 X=X*0.999;
StefanSeebacher 1:d62ca09b4171 61
StefanSeebacher 1:d62ca09b4171 62 I++;
StefanSeebacher 1:d62ca09b4171 63
StefanSeebacher 1:d62ca09b4171 64 }
Enenkel 0:56dbb8ec442b 65 }
StefanSeebacher 1:d62ca09b4171 66 // **** ENDE ****