![](/media/cache/group/default_image.jpg.50x50_q85.jpg)
The servo version of SCRIBE
Dependencies: BLE_nRF8001 BNO055 HC_SR04_Ultrasonic_Library mbed-rtos mbed
Fork of SCRIBE_stepper by
main.cpp
- Committer:
- nibab
- Date:
- 2016-05-06
- Revision:
- 13:d49cb8b52a1e
- Parent:
- 12:01250ea24795
- Child:
- 14:82248fb06e53
File content as of revision 13:d49cb8b52a1e:
// main of SCRIBE servo // Import libraries #include "Arduino.h" #include "BLEPeripheral.h" #include "mbed.h" #include "rtos.h" #include "localization.h" #include "servo.h" Serial serial(USBTX, USBRX); //Analog In for ADC A0 -> p15 AnalogIn ain1(A0); AnalogIn ain2(A1); //Digital LED DigitalOut led1(LED1); DigitalOut led2(LED2); DigitalOut led3(LED3); DigitalOut led4(LED4); SPI spi(p11, p12, p13); DigitalInOut BLE_RDY(p21); DigitalInOut BLE_REQ(p22); DigitalInOut BLE_RESET(p23); unsigned char txbuf[16] = {0}; unsigned char txlen = 0; // create peripheral BLEPeripheral blePeripheral = BLEPeripheral(&BLE_REQ, &BLE_RDY, &BLE_RESET); // create service w/ uuid BLEService uartService = BLEService("713d0000503e4c75ba943148f18d941e"); // create characteristics BLECharacteristic txCharacteristic = BLECharacteristic("713d0002503e4c75ba943148f18d941e", BLENotify, 20); BLECharacteristic rxCharacteristic = BLECharacteristic("713d0003503e4c75ba943148f18d941e", BLEWriteWithoutResponse, 20); unsigned int interval = 0; unsigned char count_on = 0; int which_thread = 0; // array to save the values of the user const int size = 500; int path_x [size]; int path_y [size]; int path_p [size]; int counter = 0; int start = 0; const int shape_size = 10; double shape_x [shape_size]; double shape_y [shape_size]; int mode = -1; //default mode is idle int pmode = 1; //default pen is down //coordinates of the pen and the centre of SCRIBE at beginning double x_pen = 0; double y_pen = 0; double x_cent = 0; double y_cent = -1; //speed of SCRIBE float speed = 0.3; float t_factor = 0.15; Semaphore one_slot(1); localization L; osThreadId bluetooth_id, mover_id; void bluetooth_thread(void const *args){ bluetooth_id = Thread::gettid(); serial.printf("Serial begin!\r\n"); FILE *fp = fopen("/local/trial.m", "w"); if (fp == NULL) { serial.printf("ERROR: File open!\r\n"); } int x,y,x_dir,y_dir; int stroke = 0; /*----- BLE Utility ---------------------------------------------*/ // set advertised local name and service UUID blePeripheral.setLocalName("BLE Shield"); blePeripheral.setAdvertisedServiceUuid(uartService.uuid()); // add service and characteristic blePeripheral.addAttribute(uartService); blePeripheral.addAttribute(rxCharacteristic); blePeripheral.addAttribute(txCharacteristic); // begin initialization blePeripheral.begin(); /*---------------------------------------------------------------*/ serial.printf("BLE UART Peripheral begin!\r\n"); while(1) { BLECentral central = blePeripheral.central(); if (central) { // central connected to peripheral serial.printf("Connected to central\r\n"); while (central.connected()) { //serial.printf("*** Connected to bluetooth \r\n"); Thread::wait(1); // central still connected to peripheral if (rxCharacteristic.written()) { unsigned char rxlen = rxCharacteristic.valueLength(); const unsigned char *val = rxCharacteristic.value(); /*serial.printf("didCharacteristicWritten, Length: %d\r\n", rxlen); unsigned char i = 0; while(i<rxlen) { serial.printf("%d, ",val[i++]); } serial.printf("\r\n");*/ //determine mode of signal if(rxlen == 1){ // inputs blocked until shape finished if (mode != 13){ mode = (int) val[0]; if(mode != 4 && mode !=6){ serial.printf("Mode 1-val: %i\r\n",mode); osSignalClear(bluetooth_id,0x1); which_thread = 1; } } } if (mode == 6){ stroke = 0; serial.printf("Storing drawn coordinates\r\n"); serial.printf("x_coord = ["); for (int i = 0; i < size; i++) { serial.printf("%i ", path_x[i]); } serial.printf("];\n"); serial.printf("y_coord = ["); for (int i = 0; i < size; i++) { serial.printf("%i ", path_y[i]); } serial.printf("];\n"); } // stroke of pen finished if (mode == 7){ stroke = 1; serial.printf("Other threads can proceed \r\n"); osSignalClear(bluetooth_id,0x1); which_thread = 1; } if(rxlen == 5){ // in coordinates mode - accept negative coordinates if(mode != 4 && stroke == 0){ mode = 9; } // in draw mode - convert coordinates x = (int) val[0]*256 + val[1]; y = (int) val[2]*256 + val[3]; // putting values into array //serial.printf("try to put coordinates \r\n"); one_slot.wait(); if (counter == size){ serial.printf("Overwriting values \r\n"); counter = 0; } path_x[counter] = x; path_y[counter] = y; //check if pen needs to be up or down path_p[counter] = (int) val[4]; serial.printf("Pen mode: %i \r\n",path_p[counter]); counter++; one_slot.release(); if(mode == 9){ serial.printf("coordinate mode"); osSignalClear(bluetooth_id,0x1); which_thread = 1; } //serial.printf("put coordinates \r\n"); } } if(serial.readable()) { if(!count_on) { count_on = 1; } interval = 0; txbuf[txlen] = serial.getc(); txlen++; } if(count_on) // Count the interval after receiving a new char from terminate { interval++; } if(interval == 10) // If there is no char available last the interval, send the received chars to central. { interval = 0; count_on = 0; //serial.printf("Received from terminal: %d bytes\r\n", txlen); txCharacteristic.setValue((const unsigned char *)txbuf, txlen); txlen = 0; } } // central disconnected serial.printf("Disconnected from central\r\n"); } } } // incomplete int draw_circle(double radius){ float currAngle = L.getAngle(); if(radius >= 5){ int outer = (int) radius*0.6; int inner = (int) radius*0.2; } } void move_thread(void const *args){ int angle; double length = 8; double width = 8; int radius = 5; Timer t; //initally put pen down servo_reset(); servo_stop(); float currentAngle; float targetAngle; float startAngle; float diffAngle; int steps; int control; int restore = 0; int shape_count = 0; int p_mode; int first = 0; double draw_corr = 2; double time_factor = 0.05; double dot,a2,b2,c2; double x_tar,y_tar; double x_pen_pr, y_pen_pr, x_cent_pr, y_cent_pr, x_taro_pr, y_taro_pr; double cosg,gamma,distance,wait_t; double x_taro = 0; double y_taro = 0; serial.printf("Started move thread\r\n"); int newval = 0; //values for encoding int counter_l = 0; int on_l; int counter_r = 0; int on_r; double sum_r = 0; double sum_l = 0; double value_r; double value_l; float angle_init; float testAngle = L.getAngle(); while(1){ // check what mode is present serial.printf("Cylce \r\n"); serial.printf("mode: %i \r\n",mode); Thread::signal_wait(0x1); if(mode == -1){ serial.printf("here ends"); osSignalClear(mover_id,0x1); which_thread = 0; } //rectangle/square else if(mode == 0){ serial.printf("Draw rectangle \r\n"); //save old values and set initial x_pen_pr = x_pen; y_pen_pr = y_pen; x_cent_pr = x_cent; y_cent_pr = y_cent; x_taro_pr = x_taro; y_taro_pr = y_taro; x_pen = 0; y_pen = 0; x_cent = 0; y_cent = -1; x_taro = 0; y_taro = 0; //set values shape_x[4] = 0; shape_y[4] = length; shape_x[3] = width; shape_y[3] = length; shape_x[2] = width; shape_y[2] = 0; shape_x[1] = 0; shape_y[1] = 0; shape_x[0] = 0; shape_y[0] = 0.1; shape_count = 5; mode = 13; } else if(mode == 1){ serial.printf("Draw circle \r\n"); //call circle function control = draw_circle(radius); mode = -1; } else if(mode == 2){ serial.printf("Draw triangle \r\n"); //save old values and set initial x_pen_pr = x_pen; y_pen_pr = y_pen; x_cent_pr = x_cent; y_cent_pr = y_cent; x_taro_pr = x_taro; y_taro_pr = y_taro; x_pen = 0; y_pen = 0; x_cent = 0; y_cent = -1; x_taro = 0; y_taro = 0; //set values shape_x[3] = 0; shape_y[3] = length; shape_x[2] = width; shape_y[2] = 0; shape_x[1] = 0; shape_y[1] = 0; shape_x[0] = 0; shape_y[0] = 0.1; shape_count = 4; mode = 13; } else if(mode == 3){ serial.printf("Reset \r\n"); //set initial x_pen = 0; y_pen = 0; x_cent = 0; y_cent = -1; x_taro = 0; y_taro = 0; one_slot.wait(); counter = 0; start = 0; one_slot.release(); mode = -1; } else if (mode == 7){ if (first == 0){ serial.printf("Draw freely \r\n"); draw_corr = 1; } first = 1; } else if (mode == 9){ serial.printf("Draw coordinates \r\n"); draw_corr = 1; mode = -1; } // next coordinate is free drawing or coordinates if(shape_count == 0){ one_slot.wait(); if(counter != start){ if (start == size){ start = 0; } x_tar = (double) path_x[start]*draw_corr; y_tar = (double) path_y[start]*draw_corr; p_mode = path_p[start]; start++; if(start == counter){ mode = -1; } newval = 1; } one_slot.release(); } // next coordinate is shape else{ shape_count = shape_count - 1; x_tar = shape_x[shape_count]; y_tar = shape_y[shape_count]; p_mode = 1; newval = 1; //last move -> unblock input if(shape_count == 0){ restore = 1; mode = -1; } } if(newval == 1){ serial.printf("x-coord: %f, y-coord: %f\r\n",x_tar,y_tar); newval = 0; // same position -> do nothing if(x_tar == x_pen && y_tar == y_pen){ } else{ //compute angle and turn direction a2 = (x_pen - x_cent)*(x_pen - x_cent) + (y_pen - y_cent)*(y_pen - y_cent); b2 = (x_tar - x_pen)*(x_tar - x_pen) + (y_tar - y_pen)*(y_tar - y_pen); c2 = (x_tar - x_cent)*(x_tar - x_cent) + (y_tar - y_cent)*(y_tar - y_cent); cosg = (a2 + b2 - c2)/(2*sqrt(a2*b2)); gamma = acos(cosg)/3.14159*180; dot = (x_tar - x_cent)*(y_pen - y_cent) - (y_tar - y_cent)*(x_pen - x_cent); //serial.printf("Angle: %f \r\n",gamma); angle = ceil(180 - gamma); serial.printf("Turning angle: %i \r\n",angle); //put pen down if (p_mode == 1){ serial.printf("-- Pen Down\r\n"); L.servo(30); } //put pen up else if (p_mode == 0){ L.servo(45); serial.printf("-- Pen Up\r\n"); } currentAngle = L.getAngle(); if(dot > 0){ //serial.printf("Turn right \r\n"); targetAngle = fmod(currentAngle+angle,360); servo_right(); while(fmod(abs(L.getAngle() - targetAngle),360)> 5); servo_stop(); } else if(dot < 0){ //serial.printf("Turn left \r\n"); targetAngle = fmod(currentAngle-angle,360); servo_left(); while(fmod(abs(L.getAngle() - targetAngle),360)> 5); servo_stop(); } //compute length of path til target distance = sqrt((x_tar - x_pen)*(x_tar - x_pen) + (y_tar - y_pen)*(y_tar - y_pen)); //forward SCRIBE til target serial.printf("Distance to be taken: %f\r\n",distance); int counter_m = (int) rint(distance); // find position of wheels for (int i = 0; i < 100; i++){ sum_r += ain1.read(); sum_l += ain2.read(); } value_r = sum_r/100; value_l = sum_l/100; if(value_r < 0.93){ on_r = 0; } else{ on_r = 1; } if(value_l < 0.93){ on_l = 0; } else{ on_l = 1; } serial.printf("Initially: left: %d, right: %d\r\n",on_l,on_r); angle_init = L.getAngle(); servo_f(); serial.printf("Initial Angle: %f\r\n",angle_init); //start decrement counter counter_r = counter_m; counter_l = counter_m; while (counter_m > 0){ sum_r = 0; sum_l = 0; for (int i = 0; i < 100; i++){ sum_r += ain1.read(); sum_l += ain2.read(); } value_r = sum_r/100; value_l = sum_l/100; //printf("Value: %f\r\n",value); if(value_r < 0.93 && on_r == 1){ //printf("Value right: %f\r\n",value_r); on_r = 0; } else if (value_r > 0.95 && on_r == 0){ //printf("Value right: %f\r\n",value_r); on_r = 1; counter_r--; //printf("*** Right Counter is: %d\r\n",counter_r); } if(value_l < 0.93 && on_l == 1){ //printf("Value left: %f\r\n",value_l); on_l = 0; } else if (value_l > 0.95 && on_l == 0){ //printf("Value left: %f\r\n",value_l); on_l = 1; counter_l--; //printf("*** Left Counter is: %d\r\n",counter_l); } if(counter_l >= counter_r){ counter_m = counter_r; } else{ counter_m = counter_l; } //deviation left from path if(L.getAngle() - angle_init > 2 || (angle_init > 358 && L.getAngle() < 5 && (L.getAngle() + 360 - angle_init) > 2)){ servo_slowleft(); serial.printf("Angle Difference: %f\r\n",L.getAngle() - angle_init); while(fmod(abs(L.getAngle() - angle_init),360)> 1); servo_f(); } //deviation right from path if(angle_init - L.getAngle() > 2 ){ servo_slowright(); while(fmod(abs(L.getAngle() - angle_init),360)> 1); servo_f(); } //printf("*** Distance to take is: %d\r\n",counter_m); } //servo_f(); //wait(distance*time_factor); servo_stop(); //serial.printf("Reached destination \r\n"); //update pen and center when at target if(restore == 1){ serial.printf("Restore previous positions \r\n"); x_pen = x_pen_pr; y_pen = y_pen_pr; x_cent = x_cent_pr; y_cent = y_cent_pr; x_taro = x_taro_pr; y_taro = y_taro_pr; restore = 0; } else{ x_pen = x_tar; y_pen = y_tar; x_cent = x_taro; y_cent = y_taro; x_taro = x_tar; y_taro = y_tar; } } serial.printf("Update Pen: %f, %f \r\n",x_pen,y_pen); serial.printf("Update Center: %f, %f \r\n",x_cent,y_cent); } } } int main() { L.reset(); //L.servo(90); wait(1); serial.printf("Starting Dead-Reckoning\r\n"); //deadreckoning(); serial.printf("Starting the threads\r\n"); Thread bluetooth(bluetooth_thread); Thread move(move_thread); mover_id = move.gettid(); bluetooth_id = bluetooth.gettid(); while(1){ Thread::wait(3); if(which_thread == 0) bluetooth.signal_set(0x1); else move.signal_set(0x1); } }