он ошибки выдает
и надо что бы если поушенов не оказалось в сундуке№1 чар их там продолжал искать и как нашел кидал его в бекпак и в кег заливал так как другой чар будет варить пойшены и кидать в этот сундук.
так же пустые бутылки скидывать в сундук №1
Search found 31 matches
- 2005-05-30 19:58:24
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-30 15:38:16
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-30 14:18:19
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-29 16:28:24
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-28 16:08:42
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-28 09:21:13
- Forum: Scripting Ore
- Topic: Знатоки нужна ваша помащь
- Replies: 2
- Views: 1192
- 2005-05-27 20:35:32
- Forum: Scripting Ore
- Topic: Знатоки нужна ваша помащь
- Replies: 2
- Views: 1192
Знатоки нужна ваша помащь
VAR Sunduk='0x406C1757'
VAR Sunduk2='0x40048E2F'
VAR LastTimer
sub keg()
var i=0
uo.useobject('backpack')
uo.useobject(Sunduk)
wait(1000)
uo.useobject(Sunduk2)
wait(1000)
while 1==1
i=i+1
if i==50 then
uo.usetype( ...
VAR Sunduk2='0x40048E2F'
VAR LastTimer
sub keg()
var i=0
uo.useobject('backpack')
uo.useobject(Sunduk)
wait(1000)
uo.useobject(Sunduk2)
wait(1000)
while 1==1
i=i+1
if i==50 then
uo.usetype( ...
- 2005-05-26 21:51:06
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-26 21:46:39
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-26 21:00:04
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
- 2005-05-26 20:03:56
- Forum: Scripting Ore
- Topic: Знатоки помагите со скриптом
- Replies: 14
- Views: 3292
Знатоки помагите со скриптом
sub Keg()
VAR Sunduk = '' ; внести айди сундука с кегом
VAR Keg = '0x1940'
VAR Bottle = '0x0F0E'
VAR BottleSerial, k
UO.FindType( Bottle, -1, -1 )
If UO.FindCount() > 0 Then
UO.FindType( Keg, -1, Sunduk )
If UO.FindCount() == 0 ...
VAR Sunduk = '' ; внести айди сундука с кегом
VAR Keg = '0x1940'
VAR Bottle = '0x0F0E'
VAR BottleSerial, k
UO.FindType( Bottle, -1, -1 )
If UO.FindCount() > 0 Then
UO.FindType( Keg, -1, Sunduk )
If UO.FindCount() == 0 ...
- 2005-05-18 20:57:26
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-17 22:45:55
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 15:58:00
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 15:42:01
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 15:36:22
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 15:23:10
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 13:41:33
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 13:09:37
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144
- 2005-05-16 12:59:33
- Forum: Scripting Ore
- Topic: Знатоки помагите скрипт подправить
- Replies: 22
- Views: 4144