[color=Navy]#picaxe [/color][color=Black]18M2[/color]
[color=Navy]#no_data
#terminal 19200[/color]
[color=Blue]setfreq M16 [/color][color=Green]'// 16 MHz Needed for reliable serin @9600 baud [/color]
[color=Blue]pause [/color][color=Navy]2000 [/color][color=Green]'// Stabilize, Give terminal time to open[/color]
[color=Blue]symbol [/color][color=Purple]data_val [/color][color=DarkCyan]= [/color][color=Purple]B24[/color]
[color=Blue]Symbol [/color][color=Purple]chr1 [/color][color=DarkCyan]= [/color][color=Purple]b25[/color]
[color=Blue]symbol [/color][color=Purple]chr2 [/color][color=DarkCyan]= [/color][color=Purple]b26[/color]
[color=Blue]symbol [/color][color=Purple]ram_location [/color][color=DarkCyan]= [/color][color=Purple]b27 [/color][color=Green]'// last "B" variable with M2 chips
'// b0 to B23 are free to use[/color]
[color=Black]MAIN:[/color]
[color=Blue]do
serout b.6[/color][color=Black], [/color][color=Blue]T9600_16[/color][color=Black], [/color][color=Blue]([/color][color=Navy]$06[/color][color=Black],[/color][color=Navy]$32[/color][color=Black],[/color][color=Navy]$32[/color][color=Black],[/color][color=Navy]$FE[/color][color=Blue]) [/color][color=Green]'// Request RSSI data
[/color][color=Blue]serin b.6[/color][color=Black], [/color][color=Blue]T9600_16[/color][color=Black], [/color][color=Purple]b0[/color][color=Black],[/color][color=Purple]b1[/color][color=Black],[/color][color=Purple]b2[/color][color=Black],[/color][color=Purple]b3[/color][color=Black],[/color][color=Purple]b4[/color][color=Black],[/color][color=Purple]b5[/color][color=Black],[/color][color=Purple]b6[/color][color=Black],[/color][color=Purple]b7[/color][color=Black],[/color][color=Purple]b8[/color][color=Black],[/color][color=Purple]b9[/color][color=Black],[/color][color=Purple]b10[/color][color=Black],[/color][color=Purple]b11[/color][color=Black],[/color][color=Purple]b12[/color][color=Black],[/color][color=Purple]b13 [/color][color=Green]'// 14 bytes expected
[/color][color=Blue]gosub [/color][color=Black]Display_Data
[/color][color=Blue]pause [/color][color=Navy]4000 [/color]
[color=Blue]loop
[/color][color=Black]Display_Data:
[/color][color=Gray]{
[/color][color=Green]'Display Routine
[/color][color=Blue]sertxd (cr[/color][color=Black],[/color][color=Blue]lf) [/color][color=Green]'// newline for simulator
[/color][color=Blue]for [/color][color=Purple]ram_location [/color][color=DarkCyan]= [/color][color=Navy]0 [/color][color=Blue]to [/color][color=Navy]13 [/color][color=Green]'// This is where b0 - b13 reside in Ram
[/color][color=Blue]peek [/color][color=Purple]ram_location[/color][color=Black],[/color][color=Purple]data_val
[/color][color=Blue]gosub [/color][color=Black]dec2hex
[/color][color=Blue]sertxd ([/color][color=Red]"$"[/color][color=Black],[/color][color=Purple]chr1[/color][color=Black],[/color][color=Purple]Chr2[/color][color=Black],[/color][color=Red]" "[/color][color=Blue]) [/color][color=Green]'// Remove the $ if you don't want it displyed
[/color][color=Blue]next
sertxd (cr[/color][color=Black],[/color][color=Blue]lf)
pause [/color][color=Navy]1000
[/color][color=Blue]return
[/color][color=Gray]}
[/color][color=Black]DEC2HEX:[/color]
[color=Gray]{[/color]
[color=Green]'Hex Display Routine
'Necessary for any sub that begins with "display"[/color]
[color=Purple]chr1 [/color][color=DarkCyan]= [/color][color=Purple]data_val [/color][color=DarkCyan]/ [/color][color=Navy]$10 [/color][color=DarkCyan]+ [/color][color=Red]"0"[/color]
[color=Blue]If [/color][color=Purple]chr1 [/color][color=DarkCyan]> [/color][color=Red]"9" [/color][color=Blue]then [/color][color=Black]: [/color][color=Purple]chr1 [/color][color=DarkCyan]= [/color][color=Purple]chr1 [/color][color=DarkCyan]+ [/color][color=Navy]7 [/color][color=Black]: [/color][color=Blue]End If[/color]
[color=Purple]chr2 [/color][color=DarkCyan]= [/color][color=Purple]data_val [/color][color=DarkCyan]& [/color][color=Navy]$0F [/color][color=DarkCyan]+ [/color][color=Red]"0"[/color]
[color=Blue]If [/color][color=Purple]chr2 [/color][color=DarkCyan]> [/color][color=Red]"9" [/color][color=Blue]then [/color][color=Black]: [/color][color=Purple]chr2 [/color][color=DarkCyan]= [/color][color=Purple]chr2 [/color][color=DarkCyan]+ [/color][color=Navy]7 [/color][color=Black]: [/color][color=Blue]End If
return[/color]
[color=Gray]} [/color]