document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. bajar var portb.5
  2. subir var portb.4
  3. led var portb.3
  4. intensidad var BYTE
  5. indicador var bit
  6. intensidad=100
  7.  
  8. High led
  9. pause 500
  10. low led
  11.  
  12. inicio:
  13. PWM portb.0,intensidad,30
  14. low led
  15. if subir=0 then suma
  16. if bajar=0 then resta
  17. indicador=0
  18. GOTO inicio
  19.  
  20. suma:
  21. if intensidad> 249 then maximo
  22. if indicador=1 then inicio
  23. High led
  24. indicador=1
  25. intensidad=intensidad+25
  26. goto inicio
  27.  
  28. resta:
  29. if intensidad<26 then maximo
  30. if indicador=1 then inicio
  31. High led
  32. indicador=1
  33. intensidad=intensidad-25
  34. goto inicio
  35.  
  36. maximo:
  37. HIGH led
  38. goto inicio
  39. end
');