求arduino避障小车程序，急！（高额悬赏）

//舵机和超声波调试代码

#include <Servo.h>

#include <Metro.h>

Metro measureDistance = Metro(50)

Metro sweepServo = Metro(20)

unsigned long actualDistance = 0

Servo myservo //创建舵机

int pos = 60

int sweepFlag = 1

int URPWM = 3//PWM输出0－25000us，每50us代表1cm

int URTRIG= 10// PWM trigger pin PWM串口为10

uint8_t EnPwmCmd[4]={0x44,0x02,0xbb,0x01} // distance measure command 距离测量命令

void setup(){ // Serial initialization 串行初始化

myservo.attach(9) //舵机串口为9

Serial.begin(9600)// Sets the baud rate to 9600

SensorSetup()

}

void loop(){

if(measureDistance.check() == 1){

actualDistance = MeasureDistance()

// Serial.println(actualDistance)

// delay(100)

}

if(sweepServo.check() == 1){

servoSweep()

}

}

void SensorSetup(){

pinMode(URTRIG,OUTPUT)// A low pull on pin COMP/TRIG

digitalWrite(URTRIG,HIGH) // Set to HIGH

pinMode(URPWM, INPUT) // Sending Enable PWM mode command 发送使能控制模式命令

for(int i=0i<4i++){

Serial.write(EnPwmCmd[i])

}

}

int MeasureDistance(){// a low pull on pin COMP/TRIG triggering a sensor reading 触发传感器读数

digitalWrite(URTRIG, LOW)

digitalWrite(URTRIG, HIGH) // reading Pin PWM will output pulses读引脚脉宽调制将输出脉冲

unsigned long distance=pulseIn(URPWM,LOW)

if(distance==50000){ // the reading is invalid.阅读无效

Serial.print("Invalid")

}else{

distance=distance/50 // every 50us low level stands for 1cm

}

return distance

}

void servoSweep(){

if(sweepFlag ){

if(pos>=60 &&pos<=120){

pos=pos+1 // in steps of 1 degree 1度角度的转动

myservo.write(pos)// tell servo to go to position in variable 'pos' 告诉舵机转动的角度

}

if(pos>119) sweepFlag = false // assign the variable again 重新分配变量

}else {

if(pos>=60 &&pos<=120){

pos=pos-1

myservo.write(pos)

}

if(pos<61) sweepFlag = true

}

}

////////////////////////////////////////////////////////////

需要加载一个Metro.h的库，这只是调试机器，余下的完全看你的发挥了，加上电机

这是因为你程序里距离变量没改变，也就是说你上次进入if时距离变量一直保存着，所以程序自动一直进入if语句，改下程序，以前做小车也遇到过，就是只要进入设定距离，小车就一直停在那里没有动作，距离显示一直定格在当前距离，这个程序你用keil调试不了，因为你的超声波回波信号模拟不出来，那个一直停留在while(！echo)或者while(echo)里面，所以只有实践，调试，再实践

　方法一：利用PL/SQL Developer工具导出：

菜单栏---->Tools---->Export Tables，如下图，设置相关参数即可：

方法二：利用cmd的 *** 作命令导出，详情如下：

1:G:\Oracle\product\10.1.0\Client_1\NETWORK\ADMIN目录下有个tnsname.ora文件，内容如下：

复制代码 代码如下:

CMSTAR =

(DESCRIPTION =

(ADDRESS_LIST =

(ADDRESS = (PROTOCOL = TCP)(HOST = 172.18.13.200)(PORT = 1521))

)

(CONNECT_DATA =

(SERVICE_NAME = cmstar)

)

)

其中：CMSTAR为数据库名，HOST为IP地址，所以可以仿效上面的例子手动添加数据录连接。

2：用cmd进入命令行

输入：tnsping cmstar

就是测试172.18.13.200是否连接成功

3：导入与导出，如下：

---