MPGHThe Dark Arts
RegisterLog in

Code Of APBot 2.0

Posts 1–15 of 22 · Page 1 of 2
Code Of APBot 2.0
For Those Who Wanted To Learn Autoit, i will give code of APBot 2.0 so you can check what func/command do, got any question ? ask it.
sorry 2.0 had (129936 characters) and they wanted me to put under 100k so i did by removing Cookie system timed session.
also i don't think i will release code of 2.5 ... because 343823 char in 9427 line ...


1. Download Full download of Autoit3
2. Extract the .au3 where you want
3. Right click the .au3
4. Click on edit sript
5. Have Fun

AVA Player.



Virus Scan :
https://www.virustotal.com/file/209d...is/1340668102/
APBot2.0Code.rar - Jotti's malware scan


Code:
#include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

Global $Comp = InputBox("ComputerName", "Enter Your Computer Name.", "", "")

#Region ### START Koda GUI section ### Form=C:\Users\frederick\Desktop\APBot V2.0.kxf
$Form1_1 = GUICreate("APBot 2.0", 945, 599, 92, 97)
$Button4 = GUICtrlCreateButton("Exit", 24, 504, 115, 65)
$Group1 = GUICtrlCreateGroup("GameBot", 552, 480, 265, 89)
$Button2 = GUICtrlCreateButton("Start (F7)", 576, 504, 107, 49)
$Button1 = GUICtrlCreateButton("Stop (F8)", 696, 504, 107, 49)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("MusicBot                        Choose The Song And Hit Play.", 8, 48, 473, 177)
$List1 = GUICtrlCreateList("", 24, 72, 361, 136)
$Button5 = GUICtrlCreateButton("Search", 392, 88, 75, 33)
$Button3 = GUICtrlCreateButton("Next (F4)", 392, 136, 75, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Capsule", 280, 248, 121, 233)
$Number = GUICtrlCreateInput("Number", 304, 272, 73, 21)
$Radio2 = GUICtrlCreateRadio("   / 99", 312, 304, 57, 17)
$Radio3 = GUICtrlCreateRadio("   / 200", 312, 336, 57, 17)
$Radio4 = GUICtrlCreateRadio("   / 149", 312, 320, 57, 17)
$Radio5 = GUICtrlCreateRadio("   / 249", 312, 352, 57, 17)
$Radio6 = GUICtrlCreateRadio("   / 300", 312, 368, 57, 17)
$Button10 = GUICtrlCreateButton("Send", 304, 392, 75, 25)
$Result = GUICtrlCreateGroup("Result", 280, 416, 121, 65)
$Input10 = GUICtrlCreateInput("", 304, 440, 73, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic1 = GUICtrlCreatePic("C:\Users\"& $Comp &"\Desktop\APBot2.0\AVA-logo.jpg", 488, 32, 284, 204)
$Group4 = GUICtrlCreateGroup("Spambot", 416, 248, 393, 225)
$Button6 = GUICtrlCreateButton("Start (F9)", 712, 296, 83, 57)
$Button7 = GUICtrlCreateButton("Stop (F10)", 712, 384, 83, 57)
$Input5 = GUICtrlCreateInput("", 424, 368, 273, 21)
$Input6 = GUICtrlCreateInput("", 424, 392, 273, 21)
$Input7 = GUICtrlCreateInput("", 424, 416, 273, 21)
$Input8 = GUICtrlCreateInput("", 424, 440, 273, 21)
$Input1 = GUICtrlCreateInput("", 424, 272, 273, 21)
$Input2 = GUICtrlCreateInput("", 424, 296, 273, 21)
$Input3 = GUICtrlCreateInput("", 424, 320, 273, 21)
$Input4 = GUICtrlCreateInput("", 424, 344, 273, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group5 = GUICtrlCreateGroup("Auto-Quest              Choose The Map.", 24, 240, 241, 249)
$List2 = GUICtrlCreateList("", 40, 264, 209, 162)
$Button8 = GUICtrlCreateButton("Start", 48, 440, 83, 33)
$Button9 = GUICtrlCreateButton("Stop", 160, 440, 83, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic2 = GUICtrlCreatePic("C:\Users\"& $Comp &"\Desktop\APBot2.0\logo.bmp", -32, 0, 980, 36)
$Group9 = GUICtrlCreateGroup("Cookies Systems!", 168, 504, 377, 65)
$Button11 = GUICtrlCreateButton("Start (F11)", 288, 520, 115, 41)
$Button12 = GUICtrlCreateButton("Stop (F12)", 416, 520, 115, 41)
$PW = GUICtrlCreateInput("Password", 184, 536, 81, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Donate = GUICtrlCreateButton("Donate", 816, 144, 115, 225)
$Reset = GUICtrlCreateButton("Reset (Insert)", 824, 392, 99, 177)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

#Region ### OPEN AVA CLIENT MEMORY ACCESS ###
Opt("MouseCoordMode", 2)
#EndRegion ### OPEN AVA CLIENT MEMORY ACCESS ###

HotKeySet("{F7}", "_Bstart")
HotKeySet("{F8}", "_Bstop")
HotKeySet("{F12}", "_SLove")
HotKeySet("{F2}", "_Cstop")
HotKeySet("{F11}", "_Love")
HotKeySet("{F9}", "_Sstart")
HotKeySet("{F10}", "_Sstop")
HotKeySet("{F4}", "_Next")
HotKeySet("{INSERT}", "_Reset")

Global $Cookie = "TXT/CookieSYS.txt"
Global $Next = 0
Global $kkk = 0
Global $ooo = 0
Global $omfgl = 0
Global $ttt = 0
GLobal $yio = 0
Global $omfg2 = 0

GUICtrlSetOnEvent($Reset, "_Reset")
GUICtrlSetOnEvent($Button3, "_Next")
GUICtrlSetOnEvent($Button10, "_Capsule")
GUICtrlSetOnEvent($Button5, "_Pick")
GUICtrlSetOnEvent($Button6, "_Sstart")
GUICtrlSetOnEvent($Button7, "_Sstop")
GUICtrlSetOnEvent($Button1, "_Bstop")
GUICtrlSetOnEvent($Button2, "_Bstart")
GUICtrlSetOnEvent($Button11, "_Love")
GUICtrlSetOnEvent($Button12, "_SLove")
GUICtrlSetOnEvent($Button8, "_Qstart")
GUICtrlSetOnEvent($Button9, "_Qstop")
_GUICtrlListBox_AddString($List2 ,"Prison Break-Survival")
_GUICtrlListBox_AddString($List2 ,"Prison Break-Escape")
_GUICtrlListBox_AddString($List2 ,"Prison Break-Rescue[Easy]")
_GUICtrlListBox_AddString($List2 ,"Prison Break-Rescue")
_GUICtrlListBox_AddString($List2 ,"Death Valley[Easy]")
_GUICtrlListBox_AddString($List2 ,"Death Valley[Extreme]")
_GUICtrlListBox_AddString($List2 ,"Lockdown[Easy]")
_GUICtrlListBox_AddString($List2 ,"Lockdown[Normal]")
_GUICtrlListBox_AddString($List2 ,"Lockdown[Extreme]")
_GUICtrlListBox_AddString($List2 ,"BG:BeginZ[Easy]")
_GUICtrlListBox_AddString($List2 ,"BG:BeginZ[Normal]")
_GUICtrlListBox_AddString($List2 ,"BG:BeginZ[Extreme]")

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button4
			Exit
		 Case $Button2
			_Bstart()
		 Case $Donate
			_Donate()
		 Case $Button6
			_Sstart()
		 Case $Button7
			_Sstop()
		 Case $Button9
			_Qstop()
		 Case $Button8
			_Qstart()
		 Case $Button12
			_SLove()
		 Case $Button11
			_Love()
		 Case $Button1
			_Bstop()
		 Case $Button5
			_Pick()
		 Case $Button10
			_Capsule()
		 Case $Button3
			_Next()
		 Case $Reset
			_Reset()
		 Case $Form1_1
	EndSwitch
WEnd

Func _Reset()
   Global $kkk = 0
   Global $ooo = 0
   Global $omfgl = 0
   Global $ttt = 0
   Global $yio = 0
   Global $omfg2 = 0
EndFunc

Func _Pick()
   _GUICtrlListBox_ResetContent($List1)
     Global $Num = InputBox("How Many?", "How Many Song You Wanna Put In (max 10).", "", "")
    MsgBox(4096, "", "Choose The Song 1 by 1")
Local $message = "Choose 1 at the time please."
If $Num = 1 Then
   Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
   _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
EndIf

If $Num = 2 Then 
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
EndIf

If $Num = 3 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
EndIf

If $Num = 4 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
EndIf

If $Num = 5 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
EndIf

If $Num = 6 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
      Global $Song5 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song5 &"" )
EndIf

If $Num = 7 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
      Global $Song5 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song5 &"" )
      Global $Song6 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song6 &"" )
EndIf

If $Num = 8 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
      Global $Song5 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song5 &"" )
      Global $Song6 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song6 &"" )
      Global $Song7 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song7 &"" )
EndIf

If $Num = 9 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
      Global $Song5 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song5 &"" )
      Global $Song6 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song6 &"" )
      Global $Song7 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song7 &"" )
      Global $Song8 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song8 &"" )
EndIf

If $Num = 10 Then
      Global $Song = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song &"" )
      Global $Song1 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song1 &"" )
      Global $Song2 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song2 &"" )
      Global $Song3 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song3 &"" )
      Global $Song4 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	    _GUICtrlListBox_AddString($List1 ,""& $Song4 &"" )
      Global $Song5 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song5 &"" )
      Global $Song6 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song6 &"" )
      Global $Song7 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song7 &"" )
      Global $Song8 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	   _GUICtrlListBox_AddString($List1 ,""& $Song8 &"" )
      Global $Song9 = FileOpenDialog($message, @desktopDir & "\", "Music (*.mp3;*.wma)", 1 + 4)
	  _GUICtrlListBox_AddString($List1 ,""& $Song9 &"" )
EndIf


EndFunc

Func _Next()
$Next = $Next + 1
Return _Play()
EndFunc



Func _Play()
   Global $Yes1 = _GUICtrlListBox_GetSel($List1, 1)
   Global $Yes2 = _GUICtrlListBox_GetSel($List1, 2)
   Global $Yes3 = _GUICtrlListBox_GetSel($List1, 3)
   Global $Yes4 = _GUICtrlListBox_GetSel($List1, 4)
   Global $Yes5 = _GUICtrlListBox_GetSel($List1, 5)
   Global $Yes6 = _GUICtrlListBox_GetSel($List1, 6)
   Global $Yes7 = _GUICtrlListBox_GetSel($List1, 7)
   Global $Yes8 = _GUICtrlListBox_GetSel($List1, 8)
   Global $Yes9 = _GUICtrlListBox_GetSel($List1, 9)
   Global $Yes10 = _GUICtrlListBox_GetSel($List1, 10)

If $Num = 1 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 2 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 3 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 4 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 5 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 6 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 6 Then
	  ShellExecute ( ""& $Song5 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 7 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 6 Then
	  ShellExecute ( ""& $Song5 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 7 Then
	  ShellExecute ( ""& $Song6 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 8 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 6 Then
	  ShellExecute ( ""& $Song5 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 7 Then
	  ShellExecute ( ""& $Song6 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 8 Then
	  ShellExecute ( ""& $Song7 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 9 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 6 Then
	  ShellExecute ( ""& $Song5 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 7 Then
	  ShellExecute ( ""& $Song6 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 8 Then
	  ShellExecute ( ""& $Song7 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 9 Then
	  ShellExecute ( ""& $Song8 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
If $Num = 10 Then
   If $Next = 1 Then
	  ShellExecute ( ""& $Song &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 2 Then
	  ShellExecute ( ""& $Song1 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 3 Then
	  ShellExecute ( ""& $Song2 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 4 Then
	  ShellExecute ( ""& $Song3 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 5 Then
	  ShellExecute ( ""& $Song4 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 6 Then
	  ShellExecute ( ""& $Song5 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 7 Then
	  ShellExecute ( ""& $Song6 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 8 Then
	  ShellExecute ( ""& $Song7 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 9 Then
	  ShellExecute ( ""& $Song8 &"" , "" , "" , "" , @SW_HIDE  )
   EndIf
   If $Next = 10 Then
	  ShellExecute ( ""& $Song9 &"" , "" , "" , "" , @SW_HIDE  )
	    $Next = 0
   EndIf
EndIf
EndFunc


Func _Qstart()
  Local $passwd = InputBox("VIP Only", "Enter The Password.", "", "*")
  If $passwd = 1882 Then
	 
   Else
   MsgBox(4096, "Error", "Wrong Password.")
   EndIf
If FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\Aquest.txt") Then
   FileOpen ("Aquest.txt")
  Else
  MsgBox(4096, "Error", "Cannot Find Required Files.")
  EndIf
EndFunc

Func _Qstop()
   MsgBox( 0, "Error", "Insufficient Client Permission")
EndFunc

Func _donate()
   ShellExecute("https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=LKPPFMWG3YKAE&lc=US&item_name=AVA%20Player%20For%20APBot&currency_code=USD&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHosted")
EndFunc

Func _Cstop()
Exit
EndFunc

Func _SLove()
   Global $ttt = 1 
EndFunc

Func _Love()  
If $ttt = 0 Then  
   $pass1 = GUICtrlRead ($PW , 1)
		 If $pass1 = 1993 Then
		 If Not WinActivate ("Alliance of Valiant Arms") Then
			WinActivate ("Alliance of Valiant Arms")
		 EndIf
		 Do
		 Sleep (2000)
		 $Yay = Random(1 ,30 ,1)
			If $Yay = 1 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Red.{Enter}")
			
			EndIf
			If $Yay = 2 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Yellow.{Enter}")
		 
			EndIf
			If $Yay = 3 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Blue.{Enter}")
			
			EndIf
			If $Yay = 4 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Purple.{Enter}")
			
			EndIf
			If $Yay = 5 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Brown.{Enter}")
			
			EndIf
			If $Yay = 6 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Orange.{Enter}")
			   
			EndIf
			If $Yay = 7 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Green.{Enter}")
			
			EndIf
			If $Yay = 8 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Violet.{Enter}")
			   
			EndIf
			If $Yay = 9 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}YellowGreen.{Enter}")
			
			EndIf
			If $Yay = 10 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Chocolate.{Enter}")
			
			EndIf
			If $Yay = 11 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Pink.{Enter}")
		 
			EndIf
			If $Yay = 12 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Marron.{Enter}")
			
			EndIf
			If $Yay = 13 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Cyan.{Enter}")
			   
			EndIf
			If $Yay = 14 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Aqua.{Enter}")
				  
			EndIf
			If $Yay = 15 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Black.{Enter}")
				  
			EndIf
			If $Yay = 16 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Azure.{Enter}")
				  
			EndIf
			If $Yay = 17 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Coral.{Enter}")
				  
			EndIf
			If $Yay = 18 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Fuchsia.{Enter}")
				  
			EndIf
			If $Yay = 19 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Gold.{Enter}")
				  
			EndIf
			If $Yay = 20 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Lime.{Enter}")

			EndIf
			If $Yay = 21 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Orchid.{Enter}")
				  
			EndIf
			If $Yay = 22 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}PowderBlue.{Enter}")
		 
			EndIf
			If $Yay = 23 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Silver.{Enter}")

			EndIf
			If $Yay = 24 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Plum.{Enter}")
			
			EndIf
			If $Yay = 25 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}LimeGreen.{Enter}")
			   
			EndIf
			If $Yay = 26 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Yellow.{Enter}")
		 
			EndIf
			If $Yay = 27 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Lavender.{Enter}")
			
			EndIf
			If $Yay = 28 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Indigo.{Enter}")
			
			EndIf
			If $Yay = 29 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}IndianRed.{Enter}")
	  
			EndIf
			If $Yay = 30 Then
			   Sleep(2000)
			   Send ("{Space}{Space}{Space}{Space}Cookies System{!}{Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}Write The Same Color As Me : {Enter}")
			   Sleep(500)
			   Send ("{Space}{Space}{Space}{Space}CornflowerBlue.{Enter}")
			
			EndIf
   
Local $Name = InputBox("Winner", "Enter Name Of Winner.", "", "")
   Sleep (4000)
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &".txt") = 1 Then
   If Not _FileCreate(""& $Name &".txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 1 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"1.txt") = 1 Then
   If Not _FileCreate(""& $Name &"1.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 2 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"2.txt") = 1 Then
   If Not _FileCreate(""& $Name &"2.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 3 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"3.txt") = 1 Then
   If Not _FileCreate(""& $Name &"3.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 4 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"4.txt") = 1 Then
   If Not _FileCreate(""& $Name &"4.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 5 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"5.txt") = 1 Then
   If Not _FileCreate(""& $Name &"5.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 6 Cookies.{Enter}")
  Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"6.txt") = 1 Then
   If Not _FileCreate(""& $Name &"6.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 7 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"7.txt") = 1 Then
   If Not _FileCreate(""& $Name &"7.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 8 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"8.txt") = 1 Then
   If Not _FileCreate(""& $Name &"8.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 9 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"9.txt") = 1 Then
   If Not _FileCreate(""& $Name &"9.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 10 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"10.txt") = 1 Then
   If Not _FileCreate(""& $Name &"10.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 11 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"11.txt") = 1 Then
   If Not _FileCreate(""& $Name &"11.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 12 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"12.txt") = 1 Then
   If Not _FileCreate(""& $Name &"12.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 13 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"13.txt") = 1 Then
   If Not _FileCreate(""& $Name &"13.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 14 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"14.txt") = 1 Then
   If Not _FileCreate(""& $Name &"14.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 15 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"15.txt") = 1 Then
   If Not _FileCreate(""& $Name &"15.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 16 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"16.txt") = 1 Then
   If Not _FileCreate(""& $Name &"16.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 17 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"17.txt") = 1 Then
   If Not _FileCreate(""& $Name &"17.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 18 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"18.txt") = 1 Then
   If Not _FileCreate(""& $Name &"18.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 19 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"19.txt") = 1 Then
   If Not _FileCreate(""& $Name &"19.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 20 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"20.txt") = 1 Then
   If Not _FileCreate(""& $Name &"20.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 21 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"21.txt") = 1 Then
   If Not _FileCreate(""& $Name &"21.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 22 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"22.txt") = 1 Then
   If Not _FileCreate(""& $Name &"22.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 23 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"23.txt") = 1 Then
   If Not _FileCreate(""& $Name &"23.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 24 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"24.txt") = 1 Then
   If Not _FileCreate(""& $Name &"24.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 25 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"25.txt") = 1 Then
   If Not _FileCreate(""& $Name &"25.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 26 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"26.txt") = 1 Then
   If Not _FileCreate(""& $Name &"26.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 27 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"27.txt") = 1 Then
   If Not _FileCreate(""& $Name &"27.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 28 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"28.txt") = 1 Then
   If Not _FileCreate(""& $Name &"28.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 29 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"29.txt") = 1 Then
   If Not _FileCreate(""& $Name &"29.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 30 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"30.txt") = 1 Then
   If Not _FileCreate(""& $Name &"30.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 31 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"31.txt") = 1 Then
   If Not _FileCreate(""& $Name &"31.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 32 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"32.txt") = 1 Then
   If Not _FileCreate(""& $Name &"32.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 33 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"33.txt") = 1 Then
   If Not _FileCreate(""& $Name &"33.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 34 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"34.txt") = 1 Then
   If Not _FileCreate(""& $Name &"34.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 35 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"35.txt") = 1 Then
   If Not _FileCreate(""& $Name &"35.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 36 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"36.txt") = 1 Then
   If Not _FileCreate(""& $Name &"36.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 37 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"37.txt") = 1 Then
   If Not _FileCreate(""& $Name &"37.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 38 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"38.txt") = 1 Then
   If Not _FileCreate(""& $Name &"38.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 39 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"39.txt") = 1 Then
   If Not _FileCreate(""& $Name &"39.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 40 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"40.txt") = 1 Then
   If Not _FileCreate(""& $Name &"40.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 41 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"41.txt") = 1 Then
   If Not _FileCreate(""& $Name &"41.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 42 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"42.txt") = 1 Then
   If Not _FileCreate(""& $Name &"42.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 43 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"43.txt") = 1 Then
   If Not _FileCreate(""& $Name &"43.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 44 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"44.txt") = 1 Then
   If Not _FileCreate(""& $Name &"44.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 45 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"45.txt") = 1 Then
   If Not _FileCreate(""& $Name &"45.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 46 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"46.txt") = 1 Then
   If Not _FileCreate(""& $Name &"46.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 47 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"47.txt") = 1 Then
   If Not _FileCreate(""& $Name &"47.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 48 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"48.txt") = 1 Then
   If Not _FileCreate(""& $Name &"48.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 49 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"49.txt") = 1 Then
   If Not _FileCreate(""& $Name &"49.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 50 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"50.txt") = 1 Then
   If Not _FileCreate(""& $Name &"50.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 51 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"51.txt") = 1 Then
   If Not _FileCreate(""& $Name &"51.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 52 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"52.txt") = 1 Then
   If Not _FileCreate(""& $Name &"52.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 53 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"53.txt") = 1 Then
   If Not _FileCreate(""& $Name &"53.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 54 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"54.txt") = 1 Then
   If Not _FileCreate(""& $Name &"54.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 55 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"55.txt") = 1 Then
   If Not _FileCreate(""& $Name &"55.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 56 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"56.txt") = 1 Then
   If Not _FileCreate(""& $Name &"56.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 57 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"57.txt") = 1 Then
   If Not _FileCreate(""& $Name &"57.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 58 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"58.txt") = 1 Then
   If Not _FileCreate(""& $Name &"58.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 59 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"59.txt") = 1 Then
   If Not _FileCreate(""& $Name &"59.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 60 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"60.txt") = 1 Then
   If Not _FileCreate(""& $Name &"60.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 61 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"61.txt") = 1 Then
   If Not _FileCreate(""& $Name &"61.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 62 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"62.txt") = 1 Then
   If Not _FileCreate(""& $Name &"62.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 63 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"63.txt") = 1 Then
   If Not _FileCreate(""& $Name &"63.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 64 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"64.txt") = 1 Then
   If Not _FileCreate(""& $Name &"64.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 65 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"65.txt") = 1 Then
   If Not _FileCreate(""& $Name &"65.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 66 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"66.txt") = 1 Then
   If Not _FileCreate(""& $Name &"66.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 67 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"67.txt") = 1 Then
   If Not _FileCreate(""& $Name &"67.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 68 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"68.txt") = 1 Then
   If Not _FileCreate(""& $Name &"68.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 69 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"69.txt") = 1 Then
   If Not _FileCreate(""& $Name &"69.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 70 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"70.txt") = 1 Then
   If Not _FileCreate(""& $Name &"70.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 71 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"71.txt") = 1 Then
   If Not _FileCreate(""& $Name &"71.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 72 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"72.txt") = 1 Then
   If Not _FileCreate(""& $Name &"72.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 73 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"73.txt") = 1 Then
   If Not _FileCreate(""& $Name &"73.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 74 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"74.txt") = 1 Then
   If Not _FileCreate(""& $Name &"74.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 75 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"75.txt") = 1 Then
   If Not _FileCreate(""& $Name &"75.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 76 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"76.txt") = 1 Then
   If Not _FileCreate(""& $Name &"76.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 77 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"77.txt") = 1 Then
   If Not _FileCreate(""& $Name &"77.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 78 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"78.txt") = 1 Then
   If Not _FileCreate(""& $Name &"78.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 79 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"79.txt") = 1 Then
   If Not _FileCreate(""& $Name &"79.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 80 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"80.txt") = 1 Then
   If Not _FileCreate(""& $Name &"80.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 81 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"81.txt") = 1 Then
   If Not _FileCreate(""& $Name &"81.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 82 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"82.txt") = 1 Then
   If Not _FileCreate(""& $Name &"82.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 83 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"83.txt") = 1 Then
   If Not _FileCreate(""& $Name &"83.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 84 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"84.txt") = 1 Then
   If Not _FileCreate(""& $Name &"84.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 85 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"85.txt") = 1 Then
   If Not _FileCreate(""& $Name &"85.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 86 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"86.txt") = 1 Then
   If Not _FileCreate(""& $Name &"86.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 87 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"87.txt") = 1 Then
   If Not _FileCreate(""& $Name &"87.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 88 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"88.txt") = 1 Then
   If Not _FileCreate(""& $Name &"88.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 89 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"89.txt") = 1 Then
   If Not _FileCreate(""& $Name &"89.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 90 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"90.txt") = 1 Then
   If Not _FileCreate(""& $Name &"90.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 91 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"91.txt") = 1 Then
   If Not _FileCreate(""& $Name &"91.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 92 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"92.txt") = 1 Then
   If Not _FileCreate(""& $Name &"92.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 93 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"93.txt") = 1 Then
   If Not _FileCreate(""& $Name &"93.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 94 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"94.txt") = 1 Then
   If Not _FileCreate(""& $Name &"94.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 95 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"95.txt") = 1 Then
   If Not _FileCreate(""& $Name &"95.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 96 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"96.txt") = 1 Then
   If Not _FileCreate(""& $Name &"96.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 97 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"97.txt") = 1 Then
   If Not _FileCreate(""& $Name &"97.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 98 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"98.txt") = 1 Then
   If Not _FileCreate(""& $Name &"98.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 99 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"99.txt") = 1 Then
   If Not _FileCreate(""& $Name &"99.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Now 100 Cookies.{Enter}")
   Return _Love()
EndIf
If Not FileExists("C:\Users\"& $Comp &"\Desktop\APBot2.0\"& $Name &"100.txt") = 1 Then
   If Not _FileCreate(""& $Name &"100.txt") Then
	  MsgBox(4096, "Error", " Error Creating/Resetting log.      error:" & @error)
   EndIf
   Send ("{Space}{Space}{Space}{Space}Congratulations : "& $Name &"{Enter}")
   Send ("{Space}{Space}{Space}{Space}"& $Name &" Has Already Hit The Max{!}{Enter}")
   Return _Love()
EndIf
Until $ttt = 1
	  EndIf
	  MsgBox( 0, "Error", "Wrong Password.")
	  Return
EndIf
   EndFunc
   
Func _Sstop()
  Global $kkk = 1
EndFunc

Func _Sstart()
   $In1 = GUICtrlRead ($Input1 , 1)
   $In2 = GUICtrlRead ($Input2 , 1)
   $In3 = GUICtrlRead ($Input3 , 1)
   $In4 = GUICtrlRead ($Input4 , 1)
   $In5 = GUICtrlRead ($Input5 , 1)
   $In6 = GUICtrlRead ($Input6 , 1)
   $In7 = GUICtrlRead ($Input7 , 1)
   $In8 = GUICtrlRead ($Input8 , 1)
If $yio = 0 Then
 Global $Snum = InputBox("Number", "Enter How Many Input You Used (1-8).", "", "")
EndIf
Global $yio = 1
If $Snum = 1 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (800)
	   Return _Sstart()
	EndIf
EndIf
If $Snum = 2 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (600)
	   Return _Sstart()
	EndIf
    EndIf
EndIf
If $Snum = 3 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (600)
	   Return _Sstart()
	EndIf
    EndIf
    EndIf
EndIf
If $Snum = 4 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (600)
   If $kkk = 0 Then
	  Send("{Enter}"& $In4 &"{Enter}")
	   Sleep (600)
	   Return _Sstart()
	EndIf
    EndIf
    EndIf
    EndIf
EndIf
If $Snum = 5 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (500)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (500)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (500)
   If $kkk = 0 Then
	  Send("{Enter}"& $In4 &"{Enter}")
	   Sleep (500)
   If $kkk = 0 Then
	  Send("{Enter}"& $In5 &"{Enter}")
	   Sleep (500)
	   Return _Sstart()
	EndIf
    EndIf
    EndIf
    EndIf
    EndIf
EndIf
If $Snum = 6 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In4 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In5 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In6 &"{Enter}")
	   Sleep (400)
	   Return _Sstart()
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
 EndIf
 If $Snum = 7 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In4 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In5 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In6 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In7 &"{Enter}")
	   Sleep (400)
	   Return _Sstart()
	EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
 EndIf
 If $Snum = 8 Then
   If $kkk = 0 Then
	  Send("{Enter}"& $In1 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In2 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In3 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In4 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In5 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In6 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In7 &"{Enter}")
	   Sleep (400)
   If $kkk = 0 Then
	  Send("{Enter}"& $In8 &"{Enter}")
	   Sleep (400)
	   Return _Sstart()
	EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
EndIf
EndFunc

Func _Bstop()
   Global $omfgl = 1
   GLobal $omfg2 = 1
EndFunc

Func _Bstart()
If $omfgl = 0 Then
		 Do
		 If not WinActive("Alliance of Valiant Arms") Then
			WinActivate("Alliance of Valiant Arms")
			Sleep(250)
		 EndIf
		 Send ("{F5}")
		 Sleep (5000)
		 MouseClick("left", 562, 456, 3, 20)
		 Sleep (2000)
		 MouseClick("left", 575, 704, 3, 20)
		 SLeep (1000)
		 MouseClick("left", 551, 715, 3, 20)
		 Sleep (1000)
		 MouseClick("left", 581, 540, 3, 20)
		 Until $omfg2 = 1
		 Return _Bstart()
Endif 
EndFunc

Func _Capsule()
   $Caps = GUICtrlRead ($Number)
   $Rat1 = GUICtrlRead ($Radio2)
   $Rat2 = GUICtrlRead ($Radio4)
   $Rat3 = GUICtrlRead ($Radio3)
   $Rat4 = GUICtrlRead ($Radio5)
   $Rat5 = GUICtrlRead ($Radio6)
   If $Rat1 = $GUI_CHECKED Then
      Local $R = Execute("$Caps / 99")	
	  Local $T = Execute("$R * 100")
	  Local $E = Execute("$T - 100")
	  Local $W = Execute("$E - $E - $E")
	  MsgBox( 0, "% To Win", ""& $W &"% Of Chance To Win The Gun.")
   EndIf
   If $Rat2 = $GUI_CHECKED Then
	  Local $R = Execute("$Caps / 149")	
	  Local $T = Execute("$R * 100")
	  Local $E = Execute("$T - 100")
	  Local $W = Execute("$E - $E - $E")
	  MsgBox( 0, "% To Win", ""& $W &"% Of Chance To Win The Gun.")
   EndIf
   If $Rat3 = $GUI_CHECKED Then
	  Local $R = Execute("$Caps / 200")	
	  Local $T = Execute("$R * 100")
	  Local $E = Execute("$T - 100")
	  Local $W = Execute("$E - $E - $E")
	  MsgBox( 0, "% To Win", ""& $W &"% Of Chance To Win The Gun.")
   EndIf
   If $Rat4 = $GUI_CHECKED Then
	  Local $R = Execute("$Caps / 249")	
	  Local $T = Execute("$R * 100")
	  Local $E = Execute("$T - 100")
	  Local $W = Execute("$E - $E - $E")
	  MsgBox( 0, "% To Win", ""& $W &"% Of Chance To Win The Gun.")
   EndIf
   If $Rat5 = $GUI_CHECKED Then
	  Local $R = Execute("$Caps / 300")	
	  Local $T = Execute("$R * 100")
	  Local $E = Execute("$T - 100")
	  Local $W = Execute("$E - $E - $E")
	  MsgBox( 0, "% To Win", ""& $W &"% Of Chance To Win The Gun.")
   EndIf
EndFunc
APBot2.0Code_mpgh.net.rar4 KB · 331 downloads Clean
Download & Thanks
#1 · edited ·
Attachment Warrants a clean status.

/Approved Frederick
#2 ·
Great job up there! As i have learnt only so far VB, thats why my afk bot is based on that, but next course i will learn c++, then this code will help me to learn while i analyse it
#3 ·
Quote Originally Posted by outrun123 View Post
Great job up there! As i have learnt only so far VB, thats why my afk bot is based on that, but next course i will learn c++, then this code will help me to learn while i analyse it
this isn't C++ this is Autoit3 Script ...
#4 ·
Quote Originally Posted by AVA PlaYe View Post
this isn't C++ this is Autoit3 Script ...
hey man can u help me i wanna make a program that press p every 10 or 15 sec but idk how to start can u help me plz ?
#5 ·
Quote Originally Posted by tupapa1993 View Post
hey man can u help me i wanna make a program that press p every 10 or 15 sec but idk how to start can u help me plz ?
Step 1. Your GUI

Code:
#Region ### START Koda GUI section ### Form=c:\users\frederick\desktop\apbot v1.9.kxf
$Form1_1 = GUICreate("Form1", 222, 132, 192, 124)
$Group1 = GUICtrlCreateGroup("Press P", 24, 24, 177, 89)
$Button1 = GUICtrlCreateButton("Start (F8)", 32, 48, 75, 41)
$Button2 = GUICtrlCreateButton("Stop (F9)", 120, 48, 75, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Step 2. Give A Value To All Of Your Variable And Your Hotkey

Code:
Global $lol = 0

HotKeySet("{F8}", "_lol"),
HotKeySet("{F9}", "_Stop")
Step 3. Make YOur GUI CHeck which mean if button 1 pressed then do func ''x''

Code:
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button1
			_lol()
		 Case $Button2
			_Stop()
	EndSwitch
WEnd
Step 4. Make THe Function

Code:
Func _Stop()
   Global $lol = 1
EndFunc

Func _lol()
   If $lol = 0 Then
   Do
		Send ("p")
		Sleep(12000)
   Until $lol = 1
EndIf
Return _lol()
EndFunc
Step 5. Add The Required #include(.au3) on the first

Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Then you done, So Here What It Should Give You For An Auto-Press p every 12 sec

Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\users\frederick\desktop\apbot v1.9.kxf
$Form1_1 = GUICreate("Form1", 222, 132, 192, 124)
$Group1 = GUICtrlCreateGroup("Press P", 24, 24, 177, 89)
$Button1 = GUICtrlCreateButton("Start (F8)", 32, 48, 75, 41)
$Button2 = GUICtrlCreateButton("Stop (F9)", 120, 48, 75, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $lol = 0

HotKeySet("{F8}", "_lol")
HotKeySet("{F9}", "_Stop")

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button1
			_lol()
		 Case $Button2
			_Stop()
	EndSwitch
WEnd

Func _Stop()
   Global $lol = 1
EndFunc

Func _lol()
   If $lol = 0 Then
   Do
		Send ("p")
		Sleep(12000)
   Until $lol = 1
EndIf
Return _lol()
EndFunc
#6 ·
Quote Originally Posted by AVA PlaYe View Post
Step 1. Your GUI

Code:
#Region ### START Koda GUI section ### Form=c:\users\frederick\desktop\apbot v1.9.kxf
$Form1_1 = GUICreate("Form1", 222, 132, 192, 124)
$Group1 = GUICtrlCreateGroup("Press P", 24, 24, 177, 89)
$Button1 = GUICtrlCreateButton("Start (F8)", 32, 48, 75, 41)
$Button2 = GUICtrlCreateButton("Stop (F9)", 120, 48, 75, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Step 2. Give A Value To All Of Your Variable And Your Hotkey

Code:
Global $lol = 0

HotKeySet("{F8}", "_lol"),
HotKeySet("{F9}", "_Stop")
Step 3. Make YOur GUI CHeck which mean if button 1 pressed then do func ''x''

Code:
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button1
			_lol()
		 Case $Button2
			_Stop()
	EndSwitch
WEnd
Step 4. Make THe Function

Code:
Func _Stop()
   Global $lol = 1
EndFunc

Func _lol()
   If $lol = 0 Then
   Do
		Send ("p")
		Sleep(12000)
   Until $lol = 1
EndIf
Return _lol()
EndFunc
Step 5. Add The Required #include(.au3) on the first

Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Then you done, So Here What It Should Give You For An Auto-Press p every 12 sec

Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\users\frederick\desktop\apbot v1.9.kxf
$Form1_1 = GUICreate("Form1", 222, 132, 192, 124)
$Group1 = GUICtrlCreateGroup("Press P", 24, 24, 177, 89)
$Button1 = GUICtrlCreateButton("Start (F8)", 32, 48, 75, 41)
$Button2 = GUICtrlCreateButton("Stop (F9)", 120, 48, 75, 41)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $lol = 0

HotKeySet("{F8}", "_lol")
HotKeySet("{F9}", "_Stop")

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $Button1
			_lol()
		 Case $Button2
			_Stop()
	EndSwitch
WEnd

Func _Stop()
   Global $lol = 1
EndFunc

Func _lol()
   If $lol = 0 Then
   Do
		Send ("p")
		Sleep(12000)
   Until $lol = 1
EndIf
Return _lol()
EndFunc
thank you so much
#7 ·
what does this thing do?
#8 ·
Like ferrarifan said what does this APBot 2.0 do? I remember you talking about APBot 2.5 being able to autobuy capsules..
#9 ·
Quote Originally Posted by ThatOneGamer View Post
Like ferrarifan said what does this APBot 2.0 do? I remember you talking about APBot 2.5 being able to autobuy capsules..
APBot 2.0 is the most New Released APBot , 2.5 isn't release yet, also here is APBot 2.0
http://www.mpgh.net/forum/201-allian...ot-v2-0-a.html
#11 ·
Would be nice
#10 ·
Quote Originally Posted by zZzeta/S View Post
Would be nice
lol at you, you just took mouce coord from here and put it in the Winautomation program, lols, also the mouse click coord are 90% of the program so we can call you leecher
#13 ·
Thanks man! This is fantastic.
#12 ·
where to download Autoit3
#14 ·
lol im new and what that can do and how to use it ?
#15 ·
Posts 1–15 of 22 · Page 1 of 2

Post a Reply

Similar Threads

WarRock - International Hacksa Couple WPE Weapon codes?phil823phil823 16 WarRock - International HacksPre-Regerstration - E3 CodesDave84311Dave84311 67 WarRock - International Hackshi can any1 help me make or find a cheat codeCRCrUsHa 3 General Game Hacking🙂 hi, can some1 make a cheat code or find a cheat code for me for this game i play onliCRCrUsHa 37
Talk with us