API tools faq
paste
Guest User

Untitled

a guest
May 27th, 2018
85
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.85 KB | None | 0 0
raw download clone embed print report
  1. LOW MotorRight
  2. LOW MotorLeft
  3. PAUSE 100
  4.  
  5. PULSOUT MotorRight, 3000
  6. PULSOUT MotorLeft, 1000
  7. PAUSE 1000
  8. PULSOUT MotorRight, 2500
  9. PULSOUT MotorLeft, 2500
  10. PAUSE 1000
  11. PULSOUT MotorRight, 3000
  12. PULSOUT MotorLeft, 1000
  13. PAUSE 1000
  14. PULSOUT MotorRight, 2500
  15. PULSOUT MotorLeft, 2500
  16. PAUSE 1000
  17.  
  18. eyeRight VAR Bit
  19. eyeLeft VAR Bit
  20. FREQOUT ObsTxRight, 1, 38500
  21. eyeRight = ObsRx
  22. FREQOUT ObsTxLeft, 1, 38500
  23. eyeLeft = ObsRx
  24. IF (eyeRight = 0 OR eyeLeft = 0) THEN
  25. PULSOUT MotorRight, 1000
  26. PULSOUT MotorLeft, 1000
  27. PAUSE 1000
  28. ELSE
  29. PULSOUT MotorRight, 1500
  30. PULSOUT MotorLeft, 1500
  31. PAUSE 2000
  32. ENDIF
  33.  
  34. counter VAR Nib
  35. DO WHILE (counter < 3)
  36. PULSOUT MotorRight, 3000
  37. PULSOUT MotorLeft, 1000
  38. PAUSE 1000
  39. PULSOUT MotorRight, 1000
  40. PULSOUT MotorLeft, 3000
  41. PAUSE 1000
  42. counter = counter + 1
  43. LOOP
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!