![](/media/cache/img/default_profile.jpg.50x50_q85.jpg)
with class
Dependencies: ISR_Mini-explorer mbed
Fork of VirtualForces by
Sonar.cpp@39:890439b495e3, 2017-06-16 (annotated)
- Committer:
- Ludwigfr
- Date:
- Fri Jun 16 10:40:53 2017 +0000
- Revision:
- 39:890439b495e3
- Parent:
- 38:5ed7c79fb724
last version with the 4th lab;
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
Ludwigfr | 33:814bcd7d3cfe | 1 | #include "Sonar.hpp" |
Ludwigfr | 33:814bcd7d3cfe | 2 | |
Ludwigfr | 34:c208497dd079 | 3 | #define PI 3.14159 |
Ludwigfr | 34:c208497dd079 | 4 | |
Ludwigfr | 38:5ed7c79fb724 | 5 | Sonar::Sonar(float angleFromCenter, float distanceXFromRobotCenter, float distanceYFromRobotCenter ){ |
Ludwigfr | 38:5ed7c79fb724 | 6 | this->angleFromCenter=angleFromCenter; |
Ludwigfr | 35:68f9edbb3cff | 7 | this->distanceX=distanceXFromRobotCenter; |
Ludwigfr | 35:68f9edbb3cff | 8 | this->distanceY=distanceYFromRobotCenter; |
Ludwigfr | 33:814bcd7d3cfe | 9 | this->maxRange=50;//cm |
Ludwigfr | 33:814bcd7d3cfe | 10 | this->minRange=10;//Rmin cm |
Ludwigfr | 33:814bcd7d3cfe | 11 | this->incertitudeRange=10;//cm |
Ludwigfr | 33:814bcd7d3cfe | 12 | this->angleRange=3.14159/3;//Omega rad |
Ludwigfr | 33:814bcd7d3cfe | 13 | } |
Ludwigfr | 33:814bcd7d3cfe | 14 | |
Ludwigfr | 38:5ed7c79fb724 | 15 | //return distance sonar to cell if in range, -1 if not |
Ludwigfr | 38:5ed7c79fb724 | 16 | float Sonar::isInRange(float xCell, float yCell, float xRobotWorld, float yRobotWorld, float thetaWorld){ |
Ludwigfr | 38:5ed7c79fb724 | 17 | float xSonar=xRobotWorld+this->distanceX; |
Ludwigfr | 38:5ed7c79fb724 | 18 | float ySonar=yRobotWorld+this->distanceY; |
Ludwigfr | 38:5ed7c79fb724 | 19 | float distanceCellToSonar=sqrt(pow(xCell-xSonar,2)+pow(yCell-ySonar,2)); |
Ludwigfr | 38:5ed7c79fb724 | 20 | |
Ludwigfr | 38:5ed7c79fb724 | 21 | //check if the distance between the cell and the robot is within the circle of range RADIUS_WHEELS |
Ludwigfr | 38:5ed7c79fb724 | 22 | if( distanceCellToSonar < this->maxRange){ |
Ludwigfr | 38:5ed7c79fb724 | 23 | //float anglePointToSonar=this->compute_angle_between_vectors(xCell,yCell,xSonar,ySonar);//angle beetween the point and the sonar beam |
Ludwigfr | 38:5ed7c79fb724 | 24 | float angleCellToSonar=atan2(yCell-yRobotWorld,xCell-xRobotWorld);//like world system |
Ludwigfr | 38:5ed7c79fb724 | 25 | |
Ludwigfr | 38:5ed7c79fb724 | 26 | float angleOriginToMidleOfBeam=thetaWorld+this->angleFromCenter;// |
Ludwigfr | 38:5ed7c79fb724 | 27 | |
Ludwigfr | 38:5ed7c79fb724 | 28 | float angleDifference=angleCellToSonar-angleOriginToMidleOfBeam; |
Ludwigfr | 38:5ed7c79fb724 | 29 | if(angleDifference > PI) |
Ludwigfr | 38:5ed7c79fb724 | 30 | angleDifference=angleDifference-2*PI; |
Ludwigfr | 38:5ed7c79fb724 | 31 | if(angleDifference < -PI) |
Ludwigfr | 38:5ed7c79fb724 | 32 | angleDifference=angleDifference+2*PI; |
Ludwigfr | 38:5ed7c79fb724 | 33 | //check if absolute difference between the angles is no more than Omega/2 |
Ludwigfr | 38:5ed7c79fb724 | 34 | if(angleDifference > 0 && angleDifference <= this->angleRange/2 ||angleDifference < 0 && angleDifference >= -this->angleRange/2 ){ |
Ludwigfr | 38:5ed7c79fb724 | 35 | return distanceCellToSonar; |
Ludwigfr | 38:5ed7c79fb724 | 36 | } |
Ludwigfr | 38:5ed7c79fb724 | 37 | } |
Ludwigfr | 38:5ed7c79fb724 | 38 | return -1; |
Ludwigfr | 38:5ed7c79fb724 | 39 | } |
Ludwigfr | 38:5ed7c79fb724 | 40 | |
Ludwigfr | 34:c208497dd079 | 41 | //function that check if a cell A(x,y) is in the range of the front sonar S(xs,ys) (with an angle depending on the sonar used, front 0, left PI/3, right -PI/3) returns the probability it's occuPIed/empty [0;1] |
Ludwigfr | 37:b4c45e43ad29 | 42 | float Sonar::compute_probability_t(float distanceObstacleDetected, float xCell, float yCell, float xRobotWorld, float yRobotWorld, float thetaWorld){ |
Ludwigfr | 34:c208497dd079 | 43 | float xSonar=xRobotWorld+this->distanceX; |
Ludwigfr | 34:c208497dd079 | 44 | float ySonar=yRobotWorld+this->distanceY; |
Ludwigfr | 34:c208497dd079 | 45 | float distancePointToSonar=sqrt(pow(xCell-xSonar,2)+pow(yCell-ySonar,2)); |
Ludwigfr | 37:b4c45e43ad29 | 46 | //check if the distance between the cell and the robot is within the circle of range RADIUS_WHEELS |
Ludwigfr | 33:814bcd7d3cfe | 47 | if( distancePointToSonar < this->maxRange){ |
Ludwigfr | 37:b4c45e43ad29 | 48 | //float anglePointToSonar=this->compute_angle_between_vectors(xCell,yCell,xSonar,ySonar);//angle beetween the point and the sonar beam |
Ludwigfr | 37:b4c45e43ad29 | 49 | float anglePointToSonar=atan2(yCell-yRobotWorld,xCell-xRobotWorld);//like world system |
Ludwigfr | 33:814bcd7d3cfe | 50 | |
Ludwigfr | 38:5ed7c79fb724 | 51 | float angleOriginToMidleOfBeam=thetaWorld+this->angleFromCenter;// |
Ludwigfr | 38:5ed7c79fb724 | 52 | |
Ludwigfr | 37:b4c45e43ad29 | 53 | float angleDifference=anglePointToSonar-angleOriginToMidleOfBeam; |
Ludwigfr | 38:5ed7c79fb724 | 54 | if(angleDifference > PI) |
Ludwigfr | 38:5ed7c79fb724 | 55 | angleDifference=angleDifference-2*PI; |
Ludwigfr | 38:5ed7c79fb724 | 56 | if(angleDifference < -PI) |
Ludwigfr | 38:5ed7c79fb724 | 57 | angleDifference=angleDifference+2*PI; |
Ludwigfr | 33:814bcd7d3cfe | 58 | //check if absolute difference between the angles is no more than Omega/2 |
Ludwigfr | 38:5ed7c79fb724 | 59 | if(angleDifference > 0 && angleDifference <= this->angleRange/2 ||angleDifference < 0 && angleDifference >= -this->angleRange/2 ){ |
Ludwigfr | 38:5ed7c79fb724 | 60 | |
Ludwigfr | 33:814bcd7d3cfe | 61 | if( distancePointToSonar < (distanceObstacleDetected - this->incertitudeRange)){ |
Ludwigfr | 33:814bcd7d3cfe | 62 | //point before obstacle, probably empty |
Ludwigfr | 33:814bcd7d3cfe | 63 | /*****************************************************************************/ |
Ludwigfr | 37:b4c45e43ad29 | 64 | float Ea=1.f-pow((2*angleDifference)/this->angleRange,2); |
Ludwigfr | 33:814bcd7d3cfe | 65 | float Er; |
Ludwigfr | 33:814bcd7d3cfe | 66 | if(distancePointToSonar < this->minRange){ |
Ludwigfr | 33:814bcd7d3cfe | 67 | //point before minimum sonar range |
Ludwigfr | 33:814bcd7d3cfe | 68 | Er=0.f; |
Ludwigfr | 33:814bcd7d3cfe | 69 | }else{ |
Ludwigfr | 33:814bcd7d3cfe | 70 | //point after minimum sonar range |
Ludwigfr | 33:814bcd7d3cfe | 71 | Er=1.f-pow((distancePointToSonar-this->minRange)/(distanceObstacleDetected-this->incertitudeRange-this->minRange),2); |
Ludwigfr | 33:814bcd7d3cfe | 72 | } |
Ludwigfr | 33:814bcd7d3cfe | 73 | /*****************************************************************************/ |
Ludwigfr | 33:814bcd7d3cfe | 74 | //if((1.f-Er*Ea)/2.f >1 || (1.f-Er*Ea)/2.f < 0) |
Ludwigfr | 37:b4c45e43ad29 | 75 | // pc.printf("\n\r return value=%f,Er=%f,Ea=%f,angleDifference=%f",(1.f-Er*Ea)/2.f,Er,Ea,angleDifference); |
Ludwigfr | 33:814bcd7d3cfe | 76 | return (1.f-Er*Ea)/2.f; |
Ludwigfr | 33:814bcd7d3cfe | 77 | }else{ |
Ludwigfr | 34:c208497dd079 | 78 | //probably occuPIed |
Ludwigfr | 33:814bcd7d3cfe | 79 | /*****************************************************************************/ |
Ludwigfr | 37:b4c45e43ad29 | 80 | float Oa=1.f-pow((2*angleDifference)/this->angleRange,2); |
Ludwigfr | 33:814bcd7d3cfe | 81 | float Or; |
Ludwigfr | 33:814bcd7d3cfe | 82 | if( distancePointToSonar <= (distanceObstacleDetected + this->incertitudeRange)){ |
Ludwigfr | 33:814bcd7d3cfe | 83 | //point between distanceObstacleDetected +- INCERTITUDE_SONAR |
Ludwigfr | 33:814bcd7d3cfe | 84 | Or=1-pow((distancePointToSonar-distanceObstacleDetected)/(this->incertitudeRange),2); |
Ludwigfr | 33:814bcd7d3cfe | 85 | }else{ |
Ludwigfr | 33:814bcd7d3cfe | 86 | //point after in range of the sonar but after the zone detected |
Ludwigfr | 33:814bcd7d3cfe | 87 | Or=0; |
Ludwigfr | 33:814bcd7d3cfe | 88 | } |
Ludwigfr | 33:814bcd7d3cfe | 89 | /*****************************************************************************/ |
Ludwigfr | 33:814bcd7d3cfe | 90 | //if((1+Or*Oa)/2 >1 || (1+Or*Oa)/2 < 0) |
Ludwigfr | 37:b4c45e43ad29 | 91 | // pc.printf("\n\r return value=%f,Er=%f,Ea=%f,angleDifference=%f",(1+Or*Oa)/2,Or,Oa,angleDifference); |
Ludwigfr | 33:814bcd7d3cfe | 92 | return (1+Or*Oa)/2; |
Ludwigfr | 33:814bcd7d3cfe | 93 | } |
Ludwigfr | 33:814bcd7d3cfe | 94 | } |
Ludwigfr | 33:814bcd7d3cfe | 95 | } |
Ludwigfr | 33:814bcd7d3cfe | 96 | //not checked by the sonar |
Ludwigfr | 33:814bcd7d3cfe | 97 | return 0.5; |
Ludwigfr | 33:814bcd7d3cfe | 98 | } |
Ludwigfr | 33:814bcd7d3cfe | 99 | |
Ludwigfr | 33:814bcd7d3cfe | 100 | //returns the angle between the vectors (x,y) and (xs,ys) |
Ludwigfr | 33:814bcd7d3cfe | 101 | float Sonar::compute_angle_between_vectors(float x, float y,float xs,float ys){ |
Ludwigfr | 33:814bcd7d3cfe | 102 | //alpha angle between ->x and ->SA |
Ludwigfr | 33:814bcd7d3cfe | 103 | //vector S to A ->SA |
Ludwigfr | 33:814bcd7d3cfe | 104 | float vSAx=x-xs; |
Ludwigfr | 33:814bcd7d3cfe | 105 | float vSAy=y-ys; |
Ludwigfr | 33:814bcd7d3cfe | 106 | //norme SA |
Ludwigfr | 33:814bcd7d3cfe | 107 | float normeSA=sqrt(pow(vSAx,2)+pow(vSAy,2)); |
Ludwigfr | 33:814bcd7d3cfe | 108 | //vector ->x (1,0) |
Ludwigfr | 33:814bcd7d3cfe | 109 | float cosAlpha=1*vSAy/*+0*vSAx*//normeSA;; |
Ludwigfr | 33:814bcd7d3cfe | 110 | //vector ->y (0,1) |
Ludwigfr | 33:814bcd7d3cfe | 111 | float sinAlpha=/*0*vSAy+*/1*vSAx/normeSA;//+0*vSAx; |
Ludwigfr | 33:814bcd7d3cfe | 112 | if (sinAlpha < 0) |
Ludwigfr | 33:814bcd7d3cfe | 113 | return -acos(cosAlpha); |
Ludwigfr | 33:814bcd7d3cfe | 114 | else |
Ludwigfr | 33:814bcd7d3cfe | 115 | return acos(cosAlpha); |
Ludwigfr | 33:814bcd7d3cfe | 116 | } |
Ludwigfr | 33:814bcd7d3cfe | 117 | |
Ludwigfr | 34:c208497dd079 | 118 | //makes the angle inAngle between 0 and 2PI |
Ludwigfr | 33:814bcd7d3cfe | 119 | float Sonar::rad_angle_check(float inAngle){ |
Ludwigfr | 33:814bcd7d3cfe | 120 | //cout<<"before :"<<inAngle; |
Ludwigfr | 33:814bcd7d3cfe | 121 | if(inAngle > 0){ |
Ludwigfr | 34:c208497dd079 | 122 | while(inAngle > (2*PI)) |
Ludwigfr | 34:c208497dd079 | 123 | inAngle-=2*PI; |
Ludwigfr | 33:814bcd7d3cfe | 124 | }else{ |
Ludwigfr | 33:814bcd7d3cfe | 125 | while(inAngle < 0) |
Ludwigfr | 34:c208497dd079 | 126 | inAngle+=2*PI; |
Ludwigfr | 33:814bcd7d3cfe | 127 | } |
Ludwigfr | 33:814bcd7d3cfe | 128 | //cout<<" after :"<<inAngle<<endl; |
Ludwigfr | 33:814bcd7d3cfe | 129 | return inAngle; |
Ludwigfr | 33:814bcd7d3cfe | 130 | } |
Ludwigfr | 33:814bcd7d3cfe | 131 |