помоги со скриптом на мининг на форготтен ворлд....

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

помоги со скриптом на мининг на форготтен ворлд....

Post by mamik7 »

Ребят перепробовал все скрипты...единственное что работает это exec minamine///)))) вопрос такой...может кто помоежт со скриптом на мининг и чтоб антимакрос вводил.я бы расцеловал автора даже если он будет против...ммммм)))) жду спс..
Last edited by mamik7 on 2009-07-28 21:57:22, edited 1 time in total.
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

Что нужно обьяснить-то? Ну есть скрипты, ну работают, что нужно, телепаты в отпуске, изьясняйтесь понятней.
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

Kynep wrote:Что нужно обьяснить-то? Ну есть скрипты, ну работают, что нужно, телепаты в отпуске, изьясняйтесь понятней.


хотелось бы чтоб он копал и антимакрос систему вводил...прости что я делаю то что на твоей картинке. Мой первый топик....
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

сутки почти тишина.Ап
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

mamik7 wrote:сутки почти тишина.Ап

А что ты хочешь на вопрос ПОМОГИТЕ С КОПАЛКОЙ? Тебя всего скорее пошлют на поиск. Тут скриптов мининга завались. И с антимакросом есть. Чем тебя они не устраивают? Какой шард (лучше версия клиента)? какая шахта?
ссылку на пример скрипта пость и говори что у тебя в нем не работает.
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

смотри вот скрипт
sub OneClick()

dim reindex[8]
reindex[0] = 11
reindex[1] = 12
reindex[2] = 13
reindex[3] = 10
reindex[4] = 16
reindex[5] = 14
reindex[6] = 17
reindex[7] = 15
var GumpID = 0
var ButtonID = 0
var ButtonText
var i = 18

if uo.LastGump('text', 4) <> "0" then
i = 19
end if
GumpID = val(Mid(uo.LastGump('command', i), 16, 4))
ButtonID = reindex[GumpID-2225]
ButtonText = uo.LastGump('command', ButtonID)
uo.LClick(Val(Mid(ButtonText, 7, 3)), Val(Mid(ButtonText, 11, 3)))
wait(300)

end sub

sub AntiMacro()

while not uo.Dead()
if not uo.LastGump('replyed') then
if uo.LastGump('text', 0) == 'Antimacros System' then
OneClick()
end if
endif
wait(500)
wend

end sub
в хоткейс прописываю exec AntiMacro
нажимаю exec minamine потом exec AntiMacro в хоткейс уже вбитые...он вводит цифры и дальше не копает...
Last edited by mamik7 on 2009-07-29 23:48:16, edited 2 times in total.
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

Mirage wrote:
mamik7 wrote:сутки почти тишина.Ап

А что ты хочешь на вопрос ПОМОГИТЕ С КОПАЛКОЙ? Тебя всего скорее пошлют на поиск. Тут скриптов мининга завались. И с антимакросом есть. Чем тебя они не устраивают? Какой шард (лучше версия клиента)? какая шахта?
ссылку на пример скрипта пость и говори что у тебя в нем не работает.

Ultima Online Forgotten World
CoS
Posts: 53
Joined: 2007-06-20 15:38:11

Post by CoS »

Code: Select all

if uo.waiting() then
uo.usetype('0x0E85')
wait(5000)
end if
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

куда это вставлять
Last edited by mamik7 on 2009-08-02 17:35:37, edited 1 time in total.
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

куда это вставить???
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

mamik7 wrote:куда это вставить???

я вот не понимаю почему никто не помогает хоть киньте ссылку или ещё чем нибудь...все говорят на еко задавай вопросы...а толку если никто уже 6 дней не отвечает.......причем что на шарде человек 100 играет на инжекте....вот и думай поему же никто не помогает...
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

Извини я там не играю :roll:
Посмотри тут
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

Mirage wrote:Извини я там не играю :roll:
Посмотри тут

жду помощи....
mamik7
Posts: 11
Joined: 2009-07-28 09:40:29

Post by mamik7 »

mamik7 wrote:
Mirage wrote:Извини я там не играю :roll:
Посмотри тут

жду помощи....
ап
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

5вмз отредактирую весь скрипт.
CoS
Posts: 53
Joined: 2007-06-20 15:38:11

Post by CoS »

5 вмз с убиванием гвардов и тд ) полный фарш )
HoffMaN
Posts: 13
Joined: 2010-10-27 01:42:31

Re: помоги со скриптом на мининг на форготтен ворлд....

Post by HoffMaN »

Настройте мне или дайте асю номер заплачу больше чем 5 вмз такойже скрипт только чутка переделанный под мой шард !
Post Reply