Print

[thetruethugg]

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

[thetruethugg]

New one works perfectly.

[irajames1176]

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

[DBZRacer]

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.  

[Kthulu]

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

[fastTOE]

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?

[koldfuzion]

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.

[fastTOE]

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

CODE

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>?

[koldfuzion]

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

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.

[BenJeremy]

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 &lt; and &gt;.

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% &lt;= 9 GOTO TOOLOW
IF# %NEWFANSPEED% &gt;= 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)

[Kthulu]

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).

[BenJeremy]

QUOTE (Kthulu @ Nov 10 2003, 09:54 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).

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!

[Kthulu]

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!

[fastTOE]

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

[fastTOE]

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