View difference between Paste ID: 6dkNxJr3 and qznDabkx
SHOW: | | - or go back to the newest paste.
1
#SingleInstance force
2
#IfWinActive, GTA:SA:MP
3
#UseHook
4
FileInstall, API.dll, API.dll, 0
5
FileAppend,,killzaehler.Ini
6
IniRead, Kills, Killzaehler.ini, Killzähler, Kills, 0
7
IniRead, API_benutzen, Killzaehler.ini, Killzähler, API benutzen?, 1
8
If(API_benutzen == 1)
9
{
10
#include API.ahk
11
}
12
13
else if(API_Benutzen == 0)
14
{
15
	Gosub, GUI
16
	~+T:: 
17
	~t::
18
	Label_T:
19
	Suspend, On
20
	Hotkey, Enter, On
21
	Hotkey, NumPadEnter, On
22
	Hotkey, Escape, On
23
	Hotkey, t, Off
24
	Hotkey, +T, Off
25
	return
26
27
28
	~NumpadEnter::
29
	~Enter::
30
	~Escape::
31
	Label_Enter:
32
	Suspend, Permit
33
	Suspend, Off
34
	Hotkey, t, On
35
	Hotkey, +T, On
36
	Hotkey, Enter, Off
37
	Hotkey, NumPadEnter, Off
38
	Hotkey, Escape, Off
39
}
40
41
GUI:
42
Gui, Font, s10, Arial
43
Gui, Add, Text, x20 y20, API benutzen?
44
Gui, Add, Checkbox, x25 y40 vAPI_benutzen checked%API_benutzen%,
45
Gui, Add, Button, x20 y60 gSpeichern, Speichern
46
Gui, Font, s08, Arial
47
Gui, Add, Text, x20 y120, © Lewis.Crisp
48
Gui, Show, w200 h200, Killzähler by Lewis.Crisp
49
return
50
51
Speichern:
52
Gui, Submit, NoHide
53
IniWrite, %API_benutzen%, Killzaehler.ini, Killzähler, API benutzen?
54
MsgBox, 48, Warnung, Der Killzähler wird in 10 Sekunden neu gestartet., 10
55
Run, %A_ScriptFullPath%
56
return
57
58
GuiClose:
59
ExitApp
60
61
~Numpad7::
62
Suspend, Permit
63
IniRead, Kills, Einstellungen\Einstellungen.ini, Killzähler, Kills, %A_Space%
64
Kills++
65
if(API_benutzen == 1)
66
{
67
if (IsChatOpen() == 1 || IsDialogOpen() == 1)
68
	return
69
SendChat("/f |->GanGwArkiLL Nr. " . Kills . " <-|")
70
}
71
else if(API_benutzen == 0)
72-
	SendInput, t/f |->GanGwArkiLL Nr. %Kills% <-|
72+
	SendInput, t/f |->GanGwArkiLL Nr. %Kills% <-|{enter}
73
IniWrite, %Kills%, Killzaehler.ini, Killzähler, Kills
74
return