This is just a little Servo Pulse Code to monitor PPM Signals and output it to a Terminal Window via RS232 Comm's .9 to 2.0 PPM.
################################################## ##
'Defines
Define LOADER_USED 1
define osc 20
Include "modedefs.bas"

F1 con 6 'frequency input pin
W0 var word

loop:
Pulsin F1,1,W0 'Measure Input Pulse
w0 = (W0*/500) 'Some math to Convert from (mµ)Microseconds to (ms)Milliseconds

Serout2 portc.6,32,["ms= ", dec (w0/1000), ".", dec3 w0,13] 'Send Data out Port C pin 6 @ 19,200 Baud

pause 25 'Little Buffer to quite things down
Goto loop