THIS IS A TEST FOR HIMINI

Dependencies:   mbed

Fork of _HIMBED_TEST1 by BULME_HIMBED

Committer:
Enenkel
Date:
Mon Mar 20 12:23:27 2017 +0000
Revision:
3:e5625dcefe4a
Parent:
2:b09f7006a9b3
This is a Test for HIMINI

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Enenkel 2:b09f7006a9b3 1 /* HIMINI_TEST1
Enenkel 2:b09f7006a9b3 2 BULME Graz, by Enenkel 1.2.2017
Enenkel 2:b09f7006a9b3 3 Diese Software testet das HIMINI.
Enenkel 2:b09f7006a9b3 4 Notwendige Zusätze: 1) Die Testplatine von FL GOM
Enenkel 2:b09f7006a9b3 5 2) PC mit
Enenkel 2:b09f7006a9b3 6 Prozessor einstellen auf LPC 11U68 !
Enenkel 1:d6e5f9c188d3 7
Enenkel 2:b09f7006a9b3 8
Enenkel 2:b09f7006a9b3 9 */
Enenkel 0:7bf2f1754883 10 #include "mbed.h"
Enenkel 1:d6e5f9c188d3 11 // ******** Definitionen **********
Enenkel 3:e5625dcefe4a 12 //Serial pc(USBTX, USBRX); // RxDO=P0_18 -> TxDO=P0_19
Enenkel 1:d6e5f9c188d3 13
Enenkel 2:b09f7006a9b3 14 // Definition der 28 LED's
Enenkel 2:b09f7006a9b3 15 DigitalOut ledD1(P2_5); //Pin 4
Enenkel 2:b09f7006a9b3 16 DigitalOut ledD2(P0_20);
Enenkel 2:b09f7006a9b3 17 DigitalOut ledD3(P0_2); //Pin 6 === ACHTUNG für FTDI reserviert !
Enenkel 2:b09f7006a9b3 18 DigitalOut ledD4(P2_2);
Enenkel 2:b09f7006a9b3 19 DigitalOut ledD5(P1_20);
Enenkel 2:b09f7006a9b3 20 DigitalOut ledD6(P0_4);
Enenkel 2:b09f7006a9b3 21 DigitalOut ledD7(P0_5);
Enenkel 2:b09f7006a9b3 22 DigitalOut ledD8(P0_21);
Enenkel 2:b09f7006a9b3 23 DigitalOut ledD9(P1_23);
Enenkel 2:b09f7006a9b3 24 DigitalOut ledD10(P2_7);
Enenkel 2:b09f7006a9b3 25 DigitalOut ledD11(P1_24);
Enenkel 2:b09f7006a9b3 26 DigitalOut ledD12(P0_6);
Enenkel 2:b09f7006a9b3 27 DigitalOut ledD13(P0_7);
Enenkel 2:b09f7006a9b3 28 DigitalOut ledD14(P1_21);
Enenkel 2:b09f7006a9b3 29 DigitalOut ledD15(P0_8);
Enenkel 2:b09f7006a9b3 30 DigitalOut ledD16(P0_9);
Enenkel 3:e5625dcefe4a 31 DigitalOut ledD17(P0_10); //Pin20
Enenkel 2:b09f7006a9b3 32 // 2. Seite des HIMINI !
Enenkel 3:e5625dcefe4a 33 DigitalOut ledD18(P0_23); //Pin21
Enenkel 3:e5625dcefe4a 34 DigitalOut ledD19(P0_11);
Enenkel 3:e5625dcefe4a 35 DigitalOut ledD20(P0_12);
Enenkel 3:e5625dcefe4a 36 DigitalOut ledD21(P0_13);
Enenkel 3:e5625dcefe4a 37 DigitalOut ledD22(P0_14); //Pin25 auf d. PCB
Enenkel 3:e5625dcefe4a 38 DigitalOut ledD23(P0_15);
Enenkel 3:e5625dcefe4a 39 DigitalOut ledD24(P0_16);
Enenkel 3:e5625dcefe4a 40 DigitalOut ledD25(P0_22);
Enenkel 3:e5625dcefe4a 41 DigitalOut ledD26(P0_17);
Enenkel 3:e5625dcefe4a 42 DigitalOut ledD27(P1_13); //Pin30
Enenkel 1:d6e5f9c188d3 43
Enenkel 2:b09f7006a9b3 44 int a;
Enenkel 0:7bf2f1754883 45
Enenkel 1:d6e5f9c188d3 46 // Hauptprogramm
Enenkel 1:d6e5f9c188d3 47 int main()
Enenkel 1:d6e5f9c188d3 48 {
Enenkel 3:e5625dcefe4a 49 ledD1=ledD2=ledD3=ledD4=ledD5=ledD6=ledD6=ledD7=ledD8=1;
Enenkel 3:e5625dcefe4a 50 ledD9=ledD10=ledD11=ledD12=ledD13=ledD14=ledD15=ledD16=1;
Enenkel 3:e5625dcefe4a 51 ledD17=ledD18=ledD19=ledD20=ledD21=ledD22=ledD23=ledD24=1;
Enenkel 3:e5625dcefe4a 52 ledD25=ledD26=ledD27=1;
Enenkel 3:e5625dcefe4a 53
Enenkel 3:e5625dcefe4a 54
Enenkel 3:e5625dcefe4a 55
Enenkel 3:e5625dcefe4a 56
Enenkel 3:e5625dcefe4a 57
Enenkel 3:e5625dcefe4a 58
Enenkel 3:e5625dcefe4a 59
Enenkel 3:e5625dcefe4a 60
Enenkel 2:b09f7006a9b3 61 ledD3=1; // schaltet den FTDI auf den USB Stecker!
Enenkel 2:b09f7006a9b3 62 //char readChar = 0;
Enenkel 3:e5625dcefe4a 63 //pc.printf("Welcome to HIMINI\n\r");
Enenkel 2:b09f7006a9b3 64 wait (2);
Enenkel 1:d6e5f9c188d3 65
Enenkel 2:b09f7006a9b3 66
Enenkel 1:d6e5f9c188d3 67 /********************* 2x Lauflicht der LEDS *************/
Enenkel 3:e5625dcefe4a 68 // pc.printf("LAUFLICHT UBER 12 LED aktiv !\n\r");
Enenkel 1:d6e5f9c188d3 69 a=1;
Enenkel 3:e5625dcefe4a 70
Enenkel 3:e5625dcefe4a 71
Enenkel 3:e5625dcefe4a 72
Enenkel 3:e5625dcefe4a 73
Enenkel 1:d6e5f9c188d3 74 while (a<3) {
Enenkel 3:e5625dcefe4a 75 ledD1=0;
Enenkel 1:d6e5f9c188d3 76 wait(0.5);
Enenkel 3:e5625dcefe4a 77 ledD1=1;
Enenkel 3:e5625dcefe4a 78 ledD2=0;
Enenkel 3:e5625dcefe4a 79 wait (0.2);
Enenkel 1:d6e5f9c188d3 80 ledD2=1;
Enenkel 3:e5625dcefe4a 81 ledD3=0;
Enenkel 1:d6e5f9c188d3 82 wait (0.2);
Enenkel 1:d6e5f9c188d3 83 ledD3=1;
Enenkel 3:e5625dcefe4a 84 ledD4=0;
Enenkel 1:d6e5f9c188d3 85 wait (0.2);
Enenkel 3:e5625dcefe4a 86 ledD4=1;
Enenkel 2:b09f7006a9b3 87 ledD5=0;
Enenkel 2:b09f7006a9b3 88 wait (0.2);
Enenkel 3:e5625dcefe4a 89 ledD5=1;
Enenkel 2:b09f7006a9b3 90 ledD6=0;
Enenkel 3:e5625dcefe4a 91 wait (0.2);
Enenkel 3:e5625dcefe4a 92 ledD6=1;
Enenkel 3:e5625dcefe4a 93 ledD7=0;
Enenkel 3:e5625dcefe4a 94 wait (0.2);
Enenkel 2:b09f7006a9b3 95 ledD7=1;
Enenkel 3:e5625dcefe4a 96 ledD8=0;
Enenkel 2:b09f7006a9b3 97 wait (0.2);
Enenkel 2:b09f7006a9b3 98 ledD8=1;
Enenkel 2:b09f7006a9b3 99 ledD9=0;
Enenkel 2:b09f7006a9b3 100 wait (0.2);
Enenkel 3:e5625dcefe4a 101 ledD9=1;
Enenkel 2:b09f7006a9b3 102 ledD10=0;
Enenkel 2:b09f7006a9b3 103 wait (0.2);
Enenkel 3:e5625dcefe4a 104 ledD10=1;
Enenkel 2:b09f7006a9b3 105 ledD11=0;
Enenkel 2:b09f7006a9b3 106 wait (0.2);
Enenkel 3:e5625dcefe4a 107 ledD11=1;
Enenkel 2:b09f7006a9b3 108 ledD12=0;
Enenkel 1:d6e5f9c188d3 109 wait (0.2);
Enenkel 3:e5625dcefe4a 110 ledD12=1;
Enenkel 1:d6e5f9c188d3 111 ledD13=0;
Enenkel 3:e5625dcefe4a 112 wait (0.2);
Enenkel 3:e5625dcefe4a 113 ledD13=1;
Enenkel 3:e5625dcefe4a 114 ledD14=0;
Enenkel 3:e5625dcefe4a 115 wait (0.2);
Enenkel 1:d6e5f9c188d3 116 ledD14=1;
Enenkel 3:e5625dcefe4a 117 ledD15=0;
Enenkel 1:d6e5f9c188d3 118 wait (0.2);
Enenkel 1:d6e5f9c188d3 119 ledD15=1;
Enenkel 1:d6e5f9c188d3 120 ledD16=0;
Enenkel 1:d6e5f9c188d3 121 wait (0.2);
Enenkel 3:e5625dcefe4a 122 ledD16=1;
Enenkel 1:d6e5f9c188d3 123 ledD17=0;
Enenkel 3:e5625dcefe4a 124 wait (0.2);
Enenkel 3:e5625dcefe4a 125 ledD17=1;
Enenkel 3:e5625dcefe4a 126 ledD18=0;
Enenkel 1:d6e5f9c188d3 127 wait (0.2);
Enenkel 3:e5625dcefe4a 128 ledD18=1;
Enenkel 3:e5625dcefe4a 129 ledD19=0;
Enenkel 3:e5625dcefe4a 130 wait (0.2);
Enenkel 1:d6e5f9c188d3 131 ledD19=1;
Enenkel 3:e5625dcefe4a 132 ledD20=0;
Enenkel 1:d6e5f9c188d3 133 wait (0.2);
Enenkel 1:d6e5f9c188d3 134 ledD20=1;
Enenkel 3:e5625dcefe4a 135 ledD21=0;
Enenkel 2:b09f7006a9b3 136 wait (0.2);
Enenkel 3:e5625dcefe4a 137 ledD21=1;
Enenkel 3:e5625dcefe4a 138 ledD22=0;
Enenkel 2:b09f7006a9b3 139 wait (0.2);
Enenkel 3:e5625dcefe4a 140 ledD22=1;
Enenkel 3:e5625dcefe4a 141 ledD23=0;
Enenkel 2:b09f7006a9b3 142 wait (0.2);
Enenkel 3:e5625dcefe4a 143 ledD23=1;
Enenkel 3:e5625dcefe4a 144 ledD24=0;
Enenkel 3:e5625dcefe4a 145 wait (0.2);
Enenkel 2:b09f7006a9b3 146 ledD24=1;
Enenkel 3:e5625dcefe4a 147 ledD25=0;
Enenkel 2:b09f7006a9b3 148 wait (0.2);
Enenkel 2:b09f7006a9b3 149 ledD25=1;
Enenkel 3:e5625dcefe4a 150 ledD26=0;
Enenkel 2:b09f7006a9b3 151 wait (0.2);
Enenkel 2:b09f7006a9b3 152 ledD26=1;
Enenkel 3:e5625dcefe4a 153 ledD27=0;
Enenkel 2:b09f7006a9b3 154 wait (0.2);
Enenkel 2:b09f7006a9b3 155 ledD27=1;
Enenkel 2:b09f7006a9b3 156 wait (0.2);
Enenkel 3:e5625dcefe4a 157
Enenkel 1:d6e5f9c188d3 158 a=a++;
Enenkel 1:d6e5f9c188d3 159 }
Enenkel 2:b09f7006a9b3 160 a=1;
Enenkel 2:b09f7006a9b3 161 while (a<3) {
Enenkel 2:b09f7006a9b3 162 ledD1=ledD2=ledD3=ledD4=ledD5=ledD6=ledD7=ledD8=ledD9=ledD10=0;
Enenkel 2:b09f7006a9b3 163 ledD11=ledD12=ledD13=ledD13=ledD14=ledD15=ledD16=ledD17=0;
Enenkel 2:b09f7006a9b3 164 ledD18=ledD19=ledD20=ledD21=ledD22=ledD23=ledD24=0;
Enenkel 3:e5625dcefe4a 165 ledD25=ledD26=ledD27==0;
Enenkel 2:b09f7006a9b3 166 wait (5);
Enenkel 2:b09f7006a9b3 167 ledD1=ledD2=ledD3=ledD4=ledD5=ledD6=ledD7=ledD8=ledD9=ledD10=1;
Enenkel 2:b09f7006a9b3 168 ledD11=ledD12=ledD13=ledD13=ledD14=ledD15=ledD16=ledD17=1;
Enenkel 2:b09f7006a9b3 169 ledD18=ledD19=ledD20=ledD21=ledD22=ledD23=ledD24=1;
Enenkel 3:e5625dcefe4a 170 ledD25=ledD26=ledD27=1;
Enenkel 2:b09f7006a9b3 171 wait (5);
Enenkel 2:b09f7006a9b3 172 a=a++;
Enenkel 2:b09f7006a9b3 173 }
Enenkel 2:b09f7006a9b3 174 ledD1=ledD2=ledD3=ledD4=ledD5=ledD6=ledD7=ledD8=ledD9=ledD10=0;
Enenkel 2:b09f7006a9b3 175 ledD11=ledD12=ledD13=ledD13=ledD14=ledD15=ledD16=ledD17=0;
Enenkel 2:b09f7006a9b3 176 ledD18=ledD19=ledD20=ledD21=ledD22=ledD23=ledD24=0;
Enenkel 3:e5625dcefe4a 177 ledD25=ledD26=ledD27=0;
Enenkel 2:b09f7006a9b3 178 }
Enenkel 2:b09f7006a9b3 179
Enenkel 2:b09f7006a9b3 180
Enenkel 1:d6e5f9c188d3 181 /************************** *********************/
Enenkel 1:d6e5f9c188d3 182 /* readChar = pc.getc();
Enenkel 1:d6e5f9c188d3 183 if(readChar >= 65 && readChar <= 90){ // Großbuchstaben in Kleinbuchstaben umwandeln
Enenkel 1:d6e5f9c188d3 184 pc.putc(readChar + 32);
Enenkel 1:d6e5f9c188d3 185 } else if(readChar >= 97 && readChar <= 122){ // Kleinbuchstaben in Großbuchstaben umwandeln
Enenkel 1:d6e5f9c188d3 186 pc.putc(readChar - 32);
Enenkel 1:d6e5f9c188d3 187 } else { // Sonst schicke was gekommen ist
Enenkel 1:d6e5f9c188d3 188 pc.putc(readChar);
Enenkel 1:d6e5f9c188d3 189 }
Enenkel 1:d6e5f9c188d3 190 */
Enenkel 1:d6e5f9c188d3 191
Enenkel 2:b09f7006a9b3 192
Enenkel 2:b09f7006a9b3 193
Enenkel 1:d6e5f9c188d3 194 /******************** ENDE ***********************/