Zasada działania:
Aby wysłać przedmiot gracz do którego wysyłamy musi być online!
Przedmiot bierzemy w lewą rękę! (wysyła pojedyncze przedmioty i kase)
Piszemy !bluetooth "nick gracza
Gracz o nicku "nick gracza" dostaje przedmiot, który mieliśmy w ręce!

Uwaga! Zasięg maksymalnie 100 kratek (sqm)!

Odległość między graczami jest to suma dwóch różnic (x i y).

Tworzymy plik w data\talkactions\scripts o nazwie bluetooth.lua

a w nim:

-- BlueTooth System --

local function odleglosc(pos1,pos2)
local ile = {0,0}

if (pos1.x >= pos2.x) then
local ile = {(pos1.x - pos2.x),0}
else
local ile = {(pos2.x - pos1.x),0}
end

if (pos1.y >= pos2.y) then
local ile = {ile[1],(pos1.y - pos2.y)}
else
local ile = {ile[1],(pos2.y - pos1.y)}
end

if ((ile[1] + ile[2]) <= 100) then
return true
else
return false
end
end

function onSay(cid,words,param)

local kto = getPlayerByName(param)
if (isPlayer(kto) == 1) then
local playerpos = getPlayerPosition(cid)
local player2pos = getPlayerPosition(kto)
if (odleglosc(playerpos,player2pos) == true) then
local przedmiot = getPlayerSlotItem(cid, 6)
if (przedmiot.itemid > 1) then
local ile = getPlayerItemCount(cid,przedmiot.itemid)
doPlayerAddItem(kto, przedmiot.itemid, ile)
doPlayerRemoveItem(cid, przedmiot.itemid, ile)
doPlayerSendTextMessage(cid,22,"Transmisja udana!")
doPlayerSendTextMessage(kto,22,"Dostales prezent od gracza "..getPlayerName(cid).."!")
else
doPlayerSendTextMessage(cid,22,"Brak przedmiotu!")
end
else
doPlayerSendTextMessage(cid,22,"Brak zasiegu! (max 100 sqm)")
end
else
doPlayerSendTextMessage(cid,22,"Gracz nie istnieje lub nie jest online!")
end
end

Do talkactions.xml dopisujemy:

<talkaction words="!bluetooth" script="bluetooth.lua" />

Skrypt nie jest mój!

Legenda:

Zasięg wysłania, można zmienić