Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
- ; #Warn ; Enable warnings to assist with detecting common errors.
- SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
- SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
- #SingleInstance, Force
- FileRead, FirstName, FirstName.ini
- FileRead, LastName, LastName.ini
- FileRead, TeacherName, TeacherName.ini
- FileRead, Period, Period.ini
- FileRead, Class, Class.ini
- InputBox, FirstName , MLA Formatter,Type Your First Name:,,,,,,,,%FirstName%
- if ErrorLevel
- ExitApp,
- else
- FileDelete, FirstName.ini
- FileAppend,%FirstName%, FirstName.ini
- InputBox, LastName , MLA Formatter, Type Your Last Name,,,,,,,,%LastName%
- if ErrorLevel
- ExitApp,
- else
- FileDelete, LastName.ini
- FileAppend,%LastName%, Lastname.ini
- InputBox,TeacherName,MLA Formatter,Type Your Teachers Last Name:,,,,,,,,%TeacherName%
- If ErrorLevel
- ExitApp,
- else
- FileDelete, TeacherName.ini
- FileAppend,%TeacherName%, TeacherName.ini
- InputBox, Class, MLA Formatter,Type your class:,,,,,,,,%Class%
- If ErrorLevel
- Exitapp,
- Else
- FileDelete, Class.ini
- FileAppend, %Class%,Class.ini
- InputBox, Period , MLA Formatter,Type The Period Number as a Number,,,,,,,,%Period%
- if ErrorLevel
- Exitapp,
- else
- FileDelete, Period.ini
- FileAppend, %Period%,Period.ini
- MsgBox, 3, MLA Formatter, Is ALL work saved in ALL open instances of Microsoft Word?,
- IfMsgBox Yes
- GoTo, MLA
- IfMSGBox No
- MsgBox,1 ,MLA Formatter,Save ALL your work, then press OK.
- If ErrorLevel
- ExitApp
- Else
- GoTo, MLA
- return
- MLA:
- FormatTime, CurrentTime , YYYYMMDD, MMMM d, yyyy
- run, WINWORD.exe
- WinWait, Word,,,,,
- WinMaximize, Word,,,
- sleep, 2000
- send, {Enter}
- sleep, 2000
- send, {alt}
- sleep 1000
- send, H
- send, FF
- send, Times New Roman
- send, {enter}
- sleep 200
- send, {alt}
- send, H
- send, FS
- send, 12
- send, {enter}
- sleep 200
- send, {alt}
- send, H
- send, K
- send, {down}{down}{down}
- send, {enter}
- send, {esc}{esc}
- send, %FirstName%{space}%LastName%
- send, {enter}
- send, %TeacherName%
- send, {enter}
- send, %Class%{Space}P%Period%
- send, {enter}
- send, %CurrentTime%
- send, {enter}
- send, {alt} ;Page Break
- send, N
- send, B
- send, {enter}
- sleep 2000
- MouseMove, 670, 550,, ;Header
- Click, 2
- send, {alt}
- send, H
- send, FF
- send, Times New Roman
- send, {enter}
- sleep 1000
- send, {alt}
- send, JH
- sleep 100
- send, NU
- sleep 100
- send, T
- sleep 100
- send, {down}
- sleep 100
- send, {down}
- sleep 100
- send, {enter}
- send, {alt} ;different first page
- send, JH
- send, A
- send, %LastName% - {space}
- sleep, 500
- send, {esc}{esc}
- send, {backspace}{backspace}
- send, {down}
- send, {backspace}{backspace}
- sleep 1500
- MsgBox, , MLA Format, Done! `n`n`nNote: The page # and last name on the pages after the 1st are there just not currently shown because you only have 1 page in your document., 30
- return
- #t::
- GoTo, MLA
- return
Add Comment
Please, Sign In to add comment