Project

General

Profile

Statistics
| Revision:

root / branches / analog / code / projects / libdragonfly / rangefinder.c @ 1378

History | View | Annotate | Download (4.76 KB)

1 241 bcoltin
/**
2
 * Copyright (c) 2007 Colony Project
3
 *
4
 * Permission is hereby granted, free of charge, to any person
5
 * obtaining a copy of this software and associated documentation
6
 * files (the "Software"), to deal in the Software without
7
 * restriction, including without limitation the rights to use,
8
 * copy, modify, merge, publish, distribute, sublicense, and/or sell
9
 * copies of the Software, and to permit persons to whom the
10
 * Software is furnished to do so, subject to the following
11
 * conditions:
12
 *
13
 * The above copyright notice and this permission notice shall be
14
 * included in all copies or substantial portions of the Software.
15
 *
16
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
17
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
18
 * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
19
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
20
 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
21
 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
22
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
23
 * OTHER DEALINGS IN THE SOFTWARE.
24
 **/
25
26
27
/**
28
 * @file rangefinder.c
29
 * @brief Rangefinders
30
 *
31
 * Implementation of functions for rangefinder use.
32
 *
33
 * @author Colony Project, CMU Robotics Club
34
 **/
35
36 8 bcoltin
/*
37 380 jknichel
  Authors: James Kong and Greg Tress
38 8 bcoltin

39 380 jknichel
  Last Modified: 4/30/06 by James
40
  -Started log_distance conversion function !!!NOT COMPLETE!!!
41
  -Cleaning up comments
42 8 bcoltin

43 380 jknichel
  -----------------
44
  rangefinder.c
45
  Using Sharp GP2D02 IR Rangefinder
46 8 bcoltin

47 380 jknichel
  Vin is the input to the rangefinder, designated RANGE_CTRL.
48
  Vout is the output from the rangefinder, designated RANGE_IN# where # is the rangefinder you are reading from
49 8 bcoltin

50 380 jknichel
  Expected Initial Conditions:
51
  Vin is high and Vout should read high.
52 8 bcoltin

53 380 jknichel
  Usage:
54
  1.) Set Vin low. Vout should read low.
55
  2.) Wait for high on Vout.
56
  3.) Begin clocking Vin and reading 8 bits from Vout (MSB first).
57
  4.) Set Vin high for 2ms or more to turn off rangefinder
58 8 bcoltin

59
*/
60
61
#include "dragonfly_lib.h"
62
#include "rangefinder.h"
63
64
/*
65 380 jknichel
  read_distance returns the 8-bit reading from the rangefinder
66
  parameters:
67
  range_id - dio pin set as the rangefinder Vout [i.e. RANGE_IN0]
68 8 bcoltin

69 380 jknichel
  NOTE:
70
  The Sharp GD2D02 returns values on a decreasing logrithmic scale.
71 1372 alevkoy
  So higher values correspond to closer distances.  Use linearize_distance to convert to normal centimeter scale.
72
  Also, when reading distances closer than 8cm, the Sharp GD2D02 will return lower values than the values at 8cm.
73 380 jknichel
  At this point, we are only reading from one rangefinder [RANGE_IN0].
74 8 bcoltin
*/
75
76
// constants
77
/* Nasty IR approximation table
78 380 jknichel
   I'm using this for the heck of it.  We can do whatever.
79 8 bcoltin

80 380 jknichel
   Note the minimum value is .4V (20), and the maximum is 2.6V (133).
81
   Gives distance in mm.
82 8 bcoltin

83 380 jknichel
   excel formula(valid for inputs 20-133):  ROUND(2353.6*(E2^(-1.1146))*10,0)
84 8 bcoltin

85 380 jknichel
   This is only valid for the GP2D12, with objects directly ahead and more than
86
   10cm from the detector.  See the datasheet for more information.
87 8 bcoltin
*/
88
89
static int IR_dist_conversion[114] = {
90 380 jknichel
  800,791,751,714,681,651,623,597,574,552,531,512,494,478,462,447
91
  ,434,421,408,397,386,375,365,356,347,338,330,322,315,307,301,294
92
  ,288,282,276,270,265,260,255,250,245,241,237,232,228,224,221,217
93
  ,213,210,207,203,200,197,194,191,189,186,183,181,178,176,173,171
94
  ,169,166,164,162,160,158,156,154,152,151,149,147,145,144,142,140
95
  ,139,137,136,134,133,131,130,129,127,126,125,124,122,121,120,119
96
  ,118,117,115,114,113,112,111,110,109,108,107,106,105,105,104,103
97
  ,102,101
98 8 bcoltin
};
99
100
/**
101
 * @defgroup rangefinder Rangefinder
102
 * @brief Functions for using the IR rangefinders
103
 *
104
 * Functions for using the IR rangefinders.
105
 *
106
 * @{
107
 **/
108
109
/**
110
 * Initializes the rangefinders. This must be called before
111
 * range_read_distance.
112
 *
113
 * @see range_read_distance
114
 **/
115 338 bcoltin
void range_init(void)
116
{
117 380 jknichel
  digital_output(_PIN_B4,0);
118 8 bcoltin
}
119
120
/**
121
 * Reads the distance measured by one of the rangefinders.
122
 * This distance is in arbitrary units.
123
 *
124
 * @param range_id the rangefinder to use. This should be one
125
 * of the constants IR1 - IR5.
126
 *
127
 * @return the distance measured by the rangefinder
128
 *
129
 * @see range_init
130
 **/
131 1372 alevkoy
int range_read_distance(int range_id) {
132 380 jknichel
  return linearize_distance(analog8(range_id));
133 8 bcoltin
}
134
135 1372 alevkoy
/**
136
 * Transforms distance readings from logarithmic to linear scale.
137
 * This probably isn't the function you are looking for.
138
 *
139
 * @param value the 8-bit analog value from rangefinder
140
 *
141
 * @return linearized distance reading from rangefinder (integer in [101,800])
142
 **/
143 380 jknichel
int linearize_distance(int value) {
144
  if(value < MIN_IR_ADC8) {
145 8 bcoltin
    return -1;
146 380 jknichel
  } else if(value > MAX_IR_ADC8) {
147 8 bcoltin
    return -1;
148 380 jknichel
  } else {
149 8 bcoltin
    return IR_dist_conversion[value - MIN_IR_ADC8];
150
  }
151
}
152 1372 alevkoy
153
/** @} **/ //end defgroup