; <COMPILER: v1.0.46.13>
Menu, Tray, Icon, Shell32.dll, 73,1
getMau()
{
PixelGetColor, color, 686, 716,Slow
StringMid, H, color,7,1
if (H="1")
Mau:=0
else if (H="0")
Mau:=0
else
Mau :=1
return Mau
}
getMana()
{
PixelGetColor, color, 605, 690, Slow
StringMid, B, color,3,2
if (B<>"FF")
mana:=1
else
mana :=0
return mana
}
Velang(OutGame, TatMay)
{
Click 400, 50
Sleep, 50
Click 400, 50
Sendplay {Space}
Sendplay {Space}
Sendplay {Space}
Send {v down}
sleep, 200
Send {v up}
Sleep, 500
sendplay {Click Right 42, 495}
sendplay {Click Right 42, 495}
sendplay {Click Right 42, 495}
send {Left up}
Sendplay {Space}
Sendplay {Space}
Sendplay {Space}
Click 400, 50
Sleep, 50
Click 400, 50
Sendplay {Space}
Sendplay {Space}
Sendplay {Space}
Send {v down}
sleep, 200
Send {v up}
Sleep 500
sendplay {Click Right 42, 495}
sendplay {Click Right 42, 495}
sendplay {Click Right 42, 495}
send {Left up}
Sendplay {Space}
Sendplay {Space}
Sendplay {Space}
If (OutGame="ON")
{
Sleep, 10000
WinKill, Priston Tale
Sleep, 10000
WinKill, Priston Tale
Sleep, 10000
WinKill, Priston Tale
}
If (TatMay="ON")
{
Shutdown, 1
}
Reload
}
Napmau()
{
sleep,50
Send {r down}
sleep, 200
Send, {r up}
sleep 100
Click 400, 50
Sleep 80
Sendplay {Space}
Sendplay {Space}
Sendplay {Space}
Send {v down}
sleep, 200
Send {v up}
Sleep, 500
Click 400, 55
Sleep, 500
mousemove 34, 474
Sleep, 150
Sendplay +2
Sleep, 80
mousemove 53, 474
Sleep, 150
Sendplay +1
Sleep, 80
mousemove 34, 516
Sleep, 150
Sendplay +3
Sleep, 80
mousemove 53, 516
Sleep, 150
Sendplay +3
Sleep, 80
Sendplay {Space}
sleep, 20
Sendplay {Space}
sleep, 20
Sendplay {Space}
sleep, 80
Send {r down}
sleep, 200
Send {r up}
}
getQV()
{
PixelGetColor, color, 521, 411,Slow
MsgBox The color at the current cursor position is %color%
StringMid, Q, color,7,2
if (Q="25")
QV:=0
else if (Q="69")
QV:=1
else
QV :=2
return QV
}
AutoClickGETQV()
{
TiepTucTimQV:
send {Left up}
mousemove 400, 338
sleep 200
check:=getQV()
if (check = 0)
{
send {Left Down}
sleep 100
send {Left up}
goto, TiepTucTimQV
}
if (check = 1)
{
Sendplay {Left Up}
sleep 40
Sendplay {Shift down}
Sendplay {Click 400, 338}
Sendplay {Shift Up}
}
if (check = 2)
{
send {Left Down}
sleep 100
send {Left up}
goto, TiepTucTimQV
}
}
AutoClick(MouseX,MouseY,MouseDelay)
{
mousemove, %MouseX%, %mouseY%
sleep, %MouseDelay%
ControlClick, x%MouseX% y%MouseY%,Priston,,right
sleep, %MouseDelay%
}
GetACC()
{
TrueACC:=1
RegRead, OutputVar, HKEY_LOCAL_MACHINE, SOFTWARE\Triglow Pictures\PristonTale, Account
return TrueACC
}
SetKeyDelay, 50, 10, Play
SetMouseDelay,50, Play
sendmode play
pause
^F9::
{
sendplay {Left up}
WinSet, AlwaysOnTop, off, Priston
sleep 20
Reload
}
^F12:: Exitapp
^F11::
{
MsgBox, Auto Mage
cPanel® (Nhan F9 ==> Start; Ctrl+F9 ==> Pause; F9==> Tiep tuc; Ctrl+F12 - Exit ). `nThan tang nhung nguoi ban ma toi yeu quy!
sendplay {Ctrl}
sleep 50
Reload
}
F9::
{
pause off
if (GetACC()=0)
{
MsgBox, Xin loi ACC PTV ban dang su dung khong co quyen su dung phan mem nay. `n Lien he voi tac gia de duoc cap phep.
Exitapp
}
IniRead, Mouse_x, AutoPTV.ini, Mouse, Mouse_x
IniRead,Mouse_y, AutoPTV.ini, Mouse, Mouse_y
IniRead,MouseDelay, AutoPTV.ini, Mouse, MouseDelay
IniRead, F2, AutoPTV.ini, Skill, F2
IniRead, F3, AutoPTV.ini, Skill, F3
IniRead, F4, AutoPTV.ini, Skill, F4
IniRead, F5, AutoPTV.ini, Skill, F5
IniRead, F6, AutoPTV.ini, Skill, F6
IniRead, F7, AutoPTV.ini, Skill, F7
IniRead, OutParty, AutoPTV.ini, Option, OutParty
IniRead, OutGameKhiVeLang, AutoPTV.ini, Option, OutGameKhiVeLang
IniRead, TatMayKhiVeLang, AutoPTV.ini, Option, TatMayKhiVeLang
sendplay {Ctrl}
sleep, 200
sendplay {Ctrl}
sleep, 200
WinSet, AlwaysOnTop, on, Priston
WinMaximize, Priston
ToolTip, Auto PTV 3.0 - http://www.underworldvn.com - Press [Ctrl+F9] to Pause, 350, 30
send {PgDn}
send {PgDn}
send {PgDn}
send {PgDn}
send {PgDn}
if (GetACC()=1)
Loop
{
Loop 20
{
WinActivate , Priston
Napmau()
if (getMana()=1)
IfWinActive, Priston
{
send, {F1}
Sleep 150
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
loop 3
{
IfWinActive, Priston
If (F4="ON")
{
send {PgDn}
send {F4}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F5="ON")
{
send {PgDn}
send {F5}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F6="ON")
{
send {PgDn}
send {F6}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F7="ON")
{
send {PgDn}
send {F7}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
}
loop 10
{
IfWinActive, Priston
AutoClick(Mouse_x, Mouse_y, MouseDelay)
IfWinActive, Priston
if (getMau()=0)
Velang(OutGameKhiVeLang, TatMayKhiVeLang)
}
if (getMana()=1)
IfWinActive, Priston
{
send, {F1}
Sleep 150
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
loop 90
{
IfWinActive, Priston
if (getMana()=0)
{
send {PgDn}
send {F2}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F3="ON")
{
send {PgDn}
send {F3}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
}
if (getMana()=1)
IfWinActive, Priston
{
send, {F1}
Sleep 150
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
loop 20
{
IfWinActive, Priston
if (getMana()=0)
{
send {PgDn}
send {F2}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F3="ON")
{
send {PgDn}
send {F3}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
}
IfWinActive, Priston
Napmau()
loop 3
{
IfWinActive, Priston
If (F4="ON")
{
send {PgDn}
send {F4}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F5="ON")
{
send {PgDn}
send {F5}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F6="ON")
{
send {PgDn}
send {F6}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F7="ON")
{
send {PgDn}
send {F7}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
}
loop 70
{
IfWinActive, Priston
if (getMana()=0)
{
send {PgDn}
send {F2}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
IfWinActive, Priston
If (F3="ON")
{
send {PgDn}
send {F3}
sleep, 50
AutoClick(Mouse_x, Mouse_y, MouseDelay)
}
}
}
IfWinNotActive, Priston
{
Shutdown, 1
}
IfWinActive, Priston
If (OutParty="ON")
sendplay {Click 716, 410}
sleep, 50
}
}