Ньюби Таун Вопросы и помощь новым игрокам Шарда Forgotten World.
Запрещен Мат и Оскoрбления игроков, обсуждение действий Стаффа, флуд. Наказание -БАН |
|
снова старое или Mining 4ever |
|
16.12.2005, 21:43
|
#1
|
Гость
|
снова старое или Mining 4ever
я играю недавно и хотел бы узнать 1 из скриптов на мининг , а именно тот , в котором надо на ф1 забиндить ластобджект , вейтфотаргет, ласттаргет ...
такой скрипт сдесь уже однажды был выложен, но я к сожалению неуспел его скачать...=(
может мне кто-нибудь поможет - кинет тот скрипт или опубликует свой
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:00
|
#2
|
Гость
|
Re: снова старое или Mining 4ever
чё то не понятно что именно те нада?
все возможные бинды?или именно тот который ты попросил?
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:05
|
#3
|
Wizard of words
Регистрация: 07.12.2005
Возраст: 36
Сообщений: 1,871
Репутация: 45 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
он просит настроить и выложеть ему такой макр чтобы на ф1 в етом макре была забиндино ласт обжект вейт фо тар ласт таргет во юморист =)
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:21
|
#4
|
Гость
|
Re: снова старое или Mining 4ever
нет я прошу выложить скрипт , для работы которого необходимо было биндить на ф1 ластобджект вейтфотаргет и ласттаргет
этот скрипт уже ранее выкладывался ==> у кого то он есть
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:23
|
#5
|
Гость
|
Re: снова старое или Mining 4ever
ну у меня есть токо не на ф1 а на ф11 чар идет роет всё вокруг себя но нету реколов разгрузки и тд, я хз как на пилоте разгрузку прописать....
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:39
|
#6
|
Wizard of words
Регистрация: 07.12.2005
Возраст: 36
Сообщений: 1,871
Репутация: 45 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
напишу разгрузку дешева -) да и рекол =)
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:40
|
#7
|
Гость
|
Re: снова старое или Mining 4ever
да всёравно на реколы ...
мне пох как на самом деле , лишь бы на скрипте ....=)
скинь его сюда плизз
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 22:52
|
#8
|
Гость
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от bezumec[cafemax]
напишу разгрузку дешева -) да и рекол =)
|
безумец пример разгрузки в пм закинь , обижен наградой не будешь, фулл сильвер дам-)
ЗЫ: скрипт ушел Гансте в пм
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 23:02
|
#9
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
РАБОТОСПОСОБНОСТЬ ЭТИХ СКРИПТОВ НЕ ГАРАНТИРУЮ
#######################################
#####Mining by Babka#####
#######################################
Код:
if lastmsg you see
alarm
alarm
alarm
alarm
wait 1500
end_if
if lastmsg you have been
send F7 // use skill stealth
wait 1500
end_if
send f1 //LastObject, WaitForTarget, TargetSelf
wait 2000
set #r random 4
//Проверка наличия руды
if lastmsg there is no ore
if #r = 0
send up 500
send up 500
end_if
if #r = 1
send right 500
send right 500
end_if
if #r = 2
send down 500
send down 500
end_if
if #r = 3
send left 500
send left 500
end_if
end_if
if lastmsg you see
alarm
alarm
alarm
alarm
wait 1500
end_if
wait 8000
if #r = 1
send right 500
send right 500
end_if
if #r = 2
send down 500
send down 500
end_if
if #r = 3
send left 500
send left 500
end_if
end_if
if lastmsg you have been
send f7 // use skill stealth
wait 1500
end_if
//Не допускать выход из шахты
if charposy > 828
send right 500
send right 500
send right 500
send right 500
send right 500
send right 500
send right 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send up 500
send left 500
send left 500
send left 500
send left 500
send left 500
end_if
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 23:05
|
#10
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by *ХЗ КТО*#####
#####Описание: копает вокруг себя , идёт в низ.
f2 - идти вниз.
f8 - Ласт обджект
f11 - Ласт обджект , вайт фор таргет , ласт таргет.
#######################################
Код:
:start
//????????????? ???????
set $not there is
set $try try mining in rock
set $can't you can't see
set $noline you have no
set $put you put the
set $loos you loosen
//????????????? ????????? ????????
set #x charposx
set #y charposy
set #x #x - 2
set #y #y + 2
//???????? ?????
for #ii 1 5 1
for #i 1 5 1
set lasttargetx #x
set lasttargety #y
:re
send f11
waitfortarget 10000
set timer
while_not lastmsg = $not or lastmsg = $try or lastmsg = $can't or lastmsg = $noline
if lastmsg = $put or lastmsg = $loos
gosub re
end_if
if timer > 8000
gosub re
end_if
end_while
set #x #x
set #y #y - 1
set timer
end_for
set #x #x + 1
set #y #y + 5
set timer
end_for
set #i 0
set #ii 0
set #x 0
set #y 0
wait 1000
send f2
wait 1000
send f2
wait 1000
send f2
wait 1000
send f2
wait 1000
send f2
wait 1000
send f8
wait 1000
left 402, 304
wait 8000
goto start
|
|
|
|
Re: снова старое или Mining 4ever |
|
16.12.2005, 23:09
|
#11
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by Sweet#####
Описание: Ещё один скрипт на мининг. Простой, но очень-очень действенный и быстрый.
#######################################
Код:
repeat 5
repeat 5
repeat 1000
send W 3000 \\ Last Object\wait for Target\Target Self
if lastmsg there is no
break
else
wait 7000
end_if
end_repeat
send Left 100
end_repeat
send down 100
send down 100
send right 100
send right 100
repeat 5
repeat 1000
send w 3000
if lastmsg there is no ore
break
else
wait 7000
end_if
end_repeat
send right 100
end_repeat
send down 100
send down 100
send left 100
send left 100
end_repeat
send up 100
repeat 10
send up 100
end_repeat
send left 100
P.S. Аффтар, юзай EasyUO
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 11:49
|
#12
|
Гость
|
Re: снова старое или Mining 4ever
попробовал скрипты - не то , но есть действенные ....=)
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 12:58
|
#14
|
Гость
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от gansta
я играю недавно и хотел бы узнать 1 из скриптов на мининг , а именно тот , в котором надо на ф1 забиндить ластобджект , вейтфотаргет, ласттаргет ...
такой скрипт сдесь уже однажды был выложен, но я к сожалению неуспел его скачать...=(
может мне кто-нибудь поможет - кинет тот скрипт или опубликует свой
|
хы блин, недавно играет, а уже скрипты на мининг подавай =))))
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:11
|
#15
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by Gevorg#####
#####Описание: Скрипт на майнинг
Работает следующим образом:
биндим на F5 - lastobject waitfortarget targetself
один раз копаем и запускаем скрипт
P.S. извращенный скрипт, но все же работает =)
#######################################
Код:
set #max 100 // максимальное кол-во копок в одном месте
// надо на случай если последнее сообщение не срабатывает
set #dlin 15 // максимальное число шагов в одном направлении
set #ves 400 // ограничим свой вес этим (примерно)
set #napr 0 // направление: 0 - влево, 1 - вправо
:main
set #i 1 // счетчик для сравнения с макс длиной
while #i <> #dlin
set #xx charposx // текущие координаты чара
set #yy charposy
gosub kopaem
if #xx = charposx and #yy = charposy
// положение чара при движении не изменилось!
gosub dopshag
break
end_if
if wght > #ves
goto fin // пора заканчивать!
end_if
end_while
if #napr = 0
set #napr 1
else
set #napr 0
end_if
goto main
:fin
alarm
msg FULL!
end_script
:kopaem // копать в одном месте
repeat #max
send F5 7s // lastobject waitfortarget lasttarget
set $te There is no ore here to mine.
if lastmsg = $te //There is no ore here to mine.
break
end_if
if lastmsg try mining in rock
gosub idem_vert
break
end_if
end_repeat
gosub idem_hor
return
:idem_vert // обходим препятствие
if #napr = 0
send Down
send Down
wait 1000
else
send Up
send Up
wait 1000
end_if
return
:idem_hor // сдвигаемся влево (вправо)
set #xx charposx // текущие координаты чара
set #yy charposy
if (#xx = 2558 and #yy = 489 ) or (#xx = 2559 and #yy = 488 ) or (#xx = 2560 and #yy = 487 ) or (#xx = 2562 and #yy = 485 ) or (#xx = 2563 and #yy = 482 )
send Down
send Down
end_if
if #napr = 0
if chardir = 5
send Left
else
send Left
send Left
end_if
set #a random 4
If #a = 1
send PageUp
send PageUp
end_if
If #a = 2
send PageDown
send PageDown
end_if
wait 800
else
if chardir = 1
send Right
else
send Right
send Right
end_if
set #a random 4
If #a = 1
send PageUp
send PageUp
end_if
If #a = 2
send PageDown
send PageDown
end_if
wait 1000
end_if
return
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:29
|
#17
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от NeeDle
a mozhet vsiotaki uzhe dastatachna ?
|
НЕТ
#######################################
#####Mining by Edred#####
#####Описание: Вот мой макрос на мининг для ньюба (на шарде, где я играю, есть ньюб шахта, там этот макрос очень хорошо работает)
Плюс этого макроса - он не привязывается ни к каким координатам, его можно просто вставлять в пилот и запускать:
// Биндим на F11 - LastObject - WaitForTarget - TargetSelf
// Перед запуском макроса один раз бьем киркой
// в любое место вручную
// 1) чар будет копать на месте пока не кончится руда
// (сообщение 'there is no ore here to mine' или #max
// копок),
// потом сдвигается влево (вправо - если идет обратно)
// 2) если уперся в скалу (сообщение 'try mining in rock')
// чар делает шаг вниз (вверх)
// 3) если при последнем перемещении координаты чара не изменились,
// значит уперлись в стену - чар разворачивается и идет обратно (копая)
// 4) если пак полный - чар останавливается,
// макрос выдает alarm и сообщение, что чар полный
#######################################
Код:
set #max 10 // максимальное кол-во копок в одном месте
// надо на случай если последнее сообщение не срабатывает
set #dlin 15 // максимальное число шагов в одном направлении
set #ves 200 // ограничим свой вес этим (примерно)
set #dop 0 // сделайте больше 0 для второго чара (чтобы не топтались
// по одному маршруту
set #napr 0 // направление: 0 - влево, 1 - вправо
:main
set #i 1 // счетчик для сравнения с макс длиной
while #i <> #dlin
set #xx charposx // текущие координаты чара
set #yy charposy
gosub kopaem
if #xx = charposx and #yy = charposy
// положение чара при движении не изменилось!
gosub dopshag
break
end_if
if wght > #ves
goto fin // пора заканчивать!
end_if
end_while
if #napr = 0
set #napr 1
else
set #napr 0
end_if
goto main
:fin
alarm
msg FULL!
end_script
:kopaem // копать в одном месте
repeat #max
send F11 7000
if lastmsg there is no ore here to mine
break
end_if
if lastmsg try mining in rock
gosub idem_vert
break
end_if
end_repeat
gosub idem_hor
return
:idem_vert // обходим препятствие
if #napr = 0
send Down
send Down
wait 1000
else
send Up
send Up
wait 1000
end_if
return
:idem_hor // сдвигаемся влево (вправо)
if #napr = 0
if chardir = 5
send Left
else
send Left
send Left
end_if
wait 1000
else
if chardir = 1
send Right
else
send Right
send Right
end_if
wait 1000
end_if
return
:dopshag // дополнительные шаги для второго чара
// чтобы их маршруты не совпадали
if #dop > 0
repeat #dop
if #napr = 0
send Up 500
else
send Down 500
end_if
end_repeat
end_if
return
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:30
|
#18
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by ZAJ#####
#####Описание: Мининг Копает до перегруза а потом пищит(Ф1 ласт оббкт/Ф11 Шаг в стороу ВЕСТ):
#######################################
Код:
:nachalo
repeat 9999
send f1
wait 300
left 344, 200
wait 4000
if wght > 450
alarm
alarm
alarm
end_if
if lastmsg There is no ore here to mine
goto drugoi
end_if
end_repeat
:drugoi
repeat 9999
send f1
wait 300
left 288, 221
wait 4000
if wght > 450
alarm
alarm
alarm
end_if
if lastmsg There is no ore here to mine
goto tretij
end_if
end_repeat
:tretij
repeat 9999
send f1
wait 300
left 284, 249
wait 4000
if wght > 450
alarm
alarm
alarm
end_if
if lastmsg There is no ore here to mine
send F11
send F11
goto nachalo
end_if
end_repeat
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:33
|
#19
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by MuH3gpaB#####
#####Описание: стабильный скрипт.
- f11 соответственно макрос ультимы ласт обжект- вейтфортаргет-ласттаргет
- пользовать надо так: встаешь на площадку которую будешь обкапывать (5*5 ты в центре) один раз копаешь сам (два клика на инструмент один раз на пол) и после этого пускаешь скрипт.
- этим скриптом аффтар прокачал мининг с 23% до 56% за 1.5 часа =)
- задержу между строк ставил 0мс
- не зависит от разрешения экрана
- можно копать полиморфнутым
- если кто то стоит в вашем квадрате 5*5 вам это не мешает
#######################################
Код:
//предустановка условий
set $not there is
set $try try mining in rock
set $can't you can't see
set $noline you have no
set $put you put the
set $loos you loosen
//предустановка координат ластцели
set #x charposx
set #y charposy
set #x #x - 2
set #y #y + 2
//основная часть
for #ii 1 5 1
for #i 1 5 1
set lasttargetx #x
set lasttargety #y
:re
send f11
waitfortarget 10000
set timer
while_not lastmsg = $not or lastmsg = $try or lastmsg = $can't or lastmsg = $noline
if lastmsg = $put or lastmsg = $loos
gosub re
end_if
if timer > 8000
gosub re
end_if
end_while
set #x #x
set #y #y - 1
set timer
end_for
set #x #x + 1
set #y #y + 5
set timer
end_for
alarm
end_script
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:34
|
#20
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by Targitay#####
#####Описание: мининг Ф8 - ласт обжект, Ф7 - ласт лбжект ласт таргет
копает внизу 27 тайлов примерно 5х4 и копки посередине тайлов
#######################################
Код:
set #dx 0
set #dy 0
set $n no ore
set $f fail
set $pk pack
set $e error
set $st starving
set $d damage
set $dt destroyed
set $ys you see:
for #dy 0 88 44
for #dx 0 176 44
set #x 312
set #y 298
set #x #x + #dx
set #y #y + #dy
send F8
waitfortarget
wait 1000
:a
left #x #y
while lastmsg <> $pk
wait 1000
if lastmsg = $dt
double_left 877, 433
goto a
end_if
if lastmsg = $ys
goto hana
end_if
if lastmsg = $n
goto fuck
end_if
if lastmsg = $f or lastmsg = $e or lastmsg = $st or lastmsg = $d
goto dig
end_if
end_while
:dig
while lastmsg <> $n
send F7 1000
while lastmsg <> $pk
wait 1000
if lastmsg = $dt
double_left 877, 433
goto a
end_if
if lastmsg = $n
goto fuck
end_if
if wght > 1000 or lastmsg = $ys
goto hana
end_if
if lastmsg = $f or lastmsg = $e or lastmsg = $st or lastmsg = $d
goto dig
end_if
end_while
end_while
:fuck
end_for
end_for
for #dy 0 88 44
for #dx 0 132 44
set #x 334
set #y 320
set #x #x + #dx
set #y #y + #dy
send F8
waitfortarget
wait 1000
:b
left #x #y
while lastmsg <> $pk
wait 1000
if lastmsg = $dt
double_left 877, 433
goto b
end_if
if lastmsg = $ys
goto hana
end_if
if lastmsg = $n
goto fuck1
end_if
if lastmsg = $f or lastmsg = $e or lastmsg = $st or lastmsg = $d
goto dig
end_if
end_while
:dig
while lastmsg <> $n
send F7 1000
while lastmsg <> $pk
wait 1000
if lastmsg = $dt
double_left 877, 433
goto b
end_if
if lastmsg = $n
goto fuck
end_if
if wght > 1000 or lastmsg = $ys
goto hana
end_if
if lastmsg = $f or lastmsg = $e or lastmsg = $st or lastmsg = $d
goto dig
end_if
end_while
end_while
:fuck1
end_for
end_for
:hana
end_script
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:37
|
#21
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
#######################################
#####Mining by WK :rolleyes:#####
#####Описание: На F1 LastObject обкапывает вокруг себя 25 клеток.
#######################################
Код:
set #Msg 99
set #x 232
set #y 235
for #ii 1 5 1
for #i 1 5 1
while #Msg <> 0
send f1
waitfortarget 10000
left #x #y
gosub CheckMsg
end_while
set #x #x + 23
set #y #y - 23
set #Msg 99
end_for
set #y #y + 138
set #x #x - 92
end_for
:stop
alarm
end_script
//========================= SubRoutines ==========================
:CheckMsg
Repeat 10
set #Msg 99
//if lastmsg you see
//goto stop
//end_if
if lastmsg you put
set #Msg 1
break
end_if
if lastmsg your skill
set #Msg 2
break
end_if
if lastmsg you loosen
set #Msg 3
wait 1000
break
end_if
if lastmsg world
wait 6000
break
end_if
if lastmsg there
set #Msg 0
break
end_if
if lastmsg try
set #Msg 0
break
end_if
End_Repeat
return
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 13:52
|
#22
|
The Hero
Регистрация: 06.12.2005
Возраст: 37
Сообщений: 856
Репутация: 1 имеет нулевую репутацию
|
Re: снова старое или Mining 4ever
сразу видно человек с Абсоса -)
__________________
жадный ублюдок
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 14:04
|
#23
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от krAn [ZTU]
сразу видно человек с Абсоса -)
|
На Абсосе я юзал другую прогу (не инжу и не изи). Но это уже совсем другая история... (с) :rolleyes:
P.S. krAn [ZTU], ещё давно хотел поставить аватару как у тебя, но
писалось что весит она слишком много :eek:
P.P.S. gansta, если ещё какие-нить скрипты нужны, пиши - поможем :cool:
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 14:09
|
#24
|
Гость
|
Re: снова старое или Mining 4ever
не не пусть выкладывают)нормалёк,но я бы даже предложил сделать это на главном форуме чтоб там все выкладывали кто хочет скрипты и тд всё на обсуждение
пусть папки делятсся своим опытом с новенькими,нада ж как то передавать знания..
да вот ещё не подскажете на чём лучше карпу качать и примерно скок логов уйдёт до гма?
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 17:41
|
#25
|
Гость
|
Re: снова старое или Mining 4ever
хех
я незнаю почему очевидно у меня руки кривые но я ничё не понял =)))
а можно с пояснениями?
|
|
|
|
Re: снова старое или Mining 4ever |
|
17.12.2005, 23:33
|
#26
|
Newbie
Регистрация: 10.12.2005
Сообщений: 45
Репутация: 41 имеет хорошую репутацию (от 26 до 75)
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от gansta
хех
я незнаю почему очевидно у меня руки кривые но я ничё не понял =)))
а можно с пояснениями?
|
Например вот скрипт
Код:
set #max 100 // максимальное кол-во копок в одном месте
// надо на случай если последнее сообщение не срабатывает
set #dlin 15 // максимальное число шагов в одном направлении
set #ves 400 // ограничим свой вес этим (примерно)
set #napr 0 // направление: 0 - влево, 1 - вправо
:main
set #i 1 // счетчик для сравнения с макс длиной
while #i <> #dlin
set #xx charposx // текущие координаты чара
set #yy charposy
gosub kopaem
if #xx = charposx and #yy = charposy
// положение чара при движении не изменилось!
gosub dopshag
break
end_if
if wght > #ves
goto fin // пора заканчивать!
end_if
end_while
if #napr = 0
set #napr 1
else
set #napr 0
end_if
goto main
:fin
alarm
msg FULL!
end_script
:kopaem // копать в одном месте
repeat #max
send F5 7s // lastobject waitfortarget lasttarget
set $te There is no ore here to mine.
if lastmsg = $te //There is no ore here to mine.
break
end_if
if lastmsg try mining in rock
gosub idem_vert
break
end_if
end_repeat
gosub idem_hor
return
:idem_vert // обходим препятствие
if #napr = 0
send Down
send Down
wait 1000
else
send Up
send Up
wait 1000
end_if
return
:idem_hor // сдвигаемся влево (вправо)
set #xx charposx // текущие координаты чара
set #yy charposy
if (#xx = 2558 and #yy = 489 ) or (#xx = 2559 and #yy = 488 ) or (#xx = 2560 and #yy = 487 ) or (#xx = 2562 and #yy = 485 ) or (#xx = 2563 and #yy = 482 )
send Down
send Down
end_if
if #napr = 0
if chardir = 5
send Left
else
send Left
send Left
end_if
set #a random 4
If #a = 1
send PageUp
send PageUp
end_if
If #a = 2
send PageDown
send PageDown
end_if
wait 800
else
if chardir = 1
send Right
else
send Right
send Right
end_if
set #a random 4
If #a = 1
send PageUp
send PageUp
end_if
If #a = 2
send PageDown
send PageDown
end_if
wait 1000
end_if
return
В УО биндим на F5
lastobject
waitfortarget
lasttarget
Копируем этот скрипт в УоПилот, в закладку "Скрипт" (у меня версия Пилота 1.07 beta 8). В закладке "Ещё" ставь "Паузу между строк" 0ms, потом обратно в закладку "Скрипт" там
жмеш Play и... твой чар начинает с умным видом махать киркой (на некоторое время ты ему больше не нужен)
P.S. Этот скрипт без реколлов и без побега от ентов.
|
|
|
|
Re: снова старое или Mining 4ever |
|
18.12.2005, 00:18
|
#27
|
The Hero
Регистрация: 06.12.2005
Возраст: 37
Сообщений: 856
Репутация: 1 имеет нулевую репутацию
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от Psybadek
На Абсосе я юзал другую прогу (не инжу и не изи). Но это уже совсем другая история... (с) :rolleyes:
P.S. krAn [ZTU], ещё давно хотел поставить аватару как у тебя, но
писалось что весит она слишком много :eek:
P.P.S. gansta, если ещё какие-нить скрипты нужны, пиши - поможем :cool:
|
я из нее вырезал пару ненужных фреймов
__________________
жадный ублюдок
|
|
|
|
Re: снова старое или Mining 4ever |
|
18.12.2005, 01:04
|
#28
|
Гость
|
Re: снова старое или Mining 4ever
я сделал всё как ты сказал но скрипт не пашет ...
у мя 2 пилота 205 и стареньких 108 - на обоих не идёт D
|
|
|
|
Re: снова старое или Mining 4ever |
|
18.12.2005, 01:25
|
#29
|
Mystical Hero
Регистрация: 06.12.2005
Адрес: :яидьлиГ
Возраст: 38
Сообщений: 1,110
Репутация: 66 имеет хорошую репутацию (от 26 до 75)
Чар: отренеймлен :(
Гильдия: :яидьлиГ
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от gansta
я сделал всё как ты сказал но скрипт не пашет ...
у мя 2 пилота 205 и стареньких 108 - на обоих не идёт D
|
Срочно беги к кузницу выше брит банка ложи руки на наковальню и умоляй проходящих мимо их паровнять.....
А вообше открой в пилоте внутреннюю справку и паробуй разобраться в языке...
патом бери скрипт и сматри как он устроен что за чем и тд ....
"Некто и не говарил что это будет просто "
|
|
|
|
Re: снова старое или Mining 4ever |
|
18.12.2005, 09:01
|
#30
|
Forum Spirit
Регистрация: 06.12.2005
Адрес: "RSC"
Возраст: 43
Сообщений: 5,271
Репутация: 82 - вас уважают другие (от 76 до 125)
Чар: zizitopiha
Гильдия: "RSC"
|
Re: снова старое или Mining 4ever
Дайте ссылку на самый оптимальный пилот (по вашему мнению)....
__________________
Мало быть первым, нужно чтобы все остальные сдохли
|
|
|
|
Re: снова старое или Mining 4ever |
|
18.12.2005, 12:17
|
#31
|
Гость
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от Aracul[White Power]
да вот ещё не подскажете на чём лучше карпу качать и примерно скок логов уйдёт до гма?
|
качать на рубанках (их потом можно продавать гос. вендорам), логов потр***ется примерно 250к =)
|
|
|
|
Re: снова старое или Mining 4ever |
|
19.12.2005, 22:26
|
#32
|
Гость
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от zedkin
качать на рубанках (их потом можно продавать гос. вендорам), логов потр***ется примерно 250к =)
|
а с 70 сколько примерно потр***ется? А что на удочках? или тут как на ТУСе и всё равно на чём???
|
|
|
|
Re: снова старое или Mining 4ever |
|
02.01.2006, 15:47
|
#33
|
Гость
|
Re: снова старое или Mining 4ever
to [Только зарегистрированные пользователи могут видеть ссылки. Регистрация!]
Я малёсь непонела как капать?
если стоит бинд
ласт обжект
вайт фор таргет
таргет шелф
я же не могу рыть себя....
|
|
|
|
Re: снова старое или Mining 4ever |
|
02.01.2006, 18:31
|
#34
|
Mystical Hero
Регистрация: 06.12.2005
Адрес: :яидьлиГ
Возраст: 38
Сообщений: 1,110
Репутация: 66 имеет хорошую репутацию (от 26 до 75)
Чар: отренеймлен :(
Гильдия: :яидьлиГ
|
Re: снова старое или Mining 4ever
Цитата:
Сообщение от Kate
to [Только зарегистрированные пользователи могут видеть ссылки. Регистрация!]
Я малёсь непонела как капать?
если стоит бинд
ласт обжект
вайт фор таргет
таргет шелф
я же не могу рыть себя....
|
ласт обжект
вэйт фо таргет
ласт таргет
|
|
|
|
Re: снова старое или Mining 4ever |
|
10.01.2006, 21:54
|
#35
|
Гость
|
Re: снова старое или Mining 4ever
Стою на асфальте я в лыжи обутый.... =)
Не один не пашет, еслт LastObject - WaitForTarget - TargetSelf то он на себя не может комать, а если ласт таргет то копает всегда в одном месте....
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
|
|
|