Yoko

All sides of Injection
It is currently 2024-03-29 08:43:48

All times are UTC+02:00




Post new topic  Reply to topic  [ 8 posts ] 
Author Message
PostPosted: 2013-10-15 19:08:41 
Offline

Joined: 2013-10-15 19:00:39
Posts: 3
Доброе времени суток.
Помогите пожалуйста доработать скрипт,у меня не получается сделать так что бы Чар ходил по кругу ( цыклично )
Тоесть что бы после 33 шагов вверх (Mineup,по скрипту) Он делал шаг Вправо и вниз, далее 33 шага Вниз (Minedown )
и шаг влево и вверх ) и обратно на mineup
Скрипт писал сам ( неделю назад попытался научиться скриптингу ) , но вот довести до полной автономии не могу (( заранее благодарен
Сам скрипт :
sub minedown()
VAR Kirka = '0x0E85'
VAR MaxVes = 5500
VAR TileNum = '-1'
VAR t, k
VAR MaxTime = 100
VAR ms1 = "There's no ore left there"
VAR ms2 = "You can't use"
VAR ms3 = "You put "
VAR ms4 = "You loosen some rocks"
VAR ms5 = "location"
VAR ms6 = "Try mining"
VAR ms7 = "I can't see that"
VAR ms8 = "You can't mine or dig anything there"


While NOT UO.Life > 0
wend
k = 0
repeat
UO.DeleteJournal()
t = UO.Timer()
k = k - 1
wait(2000)
uo.waittargetself()
uo.UseType('0x0E85')
repeat
wait(500)
until UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR ((t + MaxTime) < UO.Timer())
If UO.InJournal(ms1)OR UO.InJournal(ms8) OR UO.InJournal(ms7) then
VAR i
uo.print("Èäåì âíèç")
for i=1 to 1
UO.Print( ' Øàã Âíèç ' + str( i ))
godown()
else
minedown()
Endif
endsub

sub godown()
uo.press(34)
wait(500)
minedown()
endsub





sub mineup()
VAR Kirka = '0x0E85'
VAR MaxVes = 5500
VAR TileNum = '-1'
VAR t, k
VAR MaxTime = 100
VAR ms1 = "There's no ore left there"
VAR ms2 = "You can't use"
VAR ms3 = "You put "
VAR ms4 = "You loosen some rocks"
VAR ms5 = "location"
VAR ms6 = "Try mining"
VAR ms7 = "You can't see that"
VAR ms8 = "You can't mine or dig anything there"


While NOT UO.Life > 0
wend
k = 0
repeat
UO.DeleteJournal()
t = UO.Timer()
k = k - 1
wait(2000)
uo.waittargetself()
uo.UseType('0x0E85')
repeat
wait(500)
until UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR ((t + MaxTime) < UO.Timer())
If UO.InJournal(ms1)OR UO.InJournal(ms8)then
VAR i
uo.print("Èäåì ââåðõ")
for i=1 to 1
UO.Print( ' Øàã ââåðõ ' + str( i ))
goup()
else
mineup()
Endif
endsub

sub goup()
uo.press(36)
wait(500)
mineup()
endsub


Top
   
PostPosted: 2013-10-15 19:54:32 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
выкинул бы ты ЭТО и поискал нормальный скрипт. Тут новый проще написать чем ошибки исправлять.
Пользуйся второй строкой моей подписи для устранения ошибок в циклах.


PS что за привычка как только начать изучать язык писать либо добывающих ботов либо охотников? Начните с лута, лоров и крафтов.

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
PostPosted: 2013-10-15 20:45:11 
Offline
User avatar

Joined: 2013-05-28 13:13:02
Posts: 149
Особенно мне нравится вот это цикл :D
Code:
While NOT UO.Life > 0 
wend

_________________
Русский Сервер Ultima Online High Seas Adventures
Legendary


Top
   
PostPosted: 2013-10-16 18:18:12 
Offline

Joined: 2013-10-15 19:00:39
Posts: 3
Mirage wrote:
выкинул бы ты ЭТО и поискал нормальный скрипт. Тут новый проще написать чем ошибки исправлять.
Пользуйся второй строкой моей подписи для устранения ошибок в циклах.

я Не просил оценивать или исправлять Мой скрипт,попросил указать где написать цикл в 33 раза для перехода на другую часть скрипта

Mirage wrote:
PS что за привычка как только начать изучать язык писать либо добывающих ботов либо охотников? Начните с лута, лоров и крафтов.


Если у меня появилась нужда в скрипте и я не нашел то что искал,то мне проще попытаться самому,а не кляньчить
Мой скрипт работает Именно так как Мне надо(за исключением того о чем я сдесь написал )
,и мне По барабану сколько там Ошибок и т.д. !


Top
   
PostPosted: 2013-10-16 18:22:42 
Offline

Joined: 2013-10-15 19:00:39
Posts: 3
RL_ka wrote:
Особенно мне нравится вот это цикл :D

Друг тебе может нравится все что угодно.
Но перед тем как смеяться над чем либо,научись Проявлять уважение к людям и их работам,даже если они не такие как тебе хотелось бы
Не удивлюсь если ты только и умеешь , что писать подобные не заурядные сообщения


Top
   
PostPosted: 2013-10-16 18:28:57 
Offline
User avatar

Joined: 2013-05-28 13:13:02
Posts: 149
Ms_Metos wrote:
RL_ka wrote:
Особенно мне нравится вот это цикл :D

Друг тебе может нравится все что угодно.
Но перед тем как смеяться над чем либо,научись Проявлять уважение к людям и их работам,даже если они не такие как тебе хотелось бы
Не удивлюсь если ты только и умеешь , что писать подобные не заурядные сообщения


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

Просто перебирать сотни строк сплошного непонятного текста нет абсолютно никакого желания ни у кого. Сделай как полагается, и ты найдёшь все ответы на свои вопросы:)

зы. Да, я совсем не умею писать скрипты и захожу на форум просто чтобы оскорблять людей.

_________________
Русский Сервер Ultima Online High Seas Adventures
Legendary


Top
   
PostPosted: 2013-10-16 18:37:57 
Offline
User avatar

Joined: 2013-05-28 13:13:02
Posts: 149
Чтобы оформление сохранялось в сообщении на форуме нужно выделять твой код и нажимать на Code например...

_________________
Русский Сервер Ultima Online High Seas Adventures
Legendary


Top
   
PostPosted: 2013-10-16 19:32:35 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
Да без базара, я помогу.

Ставишь, в общем for вар переменная = 1 to сколько тебе надо после суб и туче перед концом скрипта. И все. Будет тебе крутить по 33 раза твое мего творение. 8)

PS Вот ответ достойный стилистике вопроса.

PPS А тебя я запомню. Очень мне тебе понравилось помогать ;)

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


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 16 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:  
cron
Powered by phpBB® Forum Software © phpBB Limited