Autoit3

[Bjs]

I was looking to something with a type of script and came across autoit3 the other week , and its free , and simple enough too learn .

I made my first shell program with icons , buttons , tabs , ectra in less than 3 days , and included a help file .

The second thing I did was :

Newbies and others have asked about button creation , I assume for dvd , as I use it with pgcedit .

So I am going to show you a script that adds 13 buttons to a single cell from a vob file .

My intention is to write another script that will enable vobedit to rename all the cells Ids to 0 , 1 , 2 , 3 , and so on till last cell is located .

Then have vobedit shuffle it out as cells , run a script to rename them as expected for ifoedit to create an ifo using the fisrt one and produce , say a movie preview vob was used , you will beable to have as many buttons where you like to have them now (36 being max) , cool stuff ...

The script contains notes in places you should read to be sure , as this one has a slight goof (well I'm not perfect) , it took me 48 hours to get the mouse thing to work correctly .

I will redo the script for users in a couple of days for 800 x 600 resolution , but for the moment its 1280x1024 ...

Ps : dont post it anywhere else without asking me first , I am bjs in this forum and autoit's forum , i will find out sooner or later , and you'll be toast ...

Without any more yabba yabba , heres the script , you will need to install autoit3 :

http://www.autoitscript.com/autoit3/

The script puts 13 buttons to the right and one on top of the other :

Here it is people , enjoy :

; This script is for 1280 x 1124 screen resolution ONLY
; Only modify where I say you can do so ....
; This script is to automate the button creation within vob files
; Generated using Autoit Scite Autorecord
; Created through the knowledge of BJS in vobedit usage to create dvd menu buttons
; Script modified by BJS

; Original usage was for still menus ..
; But because of autoit , I have writen scripts to deal with movie menus that have audio streams in them ..

; For more info on BJS , web search for BJShotknowHOW.pdf ...
; It will include web site info soon , which will contain hundreds of scripts for newbies .
; You get to choose from screen resolution listings (not everybody has 17" or 32" monitor)
; Thats why I wrote that many ...

; Note : some programs used by these scripts do have a minimum screen resolution .
; Some programs can be adjusted internally to smaller scales , just like vobedit can .

; You agree that by using this script , you may not hold BJS liable for any coincidental
; pc damage , and that you fully understand it is YOUR responsibilty to check any scripts
; prior , as to there level of fitness before using them ....

; This mouse coords is giving me the S**TS....

; In some cases , if the mouse itself is not used to click on a certain boxs in vobedit , it will cause this script to do one of two things ...

; One : go plain spazz when error happens (safe , just gose plain stupid , bash the esc key repeatedly till it halts)
; Two : just plain stops

; This initial script took me 48 hours solid work to figure out what was acceptable betwwen autoit usage and vobedits allowed usages ...
; Drove me bonkers .........
; BUT IT DAMN WELL WORKS NOW ........... FINALLY ..... now to get some damn sleep


; next four lines is optional "opt"
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)

; This line is NOT optional (the program MUST go there)
Run('C:\Program Files\VobEdit.exe')

WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{TAB 3}{ENTER}")
WinWait("Open","")
If Not WinActive("Open","") Then WinActivate("Open","")
WinWaitActive("Open","")

; To do list

; Create script to generate 2 new folders - Vobmenu and Working
; Create script to allow user to choose vob
; Script - user is asked if allowed to copy , warned it must be or else (we keep original alone incase)
; Script runs ifoedit , ifoedit reads vob and renames all cells 1 to "?" , last found cell in vob
; Script ifoedit to split vob by cell id to working folder
; Script to rename original vob to Backup_vob.vob
; Script that will loop the next 2 lines till last know cell is done
; This vob menu script runs next
; Script to move updated cell to Vobmenu folder
; Script that renames all cells to VTS_01_???.VOB (the ? represents what order , ie it was 000 , then come 001 , and on till last known)
; Script that runs ifoedit , and joins cells in correct order into new vob called menu.vob , move to vobmenu folder
; Script deletes all old cell files from working folder , deletes backup_vob.vob , and deletes working folder only .
; Script - user asked to check final output of work , if happy with results , is asked to delete backup_vob.vob only
; Must include script to read number of cells found using vobedit , write to temp text file .
; This is to allow some scripts to do their work properly without stuffing up ....

; That should cover the damn thing .........

; This line needs modification to suit your needs
Send("{TAB 7}{DOWN}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{TAB 11}{DOWN}{TAB 7}{SPACE}{TAB 7}{DOWN 86}")

; Yes I counted the damn things as I pressed the keys

MouseMove(511,89)
MouseClick("left",511,89,2)
WinWait("Edit value","")
If Not WinActive("Edit value","") Then WinActivate("Edit value","")
WinWaitActive("Edit value","")

; No idea ? , but it MUST be included

Send("4096")

; Give me a break , even I dont know everything ..... yet , more info , web search for BJSdvdGUIDE.PDF

MouseMove(232,48)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 61}")
MouseMove(556,90)
MouseClick("left",556,90,2)
WinWait("Edit value","")
If Not WinActive("Edit value","") Then WinActivate("Edit value","")
WinWaitActive("Edit value","")

; This number relates to the number of buttons you require for your menu
;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXX
Send("13{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
MouseMove(554,103)
MouseClick("left",554,103,2)
WinWait("Edit value","")
If Not WinActive("Edit value","") Then WinActivate("Edit value","")
WinWaitActive("Edit value","")

; This number realtes to the number of buttons you require for your menu

Send("13{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 61}")
MouseMove(555,89)
MouseClick("left",555,89,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")
; Important : both numbers realeted to number of buttons MUST be the same
; and relate to the button information I have supplied for all thirteen buttons
;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXX

; You may replace the following code for your own color scheme , if you know what you are doing first

Send("{TAB 2}00005af011105af0")
MouseMove(482,52)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 72}")
MouseMove(549,89)
MouseClick("left",549,89,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; You may replace the following code for your own color scheme , if you know what you are doing first

Send("{TAB 2}22205af033305af0")
MouseMove(474,51)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 72}")
MouseMove(598,90)
MouseClick("left",598,90,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; You may replace the following code for your own color scheme , if you know what you are doing first

Send("{TAB 2}44405af055505af0")
MouseMove(475,50)
MouseDown("left")
MouseUp("left")
Sleep(1000)

; Now we do the buttons , in this sample there are 13 , they stack on top of each other over to the right ....

; As this is for 1280 x 1024 screen resolution , under NO circumstances , and I mean it ..... the following

; DO NOT CHANGE SENDS , these are accurate for 1280 x 1024

; You may change numbers where I say so only , thats the rule , break them , and the script fails .... you have been warned

WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 74}")
MouseMove(557,86)
MouseClick("left",557,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed - you must know what you are doing FIRST (ask bjs in autoit forum for pdf that explains it all (300kbs in zip)

Send("{TAB 2}1{TAB 2}535{TAB}40{TAB}614{TAB}62{TAB}13{TAB}2{TAB}1{TAB }1{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",557,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed (they relate to how they connect to components in dvd structure (titles / other menu's)
; As there are 13 buttons in this example , they should relate to different titles / menu's

; This one plays first title (say spiderman preview)
Send("{TAB 2}300200000001")
MouseMove(470,49)
MouseDown("left")
MouseUp("left")
sleep(1000)
; Need to realign appropriately according to rest of script ....
send("{DOWN 56}")
MouseMove(557,86)
MouseClick("left",557,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}85{TAB}624{TAB}108{TAB}1{TAB}3{TAB}2{TAB }2{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",557,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays second title (happy gilmore preview)
Send("{TAB 2}300200000002")
MouseMove(470,49)
MouseDown("left")
MouseUp("left")
sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}126{TAB}648{TAB}152{TAB}2{TAB}4{TAB}3{TA B}3{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays third title (sharktale preview)
Send("{TAB 2}300200000003")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}170{TAB}660{TAB}194{TAB}5{TAB}5{TAB}4{TA B}4{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays forth title (pitchblack preview)
Send("{TAB 2}300200000004")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}208{TAB}670{TAB}236{TAB}4{TAB}6{TAB}5{TA B}5{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays fifth title (sharks bay preview)
Send("{TAB 2}300200000005")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}248{TAB}650{TAB}274{TAB}5{TAB}7{TAB}6{TA B}6{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays sixth title (blue beard preview)
Send("{TAB 2}300200000006")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}290{TAB}668{TAB}316{TAB}6{TAB}8{TAB}7{TA B}7{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays seventh title (Track gore - mini movie I made) , truck racing claims innocent by stander behind safety barrier , rated 18+
Send("{TAB 2}300200000007")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}328{TAB}698{TAB}354{TAB}7{TAB}9{TAB}8{TA B}8{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays Eighth title (bear cavern preview)
Send("{TAB 2}300200000008")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("[removeme]VobEdit[removeme]","")
WinWaitActive("[removeme]VobEdit[removeme]","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}370{TAB}664{TAB}396{TAB}8{TAB}10{TAB}9{T AB}9{TAB}{ENTER}")
WinWait("[removeme]VobEdit[removeme]","")
If Not WinActive("[removeme]VobEdit[removeme]","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays nineth title (socom game preview converted)
Send("{TAB 2}300200000009")
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}406{TAB}638{TAB}432{TAB}9{TAB}11{TAB}10{ TAB}10{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; ok , from here on it gets a little tricky so I will include the code for my 13 buttons
; 13th points to another menu ...

; to understand alot more about these numbers , you should grab bjs_pcgedit_guide.pdf , which explains alot and how to get past pcgedits button creation problem .
; when you save your dvd , they dont exist , this is WHAT this script FIXES .....

; ATLEAST SOMEONE OUT THERE HAS AN ORIGINAL IDEA , and is thinking of ways to get around programs and their inabilities .

; This is to assist newbies into dvd creation , fast yet flexible , and with full support from bjs on any of his scripts
; Just pm bjs at autoit forum , and me will reply (BJS is ME) ...

; ok , lets look at these double digit title numbers now ....

; This one plays tenth title (battlefield earth preview)
Send("{TAB 2}30020000000A")
; Notice that A , yes , it represents 10th title
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}448{TAB}638{TAB}474{TAB}10{TAB}12{TAB}11 {TAB}11{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; This one plays eleventh title (evil dead 2 preview)
Send("{TAB 2}30020000000B")
; B is for 11
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}486{TAB}674{TAB}516{TAB}11{TAB}13{TAB}12 {TAB}12{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")
; This one plays twelfth title (carmagedon preview)
Send("{TAB 2}30020000000C")
; this one is C
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 56}")
MouseMove(598,86)
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")

; These numbers below may be changed

Send("{TAB 2}1{TAB 2}535{TAB}528{TAB}622{TAB}554{TAB}12{TAB}1{TAB}13{ TAB}13{TAB}{ENTER}")
WinWait("VobEdit","")
If Not WinActive("VobEdit","") Then WinActivate("VobEdit","")
WinWaitActive("VobEdit","")
Send("{DOWN 66}")
MouseClick("left",598,86,2)
WinWait("Dialog","")
If Not WinActive("Dialog","") Then WinActivate("Dialog","")
WinWaitActive("Dialog","")
; Lucky for some I think , but for now , it links to the second menu called PC GAME PREVIEW
; it is a title you bring into [removeme]pgcedit[removeme] , then scan for bov's , then link the buttons up to what you need
; of course I have already told vobedit the titles each points to .
Send("{TAB 2}30020000000D")
; Wait till you get to having 55+ titles , it changes dramatically
MouseMove(474,49)
MouseDown("left")
MouseUp("left")
Sleep(1000)

; dont know this yet , but when done the scipt ends , get out .
; leaves vobedit open for you to judge what has taken place , if happy , close it
; thats that .....

; hell no , it works , so why do it any other way , maybe I will add the end to it , later ............










; These are the three color schemes used
; My color schemes

;Send("{TAB}{TAB}00005af011105af")
;Send("{TAB}{TAB}22205af033305af")
;Send("{TAB}{TAB}44405af055505af")

; Here I have a list of buttons you can have (36 is maximum allowed) , and broken into groups for this example
; Pay attension to notes , and you wont go wrong


; 13 buttons with correct numbers already created to go into application
; My example buttons for menu only

;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}40{TAB}614{TAB }62{TAB}13{TAB}2{TAB}1{TAB}1{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}126{TAB}648{TA B}152{TAB}2{TAB}4{TAB}3{TAB}3{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}170{TAB}660{TA B}194{TAB}5{TAB}5{TAB}4{TAB}4{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}208{TAB}670{TA B}236{TAB}4{TAB}6{TAB}5{TAB}5{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}258{TAB}650{TA B}274{TAB}5{TAB}7{TAB}6{TAB}6{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}290{TAB}668{TA B}316{TAB}6{TAB}8{TAB}7{TAB}7{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}328{TAB}698{TA B}354{TAB}7{TAB}9{TAB}8{TAB}8{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}370{TAB}664{TA B}396{TAB}8{TAB}10{TAB}9{TAB}9{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}406{TAB}638{TA B}432{TAB}9{TAB}11{TAB}10{TAB}10{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}448{TAB}638{TA B}474{TAB}10{TAB}12{TAB}11{TAB}11{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}486{TAB}674{TA B}516{TAB}11{TAB}13{TAB}12{TAB}12{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}528{TAB}622{TA B}554{TAB}12{TAB}1{TAB}13{TAB}13{TAB}{ENTER}")

; Another 22 buttons

;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")
;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")

; Last button you can have ...(36th)

; Always include 1 button that can return to previous menu , if you dont , your silly ...

;Send("{TAB}{TAB}1{TAB}{TAB}535{TAB}85{TAB}624{TAB }108{TAB}1{TAB}3{TAB}2{TAB}2{TAB}{ENTER}")

; Final Notes :
; I have created a guide to show how to create motion buttons for your dvd menus using vitualdub and avisynth
; I am also currently working on scripts that help automate this work .
; Takes time to write guides that even NEWBIES can understand from scratch ...

; Maybe , some other people out there might CONSIDER updating their products help file to reflect this .
; Supplying samples is one thing , they need to have a minimum of 6 ways of using that information ...

; Most people learn from actually seeing it work , then ask how it works , only then will they beable to learn ...


END ....

And a pic of the outcome is nice , sorry for the lower quality ...



Yep another goof , but in the end its the same thing ?

[Bjs]

Opps , watch out for that damn smiley , its about halfway down in my script (should have turned off - automatic tool link thing)

As for the pic not being here , well thats just xp being its same old useless self again ...

Autoit can automate many tasks that would otherwise take a long time to do manually , and its free unlike that lame macro recorder rubbish ...

What can it do for you ?

Anything you need , and works in winxp / winme / win98&se

Now that I have it myself , it saves me hundreds of hours when creating flashy dvd menu's .

When I mean hundreds of hours , I mean the following :

1: vobedit - rename all cell id's from 1 (first) too ? (last cell found)
2: Vobedit - demux by cell id to new folder
3: Autoit - run vobedit , and add all information to each cell (button info)
4: Autoit - rename all cells to requirements for ifoedit create ifo
5: Ifoedit - create ifo , add first cell , and put all into new single vob file

Done , new flashy menu is finished .

6: autoit script deletes all cells left over from project (vob left)

7: autoit runs pgcedit , loads that vob (open dvd)
8: Autoit loads all titles (imports) (copys vob titles - to folder)
9: Autoit deletes menu (dummies - there a right pain)
10: Autoit imports more titles (I passed that lame no more ? avail prob)
11: Autoit now places all commands required to connect menu / titles
12: Autoit saves dvd

13: Autoit now calls dvd player software , loads new dvd
14: autoit watches for dvd app closure ...

You check it out before burning it of course ...

15: Autoit now asks if it was fine (ok to burn this dvd , yes / no)
17: If no , gose back to pgcedit (you manually need to fixup problems)
18: Once fixed , run script called "continuedvdburn"
19: Plays dvd again
20: Watches for app closure .
21: Yes / no . if no , goto 17 , if yes , goto 22
22: Puts box on screen (continue) , spits drive tray open

You click ok to continue once drive stops spinning about

23: Autoit calls imagetools , loads dvd files , sets burning defaults
24: Autoit pops box up

"Close all running tasks you do not need now before you click Burn button"

25: Closing that box says burn dvd

Smileys all about , enjoy yur new dvd compilation

---------------------------------------------------------------------

Takes a few script to do all this , I am currently working on one script that can make the required calls to run the others , and back again .

Shell app 80% complete , so newbies can select there own personal vob file , where the project folder is to be created , add there own button placement requirements , and choose there dvd player software they have .

It will detect if require apps are in the correct place , most just go into program files folder .

that's it , if you have ifoedit , vobedit , imagetools , and a dvd player software package already , thats all you need .

Crazy as it seems . but why do people keep telling newbies to buy useless products , when given a little information , it can all be done for free ????

Just finished my newbies guide on pgcedit and how to make a compilation dvd , available shortly , my friens have to beable to follow the guide .

If any have a problem , thats where the guide may get an update so they can understand it ...

Its to be newbie bullet proof prior too any upload ....

Yes , I am a man on a mission .

1: To help newbies out
2: Destroy all others
3: Maybe take over the planet someday ....lol

[Bjs]

Did I forget to mention you also need pgcedit ..... coffee time

The app will also mention other freeware dvd software , and the links to there appropriate sites

So if no dvd player software is available , you can choose one to download , the free dvd codec download is part of this of this script as well ...

Not bad considering I have had autoit for around 3 weeks ...

Very easy to learn and program ....

[jimmalenko]

So what's all this about then ?

[Bjs]

Just all about programing .

Did you ever want to automate something you do on the pc that take's time you rather be doing something else ?

Well now you can , and its easy with the new autoit recorder , it tracks every key press and mouse click as you go .

And you can combine it with task manager to launch and run the task you require , like go online , finish downloads , check mail , do all you web searches for you , oh , and how about annoying friends with an automated message in yahoo , that makes no sence , they think there chatting to you , and it takes them a few minutes to realize no ones home , very funny and annoying .

Ok the bottom line :

Lets say you have 50 x 200 mb video files that need to re-encoded .

You have 2 folders , one contains all video files , the other is for processed files , right , you with me .

You could write a simple script that takes the very first file , and transcodes it to the other folder , then it automatically moves the raw file to the recycle bin as a safe backup .

When the last one is done , and job is over , the whole process stops .

Mean time , you have been out socializing with friends , walking the dog , kicking the cat about , or teaching the budgie to swear like a trooper ...lol

Thats what its all about , and it can do more , some users are using it for playing games so they dont have to keep hitting the mouse button to fire , dont ask me that one , I have more important things to do .

For me it means dvd creation is simple , but I do have to give it the same number of files , unles I change a portion of the script before hand .

So far I have managed to hookup :

Pgcedit : create dvd , open dvd , import titles , delete the dummy menu when the error box happens , imports my menu , scans for bovs , and saves it , then I come back later and hook all the buttons up to their respective titles and menus .

Vobedit : button information into still vob menu's

Pgcdemux : automatic demuxing of all vobs from 1 folder to another , the script also renames the files as it gose so none are over writen .

Ifoedit : create new ifo , locates video and audio streams and outputs to a folder , and renames them to prevent being over writen .

Besweet : tough sod this one , took me some time to figure all the required hooks , converts all audio too 5.1 ac3 format .

Avisynth : the automation of loading a particular script in vitualdub for frameserving to bbmpeg , dose my motion menus with motion buttons , and renames the files 0 to ? last .

Menmodder : to load video , then the button video (same file) , but works so I can see the button layout .

Dvdauthorgui : the works for more simpler projects .

Run system wide utilities , such as defrag , and the automation of burning one particular backup folder to cd / dvd , prior to pc shutdown .

As you can see , it gives you back more time to do another things .

I simply have 6 folders , and all the scripts relate to those folders only , so its a matter of placing audio in one , video into another , and fire off the script to perform all the tasks .

At the end of all that , I have a dvd thats ready to be played .

How cool is that , and autoit is simple to learn , and you can cheat by using autoitrecorder to follow you about to create your scripts .

I've made a shell for my scripts , looks like another program , I just choose which one I want the pc to do , and let it rip .

Oh forgot one .

Smartripper automation , then dvdshrink , then imagetools , nice ..

[jimmalenko]

So it's basically a macro-recorder then ?

I was just interested to know why you'd dump a 744 line script in here in raw text, as opposed to just uploading the script file and linking to it, that's all ...

I use MacroMagic for this sort of thing.

(BTW, I'm a programmer by trade and education, so no need to dumb it down too much )

[Bjs]

Cant be done right now , my xp is stuffing about , and I been putting the clean reinstall off till my puchase orders come through so they can be backed up .

I tried to upload , and the post appeared , but the file attachment didnt , i tried 4 times and game up on that idea .

[jimmalenko]

Upload the file, then edit your post and put [*url]filename.ext[/url] (without the *) and it should work.