 |
| Autor |
Wiadomość |
| Gość |
|
|
| ziomek :) |
 Wysłany: Nie 23:06, 10 Gru 2006 Temat postu: :) |
|
fajny aotomat   wygralem 2 razy 100 cc w 5 min  : |
|
|
| nislem |
| Wysłany: Sob 20:19, 11 Lut 2006 Temat postu: Automat do gry by Devoy |
|
Yo. Jest to skrypt 100% napisany przez Devoya. Ja tylko go publikuje.
no to automat.lua:
| Kod: |
function onUse(cid, item, frompos, item2, topos)
if item.uid == 5885 then
kasapos = {x=392, y=448, z=8, stackpos=255}
getkasa = getThingfromPos(kasapos)
winpos = {x=392, y=449, z=8}
if getkasa.itemid == 2152 and getkasa.type == 5 then
rand = math.random(4)
if rand == 1 or rand == 4 or rand == 3 then
doRemoveItem(getkasa.uid,5)
doSendMagicEffect(kasapos,2)
doPlayerSendTextMessage(cid,22,"You lose 5 platinum coin.")
end
if rand == 2 then
doRemoveItem(getkasa.uid,5)
doCreateItem(2152,15,winpos)
doSendMagicEffect(winpos,13)
doSendMagicEffect(topos,21)
doPlayerSendTextMessage(cid,22,"You win 15 platinum coins.")
end
end
if getkasa.itemid == 2152 and getkasa.type == 10 then
rand = math.random(4)
if rand == 1 or rand == 4 or rand == 3 then
doRemoveItem(getkasa.uid,10)
doSendMagicEffect(kasapos,2)
doPlayerSendTextMessage(cid,22,"You lose 10 platinum coins.")
end
if rand == 2 then
doRemoveItem(getkasa.uid,10)
doCreateItem(2152,30,winpos)
doSendMagicEffect(winpos,13)
doSendMagicEffect(topos,21)
doPlayerSendTextMessage(cid,22,"You win 30 platinum coins.")
end
end
if getkasa.itemid == 2152 and getkasa.type == 25 then
rand = math.random(4)
if rand == 1 or rand == 4 or rand == 3 then
doRemoveItem(getkasa.uid,25)
doSendMagicEffect(kasapos,2)
doPlayerSendTextMessage(cid,22,"You lose 25 platinum coins.")
end
if rand == 2 then
doRemoveItem(getkasa.uid,25)
doCreateItem(2152,75,winpos)
doSendMagicEffect(winpos,13)
doSendMagicEffect(topos,21)
doPlayerSendTextMessage(cid,22,"You win 75 platinum coins.")
end
end
if getkasa.itemid == 2152 and getkasa.type == 50 then
rand = math.random(4)
if rand == 1 or rand == 4 or rand == 3 then
doRemoveItem(getkasa.uid,50)
doSendMagicEffect(kasapos,2)
doPlayerSendTextMessage(cid,22,"You lose 50 platinum coins.")
end
if rand == 2 then
doRemoveItem(getkasa.uid,50)
doCreateItem(2152,100,winpos)
doCreateItem(2152,50,winpos)
doSendMagicEffect(winpos,13)
doSendMagicEffect(topos,21)
doPlayerSendTextMessage(cid,22,"You win 150 platinum coins.")
end
end
if getkasa.itemid > 2152 or getkasa.itemid < 2152 then
doPlayerSendTextMessage(cid,22,"Please throw 5, 10, 25 or 50 platinum coins.")
end
if getkasa.itemid == 2152 and getkasa.type == 1 or getkasa.itemid == 2152 and getkasa.type == 2 or getkasa.itemid == 2152 and getkasa.type == 3 or getkasa.itemid == 2152 and getkasa.type == 4 or getkasa.itemid == 2152 and getkasa.type == 6 or getkasa.itemid == 2152 and getkasa.type == 7 or getkasa.itemid == 2152 and getkasa.type == 8
or getkasa.itemid == 2152 and getkasa.type == 9 or getkasa.itemid == 2152 and getkasa.type == 11 or getkasa.itemid == 2152 and getkasa.type == 12 or getkasa.itemid == 2152 and getkasa.type == 13 or getkasa.itemid == 2152 and getkasa.type == 14 or getkasa.itemid == 2152 and getkasa.type == 15 or getkasa.itemid == 2152 and getkasa.type == 16
or getkasa.itemid == 2152 and getkasa.type == 17 or getkasa.itemid == 2152 and getkasa.type == 18 or getkasa.itemid == 2152 and getkasa.type == 19 or getkasa.itemid == 2152 and getkasa.type == 20 or getkasa.itemid == 2152 and getkasa.type == 21 or getkasa.itemid == 2152 and getkasa.type == 22 or getkasa.itemid == 2152 and getkasa.type == 23
or getkasa.itemid == 2152 and getkasa.type == 24 or getkasa.itemid == 2152 and getkasa.type == 26 or getkasa.itemid == 2152 and getkasa.type == 27 or getkasa.itemid == 2152 and getkasa.type == 28 or getkasa.itemid == 2152 and getkasa.type == 29 or getkasa.itemid == 2152 and getkasa.type == 30 or getkasa.itemid == 2152 and getkasa.type == 31
or getkasa.itemid == 2152 and getkasa.type == 32 or getkasa.itemid == 2152 and getkasa.type == 33 or getkasa.itemid == 2152 and getkasa.type == 34 or getkasa.itemid == 2152 and getkasa.type == 35 or getkasa.itemid == 2152 and getkasa.type == 36 or getkasa.itemid == 2152 and getkasa.type == 37 or getkasa.itemid == 2152 and getkasa.type == 38
or getkasa.itemid == 2152 and getkasa.type == 39 or getkasa.itemid == 2152 and getkasa.type == 40 or getkasa.itemid == 2152 and getkasa.type == 41 or getkasa.itemid == 2152 and getkasa.type == 42 or getkasa.itemid == 2152 and getkasa.type == 43 or getkasa.itemid == 2152 and getkasa.type == 44 or getkasa.itemid == 2152 and getkasa.type == 45
or getkasa.itemid == 2152 and getkasa.type == 46 or getkasa.itemid == 2152 and getkasa.type == 47 or getkasa.itemid == 2152 and getkasa.type == 48 or getkasa.itemid == 2152 and getkasa.type == 49 or getkasa.itemid == 2152 and getkasa.type > 50 then
doPlayerSendTextMessage(cid,22,"Please throw 5, 10, 25 or 50 platinum coins.")
end
if item.itemid == 1945 then
doTransformItem(item.uid,1946)
elseif item.itemid == 1946 then
doTransformItem(item.uid,1945)
end
return 1
end
end
|
kasapos = współżędne kasy
winpod = współżędne wygranej
actions.xml:
| Kod: |
<action uniqueid="5885" script="automat.lua" />
|
I ustawiacie UniqueID na 5885 i macie skrypt. |
|
|
|
|
