Bulek at 21:34, 29 June 2008

2008-06-29T21:34:57Z

←Older revision		Revision as of 21:34, 29 June 2008
Line 152:		Line 152:

	#89 Vol Up		#89 Vol Up
			log('Increasing volume from ' + @volume.to_s) cmd_313(@volume+1)


	</nowiki></pre>		</nowiki></pre>

Bulek at 21:33, 29 June 2008

2008-06-29T21:33:26Z

Show changes

Bulek at 14:14, 26 June 2008

2008-06-26T14:14:15Z

←Older revision		Revision as of 14:14, 26 June 2008
Line 1:		Line 1:

			Have moved working copy of Marantz Multiroom template to Marantz 5600 page in wiki. This is only a copy... Please go there for all info...


	==== 'Add Ruby snippets to commands'====		==== 'Add Ruby snippets to commands'====

Bulek at 14:13, 26 June 2008

2008-06-26T14:13:24Z

Show changes

Bulek at 23:38, 25 June 2008

2008-06-25T23:38:00Z

Show changes

Bulek at 23:35, 25 June 2008

2008-06-25T23:35:44Z

Show changes

Alx9r at 18:48, 23 June 2008

2008-06-23T18:48:18Z

←Older revision		Revision as of 18:48, 23 June 2008
Line 1:		Line 1:
			<pre><nowiki>
	Power		Power
	#193 Off		#193 Off
Line 274:		Line 275:
	SendMultiZoneCommand(cmd, ["@VOL:0"+level, "@MSV:0"+level, "@MVL:0"+level])		SendMultiZoneCommand(cmd, ["@VOL:0"+level, "@MSV:0"+level, "@MVL:0"+level])
	log("Sending Marantz : Set Volume Level to "+level+"\n")		log("Sending Marantz : Set Volume Level to "+level+"\n")
			</nowiki></pre>

Bulek: New page: Power #193 Off SendMultiZoneCommand(cmd, ["@PWR:1", "@MSP:1", "@MAM:2"]) #SendMultiZoneCommand(cmd, ["@AMT:2", "@MSP:1", "@MAM:2"]) #192 On SendMultiZoneCommand(cmd, ["@PWR:2", "@MSP:...

2008-06-18T09:05:11Z

New page: Power #193 Off SendMultiZoneCommand(cmd, ["@PWR:1", "@MSP:1", "@MAM:2"]) #SendMultiZoneCommand(cmd, ["@AMT:2", "@MSP:1", "@MAM:2"]) #192 On SendMultiZoneCommand(cmd, ["@PWR:2", "@MSP:...

New page

Power
#193 Off
SendMultiZoneCommand(cmd, ["@PWR:1", "@MSP:1", "@MAM:2"]) #SendMultiZoneCommand(cmd, ["@AMT:2", "@MSP:1", "@MAM:2"])

#192 On
SendMultiZoneCommand(cmd, ["@PWR:2", "@MSP:2", "@MAM:1"]) #SendMultiZoneCommand(cmd, ["@AMT:1", "@MSP:2", "@MAM:1"])

Inputs
#169 AM
SendMultiZoneCommand(cmd, ["@SRC:H", "@MSC:H", "@MSC:H"])

#164 Aux
SendMultiZoneCommand(cmd, ["@SRC:9", "@MSC:9", "@MSC:9"])

#172 Aux 2
SendMultiZoneCommand(cmd, ["@SRC:A", "@MSC:A", "@MSC:A"])

#162 CD
SendMultiZoneCommand(cmd, ["@SRC:C", "@MSC:C", "@MSC:C"])

#420 CDR
SendMultiZoneCommand(cmd, ["@SRC:D", "@MSC:D", "@MSC:D"])

#178 DSS
SendMultiZoneCommand(cmd, ["@SRC:4", "@MSC:4", "@MSC:4"])

#165 DVD
SendMultiZoneCommand(cmd, ["@SRC:2", "@MSC:2", "@MSC:2"])

#170 FM
SendMultiZoneCommand(cmd, ["@SRC:G", "@MSC:G", "@MSC:G"])

#160 Tape / Tape 1
SendMultiZoneCommand(cmd, ["@SRC:E", "@MSC:E", "@MSC:E"])

#166 Tuner
SendMultiZoneCommand(cmd, ["@SRC:F", "@MSC:F", "@MSC:F"])

#161 TV
SendMultiZoneCommand(cmd, ["@SRC:1", "@MSC:1", "@MSC:1"])

#282 VCR-1
SendMultiZoneCommand(cmd, ["@SRC:3", "@MSC:3", "@MSC:3"])

DSP Modes (Audio)
#891 All Ch Stereo
#<$"@SUR:0H\r"$> SendIrCommand("@SUR:0H")

Disk Handle
#48 Eject Disk

General
#190 Enter/Go

Internal
#373 Private Method Listing
def ReceiveReportCommand() buff = conn_.RecvDelimited("\r", 1000) print "Cmd response from Marantz: " + buff + "\n" log("Cmd response from Marantz: " + buff + "\n") end def SendIrCommand(command) conn_.Send(command+ "\r") log("Sending Command: " + command + "\n") ReceiveReportCommand() end def log(word) logTime = Time.now timeStr = logTime.strftime("%d-%m-%Y %H:%M:%S ") print( timeStr + " " + word) if( $logFile.nil? == false ) then $logFile.print( timeStr + " " + word ) $logFile.flush() end end def SendMultiZoneCommand(cmd, commandsArray, commandParam="") log("Got Command with ID: " + cmd.id_.to_s + " from: " + cmd.devidfrom_.to_s + " to: " + cmd.devidto_.to_s + "\n") zone = GetZone(cmd.devidto_) if( zone >= 0 and zone < commandsArray.size ) log("Determine zone for command : " + zone.to_s + "\n") SendIrCommand(commandsArray[zone] + commandParam.to_s) else log("SendMultiZoneCommand: invalid zone " + zone.to_s) end end def GetZone(deviceDestination) if( device_.mapDevice_PortChannel_.has_key?(deviceDestination) and device_.mapDevice_PortChannel_[deviceDestination] != nil and !device_.mapDevice_PortChannel_[deviceDestination].empty? ) return device_.mapDevice_PortChannel_[deviceDestination].to_i end return 0 end def ShowZones() log("####### Dev 2 PortChanel") device_.mapDevice_PortChannel_.each do |key, value| log(key.to_s + " => " + value.to_s) end log("======= PortChanel 2 Dev") device_.mapPortChannel_Device_.each do |key, value| log(key.to_s + " => " + value.to_s) end end

#351 Process IDLE

#350 Process Incoming Data
buff = conn_.RecvDelimited("\r", 1000) print "Info from Marantz: " + buff + "\n" log("Info from Marantz: " + buff + "\n")

#355 Process Initialize
$logFile = File.new("/var/log/pluto/Marantz_SR5600.log", "w") log("Initializing Marantz GSD Device\n") #<$"@AST:F\r"$> # max level of feedback SendIrCommand("@AST:F") #<$"@MPW:2\r"$> # multi room always on SendIrCommand("@MPW:2") #<$"@MSP:1\r"$> # turn multi room speakers off by default SendIrCommand("@MSP:1") #<$"@MAM:2\r"$> # mute multi room line out by default SendIrCommand("MAM:2") #<$"@VOL:0-20\r"$> # default main volume -20 SendIrCommand("@VOL:0-20") #<$"@MSV:0-60\r"$> # default multi speaker volume SendIrCommand("@MSV:0-60") #<$"@MVL:0-60\r"$> # default multi room line out volume SendIrCommand("@MVL:0-60") log("Initialization of Marantz GSD Device finished !!!!\n")

#384 Process Receive Command For Child

#356 Process Release
log("Shutting down Marantz GSD Device\n") SendIrCommand("@MAM:2") SendIrCommand("@MSP:1") log("Sending Marantz : Power Off: PWR:1\n") #<$"@PWR:1\r"</s></s>$> SendIrCommand("@PWR:1")

Misc
#587 Preset/Prog/Freq
identifier = cmd.params_[216] # Main volume "TFQ:0xxxxx" from 08700 till + 10800 # Multiroom Frequency “MTF:0xxxxx“ from 08700 till + 10800 # Multiroom Speakers “MTF:0xxxxx“ from 08700 till + 10800 # switch to tuner mode first SendMultiZoneCommand(cmd, ["@SRC:G", "@MSC:G", "@MSC:G"]) # tune to desired frequency SendMultiZoneCommand(cmd, ["@TFQ:0"+identifier, "@MTF:0"+identifier, "@MTF:0"+identifier]) log("Sending Marantz : Setting tuner frequency to "+identifier+"\n")

On-Screen Menu Navig
#240 Back / Prior Menu

#225 Display

#368 Help

#86 Menu (Show Menu)

#201 Move Down

#202 Move Left

#203 Move Right

#200 Move Up

Simple Control
#92 Pause

#139 Play

#102 Record

#64 Skip Back - Channel/Track Lower

#63 Skip Fwd - Channel/Track Greater

#95 Stop

Sound & Volume
#97 Mute
SendMultiZoneCommand(cmd, ["@AMT:0", "@MSM:0", "@MAM:0"])

#313 Set Volume
level = cmd.params_[76] # Main volume “VOL:0xxx” from - 99 till + 18 # Multiroom Speakers "MSV:0xxx" from - 99 till + 0 # Multiroom Speakers “MVL:0xxx” from - 99 till + 0 SendMultiZoneCommand(cmd, ["@VOL:0"+level, "@MSV:0"+level, "@MVL:0"+level]) log("Sending Marantz : Set Volume Level to "+level+"\n")

#90 Vol Down
SendMultiZoneCommand(cmd, ["@VOL:2", "@MSV:2", "@MVL:2"])

#89 Vol Up
SendMultiZoneCommand(cmd, ["@VOL:1", "@MSV:1", "@MVL:1"])

Speed Ctrl
#125 Scan Back/Rewind

#93 Scan Fwd/Fast Fwd

#98 Slow Scan Back

#99 Slow Scan Forward

DSP ModesDSP Mode commands not implemented: Dolby Digital, DTS Surround, Surround (Click to add)

def ReceiveReportCommand()
buff = conn_.RecvDelimited("\r", 1000)
print "Cmd response from Marantz: " + buff + "\n"
log("Cmd response from Marantz: " + buff + "\n")
end

def SendIrCommand(command)
conn_.Send(command+ "\r")
log("Sending Command: " + command + "\n")
ReceiveReportCommand()
end

def log(word)
logTime = Time.now
timeStr = logTime.strftime("%d-%m-%Y %H:%M:%S ")

print( timeStr + " " + word)
if( $logFile.nil? == false ) then
$logFile.print( timeStr + " " + word )
$logFile.flush()
end
end

def SendMultiZoneCommand(cmd, commandsArray, commandParam="")
log("Got Command with ID: " + cmd.id_.to_s + " from: " + cmd.devidfrom_.to_s + " to: " + cmd.devidto_.to_s + "\n")
zone = GetZone(cmd.devidto_)
if( zone >= 0 and zone < commandsArray.size )
log("Determine zone for command : " + zone.to_s + "\n")
SendIrCommand(commandsArray[zone] + commandParam.to_s)
else
log("SendMultiZoneCommand: invalid zone " + zone.to_s)
end
end

def GetZone(deviceDestination)
if( device_.mapDevice_PortChannel_.has_key?(deviceDestination) and
device_.mapDevice_PortChannel_[deviceDestination] != nil and
!device_.mapDevice_PortChannel_[deviceDestination].empty? )
return device_.mapDevice_PortChannel_[deviceDestination].to_i
end

return 0
end

def ShowZones()
log("####### Dev 2 PortChanel")
device_.mapDevice_PortChannel_.each do |key, value|
log(key.to_s + " => " + value.to_s)
end

log("======= PortChanel 2 Dev")
device_.mapPortChannel_Device_.each do |key, value|
log(key.to_s + " => " + value.to_s)
end
end

buff = conn_.RecvDelimited("\r", 1000)
print "Info from Marantz: " + buff + "\n"
log("Info from Marantz: " + buff + "\n")

$logFile = File.new("/var/log/pluto/Marantz_SR5600.log", "w")
log("Initializing Marantz GSD Device\n")

#<$"@AST:F\r"$> # max level of feedback
SendIrCommand("@AST:F")

#<$"@MPW:2\r"$> # multi room always on
SendIrCommand("@MPW:2")

#<$"@MSP:1\r"$> # turn multi room speakers off by default
SendIrCommand("@MSP:1")

#<$"@MAM:2\r"$> # mute multi room line out by default
SendIrCommand("MAM:2")

#<$"@VOL:0-20\r"$> # default main volume -20
SendIrCommand("@VOL:0-20")
#<$"@MSV:0-60\r"$> # default multi speaker volume
SendIrCommand("@MSV:0-60")
#<$"@MVL:0-60\r"$> # default multi room line out volume
SendIrCommand("@MVL:0-60")

log("Initialization of Marantz GSD Device finished !!!!\n")

log("Shutting down Marantz GSD Device\n")
SendIrCommand("@MAM:2")
SendIrCommand("@MSP:1")
log("Sending Marantz : Power Off: PWR:1\n")
#<$"@PWR:1\r"</s></s>$>
SendIrCommand("@PWR:1")

identifier = cmd.params_[216]
# Main volume "TFQ:0xxxxx" from 08700 till + 10800
# Multiroom Frequency “MTF:0xxxxx“ from 08700 till + 10800
# Multiroom Speakers “MTF:0xxxxx“ from 08700 till + 10800

# switch to tuner mode first
SendMultiZoneCommand(cmd, ["@SRC:G", "@MSC:G", "@MSC:G"])

# tune to desired frequency
SendMultiZoneCommand(cmd, ["@TFQ:0"+identifier, "@MTF:0"+identifier, "@MTF:0"+identifier])
log("Sending Marantz : Setting tuner frequency to "+identifier+"\n")

level = cmd.params_[76]
# Main volume “VOL:0xxx” from - 99 till + 18
# Multiroom Speakers "MSV:0xxx" from - 99 till + 0
# Multiroom Speakers “MVL:0xxx” from - 99 till + 0
SendMultiZoneCommand(cmd, ["@VOL:0"+level, "@MSV:0"+level, "@MVL:0"+level])
log("Sending Marantz : Set Volume Level to "+level+"\n")

User:Bulek - Revision history

Bulek at 21:34, 29 June 2008

Bulek at 21:33, 29 June 2008

Bulek at 14:14, 26 June 2008

Bulek at 14:13, 26 June 2008

Bulek at 23:38, 25 June 2008

Bulek at 23:35, 25 June 2008

Alx9r at 18:48, 23 June 2008

Bulek: New page: Power #193 Off SendMultiZoneCommand(cmd, ["@PWR:1", "@MSP:1", "@MAM:2"]) #SendMultiZoneCommand(cmd, ["@AMT:2", "@MSP:1", "@MAM:2"]) #192 On SendMultiZoneCommand(cmd, ["@PWR:2", "@MSP:...