Post by: flattspott on March 29, 2004, 06:57:00 PM
Update: Skin Switcher 0.2
- Made the script completly automated
- Fixed small typo in info part of script
- Added a Results MsgBox that automatically goes away after 2 seconds
- Changed RandSkin.xml to skinlist.xml
- Change the save path for the skinlist.xml to E:\UDATA\00004321\skinlist.xml
Save As - SkinSwitcher.xas
| CODE |
;########################################################### ;# Name: Skin Switcher ;# Author: flattspott ;# Date: 03-29-2004 ;# Version: 0.2 ;# FileName: SkinSwitcher.xas ;# ;# Disclaimer: ;# This is a WIP script only (Tested and made with the 1191 Build) ;# ;# Purpose: ;# Will create a list of all your skins (not the internal ones) and step though the list ;# on bootup each time, setting your skin to the next one in the list ;# ;# Installation: ;# Upload SkinSwitcher.xas file to your Xbox,(into your scripts folder) ;# then add something like this somewhere in your MXM.xml. ;# $ActualPath$ is where MXM starts from. ;# Also note that below I have the xas file inside a subfolder from the main scripts folder ;# This is a personal preference, change it if need be. ;# ;# ;# ;# CallFile $ActualPath$\Scripts\SkinSwitcher\SkinSwitcher.xas ;# ;# ;############################################################ Set Temp 0 Set SkinList E:\UDATA\00004321\skinlist.xml :LookUp XMLOpen SomeXML ::MXM XMLGetValue SomeXML spName !.Main^SkinsPath SetFunc sPath FileExists %spName% If# %sPath% == 0 Goto Error If# %sPath% == 1 Goto Begin :Begin SetFunc Used FileExists %SkinList% If# %Used% == 0 Goto New If# %Used% == 1 Goto Old :New XMLCreate RandomXML Main XMLSetValue RandomXML !.Status^LastSkin "0" Goto Search :Old XMLOpen RandomXML %SkinList% XMLGetValue RandomXML Current !.Status^LastSkin Add Current 1 XMLClose RandonXML XMLCreate RandomXML Main XMLSetValue RandomXML !.Status^LastSkin "%Current%" Goto Search :Search BeginSearch %spName%\* :StartSearch SEARCHTYPE s_type SEARCHITEM s_name IF "%s_name%" == "" Goto DoneSearch IF %s_type% == "dir" Goto ListSkin IF %s_type% == "file" Goto SearchContinue :SEARCHCONTINUE SEARCHNEXT GOTO STARTSEARCH :ListSkin SetFunc SkinName Replace %spName% "" %search_name% XMLSetValue RandomXML !.Skins.Skin:%Temp%~Name "%SkinName%" Add Temp 1 Goto SearchContinue :DoneSearch ENDSEARCH Goto Finish :Error MsgBox "Skin Switcher can't find:$eol$%spName%$eol$Please make sure it exists" 0 3500 Goto End :Finish XMLSetNodePtr RandomXML !.Skins XMLGetNodeCount RandomXML Count If %Current% == %Count% Goto New XMLGetValue RandomXML NextSkin !.Skins.Skin:%Current%~Name XMLOpen SkinXML %spName%\%NextSkin%\MXM_Skin.xml XMLGetValue SkinXML RealName !~name XMLClose SkinXML XMLOpen PrefXML ::Prefs XMLSetValue PrefXML !.UserSetting^Skin "%RealName%" XMLSave PrefXML ::Prefs MsgBox "When you reboot your skin will be$eol$%RealName%" 0 2000 XMLSave RandomXML %SkinList% XMLClose RandomXML XMLClose SomeXML XMLClose PrefXML :End Quit |
Post comments or bugs here.
This post has been edited by flattspott on Apr 2 2004, 05:41 PM
Post by: flattspott on March 30, 2004, 02:05:00 PM
First I have to get the old skin, then I have to rescans your skins incase you add some new ones since the last time.
Like I said, in case anyone was wondering
Post by: thetruethugg on March 30, 2004, 01:11:00 PM
But, now, it seems to work great, haven't added a new skin yet, and I turned on the notification for next skin just to make sure everything was in working order. I see no noticable bugs thus far.
Post by: flattspott on March 30, 2004, 04:23:00 PM
Post by: thetruethugg on March 31, 2004, 03:20:00 AM
I'll mess around with it before I go to bed (Came to the come because I thought my internet connection crapped out again, fucking done that shit like 20 times, literally in the last 3-4 days). I'll see if it always wants to load advantage, or if it moves on and get's stuck again.
Also, one suggestion would be, have the 'Will load blah skin next time' go away after awhile (like the MXM wip, don't distro message).
Update: Ok, getting stuck regardless of skin. I deleted advantage to see if would do the same on the next skin, and it does. So, either I'm an idiot and don't know what I'm talking about with this 'prior to advantage' crap (I wont rule this out), but I could swear that I saw it change a skin or two before then.. No workie, using latest MXM WIP build..
This post has been edited by thetruethugg on Mar 31 2004, 12:05 PM
Post by: flattspott on March 31, 2004, 08:25:00 AM
Try to take a look at the RandSkin.xml wherever you have it. You could also try to delete it and see if that helps.
Im gonna go get that skin and see if it happens for me
Post by: flattspott on March 31, 2004, 09:06:00 AM
And I made it so the MsgBox Goes away after 2 secs
MsgBox "When you reboot your skin will be$eol$%RealName%" 0 2000
Post by: thetruethugg on March 31, 2004, 03:49:00 PM
Post by: flattspott on March 31, 2004, 07:31:00 PM
Post by: geniusalz on March 31, 2004, 07:59:00 PM
Post by: thetruethugg on March 31, 2004, 11:58:00 PM
Post by: flattspott on April 01, 2004, 07:57:00 AM
you should see the file @
$ActualPath$\Scripts\SkinSwitcher\RandSkin.xml
Unless you changed it that.
Post by: thetruethugg on April 01, 2004, 05:54:00 PM
But, It now seems to work, after changing the path, the 'old' path was a nonexistent directory, after changing it to my actions directory, it works.. So, perhaps a mkdir command first, or telling the user to change the path to a real directory (for those that don't use 'scripts' and a subdir for each script [or at least skinswitcher])..
Post by: flattspott on April 01, 2004, 06:42:00 PM
Anywho, I think when I update it later, I'll put the randskin.xml on E: with the pref.xml