The Wiki for Tale 4 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.

If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.

Difference between revisions of "User:Cegaiel/Macros/Timer/Code"

From A Tale in the Desert
Jump to navigationJump to search
Line 4: Line 4:
 
;Hit Ctrl+R if you want to reload script to input a new amount of seconds.
 
;Hit Ctrl+R if you want to reload script to input a new amount of seconds.
  
 +
;Date: 5/29/2010
 +
;Author: Cegaiel
  
  
Line 28: Line 30:
 
Total := Total * 1.07
 
Total := Total * 1.07
  
 
+
oMins := Mins
 +
oSeconds := Seconds
  
 
Mins := Floor(Total/60)
 
Mins := Floor(Total/60)
Line 39: Line 42:
 
Gui, +AlwaysOnTop +ToolWindow
 
Gui, +AlwaysOnTop +ToolWindow
 
Gui, Font, normal
 
Gui, Font, normal
Gui, Add, Text, vLocationText, Press Numpad Plus (+) key to START Timer`n`nCurrent Timer: %Mins%m %seconds%s`n`nTimer Set: %Mins%m %seconds%s (%mode% Time)`n`n
+
Gui, Add, Text, vLocationText, Press Numpad Plus (+) key to START Timer`n`nCurrent Timer: %Mins%m %seconds%s`n`nTimer Set: %oMins%m %oseconds%s (%mode% Time)`n`n
 
Gui, Show
 
Gui, Show
  
Line 57: Line 60:
 
}
 
}
  
GuiControl, Text, LocationText, HOLD Numpad Minus (--) to STOP Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %Mins%m %seconds%s (%mode% Time)`n`n
+
GuiControl, Text, LocationText, HOLD Numpad Minus (--) to STOP Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %oMins%m %oseconds%s (%mode% Time)`n`n
  
 
sleep 1000
 
sleep 1000
Line 84: Line 87:
  
  
GuiControl, Text, LocationText, Press Numpad Plus (+) key to START Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %Mins%m %seconds%s (%mode% Time)`n`nPress Ctrl+R to set a new time...
+
GuiControl, Text, LocationText, Press Numpad Plus (+) key to START Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %oMins%m %oseconds%s (%mode% Time)`n`nPress Ctrl+R to set a new time...
  
  
Line 99: Line 102:
  
 
^r::reload
 
^r::reload
 
 
</pre>
 
</pre>

Revision as of 01:20, 30 May 2010

;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.

;Date: 5/29/2010
;Author: Cegaiel


	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, Real|Teppy
	Gui, Add, Button, gSubmit, Submit
	Gui, Show
	return


	Submit:
	Gui, Submit
	Gui, Destroy


	Total := Seconds + (Mins * 60)
	if (mode == "Teppy")
	Total := Total * 1.07

	oMins := Mins
	oSeconds := Seconds

	Mins := Floor(Total/60)
	Seconds := Floor(Total - (Mins *60))

	minutes_eta := Mins
	seconds_eta := Seconds


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

	;WinActivate, eGenesis Client

	KeyWait, NumpadAdd, D


	Timer:

	loop
	{
		GetKeyState, state, NumpadSub
		if state = D
		{
		break
		}

	GuiControl, Text, LocationText, HOLD Numpad Minus (--) to STOP Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %oMins%m %oseconds%s (%mode% Time)`n`n

	sleep 1000
		
		if (seconds_eta = 0)
		{
		seconds_eta := 60
		minutes_eta --
		}
		
		if (minutes_eta < 0)
		minutes_eta := 0


		seconds_eta --
	

		if (minutes_eta = 0) and (seconds_eta = 0)
		break


	}


;occurs after the timer loop is broke 


	GuiControl, Text, LocationText, Press Numpad Plus (+) key to START Timer`n`nCurrent Timer: %minutes_eta%m %seconds_eta%s`n`nTimer Set: %oMins%m %oseconds%s (%mode% Time)`n`nPress Ctrl+R to set a new time...


	;reset counter time back to original
	minutes_eta := Mins
	seconds_eta := seconds

		SoundPlay *64,1

 
	KeyWait, NumpadAdd, D

	Gosub, Timer

^r::reload