Sub tim1()
VAR AnimalCount=0,i=0,name=0,name2=0
Var MoveDelay=1000
Var MoveNumber=1
Var Ep=3
var Stoplocation
uo.set("finddistance","3")
uo.ignorereset()
uo.exec('resend')
wait(200)
Uo.Exec("addtype Animals")
while Uo.Targeting()
wait(100)
wend
uo.findtype("Animals","-1","ground")
name=uo.getname("finditem")
;
dim Animals[100]
while not uo.dead()
AnimalCount=0
for i=0 to 999
wait(10)
uo.findtype("0",'-1',"ground")
if uo.findcount()>0 then
if uo.getname("finditem")==name and uo.getname("finditem") <> 0 then
Animals[AnimalCount]=uo.getserial("finditem")
AnimalCount=AnimalCount+1
uo.ignore("finditem")
uo.print("OK!"+" "+Animals[AnimalCount-1])
else
uo.ignore("finditem")
wait(10)
end if
else
i=999
uo.print("Complete at = "+str(AnimalCount))
end if
next
uo.print("Search complete!! at "+str(AnimalCount)+" was found!!")
UO.print("Reset ignored items...")
uo.ignorereset()
wait(1000)
;
for i=0 to AnimalCount-1
uo.addobject("Animal",Animals[i])
repeat
uo.Useskill("Peacemaking","Animal")
wait(11000)
until uo.injournal('cliloc# 0x03BC')or uo.injournal('cliloc# 0x03B7')
taming()
release()
next
wait(200)
wend
end sub
как добавить вот то, что я написал ниже(писал сам если, что то не так поправьте пожалуйсто):
DIM Animals[5]
Animals[0]="0x000"--- тут я вставлю типы разных животных.
Animals[1]="0x000"
Animals[2]="0x000"
Animals[3]="0x000"
Animals[4]="0x000"
for i=0 to 4
и что нужно убрать из выше написанного?
заранее спасики:)
Sub tim1()
VAR AnimalCount=0,i=0,name=0,name2=0
Var MoveDelay=1000
Var MoveNumber=1
Var Ep=3
var Stoplocation
uo.set("finddistance","3")
uo.ignorereset()
uo.exec('resend')
wait(200)
;
DIM Animals[5]
Animals[0]="0x000"
Animals[1]="0x000"
Animals[2]="0x000"
Animals[3]="0x000"
Animals[4]="0x000"
while not uo.dead()
AnimalCount=0
for i=0 to 4
wait(10)
uo.findtype("Animals[i]","-1","ground")
name=uo.getname("finditem")
if uo.findcount()>0 then
if uo.getname("finditem")==name and uo.getname("finditem") <> 0 then
Animals[AnimalCount]=uo.getserial("finditem")
AnimalCount=AnimalCount+1
uo.ignore("finditem")
uo.print("OK!"+" "+Animals[AnimalCount-1])
else
uo.ignore("finditem")
wait(10)
end if
else
i=4
uo.print("Complete at = "+str(AnimalCount))
end if
next
uo.print("Search complete!! at "+str(AnimalCount)+" was found!!")
UO.print("Reset ignored items...")
uo.ignorereset()
wait(1000)
;
for i=0 to 4
uo.addobject("Animal",Animals[i])
repeat
uo.Useskill("Peacemaking","Animal")
wait(11000)
until uo.injournal('cliloc# 0x03BC')or uo.injournal('cliloc# 0x03B7')
taming()
release()
next
wait(200)
wend
Вот я подправил, это норм?
Last edited by Toolmate on 2006-04-17 10:56:41, edited 1 time in total.
Ну елки палки одни и теже ошибки 10 раз подряд... в уроках все описано и описано...
Почитай про смысл символа "...
и потом что значит нормально??? оно же не рабоатет... как это может быть нормально???
Grin wrote:Естествено;)
Вот ТЫ Эдред в чем чайник?;)
в хтмл, джаве, перле... Хотя насчет последнего, тут полез посмотреть синтаксис, в общем, халява. Легкий язык. Нескольких часов чтения будет достаточно. Вопрос только в одном, надо ли?
перл не сложен в понимании просто там есть пару об стракций... там гола в другом нужна... там есть понтие как контексты...есть регулярные выражения, есть еще куча всего... жто просто интересно и это надо;)