Yoko

All sides of Injection
It is currently 2017-11-18 17:47:40

All times are UTC+02:00




Post new topic  Reply to topic  [ 8 posts ] 
Author Message
PostPosted: 2017-01-02 09:04:55 
Offline

Joined: 2017-01-02 08:56:20
Posts: 3
Привет Ребят...проблема ...заходит в шахту и стоит.хочет копать но не знает что)))
Sub tohome()
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
wait(100)
unloadore()#Выгружаемся
wait(100)
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
Go_To(0000000000)
wait(100)
end sub

Sub unloadore()
VAR TempX,TempY,i,Exit, Exit1, ConTainer, j
VAR Index=14
DIM Ore[4]
TempX=UO.GetX()
TempY=UO.GetY()
Ore[0]=0x19B9
Ore[1]=0x19B7
Ore[2]=0x19BA
Ore[3]=0x19B8
For i=0 to 3
Exit=0
repeat
UO.FindType(Ore[i])
if UO.GetQuantity('finditem')>0 then
Exit1=0
j=0
UO.MoveItem('finditem',0,"0x40063955")#ID сундука,куда складывать руду
wait(300)
Else
Exit=1
endif
until Exit==1
Next
end sub

sub main()
VAR i
while 1==1

Go_To(00000)
min()
Go_To(00000)
min()
Go_To(00000)
min()
Go_To(00000)
min()
Go_To(00000)
min()

Go_To(00000)
min()
Go_To(00000)
min()

wend
end sub

Sub min()
var x,y,z
VAR LastTimer
VAR ms1 = "There is nothing here to mine for."
VAR ms2 = "You can't use"
VAR ms3 = "Вы переместили"
VAR ms4 = "You loosen some rocks"
VAR ms5 = "location"
VAR ms6 = "Try mining"
VAR ms7 = "You can't see that"
VAR ms8 = "You stop"
VAR ms9 = "That is too"
VAR ms10= "Вы не смогли"
VAR ms11= "You cannot mine"
z=UO.GetZ("self")
for y=-2 to 2
for x=-2 to 2
UO.Print(str(x)+" "+str(y))
if uo.weight > 800 then #Вес при котором идем домой
tohome()
endif
repeat
uo.deletejournal()
UO.WaitTargetTile("1341",STR(UO.GetX()+x),STR(UO.GetY()+Y),str(z))
UO.UseType('0x0E85')
LastTimer=UO.Timer()
repeat
wait(50)
until UO.InJournal(ms1) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms7) OR UO.InJournal(ms9) OR UO.InJournal(ms10) OR UO.InJournal(ms11) OR UO.Timer()>LastTimer+100
if UO.InJournal(ms3) then
else
endif
until UO.InJournal(ms2) OR UO.InJournal(ms1) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR UO.InJournal(ms9) OR UO.InJournal(ms11)
next
next
end sub


Last edited by Emmka on 2017-01-19 21:19:14, edited 3 times in total.

Top
   
PostPosted: 2017-01-02 10:11:12 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2754
Location: Иваново
При добавлении скрипта копируй либо из блокнота либо переключай системный язык на русский - не будет кракозябр. Так же пользуйся тегами [code] [/сode].
Всего скорее не совпадают сообщения сервера с проверочными сообщениями журнала в функции Sub min(). Надо делать либо куски сообщения:
вместо VAR ms1 = "There is nothing here to mine for."
делать VAR ms1 = "re is nothing here to m"
Либо проверять все до знака препинания и регистра букв.

Или инструмент не совпадает с указанным.

Это из области экстрасенсорики. А так - ты не указал что пишет в журнале, какой шард, чем копаешь (тип инструмента)...

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"


Top
   
PostPosted: 2017-01-02 16:47:30 
Offline

Joined: 2017-01-02 08:56:20
Posts: 3
Спасибо Mirage....он пишет на чем вы хотите использовать кирку...или пишет слишком далеко....я добавил Слишком далеко в скрипт теперь стоит и нефига не делает


Top
   
PostPosted: 2017-01-02 20:31:09 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2754
Location: Иваново
Добавить:
Quote:
VAR ms11= "You cannot mine"
VAR ms12= "слишком далеко" ; <----

OR UO.InJournal(ms11) OR UO.InJournal(ms12) ;<--- а эту строку в обе проверки.

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"


Top
   
PostPosted: 2017-01-19 21:11:26 
Offline

Joined: 2017-01-02 08:56:20
Posts: 3
На чем вы хотите использовать кирку
Слишком далеко



вот что пишет


Top
   
PostPosted: 2017-01-19 22:30:58 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2754
Location: Иваново
VAR ms12= "лишком далеко" ; <----

"с" убери

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"


Top
   
PostPosted: 2017-01-20 09:36:59 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2143
Location: Latvia
на uorpg некоторые сообщения inj не видит. а видит cliloc# 0xFEA1B

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
PostPosted: 2017-01-20 21:07:54 
Offline

Joined: 2012-07-27 23:43:14
Posts: 215
Mirage-добрыйскриптер


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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