| kamel 4 | ellmer-group

;----------------------------------general speed settings
SetKeyDelay, 30, 30
SetWinDelay, 30, 30
;----------------------------------
;---------------------------------- assigns pause to the pause key in this ahk
Pause::Pause
;----------------------------------
^!r::Reload ; the ctrl r key reloads the script
;----------------------------------

;---------------------------------- die tafel vom server in eine linktafel verwandeln --------------------
;-------- workplace

;--------------- start mit ctrlg

^h::
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\speicher1
Sleep, 700
SendEvent {Alt}
Sleep, 70
SendEvent {D}
Sleep, 50
SendEvent {c}
Sleep, 50
SendEvent {N}
Sleep, 50

return

^g::

Label12:

Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\a2.linklist.txt
Sleep, 700
;----------first3
SendEvent {{shift}+{down}}
Sleep, 70
SendEvent {{shift}+{down}}
Sleep, 70
SendEvent {{shift}+{down}}
;----------ausschneiden
Sleep, 70
SendEvent {Alt}
Sleep, 70
SendEvent {B}
Sleep, 50
SendEvent {A}
Sleep, 50
;----------speichern
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 700
SendEvent {j}
Sleep, 700
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ag.block2.txt
Sleep, 700
;----------markieren
SendEvent {Alt}
Sleep, 70
SendEvent {B}
Sleep, 50
SendEvent {m}
Sleep, 50
;----------einfugen
Send ^v
Sleep, 50
;--------- speichern
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 50
SendEvent {B}
Sleep, 70
SendEvent {j}
Sleep, 70
;--------- close
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 50
SendEvent {B}
Sleep, 70

Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\a1.filename.txt
Sleep, 700
;------------ take first from the list
SendEvent {{shift}+{down}}
Sleep, 700
SendEvent {Alt}
Sleep, 700
SendEvent {B}
Sleep, 500
SendEvent {A}
Sleep, 500
;-------- close
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 700
SendEvent {j}
Sleep, 700
;------------
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ai.dateiname.txt
Sleep, 500
SendEvent {Alt}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {M}
Sleep, 500
Send ^v
;-------- close
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {j}
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ad.headerline.txt
Sleep, 500
SendEvent {Alt}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {M}
Sleep, 500
Send ^v
;-------- close
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {j}

;-------- create new file overwriting an existing one - make the white paper of the page
FileOpen(“C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ba.page.txt”, “w”)
Sleep, 100
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ba.page.txt
Sleep, 100
;-------- page aahead
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\aa.head.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ab.headerline
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ad.headerline.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ac.head2
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ab.head2.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ae.firstblock
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ae.firstblock.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ac.head3
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ac.head3.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ae.picture
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ae.picture.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page af.bodytext
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\af.bodytext.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ag.block2
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ag.block2.txt
Sleep, 70
Send ^v
Sleep, 100
;-------- page ah.end
Sleep, 100
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ah.end.txt
Sleep, 70
Send ^v
Sleep, 100

;-------- save
Sleep, 500
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {j}

;----------------------------------txt.page in index.htm umwandeln
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ba.page.txt
Sleep, 500
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {u}
Sleep, 500
SendRaw index.htm
Sleep, 500
SendEvent {tab}
Sleep, 500
SendEvent {down 2}
Sleep, 500
SendEvent {Enter}
Sleep, 500
SendEvent {tab 3}
Sleep, 500
SendEvent {down 3}
Sleep, 500
SendEvent {Enter}
Sleep, 500
SendEvent {j}
Sleep, 500

SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {B}
Sleep, 500

Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\speicher1
Sleep, 500

SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {N}
Sleep, 500
SendEvent {Enter}

;--------------
Sleep, 6000

;-------------- mark file
SendEvent {Down}
Sleep, 500
;-------------------------------wurzel------------------------------------------------
;-------------------------------------------------------------------------------
SendEvent {Backspace 40}
;-------
Sleep, 500
FileRead, Clipboard, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\ai.dateiname.txt
Sleep, 700
Send ^v
Sleep, 700

SendEvent {Enter}
Sleep, 700
SendEvent {Enter}
Sleep, 500
Sleep, 5000

;------------
;------------------------index verschieben
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build
Sleep, 500
Sleep, 500
;------------index.htm selectionierne
SendEvent {i}
Sleep, 500
;------------
SendEvent {Alt}
Sleep, 500
SendEvent {B}
Sleep, 500
SendEvent {K}
Sleep, 500
;------------
;------------ 40 build schliessen
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {c}

;------------ neuen folder ist offen index einfügen
SendEvent {Enter}
Sleep, 500
Sleep, 500
Send ^v

Sleep, 12000

;----------- schliessen neufolder
Sleep, 500
SendEvent {Alt}
Sleep, 500
SendEvent {D}
Sleep, 500
SendEvent {c}
Sleep, 500
Sleep, 12000

;----------- schliessen speicher
Run, C:\Dokumente und Einstellungen\Ellmer\Desktop\40-build\speicher1
Sleep, 700
SendEvent {Alt}
Sleep, 70
SendEvent {D}
Sleep, 50
SendEvent {c}
Sleep, 50
SendEvent {N}
Sleep, 50

Sleep, 10000
Sleep, 10000

Goto, Label12

MsgBox, fertig ?