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 By Szymciak (Fast)
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" />