blink.rtb 1.2 KB

123456789101112131415161718192021222324252627282930
  1. // blink.rtb:
  2. // Blink program in Return to Basic
  3. //
  4. // Copyright (c) 2012-2013 Gordon Henderson. <projects@drogon.net>
  5. //**********************************************************************
  6. // This file is part of wiringPi:
  7. // https://projects.drogon.net/raspberry-pi/wiringpi/
  8. //
  9. // wiringPi is free software: you can redistribute it and/or modify
  10. // it under the terms of the GNU Lesser General Public License as published by
  11. // the Free Software Foundation, either version 3 of the License, or
  12. // (at your option) any later version.
  13. //
  14. // wiringPi is distributed in the hope that it will be useful,
  15. // but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  17. // GNU Lesser General Public License for more details.
  18. //
  19. // You should have received a copy of the GNU Lesser General Public License
  20. // along with wiringPi. If not, see <http://www.gnu.org/licenses/>.
  21. ***********************************************************************
  22. //
  23. PinMode (0, 1) // Output
  24. CYCLE
  25. DigitalWrite (0, 1) // Pin 0 ON
  26. WAIT (0.5) // 0.5 seconds
  27. DigitalWrite (0, 0)
  28. WAIT (0.5)
  29. REPEAT
  30. END