;desc	- pdftk batch builder
;auth	- target
;update	- Dec15

#singleinstance, force
#persistent

gui, add, edit,x5 y5 w200 vinfile
gui, add, button, x+5 gFGET_,..

gui, add, listview,x5 y+5 w200 h110 grid vSource, Alias|File Name
gui, add, button, x+5 w50 gadd_, ADD
gui, add, button, xp y+5 w50 gUP_, UP
gui, add, button, xp y+5 w50 gDOWN_, DOWN
gui, add, button, xp y+5 w50 gdel_, DEL

gui, add, edit,x5 y+5 w200 vpages, Insert pages here
gui, add, edit,x5 y+5 w200 voutput_, Output file goes here 
gui, add, button, x+5 gOUT_,..

gui, add, button,x5 y+5 w125 gEXIT_,QUIT
gui,add,button,x+5  w125 gCHK_, CHECK STRING 
gui, add, button,x5 y+5 w125 gCLIP_,CLIPBOARD
gui,add,button,x+5  w125 gRUN_, RUN 
gui, show

return

FGET_:
fileselectfile, input,,,,*.pdf
guicontrol, ,infile, %input%
gui, submit, nohide
return

ADD_:
LV_Add("","", infile)
gui, submit, nohide
gosub, alias
return

UP_:
DOWN_:
rowno:= lv_getnext(0)
lv_gettext(TMP_,lv_getnext(0),2)
lv_delete(rowno)
if a_guicontrol = UP
	rowno--
else
	rowno++
lv_insert(rowno)
lv_modify(rowno,"select","",TMP_)
guicontrol, choose, source, %rowno%
gui, submit, nohide
gosub, alias
return

OUT_:
fileselectfile, output_,,,,*.pdf
guicontrol, ,output_, %output_%.pdf
gui, submit, nohide
return

DEL_:
lv_delete(LV_getnext(0))
gosub, alias
return

EXIT_:
exitapp
return

CHK_:
gui, submit, nohide
gosub command
msgbox, %mystr%
return

command:
guicontrolget,tmp_ ,,pages
if tmp_ = "Insert pages here"
	tmp_:= 

stringupper, tmp_, tmp_
stringreplace, tmp__, tmp_,`,,%a_space%,a
mystr:=  """" . a_workingdir . "\pdftk.exe"" "

loop % lv_getcount()
{
	lv_gettext(tmp_,a_index,2)
	mystr.= chr(a_index + 64) . "=""" . tmp_ . """" . a_space

}

mystr.= "cat " . tmp__ . a_space . "output" . a_space . """" . output_ . """"
return

CLIP_:
clipboard = %mystr%
return

RUN_:
gosub, command

fileappend, %mystr%`ndel mybat.bat, mybat.bat

run, mybat.bat ;%mystr%
return

Alias:
tmp__:= lv_getcount()
loop, %tmp__%
	lv_modify(a_index,"",chr(A_index + 64))

gui, submit, nohide
return

guidropfiles:

loop, parse, a_guievent, `n
	LV_Add("","", a_loopfield)

gosub, alias	
gui, submit, nohide

return