User:Cegaiel/Macros/Timer/Code

;No hotkeys to start script. Upon loading script, it will immediately ask Seconds and Timing Mode.
;It will remember the seconds everytime you start / stop(reset) timer.
;Hit Ctrl+R if you want to reload script to input a new amount of seconds.



	Gui, Add, Text,, Minutes:
	Gui, Add, Edit, vMins wp number, 0

	Gui, Add, Text,, Seconds:
	Gui, Add, Edit, vseconds wp number, 0

	Gui, Add, Text,, Timer Mode:
	Gui, Add, DropDownList, vmode Choose1, Teppy|Real
	Gui, Add, Button, gSubmit, Submit
	Gui, Show
	return


	Submit:
	Gui, Submit
	Gui, Destroy

	Minutes := Mins * 60
	Seconds := Minutes + Seconds	



	Gui, +AlwaysOnTop +ToolWindow
	Gui, Font, normal
	Gui, Add, Text, vLocationText, Press Numpad Plus (+) key to START Timer`n`nTimer Set: %seconds% (%mode%) seconds`n`n
	Gui, Show

	;WinActivate, eGenesis Client

	KeyWait, NumpadAdd, D


	Timer:
	counter := seconds * 10

	if (mode == "Teppy")
	;If use the multiplier of 1.1 because 1 teppy minute = about 1m 06 seconds. 60 seconds times 1.1 is 1:06
	counter := counter * 1.1

	loop
	{
		GetKeyState, state, NumpadSub
		if state = D
		{
		counter := counter/10
		break
		}
		if counter <= 0 
		{
		SoundPlay *64,1
		break
		}

	counter--
	Display := counter/10
	SetFormat, float, 0.1 
	GuiControl, Text, LocationText, Press Numpad Minus (--) to STOP Timer`n`nTimer Set: %seconds% (%mode%) seconds`n`n%display% seconds remaining...
	sleep 100
	}


	
	GuiControl, Text, LocationText, Press Numpad Plus (+) key to START Timer`n`nTimer Set: %seconds% (%mode%) seconds`n`n%display% seconds remaining...

 
	KeyWait, NumpadAdd, D

	Gosub, Timer

^r::reload