ir.m 662 B

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. Ir: module
  2. {
  3. PATH: con "/dis/lib/ir.dis";
  4. SIMPATH: con "/dis/lib/irsim.dis";
  5. MPATH: con "/dis/lib/irmpath.dis";
  6. SAGEPATH: con "/dis/lib/irsage.dis";
  7. #
  8. # "standard" remote buttons
  9. #
  10. Zero: con 0;
  11. One: con 1;
  12. Two: con 2;
  13. Three: con 3;
  14. Four: con 4;
  15. Five: con 5;
  16. Six: con 6;
  17. Seven: con 7;
  18. Eight: con 8;
  19. Nine: con 9;
  20. ChanUP: con 10;
  21. ChanDN: con 11;
  22. VolUP: con 12;
  23. VolDN: con 13;
  24. FF: con 14;
  25. Rew: con 15;
  26. Up: con 16;
  27. Dn: con 17;
  28. Select: con 18;
  29. Power: con 19;
  30. Enter: con 20;
  31. Rcl: con 21;
  32. Record: con 22;
  33. Mute: con 23;
  34. #
  35. # Control
  36. #
  37. Error: con 9999;
  38. EOF: con -1;
  39. init: fn(c, p: chan of int): int;
  40. translate: fn(c: int): int;
  41. };