мой небольшой скриптик на прокачку магери в режиме "Ты спи а я качаюсь" 
. Протестировал на ДРВ вроде работает, даже прокачался. Смотрите, пробуйте, если что ни так пишите на мыло или в личку.
Удачной прокачки и доброй ночи!!!
Code: Select all
#####################################################################
#####################################################################
######################## Magery ########################
######################## Best Script v.1.0.1 ########################
#####################################################################
#####################################################################
## Автор: Cooper
##
## Тестил: Cooper
##
## дата: 11.02.2006
##
## e-mail: cooper@omsgsm.ru
##
## Шард: Dragon World, www.drw.ru
##
## Описание скрипта:
## Чар берет из сундука реги и молча кастует нужные спелы,
## реги заканчиваются, он берет из сундука рядом, попутно изучая анатомию.
## Идеально подходит для прокачки на ночь, следите за кол-вом регов!!!
##
## Все претензии, идеи и критику на мыло. Жду.
##
##
## Правила пользования:
## Для начала меняем ID сундука из которого будем брать реги.
## Он должен стоять рядом, не обязательно открытым, как узнать ID я
## думаю обьяснять не надо :) Далее думаем что будем кастовать прописываем
## спеллы в секции "Начинаем" в самом конце скрипта. Далее смотрим в спеллбуке
## какие нужны реги на каст нужных спелов и в секции "Реги..." проставляем
## вместо нулей единицы на соответсвующих регах. Далее запускаем magery
## появится прицел, тыкаем на себя и.... выключаем монитор, ложимся спать,
## или к жене под бочек, кому как повезет :) Утром смотрим результат.
##
## Напоминаю чар берет из сундука 500 регов каждого типа который вы захотите,
## если силенок маловато то советую изменить значения в строке "кол-во..".
##
## Спокойных вам ночей!!!
######################################################################
######################################################################
sub magery()
## Сундук
##
VAR sund=0x404A7EE4
## Реги, которые будем брать из сундука
##
VAR nshade=0 ##NighShade
VAR gseng=0 ##Ginseng
VAR grlk=0 ##Garlik
VAR sash=0 ##Sulfurous Ash
VAR ssilk=0 ##Spider Silk
VAR blood=0 ##Blood Moss
VAR bperl=0 ##Black Pearl
VAR mroot=0 ##Mandrake Root
uo.exec('addobject Body')
wait(2500)
while not uo.dead()
##NightShade
##
If nshade <> 0 then
UO.FindType(0x0F88,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F88,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Ginseng
##
If gseng <> 0 then
UO.FindType(0x0F85,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F85,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Garlik
##
If grlk <> 0 then
UO.FindType(0x0F84,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F84,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Sulforous Ash
##
If sash <> 0 then
UO.FindType(0x0F8C,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F8C,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Black Pearl
##
If bperl <> 0 then
UO.FindType(0x0F7A,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F7A,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Blood Moss
##
If blood <> 0 then
UO.FindType(0x0F7B,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F7B,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Spider Silk
##
If ssilk <> 0 then
UO.FindType(0x0F8D,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F8D,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Mandrake root
##
If mroot <> 0 then
UO.FindType(0x0F86,-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(0x0F86,'0x0000',sund)
wait(1000)
UO.Grab('500','finditem') ; поставь кол-во регов, которое можешь поднять.
wait(1000)
Endif
Endif
##Начинаем
##
if uo.mana >25 then
UO.exec("cast 'Poison' self") ##Что колдуем
wait(6000)
UO.exec("cast 'Fireball' self") ##Что колдуем
wait(6000)
UO.WaitTargetObject('Body')
UO.useskill("Anatomy")
wait(4000)
else
while UO.Mana<UO.Int
UO.Useskill("Meditation")
wait(3000)
wend
endif
wend
end sub
Жду критики...
