' Marauder software for the Rockwell TU-205 GPS ' Copyright 2009 Leigh L. Klotz, Jr. ' See file MIT-LICENSE.txt #picaxe 08m symbol TXOUT=1 symbol GPSIN=4 main: setfreq m8 output TXOUT input GPSIN high TXOUT 'on pause 2000 low TXOUT 'off pause 20 again: gosub getlon if b1=44 then goto again ' 44=comma gosub sendit gosub getlat 'if b1=44 then goto again ' 44=comma gosub sendit goto again getlon: serin GPSIN,T2400,("$GPGGA"),b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b2,b3,b4,b5,b6,b7,b8,b0,b0 b9=32 return getlat: serin GPSIN,T2400,("$GPGGA"),b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b1,b2,b3,b4,b5,b6,b7,b8,b9,b0,b0 return sendit: setfreq m4 high txout pause 1000 serout TXOUT,T2400,($AA,$AA,$AA,$AA,$AA,$AA,$F0,$0F,$41,$DF,$41,$DF,b0,b1,b2,b3,b4,b5,b6,b7,b8,b9) pause 1000 low TXOUT debug setfreq m8 return