--[[
Credit Source Code :
[Link]
[Link]
[Link]
Please Do Not Reupload/Give Credit Thanks:)
]]
local count = 0
local drop
local dropMode = false
local xs, ys = 0, 0
local arrow = false
local delays = 0
local syslog = "`7[`4ihkazzzz``]"
function log(str)
LogToConsole(syslog .. str)
end
log("are you Hoster? Can u Donate me in World : `4IHKAZS")
log("Oke Now You Can Use This Scrip,Good Luck!, type: `4/helps`` if u have a
problem!")
log("Report Me if u found some bugs")
function delay()
if dropMode then
delays = 100
else
delays = 1000
end
return delays
end
function leftorright()
if arrow then
return xs + 2
else
return xs - 2
end
end
function h()
LogToConsole(count)
end
function pathPOS(x, y, jumlah, id)
if [Link](GetLocal().posX // 32 - x) > 11 or [Link](GetLocal().posY // 32 -
y) > 10 then
return nil
end
if GetTiles(x, y).collidable then
return nil
end
local Z = 0
if not GetTiles(x + 1, y).collidable then
Z = 0
elseif not GetTiles(x - 1, y).collidable then
Z = -2
else
return nil
end
SendPacketRaw(false, { type = 0, x = (x + Z) * 32, y = (y - 0) * 32, state = (Z
== 1 and 48 or 32) })
SendPacket(2, "action|dialog_return\ndialog_name|drop\nitem_drop|" .. id .. "|\
nitem_count|" .. jumlah .. "\n\n")
end
function collect(a, b, c)
local tiles = {
[1] = a,
[2] = b,
[3] = c,
}
for _, obj in pairs(GetObjectList()) do
for _, tile in pairs(tiles) do
if [Link] // 32 == tile then
local pkt = {}
[Link] = 11
[Link] = [Link]
pkt.x = [Link]
pkt.y = [Link]
SendPacketRaw(false, pkt)
end
end
end
end
function lock(a, b, c)
local count = 0
local tilelock = {
[1] = a,
[2] = b,
[3] = c,
}
for _, lock in pairs(GetObjectList()) do
if [Link] == 242 or [Link] == 1796 or [Link] == 7188 then
if [Link] // 32 == tilelock[1] or [Link] // 32 == tilelock[2] or
[Link] // 32 == tilelock[3] then
if [Link] == 242 then
count = count + [Link]
elseif [Link] == 1796 then
count = count + [Link] * 100
elseif [Link] == 7188 then
count = count + [Link] * 10000
end
end
end
end
return count
end
AddHook(function(a)
if [Link] == 3 and [Link] == 18 then
for _, display in pairs(GetTiles()) do
if [Link] == 1422 then
if display.x == [Link] then
collect([Link], [Link] - 1, [Link] + 1)
xs, ys = [Link], [Link]
drop = lock([Link], [Link] - 1, [Link] + 1)
log("Collected: `9" .. drop .. " Wls")
end
end
end
end
return false
end, "OnSendPacketRaw")
AddHook(function(type, pkt)
if pkt:find("/w") then
drop = drop * 2
bgl = [Link](drop / 10000)
drop = drop - bgl * 10000
dl = [Link](drop / 100)
wl = drop % 100
dropMode = true
return true
end
if pkt:find("/x3") then
drop = drop * 3
bgl = [Link](drop / 10000)
drop = drop - bgl * 10000
dl = [Link](drop / 100)
wl = drop % 100
dropMode = true
return true
end
if pkt:find("/helps") then
log("Here your command u can use! :\n`4/w`` | For dropping bet to player if
you lose\n`4/x3`` | For dropping bet to player and auto X3 if player got `20 `419
`428``\n`4/posdrop`` | For change position to the left/right")
return true
end
if pkt:find("/posdrop") then
if arrow then
arrow = false
log("`7Lock will drop to `4Right Position")
else
arrow = true
log("`7Lock will drop to `4Left Position")
return true
end
end
return false
end, "OnSendPacket")
while true do
Sleep(delay())
if dropMode then
Sleep(delay())
if bgl > 0 then
pathPOS(leftorright(), ys, bgl, 7188)
Sleep(delay())
end
if dl > 0 then
pathPOS(leftorright(), ys, dl, 1796)
Sleep(delay())
end
if wl > 0 then
pathPOS(leftorright(), ys, wl, 242)
Sleep(delay())
end
log("Success Dropped Lock To Player")
drop = nil
dropMode = false
end
end