Print

[X30n]

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

[vexx22]

try programming any kind of a script, it just for learning. let your fantasy play. 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.

[Habs69M]

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

: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
Delay 2
FORMAT C:

: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
Delay 2
FORMAT E:

: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

[vexx22]

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

[Habs69M]

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?

[geniusalz]

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

: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 Delay 2 FORMAT C: 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 Delay 2 FORMAT E: 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 Delay 2 FORMAT F: 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 Delay 2 FORMAT G: QUIT :BACKPRESSED QUIT

[Habs69M]

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

[BenJeremy]

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

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

[geniusalz]

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

[geniusalz]

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

[Habs69M]

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

[geniusalz]

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

[Habs69M]

Hmm cool thks bud, you helped alot    will test this ,without the QUIT after the FORMAT command and see what happens,

Thks again  

[Habs69M]

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

[vexx22]

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.