This thread is dedicated to MortScripts that we use to change settings. Most of these can be stand alone scripts, but I got started creating this thread based on CHTS needing WMLongLife to change from Automatic to GSM radio profile. I found that WMLL seemed to eat up battery life in my old Fuze. I tried a script or two from the MortScript examples thread, but they did not work for me. I'll be posting various scripts that I use during my profile changes in CHTS, but I will in such a way that if you do not use CHTS you can still use the scripts.
Another purpose of this thread is to make these scripts available to those who for one reason or another the default programs in CHTS do not work and perhaps the script will. An example is sound profile changing to Automatic was not available so I added a script to do it for me. The feature had been turned off since it did not work in all phones. In a coming version I believe it will be back. The beta test works in my Fuze.
The hope of this thread is to help those that use CHTS to get some of the features that may not work on their phone through MortScripts instead. Also, as a place to share these "TOGGLE" switch scripts for others to be able to use outside CHTS.
I am trying to write scripts that do not use programs outside windows mobile. The hope is that they can be used in as many phones and ROMs as possible. An example is the first form of my Band_Changer used a program in CHTS and I reworked it to not require that program.
Radio toggle between Automatic (2G & 3G) and GSM (2G only): Post #2
Switch Sound Profile: Post #3
Auto time zone toggle: Post #5 and Post #8
Toggle Backlight: Post #14
Toggle Screen Rotation: Post #15
Toggle between Active Sync and Mass Storage: Post #16
Toggle Voice Command: Post #17
Radio toggle between Automatic (2G & 3G) and GSM (2G only)
This script calls the main script with the argument required based on your current profile to switch the profile to the other.
Code:
# Band_Toggle.mscr
opmode = RegRead( "HKLM","Software\OEM\UMTS","OpMode")
opmode = RegRead( "HKLM","Software\OEM\PhoneSetting\NetworkType","ItemName" & OpMode + 1)
If(opmode eq "Auto")
key = "g"
Else
key = "a"
EndIf
CallScript("\storage card\scripts\Band_Changer.mscr", key)
# CallScript("\windows\Band_Changer.mscr", key)
I test the script in my storage card, but when I use it for CHTS I would have it in \windows folder.
This is the main script:
Code:
# Band_Changer.mscr
If(NOT FileExists("\Windows\CMBandSwitching.exe"))
Message("You must have CMBandSwitching.exe installed in windows folder.^NL^^NL^Script will exit now.", "ERROR")
Exit
EndIf
key = argv[1]
key = (key eq "a")?"Auto":"GSM"
opmode = RegRead( "HKLM","Software\OEM\UMTS","OpMode")
opmode = RegRead( "HKLM","Software\OEM\PhoneSetting\NetworkType","ItemName" & OpMode + 1)
network1 = RegRead( "HKLM","Software\OEM\PhoneSetting\NetworkType","ItemName1" )
network2 = RegRead( "HKLM","Software\OEM\PhoneSetting\NetworkType","ItemName2" )
network3 = RegRead( "HKLM","Software\OEM\PhoneSetting\NetworkType","ItemName3" )
If(key ne OpMode)
If(key eq network1)
key = 1
ElseIf(key eq network2)
key = 2
ElseIf(key eq network3)
key = 3
Else
EndIf
Call("switcher")
EndIf
Sub switcher
Global(key)
SendSpecial(126) # Data disconnect
i=0
ForEach xvariable in regSubkeys("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections")
i+=1
enable[i] = RegRead("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections" \ xvariable, "Enabled")
EndForEach
Sleep(500)
ForEach xvariable in regSubkeys("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections")
RegWriteDWord("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections" \ xvariable, "Enabled", 0)
EndForEach
Sleep(500)
Run("\Windows\CMBandSwitching.exe")
If(ScreenHeight() eq 640)
Y1 = 160 # 1st button which is Auto on my Fuze 163
Y2 = 245 # 2nd button which is GSM on my Fuze 244
Y3 = 315 # 3rd button which is WCDMA on my Fuze 314
Y4 = 610 # Done button on my Fuze 608
X4 = 135 # Done button on my Fuze 134
Y5 = 460 # Done button on my Fuze 460
X5 = 125 # Done button on my Fuze 125
ElseIf(ScreenHeight() eq 800)
Y1 = 150 # 1st button which is Auto on HD2 150
Y2 = 200 # 2nd button which is GSM on HD2 200
Y3 = 305 # 3rd button which is WCDMA on HD2 305
Y4 = 750 # Done button on HD2 750
X4 = 110 # Done button on HD2 110
Y5 = 480 # Done button on HD2 480
X5 = 110 # Done button on HD2 110
EndIf
While(NOT WndActive("Band"))
Sleep(50)
EndWhile
If(key eq 1)
MouseClick("Band", ScreenWidth()*0.25, Y1) # 1st button
ElseIf(key eq 2)
MouseClick("Band", ScreenWidth()*0.25, Y2) # 2nd button
Else
MouseClick("Band", ScreenWidth()*0.25, Y3) # 3rd button
EndIf
Sleep(150)
SendSpecial(112) # Done
Sleep(500)
i=0
ForEach xvariable in regSubkeys("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections")
i+=1
RegWriteDWord("HKLM", "Comm\ConnMgr\Providers\{7C4B7A38-5FF7-4bc1-80F6-5DA7870BB1AA}\Connections" \ xvariable, "Enabled", enable[i])
EndForEach
Sleep(20000)
If(NOT Connected())
Connect("The Internet")
EndIf
EndSub
If you do not have a 480 x 640 or 480 x 800 phone or if this does not work for you please try this script to get me the points I need to improve this script.
Code:
# PickPoints.mscr
Run("\Windows\CMBandSwitching.exe")
WaitForActive("Band", 10)
Sleep(300)
SleepMessage( 2, "Select center of first (top) Network Type choice after this screen closes." )
Sleep(300)
aMouse = ScreenshotClick()
sMSGOutput1 = "^NL^First:^NL^X1 = " & aMouse[1] &"^NL^Y1 = " & aMouse[2]
SleepMessage( 2, "Select center of second (middle) Network Type choice after this screen closes." )
Sleep(300)
aMouse = ScreenshotClick()
sMSGOutput2 = "^NL^Second:^NL^X2 = " & aMouse[1] &"^NL^Y2 = " & aMouse[2]
SleepMessage( 2, "Select center of third (bottom) Network Type choice after this screen closes." )
Sleep(300)
aMouse = ScreenshotClick()
sMSGOutput3 = "^NL^Third:^NL^X3 = " & aMouse[1] &"^NL^Y3 = " & aMouse[2]
Sleep(300)
MouseClick("Band", aMouse[1], aMouse[2])
Sleep(300)
SleepMessage( 2, "Select center of Done button after this screen closes." )
Sleep(300)
aMouse = ScreenshotClick()
sMSGOutput4 = "^NL^Done:^NL^X4 = " & aMouse[1] &"^NL^Y4 = " & aMouse[2]
Sleep(300)
MouseClick("Band", aMouse[1], aMouse[2])
Sleep(1500)
SleepMessage( 2, "Select center of OK button after this screen closes." )
Sleep(300)
aMouse = ScreenshotClick()
sMSGOutput5 = "^NL^OK:^NL^X5 = " & aMouse[1] &"^NL^Y5 = " & aMouse[2]
SleepMessage( 2, "Select center of Cancel button after this screen closes." )
Sleep(3000)
WriteFile("\band_click.txt", "Screen width: " & ScreenWidth() & "^NL^Screen height: " & ScreenHeight() & sMSGOutput1 & sMSGOutput2 & sMSGOutput3 & sMSGOutput4 & sMSGOutput5)
Message("Please send me these data. They are saved in root directory \band_click.txt^NL^")
Remove the .txt from the end of the script files.
Switch Sound Profile
These scripts call the main script with the argument for the profile you want.
Code:
# Sound_Automatic.mscr
CallScript("\Windows\Sound_Profile.mscr", "Automatic")
Code:
# Sound_Normal.mscr
CallScript("\Windows\Sound_Profile.mscr", "Normal")
Code:
# Sound_Silent.mscr
CallScript("\Windows\Sound_Profile.mscr", "Silent")
Code:
# Sound_Vibrate.mscr
CallScript("\Windows\Sound_Profile.mscr", "Vibrate")
This is the main script:
Code:
# Sound_Profile.mscr
# Change Sound Profile based on argument used to call this script from
# a short script in the form:
# CallScript("\Windows\Sound_Profile.mscr", "Automatic")
mode=argv[1]
If(mode EQ "Automatic")
RegWriteString("HKCU", "ControlPanel\Profiles", "ActiveProfile", "Automatic")
SendMessage("", 1156, 0, 0)
ElseIf(mode EQ "Normal")
RegWriteString("HKCU", "ControlPanel\Profiles", "ActiveProfile", "Normal")
SendMessage("", 1156, 0, 0)
ElseIf(mode EQ "Silent")
SendMessage("", 1156, 3, 0)
ElseIf(mode EQ "Vibrate")
SendMessage("", 1156, 2, 0)
Else
EndIf
In CHTS profile switching I use the Execute/Kill App(s) section with the executable as \windows\mortscript.exe and the argument one of these four:
\Windows\Sound_Profile.mscr Automatic
\Windows\Sound_Profile.mscr Normal
\Windows\Sound_Profile.mscr Silent
\Windows\Sound_Profile.mscr Vibrate
Remove the .txt from the end of the script files.
This isn't written as a toggle, but these scripts will turn off or on the auto-time zone sync option in phone settings. Turning it off helps to keep active sync from running all the time.
Code:
#Auto time zone off
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",0)
Code:
#Auto time zone on
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",1)
Auto time zone toggle
Thanks Farmer Ted
It is easy enough to create a toggle.
Code:
If(RegRead("HKLM","\Drivers\BuiltIn\RIL","NITZEnable"))
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",0) #Auto time zone off
Else
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",1) #Auto time zone on
EndIf
Thx RoryB... toggle features are good... if you can store all here.. it must be a good base to share with communauty !
great job my friend! especially after the long test time in beta group to fulfill different device's needs.
this is the perfect extension for the post-run-scripts while profile switching.
I'm looking forward to much more of this scripts, which can be used.
Thanx also in name of all CHTS-users
Micha
RoryB said:
Thanks Farmer Ted
It is easy enough to create a toggle.
Click to expand...
Click to collapse
Cool, that was a lot simpler than if I'd done it, lol. Here's the same script, with message boxes to let you know what the setting is.
Code:
If(RegRead("HKLM","\Drivers\BuiltIn\RIL","NITZEnable"))
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",0) #Auto time zone off
Message("Active Sync under control")
Else
RegWriteDWord("HKLM","\Drivers\BuiltIn\RIL","NITZEnable",1) #Auto time zone on
Message("Active Sync running wild")
EndIf
LOL I love a sense of humor.
I updated post #2 for the Band Changer because I have been getting failed to connect or dialed modem not answering error messages.
RoryB said:
I updated post #2 for the Band Changer because I have been getting failed to connect or dialed modem not answering error messages.
Click to expand...
Click to collapse
Made another tweak to stop data connection first.
Updated Post #2 for Band_Changer.mscr. It seems to run a little faster.
On Band_Changer I realized that
Code:
Y1 = 150 # 1st button which is Auto on HD2 150
Y2 = 215 # 2nd button which is GSM on HD2 200
Y3 = 300 # 3rd button which is WCDMA on HD2 305
works in my phone too. So I would not need to check the screen size, but I am running Energy ROM that is a WVGA with tweaks to work on my VGA. I need to get some pick point data from anyone who uses a true VGA ROM in their phone to confirm the points for it. Also, a screen shot of CMBandSwitcher.exe would help a lot.
If CMBandSwitcher.exe has the same screen size for WVGA and VGA phones I will be able to reduce the code some more.
Toggle Backlight
From http://forum.xda-developers.com/showpost.php?p=2018165&postcount=239
Code:
#toggle backlight between max and one-from-minimum (on trinity at least)
CurrentBright = RegRead( "HKCU", "ControlPanel\Backlight", "Brightness" )
If (CurrentBright = 1)
SetBacklight (100, 5)
Else
SetBacklight (1, 1)
EndIf
Toggle Screen Rotation
From http://forum.xda-developers.com/showpost.php?p=2832605&postcount=929
Code:
If (regread("HKLM", "System\GDI\ROTATION", "ANGLE") eq 0)
Rotate (90)
Else
Rotate (0)
Endif
Toggle between Active Sync and Mass Storage
From http://forum.xda-developers.com/showpost.php?p=5078802&postcount=2552
Code:
usb = RegRead ( "HKLM", "Drivers\USB\FunctionDrivers", "DefaultClientDriver" )
If ( usb eq "RNDIS" )
Run ( "\Windows\USBSetting.exe" )
Sleep ( 200 )
SendSpecial ( "Down" )
Sleep ( 50 )
SendSpecial ( "CR" )
Sleep ( 50 )
SendOK
ElseIf ( usb eq "Mass_Storage_Class" )
Run ( "\Windows\USBSetting.exe" )
Sleep ( 200 )
SendSpecial ( "Up" )
Sleep ( 50 )
SendSpecial ( "CR" )
Sleep ( 50 )
SendOK
EndIf
Toggle Voice Command
I only use Voice Command when I am driving so I toggle it off when I am not driving to save battery drain.
Code:
ShowWaitCursor
If( ProcExists( "VoiceCmd.exe" ) )
Kill( "VoiceCmd.exe" )
PlaySound( "Stopping" )
HideWaitCursor
SleepMessage( 2, "Voice Command^NL^^NL^Stopped", "Voice Command Toggle" )
Delete( "\Windows\Startup\Voice Command.lnk" ) # so it will not restart after a soft reset
else
Run( "\Program Files\Voice Command\VoiceCmd.exe" )
PlaySound( "Starting" )
HideWaitCursor
SleepMessage( 2, "Voice Command^NL^^NL^Started", "Voice Command Toggle" )
Endif
Sad to go
My Fuze no longer works. I currently have a loner Infuse 4G, but do not know what I will end up with.
I will not be able to continue development of Mortscripts, etc.
Sorry to go, but it has been fun.
I'll keep watching to see if anything comes up I need to respond to.
Like the title says, what are the default settings found in Blade Buddy (and similar apps) advanced settings menu for the Epic 4G touch? I'm afraid I did the ignorant and forgot to write them down/save them. Nothing serious, however I've noticed worse performance in intensive games/apps and would like to default the settings.
I have everything checked, but these are the ones I'm curious about:
debug.sf.hw
media.stagefright.enable-player
media.stagefright.enable-meta
media.stagefright.enable-scan
media.stagefright.enable-http
dalvik.vm.heapsize : value 64m
dalvik.vm.heapstartsize : value (none set)
Dalvik.vm.heapgrowthlimit : value (none set)
Assuming default isn't best, what settings would you guys recommend? I noticed weird freezes while playing Battle Bears -1 after tweaking the settings.
Thanks. I've searched online and in XDA but gave up after falling short
I hate to self-bump, but if anyone is rooted, you can simply download Blade Buddy and tell me what the default settings are
No changes required on your end. The app doesn't do anything if you don't change any settings. Settings I need values for are in the advanced options.
Thanks!
I have the following as default settings:
debug.sf.hw : 0
media.stagefright.enable-player : false
media.stagefright.enable-meta : false
media.stagefright.enable-scan : false
media.stagefright.enable-http : true
dalvik.vm.heapsize : value 64m
dalvik.vm.heapstartsize : value (none set)
Dalvik.vm.heapgrowthlimit : value (none set)
I'm running StarBurst ROM v1.9.8r so these may not be identical to stock settings, but I hope this does the trick for you!
I appreciate it. Thanks!
I was fairly certain that HW was off by default, but wasn't sure. Seems odd that it would be.
Hi! I wanna run some tests and i need some registry values under
HKEY_LOCAL_MACHINE\System\Touch\Buttons
What i need is the keys and the values(better if the device is 4.7" or more)
Thanks
content of "Buttons" from 950XL
"0" key
String = Name, Value = Back
Integer = VKey, Value = 27
"1" key
String = Name, Value = Start
Integer = VKey, Value = 113
"2" key
String = Name, Value = Search
Integer = VKey, Value = 114
Integer = Count, Value = 3
Integer = Duration, Value = 20
Integer = Intensity, Value = 100
Integer = Vibrate, Value = 1
For 640xl.,
All the values are same...except,
Duration(value=41)
Intensity(value=99)
previously i disabled vibration for navigation keys under touch and gestures settings so,
Vibrate(value=0)
dxdy said:
content of "Buttons" from 950XL
"0" key
String = Name, Value = Back
Integer = VKey, Value = 27
"1" key
String = Name, Value = Start
Integer = VKey, Value = 113
"2" key
String = Name, Value = Search
Integer = VKey, Value = 114
Integer = Count, Value = 3
Integer = Duration, Value = 20
Integer = Intensity, Value = 100
Integer = Vibrate, Value = 1
Click to expand...
Click to collapse
Sai Chrisna said:
For 640xl.,
All the values are same...except,
Duration(value=41)
Intensity(value=99)
previously i disabled vibration for navigation keys under touch and gestures settings so,
Vibrate(value=0)
Click to expand...
Click to collapse
Intensity around 50 saves some battery
I don't post questions often but any help would be appreciated. I've searched up and down the web to no avail. This line of questioning is in regards to my Lumia 435. I've abandoned Lumias in favor of my 2nd favorite brand, Motorola. But, I have an undying love for Windows phones. I'm a night guard so I walk around with a Moto G5 Plus, a Moto E4 and a Lumia 435. I am fond of the compact size and the screen's reflectivity isn't a problem since I only use it at night on my graveyard shift. It's sitting pretty in a case with an oleophobic glass screen protector and a 1 GB Paging File, thanks to interop.
I'm running W10M and it runs great because I disable ALL background apps, except for the Store or Podcasts. However, either the one I picked up from eBay has broken lights on it's 3 capacitive buttons or they just don't light up by design. My phone is Interop unlocked. I checked HKLM / Software / Microsoft / Shell / NavigationBar to see if I might be able to enable the on screen soft buttons and/or disable the 3 capactive buttons on the bezel. No joy. It seems that maybe this would be possible with Denim but the NavigationBar key has a list of all the different resolutions, each with 6 different settings.
Long story short, has anyone figured out how to enable/disable the soft buttons? And does anyone have a list of known working W10M registry tweaks? I've looked at WPTweaker but the XAP doesn't seem to install on my device (figured it was WP8 only). Would it be possible to trick this device into thinking it is a Lumia 640 so that the aspect ratio stays the same, and the soft buttons would swipe up from the bottom of the screen? I can't find any other WP that runs W10M that has a resolution of 800x480.
Thanks everyone for even just checking out this question. I'll appreciate any responses.
barc0d3 said:
I've looked at WPTweaker but the XAP doesn't seem to install on my device (figured it was WP8 only).
Click to expand...
Click to collapse
you can install WPTweaker XAP without problem deploying xap from computer to phone. if you have problem, try this Interop Tools, and enable "All XAP's are SL 8.1 XAPs" in Tweaks
The keys you need are:
Type: Integer DWORD
Key name: SoftwareModeEnabled
Value: 1
Type: Integer DWORD
Key name: IsSwipeUpToHideEnabled
Value: 1
Type: Integer DWORD
Key name: IsDoubleTapOffEnabled
Value: 1
Type: Integer DWORD
Key name: IsAutoHideEnabled
Value: 1
Type: Integer DWORD
Key name: IsHintEnabled
Value: 1
Type: Integer DWORD
Key name: IsUserManaged
Value: 1
:laugh:
I wouldn't force the device... the resolution 800x480 works perfect since you can cast/screen mirror and doesn't force the cpu. Lumia 550 has 1280x720 and the same cpu, when you screen mirror to smart tvs or screens, the video and all, except photos is very laggy and that doesn't happen with 800x480 resolution. The only way to hide the bar is increasing the resolution, that can be done with registry but i don't recommend it because you have to change several keys(for X and Y) that has the same name, the device will look horrible because it has the .dll graphics for 800x480(for example UIXMobileAssets480x800.dll) so if you increase the resolution it will look like **** and also, you will be forcing the cpu. The only way to achieve it is changing the registry keys of the resolution and replacing the .dll graphics file with the correct .dll graphics file(meaning you need a .dll from the desired resolution). Maybe there's another way, i remember that some videoplayback apps did hide the bar when playing so maybe there's another way... a key missing or some value to change...
xxJMarian said:
The keys you need are:
Type: Integer DWORD
Key name: SoftwareModeEnabled
Value: 1
Type: Integer DWORD
Key name: IsSwipeUpToHideEnabled
Value: 1
Type: Integer DWORD
Key name: IsDoubleTapOffEnabled
Value: 1
Type: Integer DWORD
Key name: IsAutoHideEnabled
Value: 1
Type: Integer DWORD
Key name: IsHintEnabled
Value: 1
Type: Integer DWORD
Key name: IsUserManaged
Value: 1
:laugh:
I wouldn't force the device... the resolution 800x480 works perfect since you can cast/screen mirror and doesn't force the cpu. Lumia 550 has 1280x720 and the same cpu, when you screen mirror to smart tvs or screens, the video and all, except photos is very laggy and that doesn't happen with 800x480 resolution. The only way to hide the bar is increasing the resolution, that can be done with registry but i don't recommend it because you have to change several keys(for X and Y) that has the same name, the device will look horrible because it has the .dll graphics for 800x480(for example UIXMobileAssets480x800.dll) so if you increase the resolution it will look like **** and also, you will be forcing the cpu. The only way to achieve it is changing the registry keys of the resolution and replacing the .dll graphics file with the correct .dll graphics file(meaning you need a .dll from the desired resolution). Maybe there's another way, i remember that some videoplayback apps did hide the bar when playing so maybe there's another way... a key missing or some value to change...
Click to expand...
Click to collapse
Yeah there doesn't seem to be any way to add those keys to the registry on W10M. I'll just have to deal with the capacitive hardware buttons from now.
PS. The Lumia 435 is surprisingly capable so long as you disable background apps. The first thing I did was bump the page file to 1GB and by not allowing any apps to run in the background it performs just as well as my Lumia 640 did. I like keeping the little Lumia handy as a spare phone in my duty pouch and it doesn't take up much space. Thanks for trying to help anyway.
barc0d3 said:
Yeah there doesn't seem to be any way to add those keys to the registry on W10M. I'll just have to deal with the capacitive hardware buttons from now.
PS. The Lumia 435 is surprisingly capable so long as you disable background apps. The first thing I did was bump the page file to 1GB and by not allowing any apps to run in the background it performs just as well as my Lumia 640 did. I like keeping the little Lumia handy as a spare phone in my duty pouch and it doesn't take up much space. Thanks for trying to help anyway.
Click to expand...
Click to collapse
You need interop tools to add the keys