Untitled

Func nroute_route_address($numeric, $alpha, $city, $prov)
			Send("!RA")
			WinActivate("Find Places")
			Send($numeric)
			Send("{TAB 2}")
			Send("{END}+{HOME}") ; Select City
			Send($city)
			Sleep(300)
			Send("{TAB}")
			Send("{END}+{HOME}") ; Select Prov
			Send($prov)
			Sleep(200)
			Send("{TAB}+{TAB}{TAB}") ; force Prov to be selected
			sleep(200)
			ControlClick("","",6282) ; click select street
			WinWait("Select Street")
			Send($alpha&"{TAB}{ENTER}")
			ControlClick("","","Button20")
EndFunc


Working version:

Func nroute_route_address($numeric, $alpha, $city, $prov)
	Send("!RA")
	WinActivate("Find Places")
	ControlClick("Find Places","","Button3")
	Sleep(200)
	ControlFocus("","","Edit1")
	Send($numeric)
	ControlFocus("","","Edit2")
	Send($city)
	Sleep(500)
	Send("{TAB}")
	Send($prov)
	Sleep(500)
	Send("{TAB}")
	ControlClick("","","Button1")
	WinWait("Select Street")
	ControlSetText("","","Edit2","1")
	ControlFocus("","","Edit1")
	Send($alpha)
	Sleep(1000)
	Send("{ENTER}")
	Sleep(200)
	ControlClick("","","Button2")
	For $i = 1 to 5
		Sleep(500)
		if(ControlCommand ("Find Places", "", "Button20", "IsEnabled", "")) Then
			$selected = ControlListView ("","","SysListView321","GetText",ControlListView ("","","SysListView321","GetSelected"))
			OSD($selected,2000)
			ControlClick("Find Places","","Button20")
			Return 1
		EndIf
	Next
	MsgBox(48,"No Address Found!", "No Address Found!", 2)
	ControlClick("","","Button21")
	Return 0
EndFunc