Sub mine()
var x, y, i, t, tmp, inside, goto_x, st, first
VAR ms1 = "There is nothing here to mine for"
VAR ms2 = "You can't use"
VAR ms3 = "You put "
VAR ms4 = "You loosen some rocks"
VAR ms5 = "location"
VAR ms6 = "Try mining"
VAR ms7 = "You can't see that"
VAR ms8 = "You stop"
VAR ms9 ...
Search found 23 matches
- 2010-03-04 03:07:52
- Forum: Scripting Ore
- Topic: Соберите(
- Replies: 1
- Views: 1084
- 2010-01-30 11:31:17
- Forum: Scripting Ore
- Topic: Подправьте
- Replies: 5
- Views: 1584
Re: Подправьте
Здесь мне все понятно! Просто ты чуть-чуть не понял о чем я прошу. Когда становиться <100 ХП чтоб он судрожно начинал пить пока не станет 160хп. Когда 160хп он снова тормозит. Просто суть в том что при питье бутылок оружие падает в пак и после каждого удара пить бутылки бессмысленно так как ...
- 2010-01-30 08:16:01
- Forum: Scripting Ore
- Topic: Подправьте
- Replies: 5
- Views: 1584
Re: Подправьте
С этим скриптом я разобрался)
Вот еще одна просьба.
Сделать так что бы он до пил банки до полного столба ХП. У меня их 160!
Вот еще одна просьба.
Code: Select all
sub AutoVamp()
while 1
wait(500)
if uo.life < 100 then
uo.usetype('0x0F06','0x0020')
wait(100)
uo.say('.arm_fence')
endif
wend
end sub
Сделать так что бы он до пил банки до полного столба ХП. У меня их 160!
- 2010-01-29 22:45:26
- Forum: Scripting Ore
- Topic: Подправьте
- Replies: 5
- Views: 1584
Подправьте
Собственно говоря вот скрипт.
Sub Scan()
uo.print('start')
uo.set('finddistance', '15')
uo.ignore('self')
uo.findtype('0x0190', '-1', 'ground')
while uo.findcount() and not uo.dead()
uo.cast('Magic Arrow', 'finditem')
wait(1500)
uo.ignore('finditem')
uo. ...
Sub Scan()
uo.print('start')
uo.set('finddistance', '15')
uo.ignore('self')
uo.findtype('0x0190', '-1', 'ground')
while uo.findcount() and not uo.dead()
uo.cast('Magic Arrow', 'finditem')
wait(1500)
uo.ignore('finditem')
uo. ...
- 2008-07-11 12:49:44
- Forum: Scripting Ore
- Topic: Все тот же мининг!
- Replies: 2
- Views: 1275
- 2008-07-10 00:55:42
- Forum: Scripting Ore
- Topic: Все тот же мининг!
- Replies: 2
- Views: 1275
Все тот же мининг!
Привет всем! Люди прошу написать скрипт если не сложно! Стоит чар копает на расстоянии 2 тайлов от себя, под собой не копает т.к. там где я играю не льзя копать под собои. Дальше если напирмер выкапывает айрон, он берет и бросает под себя, руды не нужной много так что не токо аирон надо бросать под ...
- 2008-06-03 16:27:40
- Forum: Scripting Ore
- Topic: Помогите с лутом!
- Replies: 1
- Views: 1037
Помогите с лутом!
Вот скриптик с лутом. Работает все норм, но не лутает одинаковые вещи. Например в трупе ГХ,ТМ,Инвизки тип одинаковыи у них и он лутает токо ГХ или токо ТМ остальные бутылки остовляет. Как это исправить?
sub remove()
var n, lbag
Dim Loot[26]
Loot[0]='0x0EED' ; gp
Loot[ ...
sub remove()
var n, lbag
Dim Loot[26]
Loot[0]='0x0EED' ; gp
Loot[ ...
- 2007-12-19 01:01:58
- Forum: Scripting Ore
- Topic: Выручьте скриптового нуба!
- Replies: 2
- Views: 1046
Выручьте скриптового нуба!
Довно не играл в уо и было все удалено,включая все скрипты! Прошу два скрипта т.к. писать сам не умею!
1-й скрипт режет труп! 2-й лутает с пола по масиву игнорируя Fastloot!Заранее спасибо!

- 2007-06-30 23:47:22
- Forum: Scripting Ore
- Topic: Народ выручьте плизз!
- Replies: 2
- Views: 1462
Народ выручьте плизз!
Вот такая позьба!Даите скрипт для ПВП альфы чтобы брал 100 бинтов один ящик с банками и 1 сумку с регами и одевал ламу дальше одевает кристал фул и берёт композит щит!и берет меч метеорит!Поиск юзал нашел пару скриптов но они не работают!А в скриптах я пока еще не очень темболее на пвп Альфе ...
- 2007-06-24 01:22:52
- Forum: Scripting Ore
- Topic: Выручаите не все лутает!
- Replies: 4
- Views: 1619
- 2007-06-23 22:03:51
- Forum: Scripting Ore
- Topic: Выручаите не все лутает!
- Replies: 4
- Views: 1619
Не работает вообще выдоет ошибку вот в этом месте!
Code: Select all
while uo.FindCount()>0 then
- 2007-06-22 22:49:45
- Forum: Scripting Ore
- Topic: Выручаите не все лутает!
- Replies: 4
- Views: 1619
Выручаите не все лутает!
sub Looting()
var t,l
var myarm
t=1200
UO.WaitTargetObject('lastcorpse')
uo.setarm('myarm')
UO.UseType('0x0F52')
end if
wait(t)
dim LootingItem[29]
uo.Print('Начинаем Лутать...')
### Armore Looting Items ...
- 2007-06-20 16:30:12
- Forum: Scripting Ore
- Topic: Зделаите чтоб он разал труп!
- Replies: 7
- Views: 2124
- 2007-06-19 17:26:55
- Forum: Scripting Ore
- Topic: Зделаите чтоб он разал труп!
- Replies: 7
- Views: 2124
- 2007-06-19 16:25:11
- Forum: Scripting Ore
- Topic: Зделаите чтоб он разал труп!
- Replies: 7
- Views: 2124
- 2007-06-19 15:19:36
- Forum: Scripting Ore
- Topic: Зделаите чтоб он разал труп!
- Replies: 7
- Views: 2124
- 2007-06-19 02:41:18
- Forum: Scripting Ore
- Topic: Зделаите чтоб он разал труп!
- Replies: 7
- Views: 2124
Зделаите чтоб он разал труп!
sub Looting()
var t,l
t=1200
uo.UseObject('lastcorpse')
wait(t)
dim LootingItem[38]
uo.Print('Начинаем Лутать...')
### Magic Looting Items ###
LootingItem[1] = 0x0F7B ## - Blood Moss
LootingItem[2] = 0x0F8D ...
var t,l
t=1200
uo.UseObject('lastcorpse')
wait(t)
dim LootingItem[38]
uo.Print('Начинаем Лутать...')
### Magic Looting Items ###
LootingItem[1] = 0x0F7B ## - Blood Moss
LootingItem[2] = 0x0F8D ...
- 2007-06-13 21:12:38
- Forum: Scripting Ore
- Topic: Подправьте скрипт на лут!
- Replies: 9
- Views: 2763
- 2007-06-13 20:48:14
- Forum: Scripting Ore
- Topic: Подправьте скрипт на лут!
- Replies: 9
- Views: 2763