This is sample program for Nucleo L152RE (and F401RE & F411RE) mbed-rtos. You need to modify mbed-src and mbed-rtos before compile it.
Dependencies: mbed-rtos mbed-src SetRTC
Fork of GR-PEACH_test_on_rtos_works_well by
Please refer below link.
/users/kenjiArai/notebook/necleo-l152re-rtos-sample-also-for-f401re--f411re-/
main.cpp@2:3747397a1618, 2014-12-04 (annotated)
- Committer:
- kenjiArai
- Date:
- Thu Dec 04 12:03:04 2014 +0000
- Revision:
- 2:3747397a1618
- Parent:
- 1:a399a743d109
- Child:
- 3:989d13762f43
added printf(Debug) & normal serial com.
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
kenjiArai | 1:a399a743d109 | 1 | /* |
kenjiArai | 1:a399a743d109 | 2 | * mbed Application program for the mbed |
kenjiArai | 1:a399a743d109 | 3 | * Test program for GR-PEACH |
kenjiArai | 1:a399a743d109 | 4 | * |
kenjiArai | 1:a399a743d109 | 5 | * Copyright (c) 2014 Kenji Arai / JH1PJL |
kenjiArai | 1:a399a743d109 | 6 | * http://www.page.sannet.ne.jp/kenjia/index.html |
kenjiArai | 1:a399a743d109 | 7 | * http://mbed.org/users/kenjiArai/ |
kenjiArai | 1:a399a743d109 | 8 | * Created: November 29th, 2014 |
kenjiArai | 1:a399a743d109 | 9 | * Revised: November 29th, 2014 |
kenjiArai | 1:a399a743d109 | 10 | * |
kenjiArai | 1:a399a743d109 | 11 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, |
kenjiArai | 1:a399a743d109 | 12 | * INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE |
kenjiArai | 1:a399a743d109 | 13 | * AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, |
kenjiArai | 1:a399a743d109 | 14 | * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
kenjiArai | 1:a399a743d109 | 15 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. |
kenjiArai | 1:a399a743d109 | 16 | */ |
kenjiArai | 1:a399a743d109 | 17 | |
kenjiArai | 0:a17b3cf2f466 | 18 | #include "mbed.h" |
kenjiArai | 0:a17b3cf2f466 | 19 | |
kenjiArai | 0:a17b3cf2f466 | 20 | //#define PIN_NUM |
kenjiArai | 0:a17b3cf2f466 | 21 | #define LED_NAME |
kenjiArai | 0:a17b3cf2f466 | 22 | //#define LED_COLOR |
kenjiArai | 0:a17b3cf2f466 | 23 | |
kenjiArai | 2:3747397a1618 | 24 | //#define DISP_COM |
kenjiArai | 2:3747397a1618 | 25 | |
kenjiArai | 2:3747397a1618 | 26 | // Com |
kenjiArai | 2:3747397a1618 | 27 | #ifdef DISP_COM |
kenjiArai | 2:3747397a1618 | 28 | #define BAUD(x) pcm.baud(x) |
kenjiArai | 2:3747397a1618 | 29 | #define PRINTF(...) pcm.printf(__VA_ARGS__) |
kenjiArai | 2:3747397a1618 | 30 | #else |
kenjiArai | 2:3747397a1618 | 31 | #define BAUD(x) baud(x) |
kenjiArai | 2:3747397a1618 | 32 | #define PRINTF(...) printf(__VA_ARGS__) |
kenjiArai | 2:3747397a1618 | 33 | #endif |
kenjiArai | 2:3747397a1618 | 34 | |
kenjiArai | 2:3747397a1618 | 35 | #ifdef DISP_COM |
kenjiArai | 2:3747397a1618 | 36 | // com |
kenjiArai | 2:3747397a1618 | 37 | Serial pcm(USBTX, USBRX); |
kenjiArai | 2:3747397a1618 | 38 | #endif |
kenjiArai | 2:3747397a1618 | 39 | |
kenjiArai | 0:a17b3cf2f466 | 40 | #if defined(PIN_NUM) |
kenjiArai | 0:a17b3cf2f466 | 41 | DigitalOut myledR(P4_4); |
kenjiArai | 0:a17b3cf2f466 | 42 | DigitalOut myledG(P3_2); |
kenjiArai | 0:a17b3cf2f466 | 43 | DigitalOut myledB(P4_6); |
kenjiArai | 0:a17b3cf2f466 | 44 | DigitalOut myledU(P4_7); |
kenjiArai | 0:a17b3cf2f466 | 45 | #elif defined(LED_NAME) |
kenjiArai | 0:a17b3cf2f466 | 46 | DigitalOut myledR(LED1); |
kenjiArai | 0:a17b3cf2f466 | 47 | DigitalOut myledG(LED2); |
kenjiArai | 0:a17b3cf2f466 | 48 | DigitalOut myledB(LED3); |
kenjiArai | 0:a17b3cf2f466 | 49 | DigitalOut myledU(LED4); |
kenjiArai | 0:a17b3cf2f466 | 50 | #elif defined(LED_COLOR) |
kenjiArai | 0:a17b3cf2f466 | 51 | DigitalOut myledR(LED_RED); |
kenjiArai | 0:a17b3cf2f466 | 52 | DigitalOut myledG(LED_GREEN); |
kenjiArai | 0:a17b3cf2f466 | 53 | DigitalOut myledB(LED_BLUE); |
kenjiArai | 0:a17b3cf2f466 | 54 | DigitalOut myledU(LED_USER); |
kenjiArai | 0:a17b3cf2f466 | 55 | #endif |
kenjiArai | 0:a17b3cf2f466 | 56 | |
kenjiArai | 0:a17b3cf2f466 | 57 | #define ON 0 |
kenjiArai | 0:a17b3cf2f466 | 58 | #define OFF 1 |
kenjiArai | 0:a17b3cf2f466 | 59 | |
kenjiArai | 0:a17b3cf2f466 | 60 | int main() { |
kenjiArai | 0:a17b3cf2f466 | 61 | uint32_t n = 0; |
kenjiArai | 0:a17b3cf2f466 | 62 | |
kenjiArai | 2:3747397a1618 | 63 | PRINTF("Start mbed program\r\n"); |
kenjiArai | 0:a17b3cf2f466 | 64 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 65 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 66 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 67 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 68 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 69 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 70 | myledU = ON; |
kenjiArai | 2:3747397a1618 | 71 | PRINTF("UN"); |
kenjiArai | 0:a17b3cf2f466 | 72 | while(1) { |
kenjiArai | 0:a17b3cf2f466 | 73 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 74 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 75 | PRINTF("R=ON ,G=OFF,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 76 | myledR = ON; |
kenjiArai | 2:3747397a1618 | 77 | PRINTF("RN,"); |
kenjiArai | 0:a17b3cf2f466 | 78 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 79 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 80 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 81 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 82 | myledU = OFF; |
kenjiArai | 2:3747397a1618 | 83 | PRINTF("UF"); |
kenjiArai | 0:a17b3cf2f466 | 84 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 85 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 86 | PRINTF("R=OFF,G=OFF,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 87 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 88 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 89 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 90 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 91 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 92 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 93 | myledU = ON; |
kenjiArai | 2:3747397a1618 | 94 | PRINTF("UN"); |
kenjiArai | 0:a17b3cf2f466 | 95 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 96 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 97 | PRINTF("R=OFF,G=ON ,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 98 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 99 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 100 | myledG = ON; |
kenjiArai | 2:3747397a1618 | 101 | PRINTF("GN,"); |
kenjiArai | 0:a17b3cf2f466 | 102 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 103 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 104 | myledU = OFF; |
kenjiArai | 2:3747397a1618 | 105 | PRINTF("UF"); |
kenjiArai | 0:a17b3cf2f466 | 106 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 107 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 108 | PRINTF("R=OFF,G=OFF,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 109 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 110 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 111 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 112 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 113 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 114 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 115 | myledU = ON; |
kenjiArai | 2:3747397a1618 | 116 | PRINTF("UN"); |
kenjiArai | 0:a17b3cf2f466 | 117 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 118 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 119 | PRINTF("R=OFF,G=OFF,B=ON "); |
kenjiArai | 0:a17b3cf2f466 | 120 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 121 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 122 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 123 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 124 | myledB = ON; |
kenjiArai | 2:3747397a1618 | 125 | PRINTF("BN,"); |
kenjiArai | 0:a17b3cf2f466 | 126 | myledU = OFF; |
kenjiArai | 2:3747397a1618 | 127 | PRINTF("UF"); |
kenjiArai | 0:a17b3cf2f466 | 128 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 129 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 130 | PRINTF("R=OFF,G=OFF,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 131 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 132 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 133 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 134 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 135 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 136 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 137 | myledU = ON; |
kenjiArai | 2:3747397a1618 | 138 | PRINTF("UN"); |
kenjiArai | 0:a17b3cf2f466 | 139 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 140 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 141 | PRINTF("R=ON ,G=ON ,B=ON "); |
kenjiArai | 0:a17b3cf2f466 | 142 | myledR = ON; |
kenjiArai | 2:3747397a1618 | 143 | PRINTF("RN,"); |
kenjiArai | 0:a17b3cf2f466 | 144 | myledG = ON; |
kenjiArai | 2:3747397a1618 | 145 | PRINTF("GN,"); |
kenjiArai | 0:a17b3cf2f466 | 146 | myledB = ON; |
kenjiArai | 2:3747397a1618 | 147 | PRINTF("BN,"); |
kenjiArai | 0:a17b3cf2f466 | 148 | myledU = OFF; |
kenjiArai | 2:3747397a1618 | 149 | PRINTF("UF"); |
kenjiArai | 0:a17b3cf2f466 | 150 | wait(5.0); |
kenjiArai | 2:3747397a1618 | 151 | PRINTF(" passed %4d Sec\r\n", n +=5); |
kenjiArai | 2:3747397a1618 | 152 | PRINTF("R=OFF,G=OFF,B=OFF "); |
kenjiArai | 0:a17b3cf2f466 | 153 | myledR = OFF; |
kenjiArai | 2:3747397a1618 | 154 | PRINTF("RF,"); |
kenjiArai | 0:a17b3cf2f466 | 155 | myledG = OFF; |
kenjiArai | 2:3747397a1618 | 156 | PRINTF("GF,"); |
kenjiArai | 0:a17b3cf2f466 | 157 | myledB = OFF; |
kenjiArai | 2:3747397a1618 | 158 | PRINTF("BF,"); |
kenjiArai | 0:a17b3cf2f466 | 159 | myledU = ON; |
kenjiArai | 2:3747397a1618 | 160 | PRINTF("UN"); |
kenjiArai | 0:a17b3cf2f466 | 161 | } |
kenjiArai | 0:a17b3cf2f466 | 162 | } |