xboxscene.org forums

OG Xbox Forums => Official MediaXMenu (MXM) Forum => Dashboard Forums => MXM ActionScripting Forum => Topic started by: BenJeremy on January 11, 2004, 05:09:00 AM

Title: Share Scripts For Others
Post by: BenJeremy on January 11, 2004, 05:09:00 AM

I will try and get a host of events to trigger action scripts on for the next public release.

Title: Share Scripts For Others
Post by: jcupp114 on January 17, 2005, 04:43:00 PM

Question:
Did everyone stop the scripts?
We need ressurrection? heheh

Take care

jcupp114

Title: Share Scripts For Others
Post by: big_gun on May 09, 2005, 07:47:00 AM

New Script: InstallX v1.0.0.0
Author : Rick Ratayczak [email protected]
Website : http://www.activeaspsoftware.net/

---- What this program does?
It's a MXM action script that installs a folder of files onto the hard drive
from a CD.

---- Why?
In case you have a friend with an modded xbox and no internet connection. You
can distribute updates, even like a slayer's auto installer type disc. The other
installers I've seen are ugly! This one is user friendly and pleasing to the
eyes.

---- How to use?
Set the 3 variables in the autorun.xas and then put files into the setup folder.
Build an xiso and go!

You need to put the default.xbe from MXM in the folder too.

Download from

http://dev.activeasp...stallX_v1_0.zip (1 MB)

Enjoy!

Rick

Title: Share Scripts For Others
Post by: big_gun on May 15, 2005, 02:51:00 AM

Bump! Any feedback on this? What do you guys think?

Title: Share Scripts For Others
Post by: m3tro on June 04, 2005, 08:09:00 PM

want to make a script that can replace text in ex. ini-files at spcified lines (even more specified if possible). meny.xml : callscript textedit e:\test.ini line45 "TEXT TEXT TEXT"

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:15:00 PM

Please share all your scripts here, they can help other to understand AS or bring them to new ideas. IF you have a question ask here.

If nobody should share his script without me, this will be the only scripts i ever post here for you.

I know that there are people who are much better in ActionScript as i.

This post has been edited by vexx22: Sep 28 2003, 11:31 PM

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:19:00 PM

Here is my best script i call it "Copy Single Game DVD"some little detail were integratet from HABs69m

QUOTE

<Action>

SET SomeVar $DVDType$
TrayClose
Delay 10

If %SomeVar% == "game disc" GOTO Launch
If %SomeVar% != "game disc" GOTO begin

:begin
TrayOpen
BeginDraw UseCurrent
MessageBox "Please insert A Game to Copy$eol$Press A to Continue$eol$Press B to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:APRESSED
Trayclose
Delay 10
GOTO Launch

:BPRESSED
TrayClose
QUIT

:Launch
SETFUNC DVDTitle XBETITLE D:\DEFAULT.XBE
SETFUNC DVDSIZE FILESIZE D:\DEFAULT.xbe

BeginDraw UseCurrent
MessageBox "Press A to Copy %DVDTitle% or B to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A2PRESSED
BeginDraw UseCurrent
MessageBox "DVD is Copying"
EndDraw
MKDIR F:\games\%DVDTITLE%
Copy D:\ F:\games\%DVDTITLE%
BeginDraw UseCurrent
MessageBox "%DVDTitle% is on Hard drive$eol$Will now reset MenuCache"
EndDraw
TrayOpen
Delay 10
ResetMenuCache

BeginDraw UseCurrent
MessageBox "Press A to Reboot$eol$Press B to Reboot later"
EndDraw

Input
If %_GP_A% == "1" GOTO A3PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A3PRESSED
Trayclose
Reboot
QUIT

</Action>

This post has been edited by vexx22: Sep 28 2003, 11:38 PM

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:23:00 PM

Here is a simple XBOX Disc Lauch script with checking system, too.

QUOTE

<Action>

SET SomeVar $DVDType$
TrayClose
Delay 10

:check
If %SomeVar% == "game disc" GOTO Launch
If %SomeVar% != "game disc" GOTO begin

:begin
TrayOpen
BeginDraw UseCurrent
MessageBox "Please insert A Game$eol$Press A to Continue$eol$Press B to Chancel"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:APRESSED
trayclose
delay 10
goto check

:BPRESSED
QUIT

:Launch
SETFUNC DVDTitle XBETITLE D:DEFAULT.XBE

BeginDraw UseCurrent
MessageBox "Press A to Launch %DVDTitle% or B to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A2PRESSED
LaunchDVD
MessageBox "%DVDTitle% is Starting"
QUIT

</Action>

This post has been edited by vexx22: Oct 4 2003, 12:08 AM

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:25:00 PM

This is a script to control a little box on the screen with your D-Pad. After starting script click on D-Pad to activate. This script is not from me but i correct the version from this board and now it runs.

QUOTE

<Action>
SET YY 100
SET XX 100

:BLAH
Input

If %_GP_D_LF% == "1" GOTO LF
If %_GP_D_UP% == "1" GOTO UP
If %_GP_D_DN% == "1" GOTO DN
If %_GP_D_RT% == "1" GOTO RT
If %_GP_A% == "1" GOTO EXIT
Quit

:UP
SUB YY 5
GOTO DRAWIT
:DN
ADD YY 5
GOTO DRAWIT
:LF
SUB XX 5
GOTO DRAWIT
:RT
ADD XX 5
GOTO DRAWIT

:DRAWIT
BEGINDRAW
BOX %XX% %YY% 10 10 Black White
ENDDRAW
GOTO BLAH

:EXIT
QUIT

</Action>

This post has been edited by vexx22: Sep 29 2003, 02:58 PM

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:28:00 PM

This is a short Script to control your intern Xbox Fans, Only to Optiions are aviable, 100% and default.

QUOTE

<Action>
BeginDraw UseCurrent
MessageBox "Press A for 100 Percent$eol$Press B for Default"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:APRESSED
SETFANSPEED Manual 100%
SETFANSPEED Manual 100%
QUIT

:BPRESSED
SETFANSPEED default
SETFANSPEED default
QUIT

</Action>

Title: Share Scripts For Others
Post by: vexx22 on September 28, 2003, 04:29:00 PM

Please post importent changes, like adding something good to the script. So that we can see what we forget.

Title: Share Scripts For Others
Post by: flattspott on September 28, 2003, 07:17:00 PM

Why did you put the Fanspeed functions down two times each?

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 04:50:00 AM

to flatspot. They are put two times because if i made it only one time you need to activate the script two time. And with this configuration you need only open the script one time.

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 04:54:00 AM

I think there's some wierdness in the fanspeed stuff.... what I observed might have been a delay or rampup time for the speed to adjust, though.

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 12:54:00 PM

Is nobody interested in sharing his scripts with others? I don´t post my new scripts without other poting their scripts.
I mean i am not the one and only who program scripts for MXM, or am i? Come on you don´t need to share perfect scripts or big scripts. Share small and scripts who failed in function. Then all can watch and try to help, and much people can learn how to use ActionScript, and get new ideas.

Title: Share Scripts For Others
Post by: X30n on September 29, 2003, 01:06:00 PM

I wish I had some scripts to share. What are some good uses of scripts and I will give a shot at it.

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 01:18:00 PM

try programming any kind of a script, it just for learning. let your fantasy play. :D I startet programming Friday morning, it was the first time i used ActionScript. But after reading some topics and the readme i made my first own script. And it getting more. You can that too. Try it.

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 01:11:00 PM

Oh well this is not done but here is my FormatPatitions.xas

I didnt bother adding these = \ but i guess you can figure out where they go

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 01:21:00 PM

Cool Big thanks to HABS69M for his first script. Have you tested it? Because i see something missing.

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 01:21:00 PM

Loll my first script was a remake of your MXMcopy, anyways ..... i know its missing things like i said its not done but you wanted some scripts so i posted my progress

and for now yes it works will probably finish it tonight, kind a cool what you can do with this , wonder what else could be nice as a XAS like maybe flash bios? BJ can you answer this? can i make a XAS script to flash a bios on a mod chip?

Title: Share Scripts For Others
Post by: geniusalz on September 29, 2003, 01:26:00 PM

QUOTE (Habs69M @ Sep 29 2003, 05:11 PM)

:XPRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT F:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A4PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A4PRESSED
Delay 2
FORMAT F:

:YPRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT G:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A5PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A5PRESSED
Delay 2
FORMAT G:

:BACKPRESSED
QUIT

You need to QUIT after every format "block"
Otherwise it will keep executing the rest of the code after the "format" command
I was making the same mistake...

With that bug fixed:

CODE

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 01:39:00 PM

geniusalz do i still need a QUIT after a FORMAT command? since the QUIT is right after my input key press? if not well this script will be ready to test

:begin
BeginDraw UseCurrent
MessageBox "This will format partitions$eol$Press A to Format C$eol$Press B to Format E$eol$Press X to Format F$eol$Press Y to Format G$eol$Press BACK to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
If %_GP_Y% == "1" GOTO YPRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT

:APRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT C:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A2PRESSED
BeginDraw UseCurrent
MessageBox "Formating Partition C:$eol$Please Wait"
EndDraw
Delay 2
FORMAT C:
BeginDraw UseCurrent
MessageBox "Done Formating C:$eol$Press A to Reboot$eol$Press B to return to Dash"
EndDraw
Input
If %_GP_A% == "1" GOTO A6PRESSED
If %_GP_B% == "1" GOTO BACKPRESSED
QUIT

:BPRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT E:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A3PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A3PRESSED
BeginDraw UseCurrent
MessageBox "Formating Partition E:$eol$Please Wait"
EndDraw
Delay 2
FORMAT E:
BeginDraw UseCurrent
MessageBox "Done Formating E:$eol$Press A to Reboot$eol$Press B to return to Dash"
EndDraw
Input
If %_GP_A% == "1" GOTO A6PRESSED
If %_GP_B% == "1" GOTO BACKPRESSED
QUIT

:XPRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT F:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A4PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A4PRESSED
BeginDraw UseCurrent
MessageBox "Formating Partition F:$eol$Please Wait"
EndDraw
Delay 2
FORMAT F:
BeginDraw UseCurrent
MessageBox "Done Formating F:$eol$Press A to Reboot$eol$Press B to return to Dash"
EndDraw
Input
If %_GP_A% == "1" GOTO A6PRESSED
If %_GP_B% == "1" GOTO BACKPRESSED
QUIT

:YPRESSED
BeginDraw UseCurrent
MessageBox "This will FORMAT G:$eol$Press A to confirm$eol$B to Cancel"
EndDraw
Input
If %_GP_A% == "1" GOTO A5PRESSED
If %_GP_BACK% == "1" GOTO BACKPRESSED
QUIT
:A5PRESSED
BeginDraw UseCurrent
MessageBox "Formating Partition G:$eol$Please Wait"
EndDraw
Delay 2
FORMAT G:
BeginDraw UseCurrent
MessageBox "Done Formating G:$eol$Press A to Reboot$eol$Press B to return to Dash"
EndDraw
Input
If %_GP_A% == "1" GOTO A6PRESSED
If %_GP_B% == "1" GOTO BACKPRESSED
QUIT

:A6PRESSED
Reboot

:BACKPRESSED
QUIT

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 01:51:00 PM

QUOTE (Habs69M @ Sep 29 2003, 05:21 PM)

Loll my first script was a remake of your MXMcopy, anyways ..... i know its missing things like i said its not done but you wanted some scripts so i posted my progress

Working on that flash code yet....

The nice thing about ActionScript, is it temporarily frees me from having to get the UI in place before doing some neater things.

MediaPatch command is coming tonight, as soon as I get out of work here and get home. The code is written, it does a media flag and the 8 byte media check code patch.

Also coming is directory entry searching:

BEGINSEARCH <WildCardPath>
SEARCHITEM <VarName> (Load VarName with current file/pathname)
SEARCHSIZE <VarName> (Load VarName with current file size)
SEARCHTYPE <VarName> (Load VarName with current type for entry - "file" or "dir")
SEARCHNEXT
ENDSEARCH

Title: Share Scripts For Others
Post by: geniusalz on September 29, 2003, 02:01:00 PM

QUOTE (vexx22 @ Sep 29 2003, 05:28 PM)

You are right geniusalz thats exactliy what i told him.

Well, let's just say u type faster than me

Title: Share Scripts For Others
Post by: geniusalz on September 29, 2003, 02:05:00 PM

QUOTE (Habs69M @ Sep 29 2003, 05:39 PM)

geniusalz do i still need a QUIT after a FORMAT command? since the QUIT is right after my input key press? if not well this script will be ready to test

Well, you need to keep the QUIT after the inputs, in case the user presses something other than A or B. Looks good right now

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 02:06:00 PM

Hehe i wanted to test it but got this message:

ATTENTION
Partition Formatting must be enable by user
Access System Menu to change

How do i change this ?

please so i can test my script

Title: Share Scripts For Others
Post by: geniusalz on September 29, 2003, 02:11:00 PM

It's a security feature in case kids dont format

To bypass it temporarily, you need to go to the system meny (press Y) , and look for "allow format" or something there.

To bypass it everytime you run the script (not recommended), you need to put
ALLOWFORMAT 1
In your actionscript

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 02:14:00 PM

Hmm cool thks bud, you helped alot

will test this ,without the QUIT after the FORMAT command and see what happens,

Thks again

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 02:40:00 PM

Ok the script in my previous post works but i am wondering if for the syntax i have to add the QUIT after the FORMAT command or not?

And damn it formats fast hehe i formated my E in like 4 seconds lolll

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 03:03:00 PM

To Habs69M you need to set the Quit because if not the script don´t end after Formating a drive. It will run to the next quit and it can be that there are more than one format command between the label were the command begins and the next quit.

If here were more than 10 functional Scripts were posted i create a site. Or i ask BenJeremy to open a topic that can not be edited from anyone. But first we need scripts.

I were intrested in an installdisc. I could programm it myself but HABS69M has the formt part programmed and i think it were nice if somebody create another part For the disc.

What do you think BenJeremy about a installdisc what should it can? Wich functons are need. Please tell your opinion, to all.

Title: Share Scripts For Others
Post by: camora on September 29, 2003, 03:04:00 PM

umm... the "Copy Single Game DVD" script dont work for me.
Lets say i put Gun Valkyrie in the tray, after that the copying process begins but only for 10 seconds. After the reboot the game is not in f:\games, but a folder called video_ts.
Another problem is that i cant delete this folder in MXM. So i need to switch to evox to delete it.

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 03:06:00 PM

QUOTE (vexx22 @ Sep 29 2003, 07:03 PM)

Well, I've got the basic "Install disc" code built into MXM - check out the internal.xml file that is inclued in the source code (some good examples in there, as well).

If formats drives, and restores from preset directories. You, as a scripter, can override this, too... defining your own named scripts in the mxm.xml file (I'm working on a better delivery method, so people can drop the scripts in and have them work)

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 03:09:00 PM

QUOTE

Well i figured that after every FORMAT instance i have my message box with option to reboot or quit so i guess its ok to leave it this way but i wanted to know for sure

because if i put a QUIT right after the FORMAT command it will quit before displaying my message box.

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 03:15:00 PM

You guys do know about the internal.xml, right?

CODE

BeginDraw UseCurrent
EndDraw

CallScript _RenderMessageBox %1%
; Wait for input...
Input
; Clear old stuff out....
CallScript _ClearDisplay

IF $MXMVersion$ !#^ "WIP" GOTO DONE
CallScript _DisplayMessageBox "This is a WIP Release$eol$Do not distribute"
CallScript _ClearDisplay
:DONE
CallScript _CheckPrep

SETFUNC DrvCPres COND CDrivePresent
SETFUNC DrvEPres COND EDrivePresent
SETFUNC DrvFPres COND FDrivePresent
SETFUNC DrvGPres COND GDrivePresent
ALLOWFORMAT 1
CallScript _DisplayMessageBox "System Will Be Prepared"
CallScript _RenderMessageBox "Formatting Cache Partitions"
FORMAT X:
FORMAT Y:
FORMAT Z:
MOUNT X:
MOUNT Y:
MOUNT Z:
CallScript _ClearDisplay
IF %DrvGPres% != 0 GOTO SKIPG
CallScript _DisplayMessageBox "Do you have a G: Partition to format?$eol$Press 'Y' to format G:"
IF %_GP_Y% != "1" GOTO SKIPG
CallScript _PromptFormat G:
:SKIPG
IF %DrvFPres% != 0 GOTO SKIPF
CallScript _PromptFormat F:
:SKIPF
IF %DrvEPres% != 0 GOTO SKIPE
CallScript _PromptFormat E:
:SKIPE
IF %DrvCPres% != 0 GOTO SKIPC
CallScript _PromptFormat C:
:SKIPC

SETFUNC ODashPresent FileExists C:\xboxdash.xbe
IF %ODashPresent% != 0 GOTO ODASHPRESENT
CallScript _DisplayMessageBox "Copying MXM to C:"
MOUNT D:
COPY D:\default.xbe C:\xboxdash.xbe
ATTR C:\xboxdash.xbe rw
SETFUNC BIOSXMLPres FileExists D:\BIOSMD5.xml
IF %BIOSXMLPres% == 0 GOTO ODASHPRESENT
COPY D:\BIOSMD5.xml C:\BIOSMD5.xml
ATTR C:\BIOSMD5.xml rw
:ODASHPRESENT
SETFUNC TDataPres FileExists E:\TDATA
SETFUNC UDataPres FileExists E:\UDATA
IF %TDataPres% == 1 GOTO SKIP1
MKDIR E:\TDATA
:SKIP1
IF %UDataPres% == 1 GOTO SKIP2
MKDIR E:\UDATA
:SKIP2
SETFUNC TDataGPres FileExists E:\TDATA\00004321
SETFUNC UDataGPres FileExists E:\UDATA\00004321
IF %TDataGPres% == 1 GOTO SKIP3
MKDIR E:\TDATA\00004321
:SKIP3
IF %UDataGPres% == 1 GOTO SKIP4
MKDIR E:\UDATA\00004321
:SKIP4

SETFUNC DrvCPres COND CDrivePresent
SETFUNC DrvEPres COND EDrivePresent
SETFUNC DrvFPres COND FDrivePresent
SETFUNC DrvGPres COND GDrivePresent
IF %_ForceRestore% == 1 GOTO PREPSYSTEM
IF $DVD_Mode$ != 1 GOTO EPRESENT
IF %DrvCPres% == 1 GOTO CPRESENT
GOTO PREPSYSTEM
:CPRESENT
IF %DrvEPres% == 1 GOTO EPRESENT
:PREPSYSTEM
CallSCript _DisplayMessageBox "This drive appears to be unprepared$eol$Would you like to prepare your$eol$hard drive partitions now?$eol$Press RIGHT-TRIGGER and A to proceed$eol$Any other key"
IF %_GP_TRG_RT% != "1" GOTO EPRESENT
IF %_GP_A% != "1" GOTO EPRESENT
CallScript _PREPDRIVES
GOTO CHECKDASH
:CHECKDASH
CallScript _CheckODash
GOTO CHECKRESTORE
:CHECKRESTORE
CallScript _PerfRestore C
CallScript _PerfRestore E
CallScript _PerfRestore F 1
CallScript _PerfRestore G 1
CallScript _DisplayMessageBox "Done with default Prepare"
CallScript _ClearDisplay
:EPRESENT

IF %_GP_Y% != "1" GOTO END
BeginDraw UseCurrent
MessageBox "Copying %1% Backup$eol$Please wait"
EndDraw
COPY %SourceDir% %TargetDrive%
CallScript _ClearDisplay
BeginDraw UseCurrent
MessageBox "Fixing Attributes$eol$Please wait"
EndDraw
ATTR %TargetDrive% rw
CallScript _ClearDisplay
GOTO END
:DRVNOTPRESENT
IF %2% == 1 GOTO END
CallScript _DisplayMessageBox "Unable to copy %1%: Backup$eol$Drive not present"
:BACKNOTPRESENT
IF %2% == 1 GOTO END
CallScript _DisplayMessageBox "Unable to copy %1%:$eol$ %SourceDir% not present"
:END

; To use, CallScript _PromptFormat F:
SETFUNC Drive UPPER %1%
SETFUNC Drive LEFT 1 %Drive%
IF %Drive% == C GOTO DRIVECHECK
IF %Drive% == E GOTO DRIVECHECK
IF %Drive% == F GOTO DRIVECHECK
IF %Drive% == G GOTO DRIVECHECK
GOTO SKIPCHECK
:DRIVECHECK
SETFUNC DrvPres COND %Drive%DrivePresent
IF %DrvPres% != 1 GOTO SKIPCHECK
CallScript _DisplayMessageBox "%1% Has Data!$eol$Are you sure you want to format?$eol$Press 'Y' to confirm"
IF %_GP_Y% != "1" GOTO CANCELLED
:SKIPCHECK
CallScript _DisplayMessageBox "You are about to format drive %1%$eol$Are you sure?$eol$Press 'X' to confirm"
IF %_GP_X% != "1" GOTO CANCELLED
BeginDraw UseCurrent
MessageBox "Formatting drive %1%$eol$Please wait"
EndDraw
; ALLOWFORMAT 1
FORMAT %1%
CallSCript _DisplayMessageBox "Drive %1% Formatted"
Mount %1%
GOTO END
:CANCELLED
CallScript _DisplayMessageBox "Drive %1% Format Cancelled"
:END

CallScript _DisplayMessageBox "%_GameTitle% is installed to the hard drive"
CallScript _DisplayMessageBox "%_GameTitle% is on the DVD"
CallScript _DisplayMessageBox "Clear %_GameTitle% Game Saves$eol$Not Implemented"
CallScript _DisplayMessageBox "Delete %_GameTitle%$eol$Not Implemented"
CallScript _DisplayMessageBox "Install %_GameTitle%$eol$Not Implemented"

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 03:22:00 PM

QUOTE

You guys do know about the internal.xml, right?

Damn as soon as i learn something new BJ makes sure i am confused with something else lollll

No i dont know about internal script but will learn it too i guess

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 03:26:00 PM

How to integrate an internal script override in my own sript? Like RenderMessageBox %1% to 100%

Title: Share Scripts For Others
Post by: camora on September 29, 2003, 03:37:00 PM

Yes, as i said. It's a game. I tried Gun Valkyrie, Splinter Cell and Halo.
Always the same problem.
1. I start the script.
2. After the DVD tray is open i put the game in
3. I press A to continue
4. The message "Press A to copy or B to cancel" pops up.
5. I press A and 10 sec later the message "is on Hard Drive" pops up.
Thats all. Now i have a nice Video_TS folder with no use.

This is my copygame.xas:

CODE

SET SomeVar $DVDType$
TrayClose
Delay 10

If %SomeVar% == "game disc" GOTO Launch
If %SomeVar% != "game disc" GOTO begin

:begin
TrayOpen
BeginDraw UseCurrent
MessageBox "Please insert A Game to Copy$eol$Press A to Continue$eol$Press B to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:APRESSED
Trayclose
Delay 10
GOTO Launch

:BPRESSED
TrayClose
QUIT

:Launch
SETFUNC DVDTitle XBETITLE D:DEFAULT.XBE
SETFUNC DVDSIZE FILESIZE D:DEFAULT.xbe

BeginDraw UseCurrent
MessageBox "Press A to Copy %DVDTitle% or B to Cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A2PRESSED
BeginDraw UseCurrent
MessageBox "DVD is Copying"
EndDraw
MKDIR F:\games\%DVDTITLE%
Copy D:\ F:games\%DVDTITLE%
BeginDraw UseCurrent
MessageBox "%DVDTitle% is on Hard drive$eol$Will now reset MenuCache"
EndDraw
TrayOpen
Delay 10
ResetMenuCache

BeginDraw UseCurrent
MessageBox "Press A to Reboot$eol$Press B to Reboot later"
EndDraw

Input
If %_GP_A% == "1" GOTO A3PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A3PRESSED
Trayclose
Reboot
QUIT

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 03:44:00 PM

QUOTE (camora @ Sep 29 2003, 07:04 PM)

umm... the "Copy Single Game DVD" script dont work for me.
Lets say i put Gun Valkyrie in the tray, after that the copying process begins but only for 10 seconds. After the reboot the game is not in f:games, but a folder called video_ts.
Another problem is that i cant delete this folder in MXM. So i need to switch to evox to delete it.

Strange.... MXM is seeing the game disc (an original, obviously) as a DVD movie, which means soemthing failed in the DVD security check.

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 03:48:00 PM

QUOTE (vexx22 @ Sep 29 2003, 07:26 PM)

How to integrate an internal script override in my own sript? Like RenderMessageBox %1% to 100%

In the MXM.xml file, in the
You should be careful of arguments and such... changing them will likely hose up other scripts that depend on them.

Title: Share Scripts For Others
Post by: camora on September 29, 2003, 04:17:00 PM

The games i've tried are all original. I dont have any backups to try. Too bad, this would be a usefull script for me...

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 04:20:00 PM

i tested i earlier, with 007 : Nightfire in the space between 007 and : were in the messagebox for xbetitle a ? instaeat a space. and it go next to copy an then after one second to reboot but by me nothing was created i don´t kno what it is its not the script. Can you help BenJeremy?

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 04:21:00 PM

QUOTE (camora @ Sep 29 2003, 08:17 PM)

The games i've tried are all original. I dont have any backups to try. Too bad, this would be a usefull script for me...

I tested an original, not on the script, but with the FTP, and it read the disc fine.

What DVD drive do you have in your Xbox? Philips, Thomson, or Samsung?

Can you see your original game disc contents using an FTP client?

What BIOS are you using?

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 04:25:00 PM

QUOTE (vexx22 @ Sep 29 2003, 08:20 PM)

Maybe I could add a function to convert a string into a "legal" FATX name?

You couldn't use it to rename game files that aren't valid FATX, but it would help for your situation where a game puts nasty characters like ":" and "" (Which is probably what the "?" actually was) in the title

Title: Share Scripts For Others
Post by: vexx22 on September 29, 2003, 04:29:00 PM

do it please

i have a samsung and use Evox D& bios

i see it throug ftp an can play it on box

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 04:34:00 PM

(just to try)

Didnt try the final version of vexx22 script

Title: Share Scripts For Others
Post by: Habs69M on September 29, 2003, 04:44:00 PM

QUOTE

Can you see your game disc contents over FTP?

Once its finished coping? yeah sure i can or do you mean just put the game dvd in the xbox and look on D if i see the game folders? that too i can see

My bios is Evox 2.6 V1 blue and my kernel is 1.0.4034

Title: Share Scripts For Others
Post by: BenJeremy on September 29, 2003, 05:01:00 PM

QUOTE (camora @ Sep 29 2003, 08:49 PM)

Yes, i mean when you just put a game dvd in the box.
Maybe i should try another BIOS...

Yeah, there's something odd with 4978.03, but I was referring to the MXM FTP Server (I think you were using the BIOS FTP Server?)

Title: Share Scripts For Others
Post by: camora on September 29, 2003, 05:37:00 PM

Yes! I changed my BIOS and now the script works like a charm.
Thanks @all

Title: Share Scripts For Others
Post by: DBZRacer on September 29, 2003, 11:31:00 PM

CODE

SETFUNC MXMXMLFileSize FILESIZE c:\mxm.xml
SETFUNC NewsfeedONFileSize FILESIZE c:\mxmnewsfeedon.xml
SETFUNC NewsfeedOFFFileSize FILESIZE c:\mxmnewsfeedoff.xml
IF %MXMXMLFileSize% == %NewsfeedONFileSize% GOTO NewsfeedStatusON
IF %MXMXMLFileSize% == %NewsfeedOFFFileSize% GOTO NewsfeedStatusOFF

:NewsfeedStatusON
SET MXMFileStatus "ON"
GOTO Start

:NewsfeedStatusOFF
SET MXMFileStatus "OFF"
GOTO Start

:Start
BeginDraw UseCurrent
MessageBox " - Newsfeed Status: %MXMFileStatus% -$eol$Press Y to Turn Newsfeed ON$eol$Press X to Turn Newsfeed OFF$eol$Press B to Cancel"
EndDraw

Input
If %_GP_Y% == "1" GOTO NewsfeedON
If %_GP_X% == "1" GOTO NewsfeedOFF
If %_GP_B% == "1" GOTO Cancel
Quit

:NewsfeedON
IF %MXMFileStatus% == "ON" GOTO StatusSame
COPY c:\mxmnewsfeedon.xml c:\mxm.xml
SET MXMFileStatus "ON"
GOTO ExitMessage

:NewsfeedOFF
IF %MXMFileStatus% == "OFF" GOTO StatusSame
COPY c:\mxmnewsfeedoff.xml c:\mxm.xml
SET MXMFileStatus "OFF"
GOTO ExitMessage

:StatusSame
BeginDraw UseCurrent
MessageBox "Newsfeed Status is already %MXMFileStatus%"
EndDraw
Delay 1
Goto Start

:ExitMessage
BeginDraw UseCurrent
MessageBox "- Newsfeed Status: %MXMFileStatus% -$eol$ Press A to Accept$eol$ B to Change"
EndDraw
Input
If %_GP_A% == "1" GOTO Reboot
If %_GP_B% == "1" GOTO Start

:Reboot
Reboot
Quit

:Cancel
BeginDraw UseCurrent
MessageBox "- Newsfeed Status: %MXMFileStatus% -$eol$ CHANGE ABORTED"
EndDraw
Delay 2

Sample mxmnewsfeedon.xml

QUOTE

<Config>

   <Main>
<SkinsPath>C:\MXMSkins</SkinsPath>
<DiscTitle>Media X Menu</DiscTitle>
<DiscSubtitle>MXM.xml File</DiscSubtitle>
<RemoveDuplicates>True</RemoveDuplicates>
<RemoveInvalid>True<RemoveInvalid>
   </Main>

   <Preferences>
<FTPPriority>highest</FTPPriority>
<SynchronizeClock>false</SynchronizeClock>
<TimeServerIP>192.168.0.100</TimeServerIP>
<Nickname>MXM</Nickname>
<AutoLaunchGame>False</AutoLaunchGame>
<AutoLaunchMovie>False</AutoLaunchMovie>
<AutoLoadMulti>False</AutoLoadMulti>
</Preferences>

   <Network>
<UseDHCP>false</UseDHCP>
<IP>192.168.0.321</IP>
<DefaultGateway>192.168.0.1</DefaultGateway>
<SubnetMask>255.255.255.0</SubnetMask>
<DNS1>192.168.0.1</DNS1>
   </Network>

   <Overrides>
   </Overrides>

   <FTPServer>
<User>
<Name>xbox</Name>
<Password>xbox</Password>
</User>
<AllowAnon>False</AllowAnon>
<AnonRoot></AnonRoot>
<ServerPort>21</ServerPort>
   </FTPServer>

   <Newsfeed name="newsfeed">
<Global>True</Global>
<RotateChannels>True</RotateChannels>
<URL>http://www.xbox-scen...scene.xml</URL>
<UpdateIntervalMin>20</UpdateIntervalMin>
<RotateItemInterval>5</RotateItemInterval>
   </Newsfeed>

</Config>

Sample mxmnewsfeedoff.xml

QUOTE

Please post feedback and/or bugs in the script... I have tested it on my personal xbox and have not run into any problems yet.

PS: I even tried to get the character spacing right by adding whitespaces in the display screens. Hopefully there's a CENTER TEXT command in a future release of MXM

Title: Share Scripts For Others
Post by: irajames1176 on September 30, 2003, 01:32:00 AM

Would it be possible to customize the DVD Copy script so it can add the copied game to the Menu.XML? I think it would be really great to try something like that for people that don't use menu caching or already have there menu all manually setup the way they like it? or am i missing something can you already have the menu cache set to autoadd games to your game list in the menu?

Title: Share Scripts For Others
Post by: Madgame on September 30, 2003, 06:12:00 AM

I am in the same boat with the copy script not working. Same setup as vexx. Can see the disc through MXM FTP. Do I need to change my bios in order for the script to work? All I get now is a reboot and the empty game folder in my games directory.

Title: Share Scripts For Others
Post by: BenJeremy on September 30, 2003, 06:28:00 AM

QUOTE (Madgame @ Sep 30 2003, 10:12 AM)

What BIOS are you using?

Title: Share Scripts For Others
Post by: Madgame on September 30, 2003, 06:47:00 AM

My bios is X2 4976.02.

I was trying it with TWPGA2004.

Title: Share Scripts For Others
Post by: vexx22 on September 30, 2003, 07:02:00 AM

I mean i have EvolutionX D6 bios it to long that i put in on the chip, sorry.

I think its because the xecuter Bios becasue HABS69M has Xecuter too i mean. And has problems too.

Title: Share Scripts For Others
Post by: BenJeremy on September 30, 2003, 07:09:00 AM

QUOTE (Madgame @ Sep 30 2003, 10:47 AM)

My bios is X2 4976.02.

I was trying it with TWPGA2004.

How was MXM launched?

This is an odd problem. If you see it in FTP, the ActionScripts should also see it fine.

Title: Share Scripts For Others
Post by: Habs69M on September 30, 2003, 07:33:00 AM

QUOTE (vexx22 @ Sep 30 2003, 04:02 PM)

I mean i have EvolutionX D6 bios it to long that i put in on the chip, sorry.

I think its because the xecuter Bios becasue HABS69M has Xecuter too i mean. And has problems too.

Huh?

My bios is Evox 2.6 V1 blue , and everything works fine here on a homebrew mod (untill i get my Chameleon this week hehe)

Title: Share Scripts For Others
Post by: Madgame on September 30, 2003, 07:49:00 AM

Yes MXM was launched. I put a link to the script under my apps submenu in MXM. Launched it from there.

MXM is my default dash.

Title: Share Scripts For Others
Post by: chilin_dude on September 30, 2003, 11:26:00 AM

Well i can't share a script as i don't know how to make one, however i can sugest one:
This is for people who used to use pxhddloader to copy games:
Scan E:\hddloader\game00 (or E:\hddloader\game00) for the name in the default.xbe and then rename the folder to this.... I believe this would be a very helpful script but i am too stupid to make it

Title: Share Scripts For Others
Post by: chilin_dude on October 01, 2003, 06:52:00 AM

QUOTE (DBZRacer @ Sep 30 2003, 08:58 PM)

QUOTE (chilin_dude @ Sep 30 2003, 12:26 PM)

Well i can't share a script as i don't know how to make one, however i can sugest one:
This is for people who used to use pxhddloader to copy games:
Scan E:hddloadergame00 (or E:hddloadergame00) for the name in the default.xbe and then rename the folder to this.... I believe this would be a very helpful script but i am too stupid to make it

Good idea... I'll see if I have some time later today to whip it up...

Any progress?
Edit:

Just had a great but simple idea for a script!
How about one that makes your xbox shutdown after 30 minutes (obviously this would only work IN MXM,) this would be great for people who listen to music as they go to sleep

Title: Share Scripts For Others
Post by: BenJeremy on October 01, 2003, 07:48:00 AM

QUOTE (onthereal @ Oct 1 2003, 11:34 AM)

QUOTE (chilin_dude @ Oct 1 2003, 07:52 AM)

Edit:

This might work, but I think MXM halts all music and movies while a action script is running. Since Im at work I cant test it.

CODE

;##############################
;# #
;# Sleep Timer Script #
;# Version: 0.5 #
;# By: The Anticrust #
;# #
;##############################

SET seconds "1800"

; !!!DO NOT EDIT Below if you do not know what you are doing!!!

:Count
If %seconds% == 0 GOTO Halt
If %seconds% != 0 GOTO Subtract
QUIT

:Subtract
BeginDraw UseCurrent
MessageBox "Xbox will be going to sleep in %seconds% seconds"
EndDraw
DELAY 1
SUB %seconds% 1
GOTO Count
QUIT

:Halt
BeginDraw UseCurrent
MessageBox "Good night..."
EndDraw
DELAY 5
Shutdown
QUIT

Correct, but I will look at some triggers and such to fire ActionScripts.

So short answer: not at the moment. Soon.

Title: Share Scripts For Others
Post by: chilin_dude on October 01, 2003, 07:53:00 AM

QUOTE (BenJeremy @ Oct 1 2003, 04:48 PM)

QUOTE (onthereal @ Oct 1 2003, 11:34 AM)

QUOTE (chilin_dude @ Oct 1 2003, 07:52 AM)

Edit:

This might work, but I think MXM halts all music and movies while a action script is running. Since Im at work I cant test it.

CODE

Correct, but I will look at some triggers and such to fire ActionScripts.

So short answer: not at the moment. Soon.

Well thanks on the real that will be handy when it can be used... i take it where 1800 seconds is i could change this to whatever i want?
Then say name one script xbox off 10min. another xbox off 20 min etc?

Ben J must say these scripts are turning out damn nice... i think you should include the dvd ripping one in the default.xbe or something so that the n00bs to mxm see it can rip there games too!
Thanks for the hard work again BJ!

Title: Share Scripts For Others
Post by: DBZRacer on October 01, 2003, 02:37:00 PM

Action Script Name: PxHDDLoader Folder Renamer

Purpose: This action script searches for folders created by PxHDDLoader in your E and F drive and prompts you if you want to rename the undescriptive PXGame0000 folder name to the more descriptive XBE Title.

Please note: This script is based off the latest MXM 9n6 WIP binaries and will not be useable by 9n5 users...

PxHDDLoaderRenamer.xas

CODE

;PxHDDLoader Renamer MXM Action Script
;Written by DBZRacer
;Purpose: This MXM action script searches for folders created by PxHDDLoader in your E and F drive and
;prompts you if you want to rename the undescriptive PXGame0000 folder name to the more descriptive XBE Title.

:Start
BeginDraw UseCurrent
MessageBox " - PxHDDLoader Folder Renamer - $eol$Press X to Rename folders in Drive E$eol$Press Y to Rename folders in Drive F$eol$Press B to Cancel"
EndDraw
Input
If %_GP_Y% == "1" GOTO FDriveSelected
If %_GP_X% == "1" GOTO EDriveSelected
If %_GP_B% == "1" GOTO Cancel
Quit

:FDriveSelected
SETFUNC FolderEmpty PATHEMPTY F:\hddloader
IF %FolderEmpty% == "1" GOTO FolderNotFound
SET HDDLoaderPath "F:\\hddloader"
GOTO DefineSearch

:EDriveSelected
SETFUNC FolderEmpty PATHEMPTY E:\hddloader
IF %FolderEmpty% == "1" GOTO FolderNotFound
SET HDDLoaderPath "E:\\hddloader"
GOTO DefineSearch

:FolderNotFound
BeginDraw UseCurrent
MessageBox "PxHDDLoader Root Folder Not Found on Drive"
EndDraw
Delay 2
QUIT

:DefineSearch
BEGINSEARCH %HDDLoaderPath%\pxgame*
GOTO SearchTop

:SearchTop
IF %search_type% == "dir" GOTO DIRFound
IF %search_type% == "file" GOTO NextSearch
GOTO DoneSearch

:DIRFound
SETFUNC GameTitle XBETITLE %HDDLoaderPath%\%search_name%\default.xbe
BeginDraw UseCurrent
MessageBox "%GameTitle% found in %search_name% folder$eol$Press Y to RENAME %search_name% to %GameTitle%$eol$Press A to Skip to next folder$eol$Press B to Cancel Script"
EndDraw

Input
If %_GP_Y% == "1" GOTO RenameFolder
If %_GP_A% == "1" GOTO NextSearch
If %_GP_B% == "1" GOTO Cancel
Quit

:RenameFolder
RENAME %HDDLoaderPath%\%search_name% %HDDLoaderPath%\%GameTitle%
BeginDraw UseCurrent
MessageBox "%search_name% has been renamed to %GameTitle%$eol$Press A to find next match$eol$Press B to Cancel Script"
EndDraw

Input
If %_GP_A% == "1" GOTO NextSearch
If %_GP_B% == "1" GOTO Cancel
Quit

:NextSearch
SearchNext
GOTO SearchTop

:Cancel
BeginDraw UseCurrent
MessageBox "PHDDLoader Folder Renamer Action Script Cancelled"
EndDraw
DELAY 5
QUIT

:DoneSearch
EndSearch
BeginDraw UseCurrent
MessageBox "PxHDDLoader Folder Renamer$eol$ Completed $eol$ Please REBOOT XBOX NOW $eol$ for changes to take effect"
EndDraw
DELAY 10
ResetMenuCache
QUIT

Script has been updated/cleaned. I have tested this as much as I can so please post feedback if theres any errors that you guys encounter with the script...

Title: Share Scripts For Others
Post by: vexx22 on October 01, 2003, 03:32:00 PM

Cool Script DBZRacer, i have a question because your %search_name%string%, i know what it is and what it do, but by me it has no function, how old is your wip version?

Title: Share Scripts For Others
Post by: DBZRacer on October 01, 2003, 03:38:00 PM

QUOTE (vexx22 @ Oct 1 2003, 04:32 PM)

Cool Script DBZRacer, i have a question because your %search_name%string%, i know what it is and what it do, but by me it has no function, how old is your wip version?

I was using yesterdays WIP binaries. It shouldnt matter if you're using todays WIP as the %search_name% wasnt affected by yesterdays bug.

If you're getting empty results for %search_name% then that means you dont have any folders that start with "pxgame" in your hddloader directory... I can add a check in there later to display a message if it can't find a folder to rename...

Title: Share Scripts For Others
Post by: vexx22 on October 01, 2003, 04:24:00 PM

Can somebody explain me this string? "IF#" i treid to programm an automatic script that should go through the whole ABC to search folder who begin with thi letters. But i need more, or automatic change the T* to the letter U* after going to IF string ABC_* and the * change through the ABC.

Set useit "P*"
GOTO los
:ABC_T
Set useit "T*"
GOTO los

:los
BEGINSEARCH d:\data\%useit%

IF %search_type% == "dir" GOTO run
IF %search_type% != "dir" GOTO ABC_T

Title: Share Scripts For Others
Post by: BenJeremy on October 01, 2003, 04:35:00 PM

QUOTE (vexx22 @ Oct 1 2003, 08:24 PM)

Can somebody explain me this string? "IF#" i treid to programm an automatic script that should go through the whole ABC to search folder who begin with thi letters. But i need more, or automatic change the T* to the letter U* after going to IF string ABC_* and the * change through the ABC.

Set useit "P*"
GOTO los
:ABC_T
Set useit "T*"
GOTO los

:los
BEGINSEARCH d:data%useit%

IF %search_type% == "dir" GOTO run
IF %search_type% != "dir" GOTO ABC_T

IF# is for numeric comparisons...

CODE

IF# %arg1% < %arg2% GOTO SOMETHING

If arg1 is 5 and arg2 is 100, IF# evaluates correctly because it converts the arguments to numbers before comparing, but IF does not (it compares the strings, and alphanumerically, "100" is less than "5" because the comparision is per character)

Title: Share Scripts For Others
Post by: BenJeremy on October 03, 2003, 06:33:00 AM

QUOTE (sandman2869 @ Oct 3 2003, 10:17 AM)

I have been playing with these scripts for the past couple of days, trying to understand the logic behind it all. This is what I have so far:

You can add an actionscript to your menu.xml as an item in the menu and then run it from there.

Well, there are a couple other ways to execute them as well...

QUOTE

This is what I need help understanding:

What are the .xas files for and how do I use them?

.xas files are text files with ActionScripts in them... think of them like DOS BATCH files. They are executed using "CallFile xxxx.xas"

You could use these so you would not need to update your MXM.xml file to modify an existing script, for example. If the calling menu item used a CallFile to load a script from an .xas file, it can be easily replaced/modified.

QUOTE

What is context and why would I want to use an actionscript in context mode?

Context means you can define custom menu items in "Game Options" - and when you execute a script in a context menu item, it gets specific information about the item selected in the menu. This means you can add, for example, a "Delete Game" option, that already knows what game you've selected, and even that it's on the hard drive, not on the DVD.

QUOTE

Is there a way to do looping? Like if I want to rename all of the PxGame* directories to the xbetitle, is there a way for me to do into f: hddloader and check to see how many directories there are, thus renaming the directories as I go?

Sure, using IF# (which does a numerical evaluation fo the variables) and labels:

CODE

SET Index 0
:TOPOFLOOP
ADD Index 1
IF# %Index% < 10 GOTO TOPOFLOOP

QUOTE

I have read the readme txt file as well as all of the clinic and am not getting it. I know I'm not the brightest apple in the bunch here, but I can't be that retarded, can I?

Please help.

Sorry if it's a little obtuse. ActionScripting shoudl be familiar to those who have created old MS-DOS Batch files, but since that's an art that's probably not been practiced regularly in 8 years, it's understandable that some might not understand too well.

QUOTE

PS. I have added the current scripts from this thread as menu items in my menu.xml and am loving them, and am currently working on a couple (very very simple) of my own, but would like to expand more on these capabilities.

Thanks in advance

Title: Share Scripts For Others
Post by: BenJeremy on October 03, 2003, 07:01:00 AM

QUOTE (sandman2869 @ Oct 3 2003, 10:49 AM)

BJ,

Plain and simple, you rock! Thank you sir...

QUOTE

.xas files are text files with ActionScripts in them... think of them like DOS BATCH files. They are executed using "CallFile xxxx.xas"

so if I understand you correctly, I would need something like this in my menu.xml:

<item>
<Title> Test </Title>
<Action>
CallFile blahblah.xas
</Action>
</Item>

Correct?

Correct.

QUOTE

You mentioned my mxm.xml file, but the only actionscript I had in there was my autoexec, should I be adding them to the mxm file instead?

Thanks again for the quick reply.

Well, you can use "CallScript" to access scripts defined in the mxm.xml file. There may be a complex script that would be better suited to calling more generic scripts to do repetitive tasks, in which case, you'd define those in the MXM.xml file.

I'm working on easier ways to integrate the stuff, as well, for example, downloading "plug-in" scripts and such, automatically from the web.

Title: Share Scripts For Others
Post by: DBZRacer on October 03, 2003, 11:52:00 AM

QUOTE (sandman2869 @ Oct 3 2003, 07:17 AM)

If you want to do true looping, I would wait till the next rev comes out. Then you can test my xas i posted above. I was going to go the same route as you with the counter to change the string to PxGame0001 to PxGame 0002 etc but saw it to be very innefiecent. I'm glad BJ implemented the search function so quickly.

With the new search functions in the upcoming release, you can have action scripts do wildcard searches instead of doing simple counter searches now...

Hopefully the script I posted helps a little. I have tested it again and again and have had it run perfectly. It prompts me to change a PXGame000_ folder to the xbe title until it finishes runs out of PxGame000_ folders to find.

Next script I'll work on is an auto-evox-upgrade script which can be easily done now with a few changes to the PxHDDLoader folder renamer I made but I wanted to put some checks in there

Title: Share Scripts For Others
Post by: DeVante on October 03, 2003, 03:58:00 PM

CODE

SET SomeVar $DVDType$
TrayClose
Delay 20

:check
If %SomeVar% == "game disc" GOTO Launch
If %SomeVar% != "game disc" GOTO Begin

:begin
   trayopen
   BeginDraw UseCurrent
   MessageBox "Please insert a game.$eol$$eol$Press 'A' to Continue$eol$Press 'B' to

Cancel"
   EndDraw

   Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
   QUIT

:APRESSED
   trayclose
   delay 20
   goto check

:BPRESSED
   QUIT

:Launch
   SETFUNC DVDTitle XBETITLE D:DEFAULT.XBE

   BeginDraw UseCurrent
   MessageBox "%DVDTITLE%$eol$$eol$Press 'A' to Launch Game$eol$Press 'B' to Cancel"
   EndDraw

   Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_B% == "1" GOTO BPRESSED
   QUIT

:A2PRESSED
LaunchDVD
MessageBox "%DVDTitle%$eol$$eol$Loading game..."
QUIT

Also, what is the correct format for if/then statements?
For instance, if I can't get the above to work, I'll try it with a statement such as: "IF EXIST "D:default.xbe" THEN GOTO LAUNCH"

Also, is there a way to either call a script from within a script or reset a script and start over? If I can't get the above script to work, I could try to reset or re-call the script if the disc type isn't a game.

Title: Share Scripts For Others
Post by: BenJeremy on October 03, 2003, 04:08:00 PM

CODE

IF goto (Evaluates by comparing strings)
- :
- - =
- - >
- - <
- - >=
- - <=
- - != or <>
- - ## (True if LValue contains RValue)
- - #^ (Same as ##, but case insensitive)
- - !## (True if LValue doesn't contain RValue)
- - !#^ (Same as !##, but case insensitive)

It requires a string on either side of the comparison "op" nothing else will work.

Title: Share Scripts For Others
Post by: vexx22 on October 03, 2003, 04:23:00 PM

. I tried it like you say there are problems but it runs corrct. And for little Changes like this one you don´t need to post the complete script again. Because it is posted in the beginning of this topic. i added the tray open in my script but forget to post it, thanks to you for remebering me to this change.

Title: Share Scripts For Others
Post by: vexx22 on October 03, 2003, 04:26:00 PM

For launching a simple DVD it is ok i think. Problem are everywere. But if anyone can repair this script please do it and post the new code. But not something like adding delay time.

Title: Share Scripts For Others
Post by: DeVante on October 03, 2003, 05:24:00 PM

Alright, I moved the first SETVAR to be under the DELAY 20 and I added another SETVAR under the delay in the "APRESSED" portion of the script.

Same problem. :/

Any other ideas? I'll try to mess with a few more things.

Title: Share Scripts For Others
Post by: DeVante on October 03, 2003, 05:49:00 PM

So DBZRacer, does that Launch Disc script you wrote work for you?

I tried it (without altering it at all) and it just freezes/sits at the "Checking Disc Status..." message box.

Title: Share Scripts For Others
Post by: Mordenkainen on October 20, 2003, 07:39:00 AM

Probably has something to do with the comment BJ made that all other processing halts while an actionscript is running. Whatever updates those strings must also halt!

Morden.

Title: Share Scripts For Others
Post by: koldfuzion on October 20, 2003, 07:51:00 AM

that was only the case with the first implementation of actionscripts. Now everything continues running at the same time as the actionscript. I watch the diskspace dwindle while using a game copy script.. so the dvdtype should be available also.

Title: Share Scripts For Others
Post by: BenJeremy on October 20, 2003, 08:45:00 AM

Yes, I should have an "RC" tonight, perhaps.... this weekend I didn't touvch MXM at all - between a busy Saturday and spending Sunday re-arranging systems and components, I just didn't have time.

At least I was able to confirm that my Optorite DOES burn at 4x - some some idiotic reason, the system I had it in didn't want to read form the hard drives fast enough to burn any DVD-R/+R faster than 2x.

Title: Share Scripts For Others
Post by: Taiger on October 23, 2003, 09:11:00 AM

Hi vexx22,

Fantastic this thing about scripts, I made my first skript now, hope you don't
mind, but I stole some of yours to make my first.

It's the FanSpeed script I modifyed ...

FanSpeed.xas

QUOTE

<Action>
BeginDraw UseCurrent
MessageBox "FanSpeed by Taiger, inspired by vexx22 $eol$ $eol$Press A to add 20 Percent to FanSpeed $eol$Press X for default $eol$Press B to Quit"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:APRESSED
SETFANSPEED Manual 20%
SETFANSPEED Manual 20%
Input
If %_GP_A% == "1" GOTO ABPRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:ABPRESSED
SETFANSPEED Manual 30%
SETFANSPEED Manual 30%
Input
If %_GP_A% == "1" GOTO ACPRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:ACPRESSED
SETFANSPEED Manual 40%
SETFANSPEED Manual 40%
Input
If %_GP_A% == "1" GOTO ADPRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:ADPRESSED
SETFANSPEED Manual 50%
SETFANSPEED Manual 50%
Input
If %_GP_A% == "1" GOTO XPRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:XPRESSED
SETFANSPEED default
SETFANSPEED default
Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
If %_GP_X% == "1" GOTO XPRESSED
QUIT

:BPRESSED
QUIT

</Action>

The thing that I noticed is that it seems like 50% is the same as 100% and the
scale is then between 10 to 50 with 10 as default speed, can this be true or
is there something wrong with my xbox ...

Title: Share Scripts For Others
Post by: BenJeremy on October 23, 2003, 10:06:00 AM

Actually, the range is 10-50. There is no translation to percentage.

Title: Share Scripts For Others
Post by: BenJeremy on October 23, 2003, 10:32:00 AM

It looks like when it exceeds 50, you end up setting it back to 10? There is no way to reduce the speed, nor are you reporting the current speed, either the set speed or the actual speed (which you can get via a gadgetstring, $FanSpeed$ should work, I believe).

Title: Share Scripts For Others
Post by: koldfuzion on October 23, 2003, 11:37:00 AM

QUOTE (Taiger @ Oct 23 2003, 08:07 PM)

QUOTE (BenJeremy @ Oct 23 2003, 07:32 PM)

gadgetstring ??, do you have any examples on that one

$FanSpeed$ was the example

you can use it anywhere you would use a variable or in a text block.

BeginDraw UseCurrent
MessageBox "FanSpeed is currently : $FanSpeed$ "
EndDraw

or

If $FanSpeed$ =="20" GOTO PERCENT20
If $FanSpeed$ =="30" GOTO PERCENT30
If $FanSpeed$ =="40" GOTO PERCENT40
If $FanSpeed$ =="50" GOTO PERCENT50

Title: Share Scripts For Others
Post by: BenJeremy on October 23, 2003, 11:47:00 AM

Thanks, koldfuzion!

I also just added a new ActionScript clinic on strings in general. Hopefully it will clear things up for new scripters.

Title: Share Scripts For Others
Post by: koldfuzion on October 23, 2003, 12:00:00 PM

im at work.. so i cant test.. but see if something like this would work.

EDIT: Removed old code.

This post has been edited by koldfuzion: Nov 10 2003, 05:00 AM

Title: Share Scripts For Others
Post by: Taiger on October 23, 2003, 01:11:00 PM

There is something funny with the :
:START
If $FanSpeed$ =="10" GOTO PERCENT10
If $FanSpeed$ =="20" GOTO PERCENT20
If $FanSpeed$ =="30" GOTO PERCENT30
If $FanSpeed$ =="40" GOTO PERCENT40
If $FanSpeed$ =="50" GOTO PERCENT50

Thing I don't realy know wath it is now, but I will continue to lock tomorrow,
have to go to bed now so that I have a posibility to get up to work tomorrow ....

But Tanx for the nice sugestions :)

Title: Share Scripts For Others
Post by: koldfuzion on October 23, 2003, 03:25:00 PM

yea, i did a little troubleshooting and found all the problems. Once i did that.. I realized you cant look for a set value of "10, 20, 30" etc.. caue the fan speed may actually be 18 (compounding the value checking).

so instead i came up with this.. which works flawlessly and provides protection against going too low... if that is in fact possible?

so here is my second KF-Fan.

*(heheh i didnt know i had one fan! Go Team!)

QUOTE

;#################################3
;# Fan Speed Adjuster
;# Author: KoldFuzion - Original concept by vexx22, aditional motivation by Taiger
;# Filename: FanSpeed.xas
;# Date: 10-23-2003
;# Purpose: allows user to set fan speed manually between 10-50%
;##################################

SET NEWFANSPEED $FanSpeed$

GOTO START

:START
BeginDraw UseCurrent
MessageBox "FanSpeed is currently : $FanSpeed$$eol$$eol$A to Increase speed 1$eol$X to Increase speed 5$eol$B to Decrease speed 1$eol$Y to Decrease speed 5$eol$BLACK TO QUIT"
EndDraw
Input
If %_GP_A% == "1" GOTO INCREASEONE
If %_GP_X% == "1" GOTO INCREASEFIVE
If %_GP_B% == "1" GOTO DECREASEONE
If %_GP_Y% == "1" GOTO DECREASEFIVE
If %_GP_BLACK% == "1" GOTO QUIT
GOTO START

:INCREASEONE
ADD NEWFANSPEED 1
GOTO DOFAN

:INCREASEFIVE
ADD NEWFANSPEED 5
GOTO DOFAN

:DECREASEONE
SUB NEWFANSPEED 1
GOTO DOFAN

:DECREASEFIVE
SUB NEWFANSPEED 5
GOTO DOFAN

:DOFAN
IF# %NEWFANSPEED% <= 9 GOTO TOOLOW
IF# %NEWFANSPEED% >= 51 GOTO TOOHIGH
SETFANSPEED Manual %NEWFANSPEED%
GOTO START

:TOOLOW
SETFANSPEED Manual 10
SET NEWFANSPEED 10
BeginDraw UseCurrent
MessageBox "WARNING!!$eol$Setting FanSpeed BELOW 10 is not permitted$eol$Doing so may damage your xbox.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOLOW

:TOOHIGH
SETFANSPEED Manual 50
SET NEWFANSPEED 50
BeginDraw UseCurrent
MessageBox "Unable to set FanSpeed ABOVE 50.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOHIGH

:QUIT
QUIT

Please keep in mind the fanspeed value my change slightly while waiting for your input... so you may see unexpected jumps if you press the button too fast, or no jump at all if only increasing/decreasing by 1

Title: Share Scripts For Others
Post by: Taiger on October 23, 2003, 09:59:00 PM

God Morning, from Finland

I se you have fixed the FanSpeed progi, Nice thats what a program
should look like good work.

It was something like that I wanted to create, but I think I would have needed
like a week to complete the same skript by myself :)

Tanx alot, now I have some more example code to start from whit my next progi :)

Title: Share Scripts For Others
Post by: koldfuzion on October 31, 2003, 10:23:00 AM

here is a date check/repair script for people that unplug thier xbox often.

See link below for script

This post has been edited by koldfuzion: Nov 4 2003, 03:48 AM

Title: Share Scripts For Others
Post by: thetruethugg on November 03, 2003, 12:44:00 PM

Hey KF, I get an error when hitting anything other than A or Black when using your datefix script, so I can't actually change the date. The error I get is:

ERROR (line 1): (callfile) "ActionScript file failed execution"

I have the script saved as an .xas file, which I call from the menu, rather than from mxm.xml, if that makes a difference.

This post has been edited by thetruethugg: Nov 3 2003, 08:52 PM

Title: Share Scripts For Others
Post by: koldfuzion on November 03, 2003, 01:20:00 PM

Datefix Script

i just tested it out on the n6 release and its working fine on my box. I downloaded that version to my pc and put it up on AXS. try that one and see if it produces the same error.

you are running n6 right?

calling from a file is fine. I have all mine set up that way.

This post has been edited by koldfuzion: Nov 3 2003, 09:21 PM

Title: Share Scripts For Others
Post by: thetruethugg on November 03, 2003, 01:48:00 PM

Yea, I'm using n6. Anyway, I'll try this one and see what's up.

Title: Share Scripts For Others
Post by: thetruethugg on November 03, 2003, 06:35:00 PM

New one works perfectly.

Title: Share Scripts For Others
Post by: irajames1176 on November 07, 2003, 12:43:00 AM

This is a very slightly modified version of DBZRacer's LaunchDVDGame_DBZRacer.xas, it's modified to check for and play DVD Movies, i liked how it worked for me with games and wanted it to work with DVD Movies, so i played around and here's what i got

thanks DBZRacer for the script and BenJeremy making an awesome dash

CODE

:DiskCheck
BeginDraw UseCurrent
MessageBox "Checking DVD Status. Please Wait..."
EndDraw
TrayClose
DELAY 10
IF $DVDType$ != "Movie Disc" GOTO InsertDisk
IF $DVDType$ == "Movie Disc" GOTO LaunchDisk
QUIT

:InsertDisk
BeginDraw UseCurrent
MessageBox "Please Insert DVD Movie$eol$Press A TO Continue$eol$Press B To Cancel"
EndDraw
TrayOpen
Input
If %_GP_A% == "1" GOTO DiskCheck
If %_GP_B% == "1" GOTO LaunchCancel
Quit

:LaunchCancel
TrayClose
BeginDraw UseCurrent
MessageBox "DVD Movie Launch Cancelled"
EndDraw
Delay 5
QUIT

:LaunchDisk
EXEC c:xboxdash.xbe
MessageBox "DVD Video Playing"
QUIT

Title: Share Scripts For Others
Post by: DBZRacer on November 07, 2003, 02:01:00 PM

There's an updated version of the Launch DVD Game script here:

Launch DVD Game Script

Check it out and use the new check disk in there. It's a lot more reliable than the 10second delay. :beer:

Title: Share Scripts For Others
Post by: Kthulu on November 09, 2003, 02:52:00 PM

here's my own tweak on the copygame script...

CODE

;#
;#GameDir should be set to the root directory where you keep your games. Please note the double back-slashes.
;#
SET GameDir "F:\\games\\"
SET SomeVar $DVDType$

:CheckDrive
BeginDraw UseCurrent
MessageBox "Checking disk..."
EndDraw
Delay 10

If %SomeVar% == "game disc" GOTO Launch
If %SomeVar% != "game disc" GOTO begin

:begin
TrayOpen
BeginDraw UseCurrent
MessageBox "Please insert game disk:$eol$Press A to continue$eol$Press B to cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO APRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:APRESSED
Trayclose
GOTO CheckDrive

:BPRESSED
TrayClose
QUIT

:Launch
SETFUNC DVDTitle XBETITLE D:DEFAULT.XBE
SETFUNC DVDSIZE FILESIZE D:
SETFUNC strLen LENGTH $driveFfree$
SUB strLen 21
SETFUNC freeFdrive MID 3 %strLen% $driveFfree$
SETFUNC freeFdrive REPLACE "," "" %freeFdrive%

DIV DVDSIZE 1000000

If# %freeFdrive% <= %DVDSIZE% GOTO NOROOM

BeginDraw UseCurrent
MessageBox "%DVDTitle%$eol$Press A to copy$eol$Press B to cancel"
EndDraw

Input
If %_GP_A% == "1" GOTO A2PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A2PRESSED
SET oldTitle %DVDTitle%
SETFUNC DVDTitle REPLACE ":" "-" %DVDTitle%
SETFUNC DVDTitle REPLACE " " "" %DVDTitle%
SET newDir %DVDTitle%

BeginDraw UseCurrent
MessageBox "Copying...$eol$%oldTitle%$eol$to$eol$%GameDir%%newDir%"
EndDraw

MKDIR %GameDir%%newDir%
Copy D: %GameDir%%newDir%
BeginDraw UseCurrent
MessageBox "Copy finished.$eol$Reseting MenuCache..."
EndDraw
ResetMenuCache
Delay 5

BeginDraw UseCurrent
MessageBox "Press A to reboot$eol$Press B to reboot later"
EndDraw

Input
If %_GP_A% == "1" GOTO A3PRESSED
If %_GP_B% == "1" GOTO BPRESSED
QUIT

:A3PRESSED
Trayopen
Reboot
QUIT

:NOROOM
BeginDraw UseCurrent
MessageBox "Insufficient disk space$eol$Exiting..."
EndDraw
Delay 5
QUIT

This post has been edited by Kthulu: Nov 9 2003, 10:54 PM

Title: Share Scripts For Others
Post by: fastTOE on November 09, 2003, 08:21:00 PM

hey kf i cant get your fanspeed2 prog to work... i had the old one working (the one with just 100% or default) but i cant get this one to work... i have it in my cache_menu.xml with <item><action> exactly wut u wrote on the previous page for ur fanspeed 2 thing </action></item> and nothing even shows up in my menu,... im new to all this if u couldnt tell,... so wut am i doing wrong?

Title: Share Scripts For Others
Post by: koldfuzion on November 09, 2003, 08:55:00 PM

The code works fine on my box.

Just to make sure what was posted was the same thing I am running, I updated the code on the previous page.

youmight wan to recopy it to check it out. Sorry if it was FUBAR.

Title: Share Scripts For Others
Post by: fastTOE on November 09, 2003, 09:57:00 PM

sorry to keep annoying but it is still not working....
i have it entered in exactly like so:

CODE

FanSpeed
Change the Speed...

SET NEWFANSPEED $FanSpeed$

GOTO START

:START
BeginDraw UseCurrent
MessageBox "FanSpeed is currently : $FanSpeed$$eol$$eol$A to Increase speed 1$eol$X to Increase speed 5$eol$B to Decrease speed 1$eol$Y to Decrease speed 5$eol$BLACK TO QUIT"
EndDraw
Input
If %_GP_A% == "1" GOTO INCREASEONE
If %_GP_X% == "1" GOTO INCREASEFIVE
If %_GP_B% == "1" GOTO DECREASEONE
If %_GP_Y% == "1" GOTO DECREASEFIVE
If %_GP_BLACK% == "1" GOTO QUIT
GOTO START

:INCREASEONE
ADD NEWFANSPEED 1
GOTO DOFAN

:INCREASEFIVE
ADD NEWFANSPEED 5
GOTO DOFAN

:DECREASEONE
SUB NEWFANSPEED 1
GOTO DOFAN

:DECREASEFIVE
SUB NEWFANSPEED 5
GOTO DOFAN

:DOFAN
IF# %NEWFANSPEED% <= 9 GOTO TOOLOW
IF# %NEWFANSPEED% >= 51 GOTO TOOHIGH
SETFANSPEED Manual %NEWFANSPEED%
GOTO START

:TOOLOW
SETFANSPEED Manual 10
SET NEWFANSPEED 10
BeginDraw UseCurrent
MessageBox "WARNING!!$eol$Setting FanSpeed BELOW 10 is not permitted$eol$Doing so may damage your xbox.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOLOW

:TOOHIGH
SETFANSPEED Manual 50
SET NEWFANSPEED 50
BeginDraw UseCurrent
MessageBox "Unable to set FanSpeed ABOVE 50.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOHIGH

:QUIT
QUIT

it is under my applications folder entered in my xml just like its quoted up above,... what am i doing incorrectly>?

Title: Share Scripts For Others
Post by: koldfuzion on November 09, 2003, 10:20:00 PM

you might try loading it from a file instead of putting it in your menu.

Add this to you your menu.xml (make sure the bolded text points to a valid directory)

CODE

Fan Speed Adj
Allows adjustment of fan speed
Callfile c:\mxmscripts\fanspeed.xas

An put this file in the directory you specify. Then reset your cache and try it out.
Fanspeed.xas

let me know if you get it working.

Title: Share Scripts For Others
Post by: BenJeremy on November 10, 2003, 03:10:00 AM

Another thing is that when putting scripts directly into XML, you have to be aware that Greater-than and Less-than symbols < > have special meaning, so they must be "escaped" using < and >.

That means lines like:

IF# %NEWFANSPEED% <= 9 GOTO TOOLOW
IF# %NEWFANSPEED% >= 51 GOTO TOOHIGH

need to be slightly modified when entered DIRECTLY into the XML as:

IF# %NEWFANSPEED% <= 9 GOTO TOOLOW
IF# %NEWFANSPEED% >= 51 GOTO TOOHIGH

so that the XML parser can properly read it in, and it will translate the special codes (special to the XML parser, not the Script engine) before MXM passes it on to the Script engine.

Of cours,e when running this as an .XAS file, you won't have this problem (no translation is done, or needed on those particular characters, because the XML parser is not involved)

Title: Share Scripts For Others
Post by: Kthulu on November 10, 2003, 05:54:00 AM

this isn't really an actionscript question, but it does arise from seeing this fanspeed script so much. you can set the fanspeed to any setting from 10 to 50. what number in there does it run at by default? might there be any consequences to running the fanspeed way faster than default all the time?...consequences like increased power consumption (least of worries) or fan burning out in it's youth

(most concerned here).

Title: Share Scripts For Others
Post by: BenJeremy on November 10, 2003, 09:15:00 AM

QUOTE (Kthulu @ Nov 10 2003, 09:54 AM)

(most concerned here).

I believe the default speed is 20.

Is there a concern? Possibly, but I haven't seen any real discussion about it. Perhaps in the BIOS forum or elsewhere...

I just opened up an Xbox yesterday, and if I had thought of it, I could have taken a few seconds to check the fan specs.. doh!

Title: Share Scripts For Others
Post by: Kthulu on November 10, 2003, 09:41:00 AM

ok. well, if the default is 20, i can't imagine turning it up to 50 would have that much of an impact on it's life-cycle. thanks!

Title: Share Scripts For Others
Post by: fastTOE on November 10, 2003, 09:49:00 AM

thanks kf! got it working,.... i wasnt sure how to save it as a .xas but i just used notepad and added my own extension and it seemed to work, so thankies very much

Title: Share Scripts For Others
Post by: fastTOE on November 10, 2003, 10:18:00 AM

CODE

SET NEWFANSPEED $FanSpeed$

GOTO START

:START
BeginDraw UseCurrent
MessageBox "FanSpeed is currently : $FanSpeed$$eol$$eol$A to Increase speed 1$eol$X to Increase speed 5$eol$B to Decrease speed 1$eol$Y to Decrease speed 5$eol$START to Maximize speed$eol$BACK to Minimize speed$eol$BLACK TO QUIT"
EndDraw
Input
If %_GP_A% == "1" GOTO INCREASEONE
If %_GP_X% == "1" GOTO INCREASEFIVE
If %_GP_B% == "1" GOTO DECREASEONE
If %_GP_Y% == "1" GOTO DECREASEFIVE
If %_GP_START% == "1" GOTO MAXIMIZE
If %_GP_BACK% == "1" GOTO MINIMIZE
If %_GP_BLACK% == "1" GOTO QUIT
GOTO START

:INCREASEONE
ADD NEWFANSPEED 1
GOTO DOFAN

:INCREASEFIVE
ADD NEWFANSPEED 5
GOTO DOFAN

:DECREASEONE
SUB NEWFANSPEED 1
GOTO DOFAN

:DECREASEFIVE
SUB NEWFANSPEED 5
GOTO DOFAN

:MAXIMIZE
SETFANSPEED Manual 50
SETFANSPEED Manual 50
SET NEWFANSPEED 50
BeginDraw UseCurrent
MessageBox "FanSpeed is at it's maximum"
EndDraw
GOTO START

:MINIMIZE
SETFANSPEED Manual 10
SETFANSPEED Manual 10
SET NEWFANSPEED 10
BeginDraw UseCurrent
MessageBox "FanSpeed is at it's minimum"
EndDraw
GOTO START

:DOFAN
IF# %NEWFANSPEED% <= 9 GOTO TOOLOW
IF# %NEWFANSPEED% >= 51 GOTO TOOHIGH
SETFANSPEED Manual %NEWFANSPEED%
GOTO START

:TOOLOW
SETFANSPEED Manual 10
SET NEWFANSPEED 10
BeginDraw UseCurrent
MessageBox "WARNING!!$eol$Setting FanSpeed BELOW 10 is not permitted$eol$Doing so may damage your xbox.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOLOW

:TOOHIGH
SETFANSPEED Manual 50
SET NEWFANSPEED 50
BeginDraw UseCurrent
MessageBox "Unable to set FanSpeed ABOVE 50.$eol$$eol$Press A to Continue"
EndDraw
Input
If %_GP_A% == "1" GOTO START
If %_GP_BLACK% == "1" GOTO QUIT
GOTO TOOHIGH

:QUIT
QUIT

it basically just combines kolduzion's and vexx22's scripts together in a sort....

sorry for wasting the space with something u all could've done very easily, but like i said, im proud

Title: Share Scripts For Others
Post by: koldfuzion on November 10, 2003, 10:54:00 AM

Edit: I did added a delay 2 after the minimum/maximum messages so they appear.

Title: Share Scripts For Others
Post by: fastTOE on November 10, 2003, 11:08:00 AM

QUOTE

awesome, glad you are finally seeing results. Did you use the callfile method in your menu to get it working?

yea, that way its much easier to edit and such,... thanks for the idea...

on another note

QUOTE

I believe the default speed is 20.

i am just guessing here, but isnt the default speed actually 10 aka 20%? since 10/50 is 20% .... because whenever i start my box and use kf's fanspeed adj it is always at 10 already, ALSO in the mxmskinner default is 20%,... so these two things seem to point to the default either being 10 or 20% which is in fact the same thing.... juss inferring here...

Title: Share Scripts For Others
Post by: koldfuzion on November 10, 2003, 11:16:00 AM

well the script just grabs what the current fanspeed it when the script is activated.. so yes, the default would be 10/20%.

Since you actually have to mod your bios to keep that setting, it will always reset to 10 every time you reboot your machine.

Title: Share Scripts For Others
Post by: Kthulu on November 10, 2003, 01:38:00 PM

QUOTE

Since you actually have to mod your bios to keep that setting, it will always reset to 10 every time you reboot your machine.

can you point me in the right direction to how to go about doing that? i really love the power that actionscripting gives us, but i'd much rather mod my bios and be done with the whole fan affair...

Title: Share Scripts For Others
Post by: koldfuzion on November 10, 2003, 01:41:00 PM

X-S should have a link to XBtool

Title: Share Scripts For Others
Post by: Kthulu on November 12, 2003, 10:50:00 AM

I have made a few additions to the file without being able to test (comments, messagebox prompt, etc.), but it worked perfect last i tested. Let me know if there are any problems. Enjoy!!!

CODE

;NAME: virtualKB
;PURPOSE: To provide an efficient method of getting user-input strings
;RETURNS: _kbInput - contains text entered by user
;USAGE:
;Callfile c:mxmscriptsvirtualKB.xas "Please enter some text:"
;BeginDraw UseCurrent
; MessageBox "You entered: %_kbInput%"
;EndDraw
;
;When the keyboard is displayed:
;X-button - moves cursor back
;Y-button - moves cursor forward
;A-button - adds selected character to string
;B-button - changes case
;CLEAR   - sets string to ""
;BACK   - see X-button
;FORWARD   - see Y-button
;ENTER   - sets _kbInput = input string and quits
;---------------------------------------------------------------------

SET X 125
SET Y 365
SET W 25
SET H 25
SET capLock 1
SET keyboardInput ""
SET leftString ""
SET rightString ""
SET aChar ""
SET cursor 0

SET row1a "1 2 3 A B C D E F G CLEAR"
SET row2a "4 5 6 H I J K L M N BACK"
SET row3a "7 8 9 O P Q R S T U FORWARD"
SET row4a "0 - . V W X Y Z _ ENTER"

SET row1b "1 2 3 a b c d e f g CLEAR"
SET row2b "4 5 6 h i j k l m n BACK"
SET row3b "7 8 9 o p q r s t u FORWARD"
SET row4b "0 - . v w x y z _ ENTER"

SET lowerCase "123abcdefg456hijklmn789opqrstu0-.vwxyz_ "
SET upperCase "123ABCDEFG456HIJKLMN789OPQRSTU0-.VWXYZ_ "

:PAINT
BeginDraw UseCurrent
If %1% == "" GOTO SKIPMSGBOX
MessageBox %1%

:SKIPMSGBOX
BOX 10 330 670 200
BOX 10 330 670 25
BOX %X% %Y% %W% %H%

If# %capLock% == 1 GOTO DRAWKEYBOARDCAP
TEXT 30 330 0 "%leftstring%>%rightString%" YELLOW
TEXT 130 365 0 "%row1b%" WHITE
TEXT 130 390 0 "%row2b%" WHITE
TEXT 130 415 0 "%row3b%" WHITE
TEXT 130 440 0 "%row4b%" WHITE
GOTO DRAWKBEND

:DRAWKEYBOARDCAP
TEXT 30 330 0 "%leftstring%>%rightString%" YELLOW
TEXT 130 365 0 "%row1a%" WHITE
TEXT 130 390 0 "%row2a%" WHITE
TEXT 130 415 0 "%row3a%" WHITE
TEXT 130 440 0 "%row4a%" WHITE

:DRAWKBEND
EndDraw

INPUT
If %_GP_D_LF% == "1" GOTO LF
If %_GP_D_UP% == "1" GOTO UP
If %_GP_D_DN% == "1" GOTO DN
If %_GP_D_RT% == "1" GOTO RT
If %_GP_X% == "1" GOTO BACK
If %_GP_Y% == "1" GOTO FORWARD
If %_GP_A% == "1" GOTO GETKEY
If %_GP_B% == "1" GOTO SETCAP
If %_GP_BACK% == "1" GOTO END
If %_GP_START% == "1" GOTO RETURN
GOTO PAINT

:END
QUIT
------------------------------
:SETCAP
If# %capLock% == 1 GOTO CAPOFF
SET capLock 1
GOTO PAINT
------------------------------
:CAPOFF
SET capLock 0
GOTO PAINT
------------------------------
:UP
If# %Y% == 365 GOTO PAINT
SUB Y 25
GOTO PAINT
------------------------------
:DN
If# %Y% == 440 GOTO PAINT
ADD Y 25
GOTO PAINT
------------------------------
:LF
SET W 25
If# %X% == 125 GOTO PAINT
SUB X 25
GOTO PAINT
------------------------------
:RT
SET W 125
If# %X% == 375 GOTO PAINT
SET W 25
ADD X 25
GOTO PAINT
------------------------------
:GETKEY
SETFUNC   strLen LENGTH %keyboardInput%
SET charX %X%
SET charY %Y%
SUB charX 125
DIV charX 25
SUB charY 365
DIV charY 25
If# %charX% == 10 GOTO GETSPECKEY
If# %strLen% > 46 GOTO PAINT
MULT charY 10
ADD charX %charY%
SETFUNC aChar MID %charX% 1 %upperCase%
If# %capLock% == 1 GOTO SETKBINPUT
SETFUNC aChar MID %charX% 1 %lowerCase%

:SETKBINPUT
If# %cursor% == 0 GOTO GETRIGHTSTRING
SETFUNC leftString LEFT %cursor% %keyboardInput%

:GETRIGHTSTRING
SET nextCursor %cursor%
ADD nextCursor 1
SETFUNC strLen LENGTH %keyboardInput%
If# %strLen% == %cursor% GOTO GETCHAR
SUB strLen %nextCursor%
SETFUNC rightString MID %nextCursor% %strLen% %keyboardInput%

:GETCHAR
SET leftString %leftString%%aChar%
SET keyboardInput %leftString%%rightString%
ADD cursor 1
GOTO PAINT
------------------------------
:GETSPECKEY
If# %charY% == 0 GOTO CLEAR
If# %charY% == 1 GOTO BACK
If# %charY% == 2 GOTO FORWARD
If# %charY% == 3 GOTO RETURN
GOTO PAINT
-----------------------------
:BACK
If# %cursor% == 0 GOTO PAINT
SUB cursor 1
SET rightString %aChar%%rightString%
SETFUNC aChar RIGHT 2 %leftString%
SETFUNC aChar LEFT 1 %aChar%
SETFUNC leftString LEFT %cursor% %leftString%
GOTO PAINT
-----------------------------
:FORWARD
SETFUNC   strLen LENGTH %keyboardInput%
If# %cursor% == %strLen% GOTO PAINT
ADD cursor 1
SETFUNC aChar LEFT 1 %rightString%
SET leftString %leftString%%aChar%
SETFUNC strLen LENGTH %keyboardInput%
SUB strLen %cursor%
SETFUNC rightString RIGHT %strLen% %keyboardInput%
GOTO PAINT
-----------------------------
:CLEAR
SET _kbInput ""
SET keyboardInput ""
SET keyboardInput ""
SET leftString ""
SET rightString ""
SET aChar ""
SET cursor 0
GOTO PAINT
QUIT
-----------------------------
:RETURN
SETFUNC _kbInput TRIM %keyboardInput%
SET keyboardInput ""
SET leftString ""
SET rightString ""
SET aChar ""
SET cursor 0
GOTO END

Title: Share Scripts For Others
Post by: koldfuzion on November 12, 2003, 11:22:00 AM

i will check this out first thing when i get home... looks awesome though..great idea..and great implementation. Looks like this will become the default for user input. Cant wait to try it.

Title: Share Scripts For Others
Post by: koldfuzion on November 12, 2003, 12:29:00 PM

yea sure. I am hoping it works great so i can use it for the newuser script.

Title: Share Scripts For Others
Post by: Kthulu on November 12, 2003, 12:38:00 PM

i hope it works great and everyone enjoys it. it probably still needs some tweaking tho. displaying the 'keyboard' part on the screen is a little hap-hazard because the default system font is not a fixed-width font. i know it would be difficult to incorporate a feature into MXM Actionscripting that would allow one to change the font used for messageboxes and such, so i have this idea...

EDIT: I just realized that the board may have altered the spacing in my 'keyboard display', so everything might not line up on your screens if you copy/paste from here. i'm looking for a place to upload...

when MXM uses a system-default font, is it getting from some font file on the hard-drive? if so, maybe some scripting could be written that temporarily swaps this font file out with one that contains a fixed-width font...

Title: Share Scripts For Others
Post by: geniusalz on November 12, 2003, 06:15:00 PM

Title: Share Scripts For Others
Post by: BenJeremy on November 12, 2003, 07:17:00 PM

QUOTE (Kthulu @ Nov 12 2003, 04:38 PM)

There will be some resource management for ActionScripts in the future.... but it does complicate things a bit.

I was just considering sounds and images, but fonts will work as well - but will require me to re-work some things.

My original idea was that using a standard font would be a good thing, if a bit restricting, due to consistency.

Title: Share Scripts For Others
Post by: Kthulu on November 12, 2003, 08:11:00 PM

Title: Share Scripts For Others
Post by: koldfuzion on November 13, 2003, 05:59:00 AM

QUOTE (DBZRacer @ Nov 13 2003, 10:32 AM)

Sweet job on the keyboard Kthulu... Looks like awesome work.

KF, I still havent had a chance to work on the newuser script/alphabet soup. Might be good anyways since now theres a virtual keyboard here now that will make it very simple for someone to start up MXM now and config just about all the mxm.xml settings they want without ever opening up an xml doc.

I agree. We should hold off until the VK script is done and implement that.

Title: Share Scripts For Others
Post by: Kthulu on November 15, 2003, 12:39:00 PM

Title: Share Scripts For Others
Post by: koldfuzion on November 15, 2003, 01:10:00 PM

awesome script... BJ, any thoughts on including this as an internal script?

here is an updated pic. The lines1 thru 12 are possible messagebox lines for use by the scripter. and if you hit B, you get 4 different keyboards, Upper case, lower case, sybmols and numbers and more symbols.

user posted image

Title: Share Scripts For Others
Post by: Be Absentminded on November 15, 2003, 01:26:00 PM

Sorry to get off topic but what skin is that your using Kold?

-Jameson

Title: Share Scripts For Others
Post by: koldfuzion on November 16, 2003, 02:13:00 PM

Still in its infancy and needs further development.

Purpose: Edit the app/game title without messing with the xbe. It edits the Title in cache_menu.xml.

Goal 1, probably the easiest to do but not yet implimented is to also be able delete the app/game and the menu entry. I probably should have done this before releasing the script.. but thought i would get it out in alpha status.

Goal 2 is to make it recusively search all submenu nodes. Right now it ONLY does 1 submenu (menu.submenu.item) and it needs to be more flexible for those that really customize the hell out of the menu by creating multiple submenus. Follow me? Like main-games-racing-item, main-games-sports-item. Right now it will only do main-games-item

Goal 3 is to be able to add new apps/games in future versions withough making MXM do a full/search and build of the cache_menu.xml. This should provide easier additions and removals of games/apps.

a reboot will be required to enact the changes, the script does not do it for you yet or even offer to do it, so you will need to manually do it.

The virtual keyboard script by Kthulu is a dependancy, so make sure you have it. You need to edit the first two lines of the CE script with notepad. the cache_menu.xml path (if not in c:) and the keyboard script path. Get It Here

Here is the CacheEditor.xas Script

If you use a custom cache_menu.xml, please back it up before testing this script.

If you want to assist in this script.. please do so and inform me of any changes you make to achive the goals.

;##########################################################
;# Name: Cache Menu Editor
;# Author: KoldFuzion
;# Date 11-15-2003
;# Version: .1 alpha
;# FileName: CacheEditor.xas
;# Purpose: Edit the app or game title without messing with the xbe
;# Goal is to be able to add new apps/games in future versions
;# and to delete the app/game and the menu entry.
;#
;#
;# Dependancies: virtualKB.xas
;#
;# requirements: Edit the first two lines below to set it up.
;# If your path has a space. you need to QUOTE the path and
;# use instead of
;#
;# DO NOT USE IF YOU Submenus are more than 1 deep, like the following
;# IE: menu
;# |-> submenu=apps
;# | |-> Submenu media players
;# | |->XBMC
;# | |->XBMP
;# |--Submenu Games
;##########################################################