Updated Nav mod

[jinx]

This mod will activate the nav system with out any intervention by the ride.
I built this for under $10.00 but would probably cost most people under $20.00

Read the programming information to see all this mod does.

Sorry I am not very good at explaining things but I will try to answer any questions.


the following pic shows the ckt. in the Nav case in the trunk.

Code

Code: Select all

 ' Nav Lock out Over Ride for Honda GL1800 2006

' Installed Yes Oct.11, 2012

' Verson 1.2  
'
'  Oct 11,2012
'
'  added additional delay in the display command 
'  if the bike is moving.
'


' Verson 1.1  
'
'  Jun 02,2012
'
'   fixed problem with RVS input
'
' Verison 1.0
'
'  Sept. 29, 2011
'    
'   added map routine
'   added Dislpay routine
'
'
' Nav lock out Over Ride for the Honda GL1800
' Note this program on startup waits
' approx. 12 secs. then sends the map and enter
' codes to the nav board to acknowlage
' the Nav nag screen.
'
' If the bike starts moving before 12sec.then
' the program opens the speed sense line
' over riding the lockout and acknowlaging
' the nag screen. 

' If the bike is moving and the reverse (RVS) switch 
' on the handlebar is pressed the speed sense
' line is opened allowing the nav system to be accessed
' If the Reverse circuit malfunctions and holds the
' Reverse_Switch pin low or the RVS is pressed
' for too long while moving the timer times out
' and the Lockout override will be stopped until
' the Reverse_Switch pin goes high and then low again

' output C.1 is pin 6 the speed sense relay
' output C.2 is pin 5 the speed sense relay
' Input C.3 is pin 4 is the input for the
'         speed sense in line
' Input pin4 pin 3 is the RVS input 


'#COM3
#PICAXE 08M2

				

' ********************    Inputs   **********************************

symbol	 Speedsense_in  = C.3    'speed sense signal in IC pin 4
symbol	 Reverse_Switch = pin4   'Digital in   Reverse switch in IC pin 3


' ********************    Outputs  **********************************    

symbol	 speed_sense_out = C.1	' speed sense relay pin6
symbol       Serial_Line     = C.2  ' Serial Line relay pin 5 
symbol 	 Serial_Sting  = C.0	' Hserout pin 7


' ********************    Variables *********************************        

symbol	 Speed = b1		      ' Speed variable	 
symbol	 timer = w5			' Time for Reverse loop
symbol       timelimit = w6     	' Time limit for Reverse loop


'  ********************    Init  ************************************    :
	
let timelimit = 250         	  	' preload time out for Reverse loop
let pins = %00000000			' preset out puts to low 
Low Serial_line				' Close serial line relay
Low speed_sense_out	 		' Close Speedsense Relay  
						' Speed_sense_out close

setfreq M16	

hsersetup 208,%10010

Main:						' Run at startup
	   		
  pause 45000 				' wait 12 sec. 
  gosub moving    			' if moving open speed_sense relay
  gosub Map					' Map command routine
  gosub Enter				' Enter command routine
  gosub Display				' Display command routine
  Low Serial_line				' Close serial line relay
  Low speed_sense_out	 		' Close Speedsense Relay  
						
   

' The following loop allows access to the Nav while moving
' To activate this feature press the RVS button All the nav 
' features will be availible until the RVS button is released
' or the bike stops moving or the timelimit is meet..
' While this feature is used the position on the map will not be
' updated.


Lockout_Override:								' Main loop

   Do 
      If Reverse_Switch = 1 then					' RVS button pressed
          timer = 0							' reset time 
      else    
         Count Speedsense_in,1000, Speed				' Read Speed_sence_in C.4
         If Speed > 2  then  				            ' Moving
            gosub RVS_Override					' Override routine
         endif   
      endif
   loop
										
End										' End of main program


RVS_Override:
  
   Do until timer => timelimit 	
      Count Speedsense_in,1000, Speed				' Read Speed_sence_in C.4
      inc timer
      pause 20								' pause for timing
      If Speed > 2 and Reverse_Switch = 0 then 			' moving and Revese_Switch pressed
         high speed_sense_out						' Open Speedsense Relay
      else
         timer = timelimit						' Infinite loop override
         low speed_sense_out		                        ' Close Speedsense Relay  
         gosub Display							' Display command routine 
      endif
   loop
   low speed_sense_out		                        	' Close Speedsense Relay 	      		
 return


Moving:									' if moving open speed_sense relay

	Count Speedsense_in,1000, Speed				' Read Speed_sence_in C.4
	If Speed > 2 then 
	   High speed_sense_out 					' Open Speed_sense relay
	   pause 3000
	endif
return


' the following routines send button commands.

Map:
			
		high Serial_line						' Open serial line relay send signal to Nav
		pause 4000							' pause 1 millisec.
		
	      hserout  Serial_Sting,($10,$03,$10,$8A,$0C,$03,$00,$01,$CC,$82,$72,$12,$00,$F1,$F5,$F5)' Send Map command sting
	      hserout  Serial_Sting,($80,$39,$10,$03,$10,$8A,$0D,$04,$00,$01,$CC,$00,$00,$F9,$12,$00)
	      hserout  Serial_Sting,($F1,$F5,$F5,$80,$32,$10,$03,$10,$8A,$0D,$00,$00,$01,$CC,$15,$22)
	      hserout  Serial_Sting,($92,$12,$00,$F1,$F5,$F5,$80,$66,$10,$03,$10,$8A,$0C,$01,$00,$21)
      	hserout  Serial_Sting,($CC,$17,$01,$12,$00,$F1,$F5,$F5,$80,$F7,$10,$03,$10,$8A,$0C,$02)
            hserout  Serial_Sting,($00,$21,$CC,$37,$39,$12,$00,$F1,$F5,$F5,$80,$9E,$10,$03,$10,$8A)
            hserout  Serial_Sting,($0C,$03,$00,$21,$CC,$82,$72,$12,$00,$F1,$F5,$F5,$80,$19,$10,$03)
     	      hserout  Serial_Sting,($10,$8A,$0D,$04,$00,$21,$CC,$00,$00,$F9,$12,$00,$F1,$F5,$F5,$80)
   	      hserout  Serial_Sting,($12,$10,$03,$10,$8A,$0D,$00,$00,$21,$CC,$15,$22,$92,$12,$00,$F1)
     	      hserout  Serial_Sting,($F5,$F5,$80,$46,$10,$03,$10,$8A,$0C,$01,$00,$21,$CC,$17,$01,$12)
	      hserout  Serial_Sting,($00,$F1,$F5,$F5,$80,$F7,$10,$03,$10,$8A,$0C,$02,$00,$21,$CC,$37)
            hserout  Serial_Sting,($39,$12,$00,$F1,$F5,$F5,$80,$9E,$10,$03,$10,$8A,$0C,$03,$00,$21)
            hserout  Serial_Sting,($CC,$82,$72,$12,$00,$F1,$F5,$F5,$80,$19,$10,$03,$10,$8A,$0D,$04)
      	hserout  Serial_Sting,($00,$21,$CC,$00,$00,$F9,$12,$00,$F1,$F5,$F5,$80,$12,$10,$03,$10)
      	hserout  Serial_Sting,($8A,$0D,$00,$00,$21,$CC,$15,$22,$92,$12,$00,$F1,$F5,$F5,$80,$46)
     		hserout  Serial_Sting,($10,$03,$10,$8A,$0C,$01,$00,$21,$CC,$17,$01,$12,$00,$F1,$F5,$F5)
		hserout  Serial_Sting,($80,$F7,$10,$03,$10,$8A,$0C,$02,$00,$21,$CC,$37,$39,$12,$00,$F1)
		hserout  Serial_Sting,($F5,$F5,$80,$9E,$10,$03,$10,$8A,$0C,$03,$00,$01,$CC,$82,$72,$12)
		hserout  Serial_Sting,($00,$F1,$F5,$F5,$80,$39,$10,$03,$10,$8A,$0D,$04,$00,$01,$CC,$00)
		hserout  Serial_Sting,($00,$F9,$12,$00,$F1,$F5,$F5,$80,$32,$10,$03,$10,$8A,$0D,$00,$00)
		hserout  Serial_Sting,($01,$CC,$15,$22,$92,$12,$00,$F1,$F5,$F5,$80,$66,$10,$03,$10,$8A)
		hserout  Serial_Sting,($0C,$01,$00,$01,$CC,$17,$01,$12,$00,$F1,$F5,$F5,$80,$17,$10,$03)
		hserout  Serial_Sting,($10,$8A,$0C,$02,$00,$01,$CC,$37,$39,$12,$00,$F1,$F5,$F5,$80,$BE)
		
		pause 500							' pause 1 sec.
	      low Serial_line						' Close serial line relay
return

Enter:
		high Serial_line						' Open serial line relay
		pause 500							' pause 1 sec.	
		
		hserout  Serial_Sting, ($10,$8A,$0C,$01,$01,$01,$CC,$10,$10,$36,$12,$00,$F1,$F5)		' Send Enter command sting
		hserout  Serial_Sting, ($F5,$80,$E8,$10,$03,$10,$8A,$0C,$02,$01,$01,$CC,$30,$75,$12,$00)
		hserout  Serial_Sting, ($F1,$F5,$F5,$80,$88,$10,$03,$10,$8A,$0C,$03,$01,$01,$CC,$82,$72)										' Pause for .25 seconds
		hserout  Serial_Sting, ($12,$00,$F1,$F5,$F5,$80,$38,$10,$03,$10,$8A,$0D,$0A,$04,$01,$01)
		hserout  Serial_Sting, ($CC,$19,$00,$F9,$12,$00,$F1,$F5,$F5,$80,$18,$10,$03,$10,$8A,$0D)
		hserout  Serial_Sting, ($0A,$00,$01,$01,$CC,$15,$22,$26,$12,$00,$F1,$F5,$F5,$80,$D1,$10)
		hserout  Serial_Sting, ($03,$10,$8A,$0C,$01,$01,$01,$CC,$10,$10,$36,$12,$00,$F1,$F5,$F5)
		hserout  Serial_Sting, ($80,$E8,$10,$03,$10,$8A,$0C,$02,$01,$01,$CC,$30,$75,$12,$00,$F1)
		hserout  Serial_Sting, ($F5,$F5,$80,$88,$10,$03,$10,$8A,$0C,$03,$01,$01,$CC,$82,$72,$12)
		hserout  Serial_Sting, ($00,$F1,$F5,$F5,$80,$38,$10,$03,$10,$8A,$0D,$0A,$04,$01,$01,$CC)		
		hserout  Serial_Sting, ($19,$00,$F9,$12,$00,$F1,$F5,$F5,$80,$18,$10,$03,$10,$8A,$0D,$0A)		
		hserout  Serial_Sting, ($00,$00,$01,$CC,$15,$22,$26,$12,$00,$F1,$F5,$F5,$80,$D2,$10,$03)	

		pause 500							' pause 1 sec.
      	low Serial_line						' Close serial line relay
return		


Display:

		high Serial_line						' Open serial line relay
		
	      If Speed > 2 then 					' moving and Revese_Switch pressed
                pause 7500						' pause 4 sec.	
		else
		    pause 2500						' pause 1 sec.
		endif
		    
		hserout  Serial_Sting, ($10,$03,$10,$8A,$0C,$01,$00,$03,$CC,$14,$26,$12,$00,$F1,$F5,$F5)	' Send Display command sting
		hserout  Serial_Sting, ($80,$F3,$10,$03,$10,$8A,$0C,$02,$00,$03,$CC,$34,$64,$12,$00,$F1)		
		hserout  Serial_Sting, ($F5,$F5,$80,$94,$10,$03,$10,$8A,$0C,$03,$00,$03,$CC,$83,$04,$12)		
		hserout  Serial_Sting, ($00,$F1,$F5,$F5,$80,$A4,$10,$03,$10,$8A,$0D,$04,$00,$03,$CC,$00)	
		hserout  Serial_Sting, ($00,$F9,$12,$00,$F1,$F5,$F5,$80,$30,$10,$03,$10,$8A,$0D,$00,$00)
		hserout  Serial_Sting, ($03,$CC,$15,$22,$65,$12,$00,$F1,$F5,$F5,$80,$91,$10,$03,$10,$8A)
		hserout  Serial_Sting, ($0C,$01,$00,$03,$CC,$14,$26,$12,$00,$F1,$F5,$F5,$80,$F3,$10,$03)
		hserout  Serial_Sting, ($10,$8A,$0C,$02,$00,$03,$CC,$34,$64,$12,$00,$F1,$F5,$F5,$80,$94)
		hserout  Serial_Sting, ($10,$03,$10,$8A,$0C,$03,$00,$03,$CC,$83,$04,$12,$00,$F1,$F5,$F5)
		hserout  Serial_Sting, ($80,$A4,$10,$03,$10,$8A,$0D,$04,$00,$01,$CC,$00,$00,$F9,$12,$00)
		hserout  Serial_Sting, ($F1,$F5,$F5,$80,$32,$10,$03,$10,$8A,$0D,$00,$00,$01,$CC,$15,$22)
		hserout  Serial_Sting, ($65,$12,$00,$F1,$F5,$F5,$80,$93,$10,$03,$10,$8A,$0C,$01,$00,$01)
		hserout  Serial_Sting, ($CC,$14,$26,$12,$00,$F1,$F5,$F5,$80,$F5,$10,$03,$10,$8A,$0C,$02)
		hserout  Serial_Sting, ($00,$01,$CC,$34,$64,$12,$00,$F1,$F5,$F5,$80,$96,$10,$03,$10,$8A)
		hserout  Serial_Sting, ($0c,$03,$00,$01,$CC,$83,$04,$12,$00,$F1,$F5,$F5,$80,$A6,$10,$03)
		hserout  Serial_Sting, ($10,$8A,$0D,$04,$00,$01,$CC,$00,$00,$F9,$12,$00,$F1,$F5,$F5,$80)
		hserout  Serial_Sting, ($32)
	'	
		pause 500							' pause 1 sec.
      	low Serial_line						' Close serial line relay

[WingAdmin]

That's an interesting design - from what I see, it gets past the nag screen by first disconnecting the Nav's speed sensor. It then disconnects the keyboard serial line to the Nav and instead connects it to the PIC. It then sends the sequence that represents the "Map", "Enter" and then "Display" buttons, before reconnecting the serial line to the keyboard and the Nav's speed sensor.

You then wait to see if reverse button is pressed. When it is pressed, you look at the speed sensor to figure out of you are moving. If you are moving (which means you wouldn't normally press the reverse button), the navigation's speed sensor is disconnected, so it doesn't think you are moving. If you stop, or the reverse button is released, it disconnects the keyboard serial line to the Nav and instead connects it to the PIC. The PIC then sends the sequence that represents the "display" button. It then reconnects the keyboard to the Nav, reconnects the speed sensor, and exits.

If you leave the reverse button in for 250 seconds (I think?), even if you are still moving, it reconnects the speed sensor and exits - but the instant this happens, it detects that the reverse button is still in, you're still moving, and it goes back to the bypass routine.

Technically, you could probably simplify it by leaving out the PIC chip and simply disconnecting the speed sensor any time it saw the reverse button pressed - but that wouldn't give you the ability to skip past the nag screen, and allow the automatic "Display" presses.

Good job!

[jinx]

Close. The Main purpose of this mod is to activate the Nav, the Override is a bonus.
It does not disconnect the keyboard. There is no need it works in conjunction with the keyboard.
A few times I have forgotten the override was on and gotten the Fl error on the Display. The
\only way to stop the flashing is to turn off the ign. The time out avoids this problem.
Also the RVS line will be used as a low voltage sense. If the voltage drops below 10.5 v.
the Nav will reboot. It that case the mod would also re activate the Nav.

[WingAdmin]

Oh right, for some reason I saw the NC side of the serial relay connected to the keyboard line when I first looked at the schematic, don't know where I saw that, I was obviously seeing things!

From what I see in the code, if you are still moving with the RVS button in when it times out, it instantly goes back into the loop and re-disconnects the speed sensor, is that correct?

[jinx]

If the time out trips than the program goes back to the override loop but will not go back into Lockout Override
loop and stay there until the RVS button has been released and pressed again. If the Override times out the program assumes
you were in the Menu display and sends the Display command. This way the next time you stop of reactivate
the Lockout Override you will see the Map display instead of the Menu display.

For anyone looking at this it is really two mods in one . The first is the Nag screen acknowledge and the other is the
Lockout Override.

If all you want is the Lockout Override as WingAdmin stated just connect a relay into the reverse ckt of the bike.
There is a post on how to do this on this site .

I would like to state that using the Override while moving is very dangerous. I have used it but try to avoid doing
so if possible. If I use it it is normally to detour from a route when I can't pull over.

[jinx]

WingAdmin if you want to play with this program goto www.picaxe.com and download the Picaxe program editor its free.
Load the program and run the simulate. Just perset the RVS IC pin 3 High at start up.
If you would like I will post send you the code file.

[WingAdmin]

I've done PIC programming for many years, although mostly in C (and a bit of assembler). My PIC programmer is downstairs in a box somewhere now - most of what I do now is Arduino, with a built-in USB port that you can program directly into.

[Steve L]

What language are you guys speaking???

[Viking]

What language are you guys speaking???

the language is "programmer" and believe me, when they get to quarks and grinks, even they will not understand themselves,

Oh, by the way - jinx - have you decided to build and market these yet? I could install one, but it would be downright impossible for me to manufacture one.

[jinx]

Sorry no the liability is just to great on the lockout over ride part. There is some one that is rumored to be releasing a commercial version real soon
now but they have been saying that for over a year.

If you want something simple that will allow you to activate the nav while moving check out my other mod.

viewtopic.php?f=7&t=4837

[jinx]

To anyone who maybe thinking of building this mod you may want to hold off. I am working on a new version. If it works I will release it by the end of June 2013. The new version should be a lot easier to install. No guarantees but looks promising.

[TwoBrothersBusa]

Can't wait and thanks for your efforts!

To anyone who maybe thinking of building this mod you may want to hold off. I am working on a new version. If it works I will release it by the end of June 2013. The new version should be a lot easier to install. No guarantees but looks promising.

[charliektm400exc]

What language are you guys speaking???

the language is "programmer" and believe me, when they get to quarks and grinks, even they will not understand themselves, .

I think the "Programmers" might appreciate this

[trkpro]

GL1800-2008. You guys have me a little confused. I have an inline switch in the speed sensor line. If I just push in the RVS button with this switch open, will it then give me access to the Nav while moving. I think I've done the same thing you guys are talking about, but I got a little lost in the translation. Thanks guys, this stuff is great !!

[charliektm400exc]

To anyone who maybe thinking of building this mod you may want to hold off. I am working on a new version. If it works I will release it by the end of June 2013. The new version should be a lot easier to install. No guarantees but looks promising.

So I guess it didn't work as we have heard nothing.

[jinx]

Trkpro
yes if you have a 2008 then that will work but look at the RVS mod on this board. What you do is put a relay in the reverse circuit that
opens the speed sense line when the RVS switch is pressed. Also the mod in this post acknowledges the nag screen as well.

charliektm400exc
ran into a problem with the simplification but will continue to work on it. I now hope to have it completed this fall. Sorry for the delay
but I would wait if you can.


If you can't wait you can buy a mod that will acknowledge the nag when you first turn the key on for $130.00. It is not my work but works
similarly to mine but does not have the lockout over ride.

Sorry if I don't respond to post. I do not visit these sites very often anymore.

[charliektm400exc]

Thanks

I'll go the relay route, or hand around for your mod.

Don't think it's worth $130 just to avoid pressing a button.

[markak]

Hi,
I'd like to add a similar modification to my 2007; I inevitably forget to reset the nav when I stop at a store, and end up having to pull over to restart it. Very frustrating, and of dubious safety benefit (in my opinion).

However, I'd like to have a little better idea exactly what I'm modifying when I make the changes. I'm a semi-retired electrical engineer and may want to put my own spin on the solution. Can anyone tell me where to find a service manual for this model that includes the wiring diagram that includes the nav? I found a pdf of the service manual, but the one I found doesn't include the nav.

Thanks,
Mark