Print

[BenJeremy]

QUOTE (jqcc @ Feb 25 2004, 09:52 AM)

Please do not flame me.....real noobie here trying to do a font/audio exploit per the one I have in EVOX but MXM is better as I can detect whether what is running currently I am having problems with this command delete c:\fonts\xbox book.xtf and rename c:\fonts\xbox book.xtf xbox book.org What is the correct format Thanks

You need to quote the file paths, since there are spaces (otherwise, ActionScript sees several arguments, where you only have one or two)

...and of course, when quoting, you need to "escape" the backslashes by doubling them up. This is only needed when quoting, because MXM reads quoted strings a little differently and the backslash becomes a special character.

delete "c:\\fonts\\xbox book.xtf"
rename "c:\\fonts\\xbox book.xtf" "xbox book.org"

[jqcc]

I attach the original mxm.xml and the menu.xml for reference

I am trying to make the system say show install fonthack menu item when c:\morden\audiohack.loc exists

and vice versa only show audiohack menu item when c:\morden\fonthack.loc exists

thanks
<Menu>
   <SubMenu>
      <Title>Audio Package</Title>
      <Item>
         <Title>Install Audio Exploit</Title>
         <Description>Install Audio Exploit</Description>
         <Action>
            CallScript InstallPack
         </Action>
      </Item>
      <Item>
         <Title>Remove Package</Title>
         <Description>Remove Audio Exploit</Description>
         <Action>
            Callscript RemovePack
         </Action>
      </Item>
      <Item>
         <Title>Reinstall ST.DB</Title>
         <Description>Reinstall ST.DB if corrupted</Description>
         <Action>
            Callscript RefreshDB
         </Action>
      </Item>
   </SubMenu>
   <SubMenu>
      <Title>Games</Title>
      <Item>
         <AutoDir Flatten="True" Recurse="False">F:\Games</AutoDir>
      </Item>
      <Item>
         <AutoDir Flatten="True" Recurse="False">E:\Games</AutoDir>
      </Item>
   </SubMenu>
   <SubMenu>
      <Title>Apps</Title>
      <Item>
         <AutoDir Flatten="True" Recurse="False">F:\Apps</AutoDir>
      </Item>
      <Item>
         <AutoDir Flatten="True" Recurse="False">E:\Apps</AutoDir>
      </Item>
      <Item>
         <AutoDir Flatten="True" Recurse="False">%_GAMESAVE%Boxplorer</AutoDir>
      </Item>
   </SubMenu>
   <SubMenu>
      <Title>Emus</Title>
      <Item>
         <AutoDir Flatten="True" Recurse="False">F:\Emus</AutoDir>
      </Item>
      <Item>
         <AutoDir Flatten="True" Recurse="False">F:\Emus</AutoDir>
      </Item>
   </SubMenu>
</Menu>


<Config>
   <Main>
      <DiscTitle>Media X Menu</DiscTitle>
   </Main>
         <ActionScript name="AutoExec">
         Set _GAMESAVE "E:\\Udata\\21585554\\000000000000\\"
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 1 goto Installed
         Quit
         :Installed
         SETFUNC dbhacked FILEEXISTS E:\Morden\hack.loc
         If %dbhacked% == 1 goto finish
         delete E:\Tdata\fffe0000\music\st.or
         SETFUNC dbexist FILEEXISTS E:\Tdata\fffe0000\music\st.db
         If %dbexist% == 0 goto nope
         RENAME E:\Tdata\fffe0000\music\st.db E:\Tdata\fffe0000\music\st.or
         :nope
         COPY E:\Tdata\fffe0000\music\st.hk E:\Tdata\fffe0000\music\st.db
         callscript CreateLock E:\Morden\hack.loc
         :finish
      </ActionScript>

      <ActionScript name="GameStub">
         SETFUNC dbhacked FILEEXISTS E:\Morden\hack.loc
         If %dbhacked% == 0 goto finish
         delete E:\Tdata\fffe0000\music\st.db
         SETFUNC dbexist FILEEXISTS E:\Tdata\fffe0000\music\st.or
         If %dbexist% == 0 goto del
         Copy E:\Tdata\fffe0000\music\st.or E:\Tdata\fffe0000\music\st.db
         :del
         delete E:\Morden\hack.loc
         :finish
      </ActionScript>

      <ActionScript name="InstallPack">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 1 goto There
         Callscript _DisplayMessageBox "Are you sure you wish to install the Audio package?$eol$Press the green button to continue, any other to abort."
         If %_GP_A% == "1" GOTO APRESSED
         Quit

         :APRESSED
         MkDir E:\PBL
         COPY %_GAMESAVE%boot.cfg E:\PBL\boot.cfg
         COPY %_GAMESAVE%bg.jpg E:\PBL\bg.jpg
         COPY %_GAMESAVE%font.jpg E:\PBL\font.jpg
         COPY %_GAMESAVE%phoenix2d_logo1.jpg E:\PBL\phoenix2d_logo1.jpg
         COPY %_GAMESAVE%default.xbe E:\PBL\P.xbe
         MkDir E:\PBL\Bioses
         COPY %_GAMESAVE%Audio\*.bin E:\PBL\Bioses
         MkDir E:\mxm
         COPY %_GAMESAVE%mxm\mxm.xml e:\mxm\mxm.xml
         COPY %_GAMESAVE%mxm\default.xbe e:\mxm\default.xbe
         COPY %_GAMESAVE%mxm\BIOSMD5.xml e:\mxm\BIOSMD5.xml
         COPY %_GAMESAVE%mxm\quote.txt e:\mxm\quote.txt
         COPY %_GAMESAVE%mxm\BiosMenu.xas e:\mxm\BiosMenu.xas
         COPY %_GAMESAVE%Audio\menu.xml e:\mxm\menu.xml
         SETFUNC pref FILEEXISTS e:\Udata\00004321\pref.xml
         If %pref% == 1 goto nopref
         COPY %_GAMESAVE%Audio\pref.xml e:\Udata\00004321\pref.xml
         :nopref
         SETFUNC dbexists FILEEXISTS E:\Tdata\fffe0000\music\st.db
         If %dbexists% == 0 goto dbnotexist
         RENAME E:\Tdata\fffe0000\music\st.db E:\Tdata\fffe0000\music\st.or
         :dbnotexist
         COPY %_GAMESAVE%Audio\st.db E:\Tdata\fffe0000\music\st.db
         COPY %_GAMESAVE%Audio\st.db E:\Tdata\fffe0000\music\st.hk
         MkDir E:\Morden
         callscript CreateLock E:\Morden\lock.loc
         callscript CreateLock E:\Morden\hack.loc
         callscript CreateLock E:\Morden\install.loc
         Callscript _DisplayMessageBox "The package has been installed!"
         Quit
         :There
         Callscript _DisplayMessageBox "Package is already installed!"
      </ActionScript>

      <ActionScript name="RemovePack">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 0 goto NotThere
         Callscript _DisplayMessageBox "Are you sure you wish to remove the Audio package?$eol$Press the green button to continue, any other to abort."
         If %_GP_A% == "1" GOTO Cont
         Quit

         :Cont
         Delete E:\PBL\bg.jpg
         Delete E:\PBL\font.jpg
         Delete E:\PBL\boot.cfg
         Delete E:\PBL\phoenix2d_logo1.jpg
         Delete E:\PBL\p.xbe
         Delete E:\Morden\lock.loc
         Delete E:\Morden\install.loc
         Delete E:\PBL\Bioses\4979_67.bin
         Delete E:\PBL\Bioses\EvoxM7.bin
         Delete E:\mxm\mxm.xml
         Delete E:\mxm\default.xbe
         Delete E:\mxm\BIOSMD5.xml
         Delete E:\mxm\menu.xml
         Delete E:\mxm\cache_menu.xml
         Delete e:\mxm\quote.txt
         Delete e:\mxm\BiosMenu.xas
         RmDir E:\PBL\Bioses
         RmDir E:\PBL
         RmDir E:\mxm
         SETFUNC dbexists FILEEXISTS E:\Tdata\fffe0000\music\st.or
         If %dbexists% == 0 goto dbnotexist
         SETFUNC dbhacked FILEEXISTS E:\Morden\hack.loc
         If %dbhacked% == 0 goto dbnothacked
         delete E:\Tdata\fffe0000\music\st.db
         RENAME E:\Tdata\fffe0000\music\st.or E:\Tdata\fffe0000\music\st.db
         goto finish

         :dbnothacked
         delete E:\Tdata\fffe0000\music\st.or
         goto finish

         :dbnotexist
         Delete E:\Tdata\fffe0000\music\st.db

         :finish
         Delete E:\Tdata\fffe0000\music\st.hk
         RmDir E:\Tdata\fffe0000\music\1499ec
         Delete E:\Morden\hack.loc
         RmDir E:\Morden
         Callscript _DisplayMessageBox "The package has been removed!"
         Quit

         :NotThere
         Callscript _DisplayMessageBox "Package is not installed!"
      </ActionScript>

      <ActionScript name="RefreshDB">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 0 goto NotThere
         Callscript _DisplayMessageBox "Are you sure you wish to reinstall the ST.db?$eol$Press the green button to continue, any other to abort."
         If %_GP_A% == "1" GOTO Cont
         Quit

         :Cont
         SETFUNC dbhacked FILEEXISTS E:\Morden\hack.loc
         If %dbhacked% == 1 goto dbhacked
         delete E:\Tdata\fffe0000\music\st.or
         RENAME E:\Tdata\fffe0000\music\st.db E:\Tdata\fffe0000\music\st.or
         goto finish

         :dbhacked
         delete E:\Tdata\fffe0000\music\st.db

         :finish
         COPY E:\Tdata\fffe0000\music\st.hk E:\Tdata\fffe0000\music\st.db
         callscript CreateLock E:\Morden\hack.loc
         Callscript _DisplayMessageBox "The ST.DB has been reinstalled!"
         Quit

         :NotThere
         Callscript _DisplayMessageBox "Package is not installed!"
      </ActionScript>

      <ActionScript name="CreateLock">
         openwrite lockfile %1%
         writefile lockfile "lock"
         closefile lockfile
      </ActionScript>

      <ActionScript name="LaunchWithBios">
         rename e:\pbl\boot.cfg e:\pbl\boot.org
         OpenWrite bootfile e:\pbl\boot.cfg
         WriteFileLn bootfile "RC4Key *YAY, SOMEONE ELSE WHO WANTS TO BE BANNED FOR POSTING RC4 KEYS* *RC4 KEYS ARE NOT TO BE POSTED ON XS*"
         WriteFileLn bootfile "EEPROMKey1_0 *STUPID PEOPLE SHOULD NOT POST RC4 KEYS* *DO NOT POST RC4 KEYS HERE... YOU CAN BE BANNED FOR THIS*"
         WriteFileLn bootfile "EEPROMKey1_1 *YAY, SOMEONE ELSE WHO WANTS TO BE BANNED FOR POSTING RC4 KEYS* *You might get banned for posting this*"
         WriteFileLn bootfile "LEDSequence gggg"
         WriteFileLn bootfile "Romfile %2%"
         WriteFileLn bootfile "Timeout 300000"
         WriteFileLn bootfile "Debug false"
         CloseFile bootfile
         openread QUOTEFILE e:\mxm\quote.txt
         readfileln QUOTEFILE QUOTE
         closefile QUOTEFILE
         OpenWrite autoexec e:\mxm\autoexec.xas
         WriteFileLn autoexec "delete e:\\pbl\\boot.cfg"
         WriteFileLn autoexec "rename e:\\pbl\\boot.org e:\\pbl\\boot.cfg"
         WriteFileLn autoexec "Delete e:\\mxm\\autoexec.xas"
         SetFunc EXEVAR Replace "\\" "\\\\" %1%
         WriteFileLn autoexec "Exec %QUOTE%%EXEVAR%%QUOTE%"
         CloseFile autoexec
         exec e:\pbl\p.xbe
      </ActionScript>

      <ActionScript name="EnableGamestub">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 0 goto NotThere
         SETFUNC entry FILEEXISTS %_GameDir%\MXM_Entry.xml
         If %entry% == 1 goto xmlexists
         CallScript _DisplayMessageBox "Are you sure you wish to enable the gamestub for this Game?$EOL$Press green to continue, and other button to abort."
         If %_GP_A% == "1" GOTO Cont
         Quit

         :Cont
         openread QUOTEFILE e:\mxm\quote.txt
         readfileln QUOTEFILE QUOTE
         closefile QUOTEFILE
         OpenWrite myfile %_GameDir%\MXM_Entry.xml
         WritefileLn myfile "$lt$config$gt$"
         WritefileLn myfile "$lt$item$gt$"         
         WritefileLn myfile "$lt$descr$gt$Gamestub Enabled$lt$/descr$gt$"
         WritefileLn myfile "$lt$description$gt$Gamestub Enabled$lt$/description$gt$"
         WritefileLn myfile "$lt$title$gt$%_GameTitle%$lt$/title$gt$"
         WritefileLn myfile "$lt$xbeid$gt$%_GameXBEID%$lt$/xbeid$gt$"
         WritefileLn myfile "$lt$verified$gt$%_GameVerified%$lt$/verified$gt$"
         WritefileLn myfile "$lt$dir$gt$%_GameDir%$lt$/dir$gt$"
         WritefileLn myfile "$lt$media$gt$%_GameMedia%$lt$/media$gt$"
         WritefileLn myfile "$lt$thumbnail$gt$%_GameThumbnail%$lt$/thumbnail$gt$"
         WritefileLn myfile "$lt$exe$gt$%_GameExe%$lt$/exe$gt$"
         setfunc tempvar replace "\\" "\\\\" %_GameExe%
         WritefileLn myfile "$lt$action$gt$CallScript Gamestub$eol$Exec %Quote%%tempvar%%QUOTE%$lt$/action$gt$"
         WritefileLn myfile "$lt$/item$gt$"
         WritefileLn myfile "$lt$/config$gt$"
         CloseFile myfile
         CallScript _DisplayMessageBox "The GameStub has been enabled for this Game.$EOL$ The system will now reboot and rebuild your menus."
         ResetMenuCache
         Reboot
         :xmlexists
         CallScript _DisplayMessageBox "An MXM_Entry.xml already exists for this item. Aborting!"
         quit
         :NotThere
         Callscript _DisplayMessageBox "Package is not installed!"
      </ActionScript>

      <ActionScript name="RemoveMXMEntry">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 0 goto NotThere
         SETFUNC entry FILEEXISTS %_GameDir%\MXM_Entry.xml
         If %entry% == 0 goto xmlnotexists
         CallScript _DisplayMessageBox "Are you sure you wish to disable the gamestub or custom BIOS's for this item?$EOL$Press green to continue, and other button to abort."
         If %_GP_A% == "1" GOTO Cont
         Quit

         :Cont
         delete %_GameDir%\MXM_Entry.xml
         CallScript _DisplayMessageBox "The MXM_Entry.xml has been removed for this item.$EOL$ The system will now reboot and rebuild your menus."
         ResetMenuCache
         Reboot
         :xmlnotexists
         quit
         :NotThere
         Callscript _DisplayMessageBox "Package is not installed!"
      </ActionScript>

      <ActionScript name="PickBIOS">
         SETFUNC installed FILEEXISTS e:\Morden\install.loc
         If %installed% == 0 goto NotThere
         openread QUOTEFILE e:\mxm\quote.txt
         readfileln QUOTEFILE QUOTE
         closefile QUOTEFILE
         SETFUNC entry FILEEXISTS %_GameDir%\MXM_Entry.xml
         If %entry% == 1 goto xmlexists
         CallFile BiosMenu.xas
         If %_BIOSFILE% == "" goto endhere
         OpenWrite myfile %_GameDir%\MXM_Entry.xml
         WritefileLn myfile "$lt$config$gt$"
         WritefileLn myfile "$lt$item$gt$"         
         WritefileLn myfile "$lt$descr$gt$BIOS Enabled$lt$/descr$gt$"
         WritefileLn myfile "$lt$description$gt$BIOS Enabled$lt$/description$gt$"
         WritefileLn myfile "$lt$title$gt$%_GameTitle%$lt$/title$gt$"
         WritefileLn myfile "$lt$xbeid$gt$%_GameXBEID%$lt$/xbeid$gt$"
         WritefileLn myfile "$lt$verified$gt$%_GameVerified%$lt$/verified$gt$"
         WritefileLn myfile "$lt$dir$gt$%_GameDir%$lt$/dir$gt$"
         WritefileLn myfile "$lt$media$gt$%_GameMedia%$lt$/media$gt$"
         WritefileLn myfile "$lt$thumbnail$gt$%_GameThumbnail%$lt$/thumbnail$gt$"
         WritefileLn myfile "$lt$exe$gt$%_GameExe%$lt$/exe$gt$"
         setfunc tempvar replace "\\" "\\\\" %_GameExe%
         WritefileLn myfile "$lt$action$gt$CallScript LaunchWithBios %Quote%%tempvar%%QUOTE% %_BIOSFILE%$lt$/action$gt$"
         WritefileLn myfile "$lt$/item$gt$"
         WritefileLn myfile "$lt$/config$gt$"
         CloseFile myfile
         CallScript _DisplayMessageBox "The Evox BIOS has been enabled for this Game.$EOL$ The system will now reboot and rebuild your menus."
         ResetMenuCache
         Reboot
         :xmlexists
         CallScript _DisplayMessageBox "An MXM_Entry.xml already exists for this item. Aborting!"
         :endhere
         quit
         :NotThere
         Callscript _DisplayMessageBox "Package is not installed!"
      </ActionScript>
   </Scripts>
   <Context>
      <Item Name="Dummy1">
         <Mode>HD</Mode>
               </Item>
      <Item Name="Dummy2">
         <Mode>HD</Mode>
               </Item>
      <Item Name="Dummy3">
         <Mode>HD</Mode>
               </Item>
      <Item Name="Enable GameStub">
         <Mode>HD</Mode>
               </Item>
      <Item Name="Set Custom Bios">
         <Mode>HD</Mode>
               </Item>
      <Item Name="Remove Gamestub/Bios Settings">
         <Mode>HD</Mode>
               </Item>
   </Context>
</Config>


Thanks again in advance

[flattspott]

[-FourDoor-]

Always been a fan of the exploits but never a users aside from the TSOP flashing aspect as I didn't see it stable enough to meet my daily needs. But great idea on the MXM based installer.

[flattspott]

I was gonna say cause

WritefileLn myfile "$lt$config$gt$"
WritefileLn myfile "$lt$item$gt$"
WritefileLn myfile "$lt$descr$gt$BIOS Enabled$lt$/descr$gt$"
WritefileLn myfile "$lt$description$gt$BIOS Enabled$lt$/description$gt$"
WritefileLn myfile "$lt$title$gt$%_GameTitle%$lt$/title$gt$"
WritefileLn myfile "$lt$xbeid$gt$%_GameXBEID%$lt$/xbeid$gt$"
WritefileLn myfile "$lt$verified$gt$%_GameVerified%$lt$/verified$gt$"
WritefileLn myfile "$lt$dir$gt$%_GameDir%$lt$/dir$gt$"
WritefileLn myfile "$lt$media$gt$%_GameMedia%$lt$/media$gt$"
WritefileLn myfile "$lt$thumbnail$gt$%_GameThumbnail%$lt$/thumbnail$gt$"
WritefileLn myfile "$lt$exe$gt$%_GameExe%$lt$/exe$gt$"

is a bit out dated now.

[jqcc]

Just to update all
I am almost done with the font/audio hack switch using mxm
The code is horrible as I am rushing the job

Trying to add a couple of more features....like the ability to use the dvd to add the font exploit when the files are not in the harddisk
Plus a way to copy in the skin files as well as the other applications like xbox media player, boxexplorer and any others
I am trying to do a slayers with the mxm code

I would like the experts here to help me tidy up the code
I did not use the as as I want to keep it within mxm.xml - this makes it more clumsy but I want to minimize the number of files to copy to the save game

Two questions/issues before I can complete
I still cannot get the context to work ? any ideas
And how to implement passwords

Thanks for all the help so far

[BenJeremy]

Just cranking up a new thread. Ask questions, and I'll try and clarify.

Ask here about the clinic posts, as well... since that thread is locked.

[DBZRacer]

Also another request... Is there a way to have MXM pick up action scripts in the menu automatically like in the autodirs? Of course we would have to standardize a heading to give descriptions and whatnot like a make shift xbe id. but i think it would be beneficial for other users to be able to just drop a predefined action script in an action script subfolder and have mxm autoconfig to launch it. Barring that there arent any additional extensions needed...

[koldfuzion]

ok,  having problems with text color.

1.  can i change the text color of a variable in a msgbox without using coordinate?

2. im a dumbass..can you provide an example..i cant get it to do it.

[BenJeremy]

QUOTE (koldfuzion @ Oct 15 2003, 07:32 PM)

ok,  having problems with text color. 1.  can i change the text color of a variable in a msgbox without using coordinate? 2. im a dumbass..can you provide an example..i cant get it to do it.

Sorry, messageboxes only suport a single standard color.

I wanted to do something more complex, but it's just not easy to do.

[koldfuzion]

ok no problem.  I'm still a dumbass.  


got the ip portion of th new user script "semi-complete" as far as the UI goes... would like others to look at it though to see if it could be done in a more efficient way

thats what i was wanting the coloring for, to simulate a "cursor" so ppl didnt get lost editing the IP address.


How can i do it like in the system menu? or is that possible from actionscript?

[BenJeremy]

QUOTE (koldfuzion @ Oct 15 2003, 08:43 PM)

ok no problem.  I'm still a dumbass.   got the ip portion of th new user script "semi-complete" as far as the UI goes... would like others to look at it though to see if it could be done in a more efficient way thats what i was wanting the coloring for, to simulate a "cursor" so ppl didnt get lost editing the IP address. How can i do it like in the system menu? or is that possible from actionscript?

I was thinking of just throwing up four boxes, with each part of the number... Left/Right to change boxes (focus indicated by box drawn behind it, larger, different colors) and up/down to change each section's number.

You could also set the color of the "focused" box's text, too...

As for menus, since I'm not changing the system font, you should be able to set up standard positioning to simulate menu action, as well...

[koldfuzion]

hrmm.. might need to go back.   its a little weird but this is what we have so far. (works ok)

QUOTE

;############################## ;# Script: MXM Setup Script ;# Authors: DBZRacer, KoldFuzion ;# Date: 10-15-2003 ;# Version: .001 ;# Purpose: To allow for actionscript setup of MXM.XML ;############################## ;################ DEFINE VARIABLES  ################ ;#               192.168.001.003 ; default IP for new setup? SET IP1 "1"     ;1xx.xxx.xxx.xxx SET IP2 "9"     ;x9x.xxx.xxx.xxx SET IP3 "2"     ;xx2.xxx.xxx.xxx SET IP4 "1"     ;xxx.1xx.xxx.xxx SET IP5 "6"     ;xxx.x6x.xxx.xxx SET IP6 "8"     ;xxx.xx8.xxx.xxx SET IP7 "0"     ;xxx.xxx.0xx.xxx SET IP8 "0"     ;xxx.xxx.x0x.xxx SET IP9 "1"     ;xxx.xxx.xx1.xxx SET IP10 "0"    ;xxx.xxx.xxx.0xx SET IP11 "0"    ;xxx.xxx.xxx.x0x SET IP12 "3"    ;xxx.xxx.xxx.xx3 SET CIP "1"  ;used to place cursor SET NEWIP "192.168.001.003" SET IPBOXLEFT 145 ;################ DEFINE FUNCTIONS  ################ ;################ SCRIPT FLOW LOGIC  ################ :SKINPATH   BeginDraw UseCurrent     MessageBox "A To Change IP$eol$X to Quit"   EndDraw   Input     If %_GP_A% == "1" GOTO IP     If %_GP_X% == "1" GOTO IQUIT   QUIT ;################ START IP  ################ :IP   BeginDraw UseCurrent     MessageBox "Use Thumbpad LEFT-RIGHT to move cursor$eol$Thumbpad UP-DOWN to change values$eol$$eol$IP: %IP1%%IP2%%IP3%.%IP4%%IP5%%IP6%.%IP7%%IP8%%IP9%.%IP10%%IP11%%IP12%$eol$$eol$A to Continue.$eol$X to Quit$eol$B to Go Back$eol$Y To Reset IP" Box %IPBOXLEFT% 202 14 21 0x7000FF00 0x00FFFFFF   EndDraw   Input     If %_GP_D_UP% == "1" GOTO IPUP     If %_GP_D_DN% == "1" GOTO IPDN     If %_GP_D_RT% == "1" GOTO IPNEXT     If %_GP_D_LF% == "1" GOTO IPPREV     If %_GP_A% == "1" GOTO SAVEIP     If %_GP_B% == "1" GOTO SKINPATH     If %_GP_X% == "1" GOTO IQUIT     If %_GP_Y% == "1" GOTO REDEFINEIP   Quit :IPUP ;Up was pushed, increase number by upper adjustment ADD IP%CIP% 1 IF %IP1% == 3 GOTO ADJ1Upper IF %IP2% == 10 GOTO ADJ2Upper IF %IP3% == 10 GOTO ADJ2Upper IF %IP4% == 3 GOTO ADJ1Upper IF %IP5% == 10 GOTO ADJ2Upper IF %IP6% == 10 GOTO ADJ2Upper IF %IP7% == 3 GOTO ADJ1Upper IF %IP8% == 10 GOTO ADJ2Upper IF %IP9% == 10 GOTO ADJ2Upper IF %IP10% == 3 GOTO ADJ1Upper IF %IP11% == 10 GOTO ADJ2Upper IF %IP12% == 10 GOTO ADJ2Upper GOTO IP :IPBOXLEFT0 ; 1st digit cursor SET IPBOXLEFT 147 GOTO IP :IPBOXLEFT1 ; 1st digit cursor SET IPBOXLEFT 147 GOTO IP :IPBOXLEFT2 ; 2nd digit cursor SET IPBOXLEFT 158 GOTO IP :IPBOXLEFT3 ; 3rd digit cursor SET IPBOXLEFT 171 GOTO IP :IPBOXLEFT4 ; 4rd digit cursor SET IPBOXLEFT 187 GOTO IP :IPBOXLEFT5 ; 5rd digit cursor SET IPBOXLEFT 200 GOTO IP :IPBOXLEFT6 ; 6rd digit cursor SET IPBOXLEFT 213 GOTO IP :IPBOXLEFT7 ; 7rd digit cursor SET IPBOXLEFT 229 GOTO IP :IPBOXLEFT8 ; 8rd digit cursor SET IPBOXLEFT 243 GOTO IP :IPBOXLEFT9 ; 9rd digit cursor SET IPBOXLEFT 257 GOTO IP :IPBOXLEFT10 ; 10rd digit cursor SET IPBOXLEFT 272 GOTO IP :IPBOXLEFT11 ; 11rd digit cursor SET IPBOXLEFT 285 GOTO IP :IPBOXLEFT12 ; 12rd digit cursor SET IPBOXLEFT 298 GOTO IP :IPBOXLEFT13 ; 13rd digit cursor SET IPBOXLEFT 298 GOTO IP :IPDN ;Down was pushed, decrease number by lower adjustment SUB IP%CIP% 1 IF %IP1% == -1 GOTO ADJ1Lower IF %IP2% == -1 GOTO ADJ1Lower IF %IP3% == -1 GOTO ADJ1Lower IF %IP4% == -1 GOTO ADJ1Lower IF %IP5% == -1 GOTO ADJ1Lower IF %IP6% == -1 GOTO ADJ1Lower IF %IP7% == -1 GOTO ADJ1Lower IF %IP8% == -1 GOTO ADJ1Lower IF %IP9% == -1 GOTO ADJ1Lower IF %IP10% == -1 GOTO ADJ1Lower IF %IP11% == -1 GOTO ADJ1Lower IF %IP12% == -1 GOTO ADJ1Lower GOTO IP :IPNEXT ;shift right to next number ADD CIP 1 IF %CIP% == 13 GOTO ADJRIGHT GOTO IPBOXLEFT%CIP% GOTO IP :IPPREV ;shift left to previous number SUB CIP 1 IF %CIP% == 0 GOTO ADJLEFT GOTO IPBOXLEFT%CIP% GOTO IP :ADJLEFT ;dont allow to go below 1 LEFT SET CIP 1 GOTO IPBOXLEFT%CIP% GOTO IP :ADJRIGHT ;dont allow MORE THAN 12 TO RIGHT SET CIP 12 GOTO IPBOXLEFT%CIP% GOTO IP :ADJ1Lower ;dont allow negative numbers SET IP%CIP% 0 GOTO IP :ADJ1Upper ;Upper limit for first digit in group SET IP%CIP% 2 GOTO IP :ADJ2Upper ;upper limit for second and third digit in group SET IP%CIP% 9 GOTO IP :SAVEIP SET NEWIP "%IP1%%IP2%%IP3%.%IP4%%IP5%%IP6%.%IP7%%IP8%%IP9%.%IP10%%IP11%%IP12%" messagebox "%NEWIP% Quit :REDEFINEIP SET IP1 "1"     ;1xx.xxx.xxx.xxx SET IP2 "9"     ;x9x.xxx.xxx.xxx SET IP3 "2"     ;xx2.xxx.xxx.xxx SET IP4 "1"     ;xxx.1xx.xxx.xxx SET IP5 "6"     ;xxx.x6x.xxx.xxx SET IP6 "8"     ;xxx.xx8.xxx.xxx SET IP7 "0"     ;xxx.xxx.0xx.xxx SET IP8 "0"     ;xxx.xxx.x0x.xxx SET IP9 "1"     ;xxx.xxx.xx1.xxx SET IP10 "0"    ;xxx.xxx.xxx.0xx SET IP11 "0"    ;xxx.xxx.xxx.x0x SET IP12 "3"    ;xxx.xxx.xxx.xx3 SET CIP "1"  ;used to place cursor SET NEWIP "192.168.001.003" GOTO IP :IQUIT Quit ;################ End IP  ################ ;############################ TO DO LIST #################### ;####   Main  ###### ; -DiscTitle ; -DiscSubTitle ; -SkinPath ;####   Network  ###### ; -IP ; -Subnet ; -Gateway ; -DNS1 ; -DNS2 ;####   FTPServer  ###### ; -ServerPort ; -username ; -password ; -port ; -allow anonymouse ; -anon root ;####   Preferences  ###### ; -Nickname ; -Timeserver IP ; -DVDPlayer ; -DeepMultiSearch (true false) ;####   Music  ###### ; -UseMusic True ; -Global True ; -Random True ;####   NewsFeed ; -X-S Add ; -X-S Remove

This post has been edited by koldfuzion: Oct 16 2003, 03:19 AM

[koldfuzion]

maybe once we put the actual "text" in for what the IP setting box will say..

we could just use a transparent box with a border outline over top the ip to show the cursor? or will the box appear behing the messagebox?  hrmm.. maybe the messageboxs need to be semi-transparent to facilitate this.

This post has been edited by koldfuzion: Oct 16 2003, 01:12 AM

[BenJeremy]

QUOTE (koldfuzion @ Oct 15 2003, 09:00 PM)

maybe once we put the actual "text" in for what the IP setting box will say.. we could just use a transparent box with a border outline over top the ip to show the cursor? or will the box appear behing the messagebox?  hrmm.. maybe the messageboxs need to be semi-transparent to facilitate this.

Drawing is done in the order you specify... just like skin layouts. You could use a transparent color (color parms now accept 0xFFFFFFFF notation, as well as named colors).



:::phew::: just switched machines here in my lair. The new box, a 2.6Ghz 800mhz FSB P4, is beefier than the old box, but I had installed new VS.NET and the latest XDK - and MXM was hosing badly. So I spent the evening here unhosing the code due to a bizarre difference in the STL libraries of VS.NET 2003 and the old VS.NET (for some reason, the NEWER implementation REMOVED functionality from the standard string classes)