MediaPortal Forums HTPC/MediaCenter

Sponsored Ads

Go Back   MediaPortal Forum » MediaPortal 1 » Main Features (talk, share your ideas, get support) » Watch / Listen Media » MyTV - Engine 0.2 » Tips and Tricks
Reload this Page Script for Palmbutler
Register Forum Rules FAQDonate! Members List Show Groups Search Today's Posts Mark Forums Read

Tips and Tricks Post your Tips and Tricks in here.

Reply
 
LinkBack Thread Tools Display Modes
Old 2004-11-01, 10:57   #1 (permalink)
Portal Member
 
Join Date: Aug 2004
Posts: 10
Thanks: 0
Thanked 0 Times in 0 Posts


Default Script for Palmbutler
Hi,

for the people who would like to use the Palmbutler remote with MediaPortal. I made a script. You possibly have to change the directory path.
Filename = MP.PSM
---------------------------------------------------------------------------------------
<?xml version="1.0" encoding="UTF-16"?>

<Module>
<Name>MediaPortal</Name>
<Description>MediaPortal control</Description>
<RunWithShadow>true</RunWithShadow>
<ShadowOverride>true</ShadowOverride>
<Standalone>true</Standalone>
<?Script VBScript

?>
<Events>

<OnInitialization>
<?Script VBScript
Dim WshShell, bKey, hWnd, LResult
Set WshShell = CreateObject("WScript.Shell")
pbMenu.Visible = 0
WshShell.CurrentDirectory = ("C:\Programme\Team MediaPortal\MediaPortal\")
Set MP = Exec("C:\Programme\Team MediaPortal\MediaPortal\MediaPortal")
Sleep 4000
If not WshShell.AppActivate(MP.ProcessID) Then
MsgBox "App not activated", 0, ":-)"
End If


?>
</OnInitialization>
<OnFinalization>
<AppActivate WindowName="Media Portal"/>
<SendKeys Alt="true" Keys="{F4}"/>
<Sleep Time="100"/>
<SetMenuVisible>true</SetMenuVisible>
</OnFinalization>
<OnKeyBlue>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="s"/>
</OnKeyBlue>
<OnKeyGreen>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="X"/>
</OnKeyGreen>
<OnKeyRed>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys=" "/>
</OnKeyRed>
<OnKeyStar>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="*"/>
</OnKeyStar>
<OnKeyPlay>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{ }"/>
</OnKeyPlay>
<OnKeyStop>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="b"/>
</OnKeyStop>
<OnKeyNext>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{F8}"/>
</OnKeyNext>
<OnKeyRight>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Right}"/>
</OnKeyRight>
<OnKeyLeft>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Left}"/>
</OnKeyLeft>
<OnKeyUp>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Up}"/>
</OnKeyUp>
<OnKeyDown>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Down}"/>
</OnKeyDown>
<OnKeyEnter>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Enter}"/>
</OnKeyEnter>
<OnKeyVolUp>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="="/>
</OnKeyVolUp>
<OnKeyVolDown>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="-"/>
</OnKeyVolDown>
<OnKeyMenu>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="{Esc}"/>
</OnKeyMenu>
<OnKey0>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="0"/>
</OnKey0>
<OnKeyMute>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="Y"/>
</OnKeyMute>
<OnKey1>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="1"/>
</OnKey1>
<OnKey2>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="2"/>
</OnKey2>
<OnKey3>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="3"/>
</OnKey3>
<OnKey4>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="4"/>
</OnKey4>
<OnKey5>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="5"/>
</OnKey5>
<OnKey6>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="6"/>
</OnKey6>
<OnKey7>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="7"/>
</OnKey7>
<OnKey8>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="8"/>
</OnKey8>
<OnKey9>
<AppActivate WindowName="Media Portal"/>
<SendKeys Keys="9"/>
</OnKey9>
</Events>
</Module>
HTPC-Fan is offline   Reply With Quote
Old 2004-11-23, 04:33   #2 (permalink)
Anonymous
Guest
 
Posts: n/a


Default
Hey, I've been looking for something like this. (well, actually I've been looking for something that would circumvent that damned Palmbutler software completely, and just make the remote itself work directly with Girder or something like that.)
In absense of such a thing this will do.

However, I can't get it to work at all. Perhaps I should post this in the palmbutler forum, but that is all but dead.

When I try to run the script nothing happens. Just a green Palmbutler screen. No error messages or any sort of attempt to run the program at all. I have changed the path in the file to the correct one, but no cigar. Any idea what I might be doing wrong?

/Jacob Andersen
  Reply With Quote
Old 2004-12-19, 14:51   #3 (permalink)
Portal Member
 
Join Date: Aug 2004
Posts: 10
Thanks: 0
Thanked 0 Times in 0 Posts


Default
Hi Jacob,

I don't know any software that can replace the original one. I have heard that it is possible to use WinLIRC for the infrared version of Palmbutler. But it does not work at all for me. I can't train WinLIRC for the Palmbutler remote and furthermore, using the existing file of another guy is also without success.

I looked at the script again. Hm, if you have changed both directory paths, it should work. Please check following again:
WshShell.CurrentDirectory = ("C:\Programme\Team MediaPortal\MediaPortal\")
Hint: Please examine if you also put the backslash "\" at the end of directory name.

Set MP = Exec("C:\Programme\Team MediaPortal\MediaPortal\MediaPortal")
Hint: Second path to change. Cause it is calling the program, there is no
backslash there.

If all is correct, please inform me about the model of your Palmbutler as well as software version. Thanks

Regards
HTPC-Fan
HTPC-Fan is offline   Reply With Quote
Old 2005-03-02, 14:27   #4 (permalink)
Anonymous
Guest
 
Posts: n/a


Default
Hi

I've tried the script you wrote and I don't know why but it doesn't work. Only a green screen of Palmbutler. I have checked the path of Program and it's ok. I have Palmbutler 3000 with software 2.3.0. (I can't get any newer).
Can anyone help me?

Thank you
Kevin
  Reply With Quote
Old 2005-03-13, 15:07   #5 (permalink)
Anonymous
Guest
 
Posts: n/a


Default
Quote:
Originally Posted by Kevin41
Hi

I've tried the script you wrote and I don't know why but it doesn't work. Only a green screen of Palmbutler. I have checked the path of Program and it's ok. I have Palmbutler 3000 with software 2.3.0. (I can't get any newer).
Can anyone help me?

Thank you
Kevin
I have the same here, only a green palmbutler screen.
Do you have any sugestions? (HTPC-fan)

This is the change I made.


WshShell.CurrentDirectory = ("C:\Program Files\Team MediaPortal\MediaPortal\")
Set MP = Exec("C:\Program Files\Team MediaPortal\MediaPortal\MediaPortal")
Sleep 4000
If not WshShell.AppActivate(MP.ProcessID) Then
MsgBox "App not activated", 0, ""
End If
  Reply With Quote
Old 2005-03-18, 07:45   #6 (permalink)
Retired Team Member
 
Join Date: Sep 2004
Location: Finland
Posts: 174
Thanks: 0
Thanked 0 Times in 0 Posts


Default
Hmm, has this something to do wit h it. It appears in the middle of script.

CoolHammer
__________________
AMD Sempron 2400+ / ATI AIW 9000 Pro / Samsung 120Gb / Asus A7N8X-VM/400 / Windows XP pro Fi /LG 32LP1 LCD TV connected with DVI /Sony amp connected with S/PDIF
CoolHammer is offline   Reply With Quote
Old 2005-04-09, 20:17   #7 (permalink)
Anonymous
Guest
 
Posts: n/a


Default
My working (MediaPortal.psm) script looks like this.

Code:
<?xml version="1.0" encoding="UTF-16"?>
<Module>
	<Description>Media Portal</Description>
	<RunWithShadow>true</RunWithShadow>
	<ShadowOverride>true</ShadowOverride>
	<Standalone>false</Standalone>
	<?Script VBScript
		Dim MediaPortal, WshShell
		Set WshShell = CreateObject("WScript.Shell")
	?>
	<Events>
		
		<OnInitialization>
			<?Script VBScript
				Dim hWnd, LResult, URL
				URL=pbMenu.CurItem.URL
				pbMenu.Visible = false
				Set MediaPortal = Exec("%programfiles%\Team MediaPortal\MediaPortal\MediaPortal.exe "+URL)
				Sleep 200
			?>
		</OnInitialization> 
<OnFinalization> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Alt="true" Keys="{F4}"/> 
<Sleep Time="100"/> 
<SetMenuVisible>true</SetMenuVisible> 
</OnFinalization> 
<OnKeyBlue> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="s"/> 
</OnKeyBlue> 
<OnKeyGreen> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="X"/> 
</OnKeyGreen> 
<OnKeyRed> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys=" "/> 
</OnKeyRed> 
<OnKeyStar> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="*"/> 
</OnKeyStar> 
<OnKeyPlay> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{ }"/> 
</OnKeyPlay> 
<OnKeyStop> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="b"/> 
</OnKeyStop> 
<OnKeyNext> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{F8}"/> 
</OnKeyNext> 
<OnKeyRight> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Right}"/> 
</OnKeyRight> 
<OnKeyLeft> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Left}"/> 
</OnKeyLeft> 
<OnKeyUp> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Up}"/> 
</OnKeyUp> 
<OnKeyDown> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Down}"/> 
</OnKeyDown> 
<OnKeyEnter> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Enter}"/> 
</OnKeyEnter> 
<OnKeyVolUp> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="="/> 
</OnKeyVolUp> 
<OnKeyVolDown> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="-"/> 
</OnKeyVolDown> 
<OnKeyMenu> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="{Esc}"/> 
</OnKeyMenu> 
<OnKey0> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="0"/> 
</OnKey0> 
<OnKeyMute> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="Y"/> 
</OnKeyMute> 
<OnKey1> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="1"/> 
</OnKey1> 
<OnKey2> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="2"/> 
</OnKey2> 
<OnKey3> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="3"/> 
</OnKey3> 
<OnKey4> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="4"/> 
</OnKey4> 
<OnKey5> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="5"/> 
</OnKey5> 
<OnKey6> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="6"/> 
</OnKey6> 
<OnKey7> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="7"/> 
</OnKey7> 
<OnKey8> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="8"/> 
</OnKey8> 
<OnKey9> 
<AppActivate WindowName="Media Portal"/> 
<SendKeys Keys="9"/> 
</OnKey9> 
</Events> 
</Module>
  Reply With Quote
Old 2005-04-15, 21:25   #8 (permalink)
Anonymous
Guest
 
Posts: n/a


Default How to start Media Portal with this script?
Hi,
Can anyone tell me how I can start Media Portal with this Palmbutler script? Or how can I tell Media Portal to use this script?

I'm a newby to this can anyone please help?
  Reply With Quote
Old 2005-04-15, 23:58   #9 (permalink)
Portal Member
 
Join Date: Aug 2004
Posts: 10
Thanks: 0
Thanked 0 Times in 0 Posts


Default
Hello there,

it is really strange that it does not work. But I never tried with the old 2.3

On the other hand, I have to agree that the forum has modified the script a little bit...

Please change following line:
MsgBox "App not activated", 0, ""

to this one:
MsgBox "App not activated", 0, "Error"

Maybe, you can also tell me why you like to use version 2.3 resp. cannot get newer release.

Regards
HTPC-Fan
HTPC-Fan is offline   Reply With Quote
Reply

Bookmarks

« Previous Thread | Next Thread »
Thread Tools
Display Modes
Linear Mode Linear Mode

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
MyScript Clodo Plugins 33 2007-03-27 21:22
Is there a keymapping or script to open basic home screen? Peval General Support 0 2006-08-11 16:59
Overlapping programs cleanup script for TVGuide Dirk WebEPG 5 2006-07-18 01:18
Power script - Hauppauge Remote computer General Support 0 2005-12-20 17:23
Help needed to retrieve xml tvguide data tomtom21000 Tips and Tricks 8 2005-05-31 11:49


All times are GMT +1. The time now is 07:12.

Contact Us - MediaPortal - The Open Source Mediacenter - Archive - Top

Powered by vBulletin® Version 3.7.2
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO 3.2.0
Integrated by BBpixel ©2004-2008, jvbPlugin
Protected by Akismet Blog with WordPress