Page 1 of 1

pliz help

Posted: 2005-01-29 00:07:10
by nik-kazancev
Привет всем.
Я давно ничего не писал на инже, даже маленького, и уже подзабыл. Поэтому прошу помощи.
Плиз дайте скрипт или ссылку на похожий.
В общем так. Чар берёт из сундука 1 900 логов, летит по рунке. Кладёт эти логи в сундук 2. Летит к суднуку 1 и так далее.
Пока логи не кончатся. Желательно чтобы сундуки заносилилсь через переменные.
Всякие проверки там не обязательны, сам буду у компа сидеть :), хотя было бы не плохо.
Спасибо.

Posted: 2005-01-30 12:45:15
by nik-kazancev
К сожалению, не мог писать на форсумах по-русски, поэтому не писал. Теперь как видите могу :)
В общем, вместе с Асканели накатали скриптик. Пока только бета версия :) без проверок и всё такое. Если кому не трудно помогите плиз.

Вот кодик:

Code: Select all

sub take()

;uo.useobject(key)
VAR BP = '0x1BDD', Sunduk = '0x4040B915', i
var Sunduk2 = '0x40401BFE'
i = UO.Count( BP )
if i < 1000 then
   UO.Findtype( BP, -1, Sunduk )
   UO.Grab( str( 1000 - i ), 'finditem' )
   wait(500)
endif
uo.Cast('Recall','0x4051BF8C')
wait(5000)
DropLogs()
wait(2000)
end sub   
   
sub RecallToLec()
var bankC = '0x4043F3CC'
uo.sayu("bank")
wait(1000)
open(bankC)   
uo.Cast('Recall','0x4051C08C')
end sub


Функция DropLogs() стандартная, из ламбера.

Спасибо. (Ну я сам тоже попоытаюсь конечно :))