Yoko

All sides of Injection
It is currently 2025-11-02 14:54:32

All times are UTC+02:00




Post new topic  Reply to topic  [ 1 post ] 
Author Message
PostPosted: 2005-02-18 22:13:50 
Offline
User avatar

Joined: 2004-11-26 16:08:35
Posts: 10
Location: Одесса
В этом (как я понял) участке указана функция сброса и стекировки дерева из очень хорошего скрипта на ламбер.Должно сбрасыватся все дерево до солмура,простое же должно тоже сбрасыватся и стекироватся в кучку простого дерева,которое уже лежит на полу,вот тут у меня и возникает проблема - дерево находится,но не сбрасывается - пишет "Could not add item to stack", проблема возникает только у меня ,у человека у которого брал скрипт все работает нормально. У меня самая последняя версия инжекта,у хорошего человека постарее,Подозреваю,что трабл именно в этом,но не хочу устанавливать старую версию инжекта.Может чем поможите?


sub ReMoveLogs(per1,per2,per3)
var k
DIM ColorOfLogs[17]
ColorOfLogs[17]=0x0000 #simple- òÿãàåì çà ñîáîé
ColorOfLogs[16]=0x0362 #jade
ColorOfLogs[15]=0x010D #oak
ColorOfLogs[14]=0x0094 #karund
ColorOfLogs[13]=0x01B0 #lehram
ColorOfLogs[12]=0x01A2 #turmalit
ColorOfLogs[11]=0x0026 #emerint
ColorOfLogs[10]=0x00CB #legrand
ColorOfLogs[9]=0x094A #solmur
ColorOfLogs[8]=0x092B #kleor
ColorOfLogs[7]=0x0931 #lorgadum
ColorOfLogs[6]=0x093F #violonit
ColorOfLogs[5]=0x0074 #stardust
ColorOfLogs[4]=0x006F #pironil
ColorOfLogs[3]=0x09EF #mistyk
ColorOfLogs[2]=0x0119 #elvin
ColorOfLogs[1]=0x000B #elkris

for k=1 to 17
if k==17 then #|| k==7 || k==8
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" ground")
if uo.findcount() then
uo.exec("moveitem finditem all ground "+STR(per1)+" "+STR(per2)+" "+STR(per3))
wait(100)
endif
else
if per1<>UO.GetX() || per2<>UO.GetY() || per3<>UO.GetZ() then
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" my")
if uo.findcount() then
uo.exec("moveitem finditem all ground "+STR(per1)+" "+STR(per2)+" "+STR(per3))
wait(50)
endif
endif
endif
next
end sub
;----------------------------------------------------------------
sub DropLogs()
var Self_Pos,k
Self_Pos=STR(UO.GetX())+" "+STR(UO.GetY())+" "+STR(UO.GetZ())
DIM ColorOfLogs[17]
ColorOfLogs[1]=0x0000 #simple- òÿãàåì çà ñîáîé
ColorOfLogs[2]=0x0362 #jade
ColorOfLogs[3]=0x010D #oak
ColorOfLogs[4]=0x0094 #karund
ColorOfLogs[5]=0x01B0 #lehram
ColorOfLogs[6]=0x01A2 #turmalit
ColorOfLogs[7]=0x0026 #emerint- òÿãàåì çà ñîáîé
ColorOfLogs[8]=0x00CB #legrand- òÿãàåì çà ñîáîé
ColorOfLogs[9]=0x094A #solmur
ColorOfLogs[10]=0x092B #kleor
ColorOfLogs[11]=0x0931 #lorgadum
ColorOfLogs[12]=0x093F #violonit
ColorOfLogs[13]=0x0074 #stardust
ColorOfLogs[14]=0x006F #pironil
ColorOfLogs[15]=0x09EF #mistyk
ColorOfLogs[16]=0x0119 #elvin
ColorOfLogs[17]=0x000B #elkris

for k=1 to 8
if k==1 then #|| k==7 || k==8
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" ground")
if uo.findcount() then
uo.exec("addobject derevo1 finditem")
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" my")
uo.exec("moveitem finditem all derevo1 0 0 0")
wait(50)
else
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" my")
uo.exec("moveitem finditem all ground "+Self_Pos)
wait(50)
endif
else
uo.exec("findtype derevo "+str(ColorOfLogs[k])+" my")
if uo.findcount() then
uo.exec("moveitem finditem all ground "+Self_Pos)
wait(50)
endif
endif
next

end sub


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 1 post ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited