Код: Выделить всё
#
#
#
#
automacro createChatFirst {
console /Your Coordinates: /
location prt_fild08 100 300
delay 5
call {
do chat create "МСК - 8к" 2 0 pa55w0rd
}
}
automacro createChatAfterWarp {
console /You opened Warp Portal on/
delay 5
call {
do chat create "МСК - 8к" 2 0 pa55w0rd
}
}
automacro detectDeal {
console /Requests a Deal/
location prt_fild08 100 300
timeout 15
call acceptDeal
}
automacro detectZeny {
console /added (\d+) z to Deal/
timeout 15
call checkZeny
}
automacro detectFailedWarp {
console /(Casting failed: Requirement|Skill Warp Portal failed)/
call warp
}
macro acceptDeal {
pause @random ("0", "1", "2")
do deal
do deal
}
macro checkZeny {
if ($.lastMatch1 >= 8000) goto sell
do deal yes
stop
:sell
pause 2
do deal
do chat leave
call warp
}
macro warp {
$x = @eval($::char->{pos}{x})
$y = @eval($::char->{pos}{y})
do sl 27 @eval($x + @random ("-2", "-1", "1", "2")) @eval($y + @random ("-2", "-1", "0", "1", "2"))
pause 2
do warp 1
}