Search found 20 matches

by tRusTm3
2008-07-15 05:07:03
Forum: Scripting Ore
Topic: трэкинг
Replies: 0
Views: 1194

трэкинг

sub Tracking()
uo.CancelMenu()
uo.waitmenu("Track","Animals","Track","имя существа")
repeat
uo.deletejournal()
uo.UseSkill('Tracking')
repeat
wait(100)
until UO.InJournal("Tracking Cancelled")
until uo.Dead&#40 ...
by tRusTm3
2008-07-15 05:04:06
Forum: I need script!
Topic: Карты и клады
Replies: 4
Views: 1207

при том что возможно ли какой нить командой тыркнуть на карту и там напишится координаты клада? ))))
by tRusTm3
2008-07-11 12:06:29
Forum: I need script!
Topic: Карты и клады
Replies: 4
Views: 1207

Карты и клады

Возможно ли узнать координаты клада, по не расшифрованной карте?
by tRusTm3
2008-07-05 02:31:09
Forum: Scripting Ore
Topic: UO.Set трабл
Replies: 2
Views: 1012

я хз, может что бы назначить ласттаргет - ластстатусом)))
ну попробую удалить эти строки)))
спс заранее
by tRusTm3
2008-07-04 20:11:15
Forum: Scripting Ore
Topic: UO.Set трабл
Replies: 2
Views: 1012

UO.Set трабл

Когда юзаю скрипт, открывается окно Text, и там типа параметры для значения UO.Set
Вот скрипт:
sub Arrow()
VAR ManaNeed=4
UO.Set('lasttarget','laststatus')
if UO.Mana>=ManaNeed then
UO.Cast('Magic Arrow','laststatus')
else
UO.Print("Low mana ...
by tRusTm3
2008-06-30 16:58:43
Forum: I need script!
Topic: Нужен самый простейший мининг)))
Replies: 6
Views: 2862

while not UO.Dead()
for y=-4 to 4
for x=-4 to 4
while not UO.Hidden()

поправь так


и исправь

VAR ms1 = "There is nothing here to mine for."
VAR ms2 = "You can't use"
VAR ms3 = "You put the"
VAR ms4 = "You loosen some rocks"
VAR ms5 = "You are too far away ...
by tRusTm3
2008-06-29 04:19:53
Forum: Scripting Ore
Topic: ТК
Replies: 3
Views: 1287

были терминейты во время скрипта.......
походу решил проблему, тьфу тьфу тьфу))))

sub tinker()
VAR Sunduk = '0x418B6351' ; Сериал сундука
VAR Ingi = '0x1BEF' ; Тип ингов
VAR Instrum = '0x1EBC' ; Тип инструмента тинкера
VAR Bottle = '0x0F0E' ; Тип бутылки
VAR Kolvo = 500 ; Брать ...
by tRusTm3
2008-06-29 02:46:51
Forum: Scripting Ore
Topic: поправьте немного пожалуйста .(
Replies: 3
Views: 1355

вот так попробуй, и незабудь прописать тип рар рыбы ,info TYPE=012345
плюс убрал речарж

var book1='0x4018DB5A' #рунбука 1
var book2='0x4018DB59' # 2-ая
var book3='0x40127980' # 3 яя
var seifformap1='0x4030491C' # 1 сэйф
var seifformap2='0x40347406' # 2-ой
var recall='0x1F4C' # тип рекола ...
by tRusTm3
2008-06-29 02:34:17
Forum: I need script!
Topic: Animal Taiming,нету таково негде искал весь день
Replies: 8
Views: 2129

я думаю если подать идею может кто нить и напишет.....
допустим, взять какую нить стандартную ходилку....
- Чар идет по лесу
- Видит животное любое, Item Found: 1
- Подходит к нему, uo.useobject ('TamingStaff')
- Затамил, If uo.LastMessage().....
- идем дальше

Даже ходить можно по ...
by tRusTm3
2008-06-29 02:20:36
Forum: Scripting Ore
Topic: ТК
Replies: 3
Views: 1287

вот так вроде норм работает)))
- когда меньше 2х ингов он их кидает в сундук и потом берет из сундука указанное кол-во ингов

sub tinker()
VAR Sunduk = '0x418B6351' ; Сериал сундука
VAR Ingi = '0x1BEF' ; Тип ингов
VAR Instrum = '0x1EBC' ; Тип инструмента тинкера
VAR Bottle = '0x0F0E ...
by tRusTm3
2008-06-29 00:49:53
Forum: Scripting Ore
Topic: ТК
Replies: 3
Views: 1287

незнаю как, но возможно надо прописать чтобы если в паке оставалось 1-2 инга, он скидывал бы их в сундук к остальным)
by tRusTm3
2008-06-29 00:34:36
Forum: Scripting Ore
Topic: мининг абус
Replies: 1
Views: 970

up))
by tRusTm3
2008-06-24 11:46:27
Forum: Scripting Ore
Topic: мининг абус
Replies: 1
Views: 970

мининг абус

Нужен обычный скрипт на мининг
- копает вокруг себя
- набирает опеределнный вес, рекол к сундуку
- сбрасывает руду в сундук
- рекол обратно

помогите плз)))
by tRusTm3
2008-06-22 21:00:24
Forum: Scripting Ore
Topic: Хелп по резке
Replies: 8
Views: 2165

а все))) скрипт который я запостил тож норм пашет)))))) там просто надо было тип вепона поменять >.< 8)

кстати, Автор, попробуй в этом скрипте поменяй тайпы на нужные, будет кур бить и вытаскивать из них то что нужно)))
by tRusTm3
2008-06-22 20:38:27
Forum: Scripting Ore
Topic: Хелп по резке
Replies: 8
Views: 2165

есть только такой
sub Abs&#40;num&#41;
if num < 0 then
return -num
end if
return num
end sub

sub Sig&#40;num&#41;
if num < 0 then
return -1
else
if num == 0 then
return 0
endif
endif
return 1
end sub

sub MoveToXY&#40;x, y, prec&#41;
var dx, dy
dim Key&#91;9&#93;
Key&#91;0&#93;=37 ...
by tRusTm3
2008-06-22 19:44:44
Forum: Scripting Ore
Topic: Хелп по резке
Replies: 8
Views: 2165

тоже хотел бы такой скрипт работающий, только под овечек, и чтоб еще собирал с них шерсть, потом килл овку, и еще из трупа шерсть.... :lol:
by tRusTm3
2008-06-22 15:23:15
Forum: I need script!
Topic: Код подтверждения
Replies: 5
Views: 1581

угу нашел уже))) Спасибо большое Грин! ))

это на всякий случай тем кто тож будет искать

sub antimacro&#40;&#41;

var x, y

while not uo&#46;Dead&#40;&#41;
if &#40;uo&#46;LastGump&#40;'replyed'&#41; == 0&#41; and &#40;uo&#46;LastGump&#40;'text', 0&#41; == 'Please choose this number&#58 ...
by tRusTm3
2008-06-22 15:12:46
Forum: I need script!
Topic: Код подтверждения
Replies: 5
Views: 1581

спс буду искать)
by tRusTm3
2008-06-22 12:25:01
Forum: I need script!
Topic: Код подтверждения
Replies: 5
Views: 1581

up :(
by tRusTm3
2008-06-21 01:27:25
Forum: I need script!
Topic: Код подтверждения
Replies: 5
Views: 1581

Код подтверждения

Шард The Abyss!!!
Я заметил такую вещь, при гме допустим лумбера, при использовании топора нужно вводить код потверждения, можно ли как нить на скрипте это обойти?
Image