Yoko

Yoko wrote:1) пиши что угодно, просто запускай то что напишешь а не main
2) проверь
sub test()
lll:
uo.print("test")
wait(1000)
goto lll
end sub

спасибо...терь всё ок...понял

пишет line 7:Funktion not found-main
хотя 7 строки нету
и такое каждый раз если не напишешь main

такая проблема:
1)в скрипте в самом начале нужно писать обязательно sub main(),хотя у у всех можно писать sub tracking()...sub taming() и тд. у мя эрор выдаёт
2)выдаёт ошибку или вообще не реагирует на строки например start: или aaa: goto start или goto aaa...как бы команда goto не срабатывает ...

у нас на сервере чюток подругом...увас тамитьб надо стафом...а у нас скилом таминг
ну так гадо...щаз с типом 0x00e2 я могу тамить только серых лошадей....а хочеться коричневых и бежевых аиди я дал...я просто незнаю куда это правельно вписать

sub main()
var i,kolvo,tamed
DIM rats[8]
kolvo=8
for i = 1 to kolvo
uo.FindType(0x00e2,-1,1)
rats[i]=uo.GetSerial('finditem')
uo.Ignore('finditem','on')
next
uo.IgnoreReset()
uo.DeleteJournal()
RepeatLabel:
for i = 1 to kolvo
tamed=0
while (tamed<>1)
uo.DeleteJournal()
uo ...

подозреваю что твой шард один из тех которые сообщают клиенту что книга магии это ящик со скролами
в результате тот самый скролл который не продаётся и портит малину - в книге магии
проверь точно что выдаёт uo.count когда кроме книги в сумке ничего нет и скорректируй соотвественно проверку в ...

вот мой скрипт...чар летает покупает бланк скролы и реги...потом начинает делать парализы...потом их продаёт (и нас на сервере так можно).единстеная проблема в том что после того как он сделал скролы он начинает их продавать и эту продажу не остновить,даже когда он всё продал...и скрипт не может ...

спасибо...терь всё работает

#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef")
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Armor' 'Ringmail Armor' 'Ring Mail armor' 'ringmail gloves'")
Wait(7600);
if UO.Count("0x1bef") < 1 then
uo.exec("grab 10 ~0x1bef")
wait(500)
end if
wend
end sub ...

#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef")
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Armor' 'Ringmail Armor' 'Ring Mail armor' 'ringmail gloves'")
Wait(7800);
if UO.Count("0x1bef") < 6 then
Uo.Exec("waittargetground 0x1bef")
Uo.exec("grab 6")
wait(500 ...

#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef") # использовать инги айрона
# можно и любые другие если поменять серийник
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Ringmail Armor' 'ringmail gloves'")
Wait(7800); #
if UO.Count("0x13eb") > 1 then # UO.Waittargettype ...