Insteon PLM Ruby Code 760 - Revision history

RayBe: Added category: GSD

2016-07-03T09:30:02Z

Added category: GSD

←Older revision		Revision as of 09:30, 3 July 2016
Line 1:		Line 1:
	{{Versioninfo}}		{{Versioninfo}}
	[[category: Insteon]]		[[category: Insteon]]
			[[Category: GSD]]
	<pre>#### Written by Dan Damron		<pre>#### Written by Dan Damron
	#### #760 Send Command to Child ####		#### #760 Send Command to Child ####

Trippleg at 21:09, 8 March 2012

2012-03-08T21:09:20Z

←Older revision		Revision as of 21:09, 8 March 2012
Line 23:		Line 23:
	case pk_command		case pk_command
	when '192' #ON		when '192' #ON
	if chiltType ==~~2197~~ then #used when Device is Thermostat		if chiltType ==2198 then #used when Device is Thermostat
	param = {'Command' => 'SndIns',		param = {'Command' => 'SndIns',
	'Parameter1' => @insteonID[0],		'Parameter1' => @insteonID[0],
Line 45:		Line 45:
	when '193' #OFF		when '193' #OFF
	log("childtype:" +childtype.to_s)		log("childtype:" +childtype.to_s)
	if childtype == ~~2197~~ then #used when Device is Thermostat		if childtype == 2198 then #used when Device is Thermostat
	param = {'Command' => 'SndIns',		param = {'Command' => 'SndIns',
	'Parameter1' => @insteonID[0],		'Parameter1' => @insteonID[0],

Trippleg at 21:44, 28 February 2012

2012-02-28T21:44:49Z

←Older revision		Revision as of 21:44, 28 February 2012
Line 23:		Line 23:
	case pk_command		case pk_command
	when '192' #ON		when '192' #ON
	if chiltType ==~~2209~~ then #used when Device is Thermostat		if chiltType ==2197 then #used when Device is Thermostat
	param = {'Command' => 'SndIns',		param = {'Command' => 'SndIns',
	'Parameter1' => @insteonID[0],		'Parameter1' => @insteonID[0],
Line 45:		Line 45:
	when '193' #OFF		when '193' #OFF
	log("childtype:" +childtype.to_s)		log("childtype:" +childtype.to_s)
	if childtype == ~~2209~~ then #used when Device is Thermostat		if childtype == 2197 then #used when Device is Thermostat
	param = {'Command' => 'SndIns',		param = {'Command' => 'SndIns',
	'Parameter1' => @insteonID[0],		'Parameter1' => @insteonID[0],

Trippleg at 22:34, 24 February 2012

2012-02-24T22:34:18Z

←Older revision		Revision as of 22:34, 24 February 2012
Line 9:		Line 9:
	@command = pk_command		@command = pk_command
	@cmd = cmd		@cmd = cmd
			childType =device_.childdevices_[cmdTo].devtemplid_ # find out device type
			$cmdParams = cmd.params_

	log('#760:id=' + id.inspect)		log('#760:id=' + id.inspect)
Line 21:		Line 23:
	case pk_command		case pk_command
	when '192' #ON		when '192' #ON
	param = {'Command' => 'SndIns',		if chiltType ==2209 then #used when Device is Thermostat
	'Parameter1' => @insteonID[0],		param = {'Command' => 'SndIns',
	'Parameter2' => @insteonID[1],		'Parameter1' => @insteonID[0],
	'Parameter3' => @insteonID[2],		'Parameter2' => @insteonID[1],
	'Parameter4' => 'OF', # Flags		'Parameter3' => @insteonID[2],
	'Parameter5' => '11', # Insteon SetLevel		'Parameter4' => 'OF', # Flags
	'Parameter6' => 'FF'} # FULL ON		'Parameter5' => '6B', # Insteon Thermostat Control
	$cmdqueue << param		'Parameter6' => '06'} # ON
	SndIns()		else
			param = {'Command' => 'SndIns',
			'Parameter1' => @insteonID[0],
			'Parameter2' => @insteonID[1],
			'Parameter3' => @insteonID[2],
			'Parameter4' => 'OF', # Flags
			'Parameter5' => '11', # Insteon SetLevel
			'Parameter6' => 'FF'} # FULL ON
			end
			$cmdqueue << param
			SndIns()

	when '193' #OFF		when '193' #OFF
	param = {'Command' => 'SndIns',		log("childtype:" +childtype.to_s)
	'Parameter1' => @insteonID[0],		if childtype == 2209 then #used when Device is Thermostat
	'Parameter2' => @insteonID[1],		param = {'Command' => 'SndIns',
	'Parameter3' => @insteonID[2],		'Parameter1' => @insteonID[0],
	'Parameter4' => '0F',		'Parameter2' => @insteonID[1],
	'Parameter5' => '13', #OFF		'Parameter3' => @insteonID[2],
	'Parameter6' => '00'}		'Parameter4' => '0F',
	$cmdqueue << param		'Parameter5' => '6B',
	SndIns()		'Parameter6' => '09'} #OFF
			else #used when Device not Thermostat
			param = {'Command' => 'SndIns',
			'Parameter1' => @insteonID[0],
			'Parameter2' => @insteonID[1],
			'Parameter3' => @insteonID[2],
			'Parameter4' => '0F',
			'Parameter5' => '13', #OFF
			'Parameter6' => '00'}
			end
			$cmdqueue << param
			SndIns()

			#when '280' # Heat/Cool/Auto
			#log('Test Param:' +$cmdParams.to_s)
			#case $cmdParams.to_s
			#when '8H' # Heat Command
			#param = {'Command' => 'SndIns',
			#'Parameter1' => insteonID[0],
			#'Parameter2' => insteonID[1],
			#'Parameter3' => insteonID[2],
			#'Parameter4' => '0F',
			#'Parameter5' => '6B', # Indicates device is a Thermostat
			#'Parameter6' => '04'} # sets to Heat Mode
			#$cmdqueue << param
			# SndIns()

			#when '8C' # Cool Command
			#param = {'Command' => 'SndIns',
			#'Parameter1' => insteonID[0],
			#'Parameter2' => insteonID[1],
			#'Parameter3' => insteonID[2],
			#'Parameter4' => '0F',
			#'Parameter5' => '6B',
			#'Parameter6' => '05'} # Sets to Cool
			#$cmdqueue << param
			# SndIns()
			#when '8A' # Auto Command
			#param = {'Command' => 'SndIns',
			#'Parameter1' => insteonID[0],
			#'Parameter2' => insteonID[1],
			#'Parameter3' => insteonID[2],
			#'Parameter4' => '0F',
			#'Parameter5' => '6B',
			#'Parameter6' => '06'} # Sets to Auto
			#$cmdqueue << param
			#SndIns()


			#end

	when ''		when ''
	if parameters=='76'		if parameters=='76'
	#SetLevel 50%		#SetLevel 50%
	param = {'Command' => 'SndIns',		param = {'Command' => 'SndIns',
	'Parameter1' => @insteonID[0],		'Parameter1' => @insteonID[0],
	'Parameter2' => @insteonID[1],		'Parameter2' => @insteonID[1],
	'Parameter3' => @insteonID[2],		'Parameter3' => @insteonID[2],
	'Parameter4' => 'OF', # Flags		'Parameter4' => 'OF', # Flags
	'Parameter5' => '11', # Insteon SetLevel		'Parameter5' => '11', # Insteon SetLevel
	'Parameter6' => '76'} # 50%		'Parameter6' => '76'} # 50%
	$cmdqueue << param		$cmdqueue << param
	SndIns()		SndIns()
	end		end
	end		end


	</pre>		</pre>

Wierdbeard65 at 07:04, 3 May 2010

2010-05-03T07:04:42Z

←Older revision		Revision as of 07:04, 3 May 2010
Line 1:		Line 1:
			{{Versioninfo}}
	[[category: Insteon]]		[[category: Insteon]]
	<pre>#### Written by Dan Damron		<pre>#### Written by Dan Damron

Langstonius at 03:05, 21 June 2008

2008-06-21T03:05:25Z

←Older revision		Revision as of 03:05, 21 June 2008
Line 1:		Line 1:
			[[category: Insteon]]
	<pre>#### Written by Dan Damron		<pre>#### Written by Dan Damron
	#### #760 Send Command to Child ####		#### #760 Send Command to Child ####

Ddamron at 23:17, 11 March 2008

2008-03-11T23:17:18Z

←Older revision		Revision as of 23:17, 11 March 2008
Line 1:		Line 1:
	#### Written by Dan Damron		<pre>#### Written by Dan Damron
	#### #760 Send Command to Child ####		#### #760 Send Command to Child ####

Line 55:		Line 55:
	end		end
	end		end
			</pre>

Ddamron at 23:16, 11 March 2008

2008-03-11T23:16:38Z

←Older revision		Revision as of 23:16, 11 March 2008
Line 1:		Line 1:
	~~<pre>~~#### Written by Dan Damron		#### Written by Dan Damron
	#### #760 Send Command to Child ####		#### #760 Send Command to Child ####

Line 55:		Line 55:
	end		end
	end		end
	~~</pre>~~

Ddamron at 00:25, 6 January 2008

2008-01-06T00:25:01Z

New page

<pre>#### Written by Dan Damron
#### #760 Send Command to Child ####

@insteonID = id.chomp.split('.')
@parameters = parameters
@command = pk_command
@cmd = cmd

log('#760:id=' + id.inspect)
log('#760:parameters=' + parameters.inspect)
log('#760:pk_command=' + pk_command.inspect)
log('#760:cmd=' + cmd.inspect)
### ok, I get the insteonID in @insteonID
# pk_command has one of THREE values, 192, 193, or NOTHING
# when I click 50%, I get in parameters: 76
# but NOTHING in pk_command.

case pk_command
when '192' #ON
param = {'Command' => 'SndIns',
'Parameter1' => @insteonID[0],
'Parameter2' => @insteonID[1],
'Parameter3' => @insteonID[2],
'Parameter4' => 'OF', # Flags
'Parameter5' => '11', # Insteon SetLevel
'Parameter6' => 'FF'} # FULL ON
$cmdqueue << param
SndIns()

when '193' #OFF
param = {'Command' => 'SndIns',
'Parameter1' => @insteonID[0],
'Parameter2' => @insteonID[1],
'Parameter3' => @insteonID[2],
'Parameter4' => '0F',
'Parameter5' => '13', #OFF
'Parameter6' => '00'}
$cmdqueue << param
SndIns()

when ''
if parameters=='76'
#SetLevel 50%
param = {'Command' => 'SndIns',
'Parameter1' => @insteonID[0],
'Parameter2' => @insteonID[1],
'Parameter3' => @insteonID[2],
'Parameter4' => 'OF', # Flags
'Parameter5' => '11', # Insteon SetLevel
'Parameter6' => '76'} # 50%
$cmdqueue << param
SndIns()
end
end
</pre>