Interactive Device Design / Mbed 2 deprecated idd_hw2_dpcinci_etchatext

IDD hw2

Dependencies:   DebounceIn QEI mbed

Fork of idd_hw2_dpcinci_etchatext by Dominic Cincione

main.cpp@0:4005151fa9b1, 2014-09-21 (annotated)

Committer:
dpcinci
Date:
Sun Sep 21 22:18:36 2014 +0000
Revision:
0:4005151fa9b1
published on sunday?

Who changed what in which revision?

UserRevisionLine numberNew contents of line
dpcinci 0:4005151fa9b1 1 #include "QEI.h"
dpcinci 0:4005151fa9b1 2 #include "mbed.h"
dpcinci 0:4005151fa9b1 3 #include "DebounceIn.h"
dpcinci 0:4005151fa9b1 4
dpcinci 0:4005151fa9b1 5 Serial pc(USBTX, USBRX);
dpcinci 0:4005151fa9b1 6 //Use X4 encoding.
dpcinci 0:4005151fa9b1 7 //QEI wheel(p29, p30, NC, 624, QEI::X4_ENCODING);
dpcinci 0:4005151fa9b1 8 //Use X2 encoding by default.
dpcinci 0:4005151fa9b1 9
dpcinci 0:4005151fa9b1 10 DebounceIn RButton(D6);
dpcinci 0:4005151fa9b1 11 DebounceIn LButton(D5);
dpcinci 0:4005151fa9b1 12
dpcinci 0:4005151fa9b1 13 DigitalOut cLight1(D7);
dpcinci 0:4005151fa9b1 14 DigitalOut cLight2(D8);
dpcinci 0:4005151fa9b1 15 DigitalOut cLight3(D9);
dpcinci 0:4005151fa9b1 16 DigitalOut cLight4(D10);
dpcinci 0:4005151fa9b1 17 DigitalOut cLight5(D11);
dpcinci 0:4005151fa9b1 18 DigitalOut cLight6(D12);
dpcinci 0:4005151fa9b1 19 DigitalOut cLight7(D13);
dpcinci 0:4005151fa9b1 20 DigitalOut cLight8(D14);
dpcinci 0:4005151fa9b1 21 DigitalOut cLight9(D15);
dpcinci 0:4005151fa9b1 22
dpcinci 0:4005151fa9b1 23 DigitalOut rLight1(A0);
dpcinci 0:4005151fa9b1 24 DigitalOut rLight2(A1);
dpcinci 0:4005151fa9b1 25 DigitalOut rLight3(A2);
dpcinci 0:4005151fa9b1 26 DigitalOut rLight4(A3);
dpcinci 0:4005151fa9b1 27
dpcinci 0:4005151fa9b1 28 QEI xWheel (D0, D2, NC, 624);
dpcinci 0:4005151fa9b1 29 QEI yWheel (D3, D4, NC, 624);
dpcinci 0:4005151fa9b1 30
dpcinci 0:4005151fa9b1 31 int yPos;
dpcinci 0:4005151fa9b1 32 int RowNum;
dpcinci 0:4005151fa9b1 33 int RowEps = 3;
dpcinci 0:4005151fa9b1 34 bool Rpress;
dpcinci 0:4005151fa9b1 35
dpcinci 0:4005151fa9b1 36 int xPos;
dpcinci 0:4005151fa9b1 37 int ColNum = 5;
dpcinci 0:4005151fa9b1 38 int ColEps = 3;
dpcinci 0:4005151fa9b1 39 bool Lpress;
dpcinci 0:4005151fa9b1 40
dpcinci 0:4005151fa9b1 41 char *letter;
dpcinci 0:4005151fa9b1 42
dpcinci 0:4005151fa9b1 43
dpcinci 0:4005151fa9b1 44 int main() {
dpcinci 0:4005151fa9b1 45
dpcinci 0:4005151fa9b1 46 RButton.mode(PullUp);
dpcinci 0:4005151fa9b1 47 LButton.mode(PullUp);
dpcinci 0:4005151fa9b1 48
dpcinci 0:4005151fa9b1 49 while(1){
dpcinci 0:4005151fa9b1 50 yPos = yWheel.getPulses();
dpcinci 0:4005151fa9b1 51 xPos = xWheel.getPulses();
dpcinci 0:4005151fa9b1 52
dpcinci 0:4005151fa9b1 53
dpcinci 0:4005151fa9b1 54 Rpress = !RButton.read();
dpcinci 0:4005151fa9b1 55 Lpress = !LButton.read();
dpcinci 0:4005151fa9b1 56
dpcinci 0:4005151fa9b1 57 //Get Column position
dpcinci 0:4005151fa9b1 58 if(yPos < 2*RowEps){
dpcinci 0:4005151fa9b1 59 RowNum = 1;
dpcinci 0:4005151fa9b1 60 }
dpcinci 0:4005151fa9b1 61 if(yPos > 2*RowEps && yPos < 4*RowEps){
dpcinci 0:4005151fa9b1 62 RowNum = 2;
dpcinci 0:4005151fa9b1 63 }
dpcinci 0:4005151fa9b1 64 if(yPos > 4*RowEps && yPos < 6*RowEps){
dpcinci 0:4005151fa9b1 65 RowNum = 3;
dpcinci 0:4005151fa9b1 66 }
dpcinci 0:4005151fa9b1 67 if(yPos > 6*RowEps){
dpcinci 0:4005151fa9b1 68 RowNum = 4;
dpcinci 0:4005151fa9b1 69 }
dpcinci 0:4005151fa9b1 70
dpcinci 0:4005151fa9b1 71
dpcinci 0:4005151fa9b1 72 //Get Column position
dpcinci 0:4005151fa9b1 73
dpcinci 0:4005151fa9b1 74 if(xPos < -7*ColEps){
dpcinci 0:4005151fa9b1 75 ColNum = 1;
dpcinci 0:4005151fa9b1 76 }
dpcinci 0:4005151fa9b1 77 if(xPos > -7*ColEps && xPos < -5*ColEps){
dpcinci 0:4005151fa9b1 78 ColNum = 2;
dpcinci 0:4005151fa9b1 79 }
dpcinci 0:4005151fa9b1 80 if(xPos > -5*ColEps && xPos < -3*ColEps){
dpcinci 0:4005151fa9b1 81 ColNum = 3;
dpcinci 0:4005151fa9b1 82 }
dpcinci 0:4005151fa9b1 83 if(xPos > -3*ColEps && xPos < -ColEps){
dpcinci 0:4005151fa9b1 84 ColNum = 4;
dpcinci 0:4005151fa9b1 85 }
dpcinci 0:4005151fa9b1 86 if(xPos > -ColEps && xPos < ColEps){
dpcinci 0:4005151fa9b1 87 ColNum = 5;
dpcinci 0:4005151fa9b1 88 }
dpcinci 0:4005151fa9b1 89 if(xPos > ColEps && xPos < 3*ColEps){
dpcinci 0:4005151fa9b1 90 ColNum = 6;
dpcinci 0:4005151fa9b1 91 }
dpcinci 0:4005151fa9b1 92 if(xPos > 3*ColEps && xPos < 5*ColEps){
dpcinci 0:4005151fa9b1 93 ColNum = 7;
dpcinci 0:4005151fa9b1 94 }
dpcinci 0:4005151fa9b1 95 if(xPos > 5*ColEps && xPos < 7*ColEps){
dpcinci 0:4005151fa9b1 96 ColNum = 8;
dpcinci 0:4005151fa9b1 97 }
dpcinci 0:4005151fa9b1 98 if(xPos > 7*ColEps){
dpcinci 0:4005151fa9b1 99 ColNum = 9;
dpcinci 0:4005151fa9b1 100 }
dpcinci 0:4005151fa9b1 101
dpcinci 0:4005151fa9b1 102
dpcinci 0:4005151fa9b1 103
dpcinci 0:4005151fa9b1 104
dpcinci 0:4005151fa9b1 105 //Set row LEDs
dpcinci 0:4005151fa9b1 106
dpcinci 0:4005151fa9b1 107 if(RowNum ==1){
dpcinci 0:4005151fa9b1 108 rLight1 = 1;
dpcinci 0:4005151fa9b1 109 rLight2 = 0;
dpcinci 0:4005151fa9b1 110 rLight3 = 0;
dpcinci 0:4005151fa9b1 111 rLight4 = 0;
dpcinci 0:4005151fa9b1 112 }
dpcinci 0:4005151fa9b1 113
dpcinci 0:4005151fa9b1 114 if(RowNum ==2){
dpcinci 0:4005151fa9b1 115 rLight1 = 0;
dpcinci 0:4005151fa9b1 116 rLight2 = 1;
dpcinci 0:4005151fa9b1 117 rLight3 = 0;
dpcinci 0:4005151fa9b1 118 rLight4 = 0;
dpcinci 0:4005151fa9b1 119 }
dpcinci 0:4005151fa9b1 120
dpcinci 0:4005151fa9b1 121 if(RowNum ==3){
dpcinci 0:4005151fa9b1 122 rLight1 = 0;
dpcinci 0:4005151fa9b1 123 rLight2 = 0;
dpcinci 0:4005151fa9b1 124 rLight3 = 1;
dpcinci 0:4005151fa9b1 125 rLight4 = 0;
dpcinci 0:4005151fa9b1 126 }
dpcinci 0:4005151fa9b1 127
dpcinci 0:4005151fa9b1 128 if(RowNum ==4){
dpcinci 0:4005151fa9b1 129 rLight1 = 0;
dpcinci 0:4005151fa9b1 130 rLight2 = 0;
dpcinci 0:4005151fa9b1 131 rLight3 = 0;
dpcinci 0:4005151fa9b1 132 rLight4 = 1;
dpcinci 0:4005151fa9b1 133 }
dpcinci 0:4005151fa9b1 134 //set column leds
dpcinci 0:4005151fa9b1 135
dpcinci 0:4005151fa9b1 136 if(ColNum ==1){
dpcinci 0:4005151fa9b1 137 cLight1 = 1;
dpcinci 0:4005151fa9b1 138 cLight2 = 0;
dpcinci 0:4005151fa9b1 139 cLight3 = 0;
dpcinci 0:4005151fa9b1 140 cLight4 = 0;
dpcinci 0:4005151fa9b1 141 cLight5 = 0;
dpcinci 0:4005151fa9b1 142 cLight6 = 0;
dpcinci 0:4005151fa9b1 143 cLight7 = 0;
dpcinci 0:4005151fa9b1 144 }
dpcinci 0:4005151fa9b1 145
dpcinci 0:4005151fa9b1 146 if(ColNum ==2){
dpcinci 0:4005151fa9b1 147 cLight1 = 0;
dpcinci 0:4005151fa9b1 148 cLight2 = 1;
dpcinci 0:4005151fa9b1 149 cLight3 = 0;
dpcinci 0:4005151fa9b1 150 cLight4 = 0;
dpcinci 0:4005151fa9b1 151 cLight5 = 0;
dpcinci 0:4005151fa9b1 152 cLight6 = 0;
dpcinci 0:4005151fa9b1 153 cLight7 = 0;
dpcinci 0:4005151fa9b1 154 cLight8 = 0;
dpcinci 0:4005151fa9b1 155 cLight9 = 0;
dpcinci 0:4005151fa9b1 156 }
dpcinci 0:4005151fa9b1 157
dpcinci 0:4005151fa9b1 158 if(ColNum ==3){
dpcinci 0:4005151fa9b1 159 cLight1 = 0;
dpcinci 0:4005151fa9b1 160 cLight2 = 0;
dpcinci 0:4005151fa9b1 161 cLight3 = 1;
dpcinci 0:4005151fa9b1 162 cLight4 = 0;
dpcinci 0:4005151fa9b1 163 cLight5 = 0;
dpcinci 0:4005151fa9b1 164 cLight6 = 0;
dpcinci 0:4005151fa9b1 165 cLight7 = 0;
dpcinci 0:4005151fa9b1 166 cLight8 = 0;
dpcinci 0:4005151fa9b1 167 cLight9 = 0;
dpcinci 0:4005151fa9b1 168 }
dpcinci 0:4005151fa9b1 169
dpcinci 0:4005151fa9b1 170 if(ColNum ==4){
dpcinci 0:4005151fa9b1 171 cLight1 = 0;
dpcinci 0:4005151fa9b1 172 cLight2 = 0;
dpcinci 0:4005151fa9b1 173 cLight3 = 0;
dpcinci 0:4005151fa9b1 174 cLight4 = 1;
dpcinci 0:4005151fa9b1 175 cLight5 = 0;
dpcinci 0:4005151fa9b1 176 cLight6 = 0;
dpcinci 0:4005151fa9b1 177 cLight7 = 0;
dpcinci 0:4005151fa9b1 178 cLight8 = 0;
dpcinci 0:4005151fa9b1 179 cLight9 = 0;
dpcinci 0:4005151fa9b1 180 }
dpcinci 0:4005151fa9b1 181
dpcinci 0:4005151fa9b1 182 if(ColNum ==5){
dpcinci 0:4005151fa9b1 183 cLight1 = 0;
dpcinci 0:4005151fa9b1 184 cLight2 = 0;
dpcinci 0:4005151fa9b1 185 cLight3 = 0;
dpcinci 0:4005151fa9b1 186 cLight4 = 0;
dpcinci 0:4005151fa9b1 187 cLight5 = 1;
dpcinci 0:4005151fa9b1 188 cLight6 = 0;
dpcinci 0:4005151fa9b1 189 cLight7 = 0;
dpcinci 0:4005151fa9b1 190 cLight8 = 0;
dpcinci 0:4005151fa9b1 191 cLight9 = 0;
dpcinci 0:4005151fa9b1 192
dpcinci 0:4005151fa9b1 193 }
dpcinci 0:4005151fa9b1 194
dpcinci 0:4005151fa9b1 195 if(ColNum ==6){
dpcinci 0:4005151fa9b1 196 cLight1 = 0;
dpcinci 0:4005151fa9b1 197 cLight2 = 0;
dpcinci 0:4005151fa9b1 198 cLight3 = 0;
dpcinci 0:4005151fa9b1 199 cLight4 = 0;
dpcinci 0:4005151fa9b1 200 cLight5 = 0;
dpcinci 0:4005151fa9b1 201 cLight6 = 1;
dpcinci 0:4005151fa9b1 202 cLight7 = 0;
dpcinci 0:4005151fa9b1 203 cLight8 = 0;
dpcinci 0:4005151fa9b1 204 cLight9 = 0;
dpcinci 0:4005151fa9b1 205
dpcinci 0:4005151fa9b1 206 }
dpcinci 0:4005151fa9b1 207
dpcinci 0:4005151fa9b1 208 if(ColNum ==7){
dpcinci 0:4005151fa9b1 209 cLight1 = 0;
dpcinci 0:4005151fa9b1 210 cLight2 = 0;
dpcinci 0:4005151fa9b1 211 cLight3 = 0;
dpcinci 0:4005151fa9b1 212 cLight4 = 0;
dpcinci 0:4005151fa9b1 213 cLight5 = 0;
dpcinci 0:4005151fa9b1 214 cLight6 = 0;
dpcinci 0:4005151fa9b1 215 cLight7 = 1;
dpcinci 0:4005151fa9b1 216 cLight8 = 0;
dpcinci 0:4005151fa9b1 217 cLight9 = 0;
dpcinci 0:4005151fa9b1 218
dpcinci 0:4005151fa9b1 219 }
dpcinci 0:4005151fa9b1 220
dpcinci 0:4005151fa9b1 221 if(ColNum ==8){
dpcinci 0:4005151fa9b1 222 cLight1 = 0;
dpcinci 0:4005151fa9b1 223 cLight2 = 0;
dpcinci 0:4005151fa9b1 224 cLight3 = 0;
dpcinci 0:4005151fa9b1 225 cLight4 = 0;
dpcinci 0:4005151fa9b1 226 cLight5 = 0;
dpcinci 0:4005151fa9b1 227 cLight6 = 0;
dpcinci 0:4005151fa9b1 228 cLight7 = 0;
dpcinci 0:4005151fa9b1 229 cLight8 = 1;
dpcinci 0:4005151fa9b1 230 cLight9 = 0;
dpcinci 0:4005151fa9b1 231
dpcinci 0:4005151fa9b1 232 }
dpcinci 0:4005151fa9b1 233
dpcinci 0:4005151fa9b1 234 if(ColNum ==9){
dpcinci 0:4005151fa9b1 235 cLight1 = 0;
dpcinci 0:4005151fa9b1 236 cLight2 = 0;
dpcinci 0:4005151fa9b1 237 cLight3 = 0;
dpcinci 0:4005151fa9b1 238 cLight4 = 0;
dpcinci 0:4005151fa9b1 239 cLight5 = 0;
dpcinci 0:4005151fa9b1 240 cLight6 = 0;
dpcinci 0:4005151fa9b1 241 cLight7 = 0;
dpcinci 0:4005151fa9b1 242 cLight8 = 0;
dpcinci 0:4005151fa9b1 243 cLight9 = 1;
dpcinci 0:4005151fa9b1 244
dpcinci 0:4005151fa9b1 245 }
dpcinci 0:4005151fa9b1 246
dpcinci 0:4005151fa9b1 247
dpcinci 0:4005151fa9b1 248 // Set letter:
dpcinci 0:4005151fa9b1 249
dpcinci 0:4005151fa9b1 250
dpcinci 0:4005151fa9b1 251 if(LButton){
dpcinci 0:4005151fa9b1 252 if(RowNum == 1){
dpcinci 0:4005151fa9b1 253 if(ColNum == 1){
dpcinci 0:4005151fa9b1 254 letter = "q";
dpcinci 0:4005151fa9b1 255 }
dpcinci 0:4005151fa9b1 256 if(ColNum == 2){
dpcinci 0:4005151fa9b1 257 letter = "z";
dpcinci 0:4005151fa9b1 258 }
dpcinci 0:4005151fa9b1 259 if(ColNum == 3){
dpcinci 0:4005151fa9b1 260 letter = "x";
dpcinci 0:4005151fa9b1 261 }
dpcinci 0:4005151fa9b1 262 if(ColNum == 4){
dpcinci 0:4005151fa9b1 263 letter = "c";
dpcinci 0:4005151fa9b1 264 }
dpcinci 0:4005151fa9b1 265 if(ColNum == 5){
dpcinci 0:4005151fa9b1 266 letter = "v";
dpcinci 0:4005151fa9b1 267 }
dpcinci 0:4005151fa9b1 268 if(ColNum == 6){
dpcinci 0:4005151fa9b1 269 letter = "b";
dpcinci 0:4005151fa9b1 270 }
dpcinci 0:4005151fa9b1 271 if(ColNum == 7){
dpcinci 0:4005151fa9b1 272 letter = "n";
dpcinci 0:4005151fa9b1 273 }
dpcinci 0:4005151fa9b1 274 if(ColNum == 8){
dpcinci 0:4005151fa9b1 275 letter = "m";
dpcinci 0:4005151fa9b1 276 }
dpcinci 0:4005151fa9b1 277 if(ColNum == 9){
dpcinci 0:4005151fa9b1 278 letter = " ";
dpcinci 0:4005151fa9b1 279 }
dpcinci 0:4005151fa9b1 280 }
dpcinci 0:4005151fa9b1 281
dpcinci 0:4005151fa9b1 282 if(RowNum == 2){
dpcinci 0:4005151fa9b1 283 if(ColNum == 1){
dpcinci 0:4005151fa9b1 284 letter = "a";
dpcinci 0:4005151fa9b1 285 }
dpcinci 0:4005151fa9b1 286 if(ColNum == 2){
dpcinci 0:4005151fa9b1 287 letter = "s";
dpcinci 0:4005151fa9b1 288 }
dpcinci 0:4005151fa9b1 289 if(ColNum == 3){
dpcinci 0:4005151fa9b1 290 letter = "d";
dpcinci 0:4005151fa9b1 291 }
dpcinci 0:4005151fa9b1 292 if(ColNum == 4){
dpcinci 0:4005151fa9b1 293 letter = "f";
dpcinci 0:4005151fa9b1 294 }
dpcinci 0:4005151fa9b1 295 if(ColNum == 5){
dpcinci 0:4005151fa9b1 296 letter = "g";
dpcinci 0:4005151fa9b1 297 }
dpcinci 0:4005151fa9b1 298 if(ColNum == 6){
dpcinci 0:4005151fa9b1 299 letter = "h";
dpcinci 0:4005151fa9b1 300 }
dpcinci 0:4005151fa9b1 301 if(ColNum == 7){
dpcinci 0:4005151fa9b1 302 letter = "j";
dpcinci 0:4005151fa9b1 303 }
dpcinci 0:4005151fa9b1 304 if(ColNum == 8){
dpcinci 0:4005151fa9b1 305 letter = "k";
dpcinci 0:4005151fa9b1 306 }
dpcinci 0:4005151fa9b1 307 if(ColNum == 9){
dpcinci 0:4005151fa9b1 308 letter = "l";
dpcinci 0:4005151fa9b1 309 }
dpcinci 0:4005151fa9b1 310 }
dpcinci 0:4005151fa9b1 311
dpcinci 0:4005151fa9b1 312
dpcinci 0:4005151fa9b1 313 if(RowNum == 3){
dpcinci 0:4005151fa9b1 314 if(ColNum == 1){
dpcinci 0:4005151fa9b1 315 letter = "w";
dpcinci 0:4005151fa9b1 316 }
dpcinci 0:4005151fa9b1 317 if(ColNum == 2){
dpcinci 0:4005151fa9b1 318 letter = "e";
dpcinci 0:4005151fa9b1 319 }
dpcinci 0:4005151fa9b1 320 if(ColNum == 3){
dpcinci 0:4005151fa9b1 321 letter = "r";
dpcinci 0:4005151fa9b1 322 }
dpcinci 0:4005151fa9b1 323 if(ColNum == 4){
dpcinci 0:4005151fa9b1 324 letter = "t";
dpcinci 0:4005151fa9b1 325 }
dpcinci 0:4005151fa9b1 326 if(ColNum == 5){
dpcinci 0:4005151fa9b1 327 letter = "y";
dpcinci 0:4005151fa9b1 328 }
dpcinci 0:4005151fa9b1 329 if(ColNum == 6){
dpcinci 0:4005151fa9b1 330 letter = "u";
dpcinci 0:4005151fa9b1 331 }
dpcinci 0:4005151fa9b1 332 if(ColNum == 7){
dpcinci 0:4005151fa9b1 333 letter = "i";
dpcinci 0:4005151fa9b1 334 }
dpcinci 0:4005151fa9b1 335 if(ColNum == 8){
dpcinci 0:4005151fa9b1 336 letter = "o";
dpcinci 0:4005151fa9b1 337 }
dpcinci 0:4005151fa9b1 338 if(ColNum == 9){
dpcinci 0:4005151fa9b1 339 letter = "p";
dpcinci 0:4005151fa9b1 340 }
dpcinci 0:4005151fa9b1 341 }
dpcinci 0:4005151fa9b1 342
dpcinci 0:4005151fa9b1 343 if(RowNum == 4){
dpcinci 0:4005151fa9b1 344 if(ColNum == 1){
dpcinci 0:4005151fa9b1 345 letter = "1";
dpcinci 0:4005151fa9b1 346 }
dpcinci 0:4005151fa9b1 347 if(ColNum == 2){
dpcinci 0:4005151fa9b1 348 letter = "2";
dpcinci 0:4005151fa9b1 349 }
dpcinci 0:4005151fa9b1 350 if(ColNum == 3){
dpcinci 0:4005151fa9b1 351 letter = "3";
dpcinci 0:4005151fa9b1 352 }
dpcinci 0:4005151fa9b1 353 if(ColNum == 4){
dpcinci 0:4005151fa9b1 354 letter = "!";
dpcinci 0:4005151fa9b1 355 }
dpcinci 0:4005151fa9b1 356 if(ColNum == 5){
dpcinci 0:4005151fa9b1 357 letter = "?";
dpcinci 0:4005151fa9b1 358 }
dpcinci 0:4005151fa9b1 359 if(ColNum == 6){
dpcinci 0:4005151fa9b1 360 letter = ".";
dpcinci 0:4005151fa9b1 361 }
dpcinci 0:4005151fa9b1 362 if(ColNum == 7){
dpcinci 0:4005151fa9b1 363 letter = "+";
dpcinci 0:4005151fa9b1 364 }
dpcinci 0:4005151fa9b1 365 if(ColNum == 8){
dpcinci 0:4005151fa9b1 366 letter = "-";
dpcinci 0:4005151fa9b1 367 }
dpcinci 0:4005151fa9b1 368 if(ColNum == 9){
dpcinci 0:4005151fa9b1 369 letter = "=";
dpcinci 0:4005151fa9b1 370 }
dpcinci 0:4005151fa9b1 371 }
dpcinci 0:4005151fa9b1 372 }
dpcinci 0:4005151fa9b1 373
dpcinci 0:4005151fa9b1 374
dpcinci 0:4005151fa9b1 375 if(!LButton){
dpcinci 0:4005151fa9b1 376 if(RowNum == 1){
dpcinci 0:4005151fa9b1 377 if(ColNum == 1){
dpcinci 0:4005151fa9b1 378 letter = "Q";
dpcinci 0:4005151fa9b1 379 }
dpcinci 0:4005151fa9b1 380 if(ColNum == 2){
dpcinci 0:4005151fa9b1 381 letter = "Z";
dpcinci 0:4005151fa9b1 382 }
dpcinci 0:4005151fa9b1 383 if(ColNum == 3){
dpcinci 0:4005151fa9b1 384 letter = "X";
dpcinci 0:4005151fa9b1 385 }
dpcinci 0:4005151fa9b1 386 if(ColNum == 4){
dpcinci 0:4005151fa9b1 387 letter = "C";
dpcinci 0:4005151fa9b1 388 }
dpcinci 0:4005151fa9b1 389 if(ColNum == 5){
dpcinci 0:4005151fa9b1 390 letter = "V";
dpcinci 0:4005151fa9b1 391 }
dpcinci 0:4005151fa9b1 392 if(ColNum == 6){
dpcinci 0:4005151fa9b1 393 letter = "B";
dpcinci 0:4005151fa9b1 394 }
dpcinci 0:4005151fa9b1 395 if(ColNum == 7){
dpcinci 0:4005151fa9b1 396 letter = "N";
dpcinci 0:4005151fa9b1 397 }
dpcinci 0:4005151fa9b1 398 if(ColNum == 8){
dpcinci 0:4005151fa9b1 399 letter = "M";
dpcinci 0:4005151fa9b1 400 }
dpcinci 0:4005151fa9b1 401 if(ColNum == 9){
dpcinci 0:4005151fa9b1 402 letter = " ";
dpcinci 0:4005151fa9b1 403 }
dpcinci 0:4005151fa9b1 404 }
dpcinci 0:4005151fa9b1 405
dpcinci 0:4005151fa9b1 406 if(RowNum == 2){
dpcinci 0:4005151fa9b1 407 if(ColNum == 1){
dpcinci 0:4005151fa9b1 408 letter = "A";
dpcinci 0:4005151fa9b1 409 }
dpcinci 0:4005151fa9b1 410 if(ColNum == 2){
dpcinci 0:4005151fa9b1 411 letter = "S";
dpcinci 0:4005151fa9b1 412 }
dpcinci 0:4005151fa9b1 413 if(ColNum == 3){
dpcinci 0:4005151fa9b1 414 letter = "D";
dpcinci 0:4005151fa9b1 415 }
dpcinci 0:4005151fa9b1 416 if(ColNum == 4){
dpcinci 0:4005151fa9b1 417 letter = "F";
dpcinci 0:4005151fa9b1 418 }
dpcinci 0:4005151fa9b1 419 if(ColNum == 5){
dpcinci 0:4005151fa9b1 420 letter = "G";
dpcinci 0:4005151fa9b1 421 }
dpcinci 0:4005151fa9b1 422 if(ColNum == 6){
dpcinci 0:4005151fa9b1 423 letter = "H";
dpcinci 0:4005151fa9b1 424 }
dpcinci 0:4005151fa9b1 425 if(ColNum == 7){
dpcinci 0:4005151fa9b1 426 letter = "J";
dpcinci 0:4005151fa9b1 427 }
dpcinci 0:4005151fa9b1 428 if(ColNum == 8){
dpcinci 0:4005151fa9b1 429 letter = "K";
dpcinci 0:4005151fa9b1 430 }
dpcinci 0:4005151fa9b1 431 if(ColNum == 9){
dpcinci 0:4005151fa9b1 432 letter = "L";
dpcinci 0:4005151fa9b1 433 }
dpcinci 0:4005151fa9b1 434 }
dpcinci 0:4005151fa9b1 435
dpcinci 0:4005151fa9b1 436
dpcinci 0:4005151fa9b1 437 if(RowNum == 3){
dpcinci 0:4005151fa9b1 438 if(ColNum == 1){
dpcinci 0:4005151fa9b1 439 letter = "W";
dpcinci 0:4005151fa9b1 440 }
dpcinci 0:4005151fa9b1 441 if(ColNum == 2){
dpcinci 0:4005151fa9b1 442 letter = "E";
dpcinci 0:4005151fa9b1 443 }
dpcinci 0:4005151fa9b1 444 if(ColNum == 3){
dpcinci 0:4005151fa9b1 445 letter = "R";
dpcinci 0:4005151fa9b1 446 }
dpcinci 0:4005151fa9b1 447 if(ColNum == 4){
dpcinci 0:4005151fa9b1 448 letter = "T";
dpcinci 0:4005151fa9b1 449 }
dpcinci 0:4005151fa9b1 450 if(ColNum == 5){
dpcinci 0:4005151fa9b1 451 letter = "Y";
dpcinci 0:4005151fa9b1 452 }
dpcinci 0:4005151fa9b1 453 if(ColNum == 6){
dpcinci 0:4005151fa9b1 454 letter = "U";
dpcinci 0:4005151fa9b1 455 }
dpcinci 0:4005151fa9b1 456 if(ColNum == 7){
dpcinci 0:4005151fa9b1 457 letter = "I";
dpcinci 0:4005151fa9b1 458 }
dpcinci 0:4005151fa9b1 459 if(ColNum == 8){
dpcinci 0:4005151fa9b1 460 letter = "C";
dpcinci 0:4005151fa9b1 461 }
dpcinci 0:4005151fa9b1 462 if(ColNum == 9){
dpcinci 0:4005151fa9b1 463 letter = "P";
dpcinci 0:4005151fa9b1 464 }
dpcinci 0:4005151fa9b1 465 }
dpcinci 0:4005151fa9b1 466
dpcinci 0:4005151fa9b1 467 if(RowNum == 4){
dpcinci 0:4005151fa9b1 468 if(ColNum == 1){
dpcinci 0:4005151fa9b1 469 letter = "1";
dpcinci 0:4005151fa9b1 470 }
dpcinci 0:4005151fa9b1 471 if(ColNum == 2){
dpcinci 0:4005151fa9b1 472 letter = "2";
dpcinci 0:4005151fa9b1 473 }
dpcinci 0:4005151fa9b1 474 if(ColNum == 3){
dpcinci 0:4005151fa9b1 475 letter = "3";
dpcinci 0:4005151fa9b1 476 }
dpcinci 0:4005151fa9b1 477 if(ColNum == 4){
dpcinci 0:4005151fa9b1 478 letter = "!";
dpcinci 0:4005151fa9b1 479 }
dpcinci 0:4005151fa9b1 480 if(ColNum == 5){
dpcinci 0:4005151fa9b1 481 letter = "?";
dpcinci 0:4005151fa9b1 482 }
dpcinci 0:4005151fa9b1 483 if(ColNum == 6){
dpcinci 0:4005151fa9b1 484 letter = ".";
dpcinci 0:4005151fa9b1 485 }
dpcinci 0:4005151fa9b1 486 if(ColNum == 7){
dpcinci 0:4005151fa9b1 487 letter = "+";
dpcinci 0:4005151fa9b1 488 }
dpcinci 0:4005151fa9b1 489 if(ColNum == 8){
dpcinci 0:4005151fa9b1 490 letter = "-";
dpcinci 0:4005151fa9b1 491 }
dpcinci 0:4005151fa9b1 492 if(ColNum == 9){
dpcinci 0:4005151fa9b1 493 letter = "=";
dpcinci 0:4005151fa9b1 494 }
dpcinci 0:4005151fa9b1 495 }
dpcinci 0:4005151fa9b1 496 }
dpcinci 0:4005151fa9b1 497
dpcinci 0:4005151fa9b1 498
dpcinci 0:4005151fa9b1 499 if(!RButton){
dpcinci 0:4005151fa9b1 500 pc.printf("%s",letter);
dpcinci 0:4005151fa9b1 501 wait(0.3);
dpcinci 0:4005151fa9b1 502 }
dpcinci 0:4005151fa9b1 503
dpcinci 0:4005151fa9b1 504 wait(0.001);
dpcinci 0:4005151fa9b1 505 }
dpcinci 0:4005151fa9b1 506
dpcinci 0:4005151fa9b1 507 }