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