Welcome to Synthiam!

Program robots using technologies created from industry experts. ARC is our free-to-use robot programming software that makes features like vision recognition, navigation and artificial intelligence easy.

Get Started
Canada
Asked — Edited

Why Doesn't This Script Work Any More?

I have just switched over to the new 3 port Ultrasonic Sensors and this script will no longer work. It's the one I used for the 4 port Ultrasonic Sensor. The script always Prints 2 no matter how close I get an object to the sensor.

Code:


$Center = GetPing(D11,D11)

$close = 40

:start
if($Center < $close)
print(1)
else
Print(2)
endif

Sleep(2000)
Goto(start)

I have tried a 4 port sensor and it won't work either. Was there a change that I missed?

AI Support Bot
Related Content
Synthiam
PRO
USA
#1  
@bhouston,

Try this:

Code:


$close = 40

#--- loop block ----
:start

#inside the loop
$Center = GetPing(D11,D11)

if ($Center < $close)
print(1)
ELSE
Print(2)
endif

Sleep(2000)

Goto(start)
#--- loop block ----
PRO
USA
#2  
I don't have a 3 wire Ping, the 4 wire is working.

Code:


:loop

# D21=Trigger=White
# D22=Echo=Green
$distance=GetPing(D21,D22)

print("Distance: " + $distance)

Sleep(1000)
Goto(loop)
#3  
Thanks Pedro, that worked. Copying and pasting got me on that one.