[Titanium] CTheme Changer- A new Titanium Plugin

lioryte · Sep 2, 2010

Hi there Folks,

CTheme Changer is a titanium plugin that allows seamless switch and preview between titanium themes right from the today screen. Currently supports 8 9 themes, this is still a work in progress as I need to modified all themes to work with all plugins

Since I run WQVGA it's the only resolution I'll be releasing for now.

Post 1 got the eye candy
Post 2 got release info
Post 3 is Q&A (cooking this baby in/ general)
Post 4 have all codes and sources

Working on porting gchris's theme, ldawg214's 1+2 Themes and (patiently!) waiting for sv0911's WQVGA version.

|

These mega themes will take a while to port over...Lots of work... :'(
Plz post if you got any Q's

Credits:

Big, big thanx to claus1953
DFT's oldoldstone and bleem for introducing to me a new concept of 10 in 1 themes.
XDA's Claus1953 and HTCSpain's xavinet for their earlier work

lioryte · Sep 2, 2010

Supported Themes

Enkidu's Beta- Thread
lioryte modified titanium showing day of the week, next appointment and weather icon in default titanium
rpereira's Bliss- Thread
ibrythill's WM7- Thread
Another default titanium by xavinet
ldawg214's LTD1- Thread
drkfngthdragnlrd's Dragon World Neo Titanium modified by f4LK0n- Thread
greatbal's Shadow Neo skin- Thread
jositochanante's titanium-Thread

In the works/ To do list

Port LTD2
Port gchris's titanium
Port sv0911's theme
Make landscape possible for all themes
Make sure all themes support as many plugins as possible
Port CTheme Changer to other resolutions

Release Log

Code:

9/1/2010-V4.2 Initial release for WQVGA only, supports 8 themes, added support for titaniumweather to Enkidu's beta theme currently portrait only.
9/3/2010- V4.38- Added LTD1, made landscape version of LTD1.

lioryte · Sep 2, 2010

Q&A

How to add this to your ROM?

First, make sure mortscript is there
Add the reg settings I posted at your personal reg. (either at the OEM or at the EXT folder). This is done to ensure that CThme changer is enabled at first boot. Make sure that any other reg. settings/ ext/ OEM that effect CHome is disabled.
Add the CTheme Changer OEM to the root of your OEM folder.
Build your ROM. If on first boot you can't see CTC than enable it via CHomr editor and look again at your personal reg settings to see what is preventing it from showing.

All Other Q&A

Will there be a release with my resolution? - Sorry, but I am now roaming an android device so I have stopped working on this. I did post everything I got for someone to play around with
Will the OEM work on my device? - HELL yea it will. As long as your device is WQVGA and has mortscript.
I need/ I want/ Could you... - keep this thread alive, post any idea you have there are some sharp folks who might be able to help ya out...

lioryte · Sep 2, 2010

CTheme Changer Source Code

Since I'm now running android, HERE is the CTheme Changer OEM Folder for whomever wants to work on this. (WQVGA!!!)

Required for this to run this plugin: mortscript

Reg settings:

Code:

[HKEY_LOCAL_MACHINE\Software\Microsoft\CHome]
"Enabled"=dword:00000001
"CPRFile"="Enkidu"
"ExtensibilityXML"="<Plugins Order=\"CThemes;CMyPhotos;CMusic;CWelcomeCenter;CPhone;CVoicemail;CClock;CText;CEmail;CAppointments;CHomeFavs;CWindowsLive\"  CPRFileName=\"Enkidu\" DisplayStyle=\"Titanium\" />"
"Plugins"="CThemes;CMyPhotos;CMusic;CWelcomeCenter;CPhone;CVoicemail;CClock;CText;CEmail;CAppointments;CHomeFavs;CWindowsLive"
"DefaultXML"="<Plugins Order=\"CMyPhotos;CMusic;CWelcomeCenter;CPhone;CVoicemail;CClock;CText;CEmail;CAppointments;CHomeFavs;CWindowsLive\"  CPRFileName=\"Titanium\" DisplayStyle=\"Titanium\" />"
"EmailOverride"=dword:00000000
"SMSMMSOverride"=dword:00000000
"DisplayStyle"="Titanium"
"SK1TEXT"="Contacts"
"SK1URL"=":MSCONTACTS"
"HomePluginGuid"="{892B90CB-9806-427e-8BED-F45C6A9E576B}"
"DockOperatorBar"=dword:0000000

THE BELOW CODE IS NOT A PART OF CURRENT CTHEME CHANGER, BUT AN IDEA TO MAKE IT SMALLER/BETTER
A modified script by claus1953 (Thanx!) to use the storage card (Need further development, just an mortscript mind scramble at this point)
This is the start of porting all graphics to SC

Code:

installpath=SystemPath("ScriptPath")
current_theme = Regread( "HKLM", "Software\Microsoft\CHome", "CPRFile")
CurrCPRport = "current_theme" & "_" & "240x400"
CurrCPRland = "current_theme" & "_" & "400x240"

SetFileAttribs("\Windows\bronzeres.dll", FALSE, FALSE)
Run (installpath \ "disableTitanium.mscr")

Neo_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Titanium\" DisplayStyle=\"Titanium\" />'
ShadowNeo_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"ShadowNeo\" DisplayStyle=\"Titanium\" />'
WM7_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"WM7\" DisplayStyle=\"Titanium\" />'
Default_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Titanium\" DisplayStyle=\"Titanium\" />'
Lizzy_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Lizzy\" DisplayStyle=\"Titanium\" />'
Buffed_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Buffed\" DisplayStyle=\"Titanium\" />'
Bliss_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Bliss\" DisplayStyle=\"Titanium\" />'
Josito_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Josito\" DisplayStyle=\"Titanium\" />'
Hero_Titanium = '<Plugins Order=\"JMLToday;JMLLauncher;CMyPhotos;CMusic;CWindowsLive\" CPRFileName=\"Hero\" DisplayStyle=\"Titanium\" />'
TitaniumLTD_Titanium = '<Plugins Order=\"CHero;ATContacts;CLauncher\" CPRFileName=\"TitaniumLTD\" DisplayStyle=\"Titanium\" />'


Neo_TitaniumSwitch=("DragonWorld Neo Titanium")
ShadowNeo_TitaniumSwitch=("Greatbal ShadowNeo Titanium")
WM7_TitaniumSwitch=("Ibrythill WM7 Titanium")
Default_TitaniumSwitch=("Titanium")
Lizzy_TitaniumSwitch=("Ebsbow Lizzy Titanium")
Buffed_TitaniumSwitch=("Ebsbow Buffed Titanium")
Bliss_TitaniumSwitch=("Rpereira Bliss Titanium")
Josito_TitaniumSwitch=("Josito Chanante Titanium")
Hero_TitaniumSwitch=("Titanium_Hero_by_Chriscsh")
TitaniumLTD_TitaniumSwitch=("TitaniumLTD_by_Idawg214")
Cancel=("Cancel")
SaveCurrent=("Backup current theme")

# Set switches according to current settings
SettingOptions[1]=Neo_TitaniumSwitch
SettingOptions[2]=ShadowNeo_TitaniumSwitch
SettingOptions[3]=WM7_TitaniumSwitch
SettingOptions[4]=Default_TitaniumSwitch
SettingOptions[5]=Lizzy_TitaniumSwitch
SettingOptions[6]=Buffed_TitaniumSwitch
SettingOptions[7]=Bliss_TitaniumSwitch
SettingOptions[8]=Josito_TitaniumSwitch
SettingOptions[9]=Hero_TitaniumSwitch
SettingOptions[10]=TitaniumLTD_TitaniumSwitch
SettingOptions[11]=SaveCurrent
SettingOptions[12]=Cancel

SetChoiceEntryFormat(28,14)
Choice("Titanium Theme Changer","Choose CPR for CHome",SettingOptions)

Case(1)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Neo_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Neo)
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Neo_240x400.cpr", "\Windows\Neo_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Neo_400x240.cpr", "\Windows\Neo_400x240.cpr", TRUE )

Case(2)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", ShadowNeo_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", ShadowNeo)
Copy(installpath \ "TitaniumShadowNeo" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "ShadowNeo_240x400.cpr", "\Windows\ShadowNeo_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "ShadowNeo_400x240.cpr", "\Windows\ShadowNeo_400x240.cpr", TRUE )

Case(3)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", WM7_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", WM7)
Copy(installpath \ "WM7" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "WM7_240x400.cpr", "\Windows\WM7_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "WM7_400x240.cpr", "\Windows\WM7_400x240.cpr", TRUE )

Case(4)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Default_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Titanium)
Copy(installpath \ "DefaultTheme" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Titanium_240x400.cpr", "\Windows\Titanium_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Titanium_400x240.cpr", "\Windows\Titanium_400x240.cpr", TRUE )

Case(5)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Lizzy_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Lizzy)
Copy(installpath \ "Lizzy" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Lizzy_240x400.cpr", "\Windows\Lizzy_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Lizzy_400x240.cpr", "\Windows\Lizzy_400x240.cpr", TRUE )

Case(6)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Buffed_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Buffed)
Copy(installpath \ "TitaniumBuffed" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Buffed_240x400.cpr", "\Windows\Buffed_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Buffed_400x240.cpr", "\Windows\Buffed_400x240.cpr", TRUE )

Case(7)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Bliss_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Bliss)
Copy(installpath \ "Bliss" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Bliss_240x400.cpr", "\Windows\Bliss_240x400.cpr", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Bliss_400x240.cpr", "\Windows\Bliss_400x240.cpr", TRUE )

Case(8)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Josito_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Josito)
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Josito_240x400.cpr", "\Windows\Josito_240x400.cpr", TRUE )

Case(9)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", Hero_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", Hero)
Copy(installpath \ "Hero" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "Hero_240x400.cpr", "\Windows\Hero_240x400.cpr", TRUE )

Case(10)
   RegWriteString("HKLM","Software\Microsoft\CHome","ExtensibilityXML", TitaniumLTD_Titanium)
RegWriteString( "HKLM", "Software\Microsoft\CHome", "CPRFile", TitaniumLTD)
Copy(installpath \ "TitaniumLTD" \ "bronzeres.dll", "\Windows\bronzeres.dll", TRUE )
Copy(installpath \ "allcprs\WQVGA_cprs" \ "TitaniumLTD_240x400.cpr", "\Windows\TitaniumLTD_240x400.cpr", TRUE )

Case(11)
   Run (installpath \ "save_current.mscr")
sleepMessage(3,"backup complete")

Case(12)
   Run (installpath \ "exit.mscr")

   
EndChoice

Run ("Archivos de programa \ JMLPanex \ ClearCacheAll.mscr")

RunWait ("Archivos de programa \ JMLPanex \ JMLOffset.mscr")

sleepMessage(2,"complete")

Run (installpath \ "activateTitanium.mscr")
   RedrawToday

Delete("\Windows"\CurrCPRport)
Delete("\Windows"\CurrCPRland)

All of the .cpr's can be changed to any resolution with using the attached .cpr res. changer (attached). I hope someone will keep this alive...

claus1953 · Sep 2, 2010

Great news

I am using currently Xavinet's plugin but had to modify all cprs to allow the use of more plugins. And very nice that you include the last themes too. Congratulations

biernes_atrece · Sep 2, 2010

great news for titanium lovers like me.
will wait for a wvga version.

keep up the good work

lioryte · Sep 2, 2010

claus1953 said:
Great news
I am using currently Xavinet's plugin but had to modify all cprs to allow the use of more plugins. And very nice that you include the last themes too. Congratulations

Thanks, I am doing the same now...

Lots of work... Are you running Spanish or English on your i900? If English let me know I'll send you the OEM. Porting the other themes is LOTS of work, really time consuming

biernes_atrece said:
great news for titanium lovers like me.
will wait for a wvga version.
keep up the good work

Once I'm done with WQVGA I'll start with other resolutions

sv0911 · Sep 2, 2010

My friend,

that is just fantastic what you have released here..!!!

Now i have to work even faster to get the wqvga fixed..!!!

The wqvga is allmost done..!! Maybe allready under the next week..!!!
As soon it is ready to release i will send you as usual a message..!!

Big thanks for sharing lioryte...!!!!!!

Greetings
sv0911

claus1953 · Sep 2, 2010

lioryte said:
Thanks, I am doing the same now... Lots of work... Are you running Spanish or English on your i900? If English let me know I'll send you the OEM. Porting the other themes is LOTS of work, really time consuming

Once I'm done with WQVGA I'll start with other resolutions

I am running a spanish rom from htc spain.

orb3000 · Sep 2, 2010

Thanks for sharing!

lioryte · Sep 3, 2010

LTD1 Ported As well- (I made a very crud landscape version as well)

Now supporting 9 themes

xavinet · Sep 3, 2010

Great work friend

With your permission i will introduce new themes and plugins in a review of cThemes.

Thanks a lot.

lioryte · Sep 3, 2010

xavinet said:
Great work friend

With your permission i will introduce new themes and plugins in a review of cThemes.

Thanks a lot.

Great to see you here Xavi.

Feel free to use whatever PM me for the files

lioryte · Sep 5, 2010

Post 1 updated with a new youtube link showing the new beta

zole2112 · Sep 9, 2010

biernes_atrece said:
great news for titanium lovers like me.
will wait for a wvga version.

keep up the good work

I love this, WVGA and I'm in! Nice work!

gade12 · Sep 9, 2010

i am using ctheme changer of htcspain. do it run in spanish rom?
where is link donwload?

claus1953 · Sep 9, 2010

gade12 said:
i am using ctheme changer of htcspain. do it run in spanish rom?
where is link donwload?

I hope too it will run on spanish rom as i have one too. It is not yet finished, there is no download link yet.

lioryte · Sep 10, 2010

gade12 said:
i am using ctheme changer of htcspain. do it run in spanish rom?
where is link donwload?

claus1953 said:
I hope too it will run on spanish rom as i have one too. It is not yet finished, there is no download link yet.

I am working on it, and Claus is providing great help and ideas, I am testing a new Idea/ way for it but this is proving to be a bigger project than I had planned for it to be...Long story short this is in the works...I hope I'll have something by the W/E

knank · Oct 14, 2010

claus1953 said:
I hope too it will run on spanish rom as i have one too. It is not yet finished, there is no download link yet.

Hello claus1953,

Are you still working on cthemes new version??

It's been a while with no updates

.

lv157 · Oct 22, 2010

QVGA

Hi

there will be a version QVGA ?

[Titanium] CTheme Changer- A new Titanium Plugin

Senior Member

Senior Member

Senior Member

Senior Member

Attachments

Senior Member

Senior Member

Senior Member

Senior Member

Senior Member

Retired Senior Moderator

Senior Member

Attachments

New member

Senior Member

Senior Member

Senior Member

Senior Member

Senior Member

Senior Member

Senior Member

Member

Similar threads

Top Liked Posts