rosya satria
/
eParking
main.cpp@0:beb123f6f7d7, 2012-06-13 (annotated)
- Committer:
- satriabtp
- Date:
- Wed Jun 13 08:52:02 2012 +0000
- Revision:
- 0:beb123f6f7d7
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
satriabtp | 0:beb123f6f7d7 | 1 | #include "mbed.h" |
satriabtp | 0:beb123f6f7d7 | 2 | #include "TextLCD.h" |
satriabtp | 0:beb123f6f7d7 | 3 | |
satriabtp | 0:beb123f6f7d7 | 4 | InterruptIn tombol(p8); |
satriabtp | 0:beb123f6f7d7 | 5 | |
satriabtp | 0:beb123f6f7d7 | 6 | DigitalOut Gate(p18); |
satriabtp | 0:beb123f6f7d7 | 7 | DigitalOut Buzzer(p19); |
satriabtp | 0:beb123f6f7d7 | 8 | DigitalOut rw(p21); |
satriabtp | 0:beb123f6f7d7 | 9 | DigitalOut indikator(LED1); |
satriabtp | 0:beb123f6f7d7 | 10 | DigitalOut indikator2(LED2); |
satriabtp | 0:beb123f6f7d7 | 11 | Serial RFID(p13, p14); |
satriabtp | 0:beb123f6f7d7 | 12 | |
satriabtp | 0:beb123f6f7d7 | 13 | TextLCD lcd(p20, p22, p23, p24, p25, p26); //rs, e, d4-d7 |
satriabtp | 0:beb123f6f7d7 | 14 | |
satriabtp | 0:beb123f6f7d7 | 15 | char dataIn; |
satriabtp | 0:beb123f6f7d7 | 16 | |
satriabtp | 0:beb123f6f7d7 | 17 | void hlm_home() |
satriabtp | 0:beb123f6f7d7 | 18 | { |
satriabtp | 0:beb123f6f7d7 | 19 | rw = 0; |
satriabtp | 0:beb123f6f7d7 | 20 | lcd.cls(); |
satriabtp | 0:beb123f6f7d7 | 21 | lcd.locate(0,3); |
satriabtp | 0:beb123f6f7d7 | 22 | lcd.printf("Bandung Techno Park"); |
satriabtp | 0:beb123f6f7d7 | 23 | lcd.locate(2,1); |
satriabtp | 0:beb123f6f7d7 | 24 | lcd.printf("e-Parking System"); |
satriabtp | 0:beb123f6f7d7 | 25 | //rw =1; |
satriabtp | 0:beb123f6f7d7 | 26 | } |
satriabtp | 0:beb123f6f7d7 | 27 | |
satriabtp | 0:beb123f6f7d7 | 28 | void handle() |
satriabtp | 0:beb123f6f7d7 | 29 | { |
satriabtp | 0:beb123f6f7d7 | 30 | if(RFID.readable()) //Jika ada data serial masuk |
satriabtp | 0:beb123f6f7d7 | 31 | { |
satriabtp | 0:beb123f6f7d7 | 32 | //aksi ketika ada serial interrupt masuk |
satriabtp | 0:beb123f6f7d7 | 33 | dataIn = RFID.getc(); |
satriabtp | 0:beb123f6f7d7 | 34 | indikator = 1; |
satriabtp | 0:beb123f6f7d7 | 35 | Buzzer = 1; |
satriabtp | 0:beb123f6f7d7 | 36 | |
satriabtp | 0:beb123f6f7d7 | 37 | //RFID.putc(dataIn); |
satriabtp | 0:beb123f6f7d7 | 38 | //RFID.printf("\r\n"); |
satriabtp | 0:beb123f6f7d7 | 39 | |
satriabtp | 0:beb123f6f7d7 | 40 | if (dataIn == 0x04) |
satriabtp | 0:beb123f6f7d7 | 41 | { |
satriabtp | 0:beb123f6f7d7 | 42 | //RFID.putc(dataIn); |
satriabtp | 0:beb123f6f7d7 | 43 | //RFID.printf("\r\n"); |
satriabtp | 0:beb123f6f7d7 | 44 | |
satriabtp | 0:beb123f6f7d7 | 45 | indikator2 = 1; |
satriabtp | 0:beb123f6f7d7 | 46 | Gate = 1; |
satriabtp | 0:beb123f6f7d7 | 47 | wait (0.1); |
satriabtp | 0:beb123f6f7d7 | 48 | Gate = 0; |
satriabtp | 0:beb123f6f7d7 | 49 | Buzzer = 0; |
satriabtp | 0:beb123f6f7d7 | 50 | indikator = 0; |
satriabtp | 0:beb123f6f7d7 | 51 | indikator2 = 0; |
satriabtp | 0:beb123f6f7d7 | 52 | |
satriabtp | 0:beb123f6f7d7 | 53 | rw = 0; |
satriabtp | 0:beb123f6f7d7 | 54 | lcd.cls(); |
satriabtp | 0:beb123f6f7d7 | 55 | lcd.locate(0,2); |
satriabtp | 0:beb123f6f7d7 | 56 | lcd.printf("Bandung Techno Park"); |
satriabtp | 0:beb123f6f7d7 | 57 | lcd.locate(5,0); |
satriabtp | 0:beb123f6f7d7 | 58 | lcd.printf("Welcome To"); |
satriabtp | 0:beb123f6f7d7 | 59 | //rw = 1; |
satriabtp | 0:beb123f6f7d7 | 60 | } |
satriabtp | 0:beb123f6f7d7 | 61 | else |
satriabtp | 0:beb123f6f7d7 | 62 | { |
satriabtp | 0:beb123f6f7d7 | 63 | wait(0.1); |
satriabtp | 0:beb123f6f7d7 | 64 | Buzzer = 0; |
satriabtp | 0:beb123f6f7d7 | 65 | indikator = 0; |
satriabtp | 0:beb123f6f7d7 | 66 | indikator2 = 0; |
satriabtp | 0:beb123f6f7d7 | 67 | |
satriabtp | 0:beb123f6f7d7 | 68 | rw = 0; |
satriabtp | 0:beb123f6f7d7 | 69 | lcd.cls(); |
satriabtp | 0:beb123f6f7d7 | 70 | lcd.locate(8,1); |
satriabtp | 0:beb123f6f7d7 | 71 | lcd.printf("Sorry"); |
satriabtp | 0:beb123f6f7d7 | 72 | lcd.locate(4,2); |
satriabtp | 0:beb123f6f7d7 | 73 | lcd.printf("Access Denied"); |
satriabtp | 0:beb123f6f7d7 | 74 | //rw = 1; |
satriabtp | 0:beb123f6f7d7 | 75 | } |
satriabtp | 0:beb123f6f7d7 | 76 | |
satriabtp | 0:beb123f6f7d7 | 77 | wait(2); |
satriabtp | 0:beb123f6f7d7 | 78 | hlm_home(); |
satriabtp | 0:beb123f6f7d7 | 79 | } |
satriabtp | 0:beb123f6f7d7 | 80 | return; |
satriabtp | 0:beb123f6f7d7 | 81 | } |
satriabtp | 0:beb123f6f7d7 | 82 | |
satriabtp | 0:beb123f6f7d7 | 83 | void open() |
satriabtp | 0:beb123f6f7d7 | 84 | { |
satriabtp | 0:beb123f6f7d7 | 85 | indikator2 = 1; |
satriabtp | 0:beb123f6f7d7 | 86 | Gate = 1; |
satriabtp | 0:beb123f6f7d7 | 87 | wait (0.1); |
satriabtp | 0:beb123f6f7d7 | 88 | Gate = 0; |
satriabtp | 0:beb123f6f7d7 | 89 | indikator2 = 0; |
satriabtp | 0:beb123f6f7d7 | 90 | |
satriabtp | 0:beb123f6f7d7 | 91 | rw = 0; |
satriabtp | 0:beb123f6f7d7 | 92 | lcd.cls(); |
satriabtp | 0:beb123f6f7d7 | 93 | lcd.locate(0,2); |
satriabtp | 0:beb123f6f7d7 | 94 | lcd.printf("Bandung Techno Park"); |
satriabtp | 0:beb123f6f7d7 | 95 | lcd.locate(5,0); |
satriabtp | 0:beb123f6f7d7 | 96 | lcd.printf("Welcome To"); |
satriabtp | 0:beb123f6f7d7 | 97 | //rw = 1; |
satriabtp | 0:beb123f6f7d7 | 98 | wait(2); |
satriabtp | 0:beb123f6f7d7 | 99 | hlm_home(); |
satriabtp | 0:beb123f6f7d7 | 100 | } |
satriabtp | 0:beb123f6f7d7 | 101 | |
satriabtp | 0:beb123f6f7d7 | 102 | int main() |
satriabtp | 0:beb123f6f7d7 | 103 | { |
satriabtp | 0:beb123f6f7d7 | 104 | rw = 0; |
satriabtp | 0:beb123f6f7d7 | 105 | hlm_home(); |
satriabtp | 0:beb123f6f7d7 | 106 | |
satriabtp | 0:beb123f6f7d7 | 107 | wait(2); |
satriabtp | 0:beb123f6f7d7 | 108 | |
satriabtp | 0:beb123f6f7d7 | 109 | RFID.attach(handle); |
satriabtp | 0:beb123f6f7d7 | 110 | RFID.putc(0x04); |
satriabtp | 0:beb123f6f7d7 | 111 | |
satriabtp | 0:beb123f6f7d7 | 112 | tombol.fall(&open); |
satriabtp | 0:beb123f6f7d7 | 113 | |
satriabtp | 0:beb123f6f7d7 | 114 | indikator = 0; |
satriabtp | 0:beb123f6f7d7 | 115 | indikator2 = 0; |
satriabtp | 0:beb123f6f7d7 | 116 | Gate = 0; |
satriabtp | 0:beb123f6f7d7 | 117 | |
satriabtp | 0:beb123f6f7d7 | 118 | while (1) |
satriabtp | 0:beb123f6f7d7 | 119 | { |
satriabtp | 0:beb123f6f7d7 | 120 | |
satriabtp | 0:beb123f6f7d7 | 121 | } |
satriabtp | 0:beb123f6f7d7 | 122 | } |