Yoko

тут оч и оч ошибаешься )))

а ты попробуй и узнаешь)))))

а при чём тут ФВ ????
если не наешь на ФВ нет расс !!!

всем спасибо что никто не откликнулся ((((
вообщем решил проблему сам вот таким образом:

sub asd()
var eda = '0x097B'
var palka ='0x0DF0'
var f
var h
dim llama[6]
llama[0]='0x00101183' #SA
llama[1]='0x000D027E'
llama[2]='0x0008E352'
llama[3]='0x000D2E43'
llama[4]='0x000B6E68'
llama[5 ...

вот он скрипт :
sub taming()
var eda = '0x097B'
var palka ='0x0DF0'
var f
var h
DIM reg[10]
reg[0]=0x000820FA #SA
reg[1]=0x000F60FD
reg[2]=0x0003416E
reg[3]=0x0002E623
reg[4]=0x000F56B7
reg[5]=0x0002CE84
reg[6]=0x00105467
reg[7]=0x0002FD0B
reg[8]=0x00064D1A
reg[9]=0x000E87E8
DIM llama[5 ...

это смотря для кого))))

есть вот такой вот скрипт :
sub main()
VAR Sunduk = "0x4009E91A"
VAR bytil = "0x0F0E"
VAR reg = "0x0F85"
VAR pestik = "0x0E9B"
VAR lesepoison = "0x0F0C"
var LastTimer
UO.Set('norbcalc',1)
UO.Set('norbcheck',1)


While TRUE
LastTimer=uo.Timer()

If UO.Count( reg ) < 4 Then
UO ...

sub inscriptlight()
var f
DIM reg[4]
reg[0]=0x0F8C #SA
reg[1]=0x0F7A #bp
reg[2]=0x0F86 # mr
reg[3]=0x0E34 #бланки




UO.Print("Pokaji sunduk s regami!")
UO.AddObject('qwe')
While UO.Targeting()
wait(200)
Wend
UO.UseObject('qwe')

While TRUE

for f=0 to 3
if uo.Count(reg[f]) < 1 ...

народ у мя подозрения что вылетает когда по какой то причине действие (т.е. нажатие на кнопочки в гампе ) не завершено а подвисает ((
можно ли сделать какую нить проверочку на время если текста нет то он юзает пестик а потом появившийся гамп просто правым кликом убирает ????

Jekaaa wrote:Неужели не у кого нет... Или все заходят на форум тока за скриптами, а человеку помочь времени нет =(

сегодня поставили новую защиту так что ещё не скоро )))

Ну так попробуй, мож не будет вылетать

всё равно вылетает чтоб ему пусто было (((

Millerbeer wrote:Я так подозреваю, вылетает после World Save? А через waitmenu крафт не сделать?

нет ((( тока так либо через клики

ой млин вствь в скрипт всё вот ето вот
sub bandself() ; Хил с бинтов и одевание вепа со щитом
var band = "0x0e21" ; Тип бинтов
if uo.waiting() then
uo.canceltarget()
endif
if (uo.life<uo.str) and (uo.count(band)>0) then
uo.waittargetself()
uo.usetype(band)
MesReact()
uo.print(str(uo.count ...

sub main()
VAR Sunduk = "0x400E0DD2"
VAR bytil = "0x0F0E"
VAR reg = "0x0F88"
VAR pestik = "0x0E9B"
VAR lesepoison = "0x0F0A"
VAR k

UO.Set('norbcalc',1)
UO.Set('norbcheck',1)


While TRUE
If UO.Count( reg ) < 0 Then
UO.FindType( reg, '-1', Sunduk )
If UO.FindCount() == 0 Then
UO ...

правда тебе понадобится вот такой вот скриптик :
sub MesReact()
var lasttime=uo.timer(),react=0
var Msg1="You can't reach that."
var Msg2='current state'
uo.deletejournal()
repeat
wait(10)
if uo.timer()==lasttime+5 then
react=1
endif
until not uo.waiting() or react==1 or uo.injournal(Msg1 ...

в обжекте в поле найм пишешь sh далее жмёшь нью ,затем выделяешь sh жмешь кнопку фром таргет прицелом ловишь щит)))) то же самое проделываешь с wep )) и будет тебе счачтье

sub bandself() ; Хил с бинтов и одевание вепа со щитом
var band = "0x0e21" ; Тип бинтов
if uo.waiting() then
uo.canceltarget()
endif
if (uo.life<uo.str) and (uo.count(band)>0) then
uo.waittargetself()
uo.usetype(band)
MesReact()
uo.print(str(uo.count(band)-1)+" Бинтов")
else
if uo.life ...

проблема актуальна до сих пор ((((
то что сказали исправил правда ошибку до сих пор вышибаеть (((

GAUHAR wrote:Честное слово экспериментов провел тьму, но

Code: Select all

UO.OnGump()

мне не удалось укратить, только клики (но это же не наш стиль, хотя меня это вполне удовлетворило).

что бы своять то что своял ,а прежде всего понять как ето делается (потому не учился я на програмирование)убил наверное часов 20 )))

Вот ещё один загадочный кусок if UO.Count( lesepoison ) > 10 then
uo.useobject('0x400B14EC')
UO.WaitTargetType( lesepoison )
wait( 500 )
while UO.Count( lesepoison ) > 10
wait(100)
wend
wait(100)
endif

тут, значится, если пойзонок станет больше 10, использовать какой-то предмет ...