Перейти к содержанию
Наш Discord сервер: https://discord.gg/x53pHgq5qN ×
Форум шарда Middle-Earth
Авторизация  
Подписчики 0
Amba

Отборные скрипты

Автор Amba, в Общий

Рекомендуемые сообщения

Amba    0

Amba
Опубликовано

Тема для универсальных, модульных=гибких в настройке, проверенных скриптов.

Система "поощрений"

"дайте скрипт" = 7 дней бана

"вот скрипт, но нужно доработать кувалдой и напильником" = 7 дней бана

"скрипт с шарда www.цензоред.ru"= 7 дней бана

"у меня куче есть, но не дам" = 14 дней бана

Для таких просьб\сриптов юзаем ветку: http://middle33.valuehost.ru/forum/index.php?showtopic=61

 

Тема ТОЛЬКО для КРАФТ СКРИПТОВ, никаких вопросов, просьб и т.п. т.к. надоело по 20-40 флуда просматривать и ничего не находить.

 

КРАФТ = БС, БК, инскрипт, тинкер и т.п.

В идеале один скрипт на крафт, но содержащий максимально полезной инофрмации.

Ни каких скриптов на надцатЪ страниц типа :

script1:
UO.Exec("waittargetobject '^0x13DB'")
Wait (300)
UO.Exec("useobject '^0x0F9E'")
Wait (7000)
UO.Exec("waitmenu 'Choose a category.' 'studded' 'What do you want to create?' 'Studded Tunic'")
UO.Exec("waittargetobject '^0x1078'")
UO.Exec("useobject '^0x0F9D'")
wait(15000)
if UO.Injournal ("exceptional") then
UO.deletejournal()
uo.exec("moveitem '^0x13DB' '1' '^0x0E76'")
wait(2000)
goto script2
else
goto script1
endif
script2:

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

A.K.M.    0

A.K.M.
Опубликовано 
#Весь МЕ Инскрипт: три цветные книжки, спелбука, рунбуки, реколы.
#С учетом работающей при рисовании медитации.
#Для реколов: рекомендуется одеть фулл акву, скроли иметь в бакпаке.
#Для рунбук:бланк,рекол,гейтравел скроли и руны должны находиться в бакпаке. ВЫЛОЖИ СПЕЛБУКи!
#Для рисования книг: скроли под ноги чару, в бакпаке полную и пустые книги.
#После выбора нужной книги, первым таргетом тыкаем в полную, вторым таргетом в пустую.
#КАТЕГОРИЧЕСКИ НЕ РЕКОМЕНДУЕТСЯ: брать\перемещать любы предметы во время работы!
#Два режима старта 
#mine()-полный автомат, внимательно читаем меню и тыркаем в нужные кнопки
#mine2()-ручной запуск нужной функции, ставим-убираем знак # где нужно, для реколов\рунбук ставим и перед UseBooks()
# (c) A.K.M.

sub main2()
UseBooks()
#DarkBook()
#LightBook()
#DruidBook()
SpellBook()
#Recalls()
#RuneBooks()
end sub

sub Recalls()
var SpellBook,Delay
UO.CancelTarget();
UO.Print('Targetom na SpellBook')
UO.AddObject('SpellBook')
while uo.targeting()
wait(100)
wend
while UO.Count('0x0E34')>0
if UO.Mana<20 then
  Meditate()
end if
UO.Exec ("waitmenu 'Select' 'Circle 4' 'Select' 'Recall'")
#UO.Exec ("waitmenu 'Select' 'Circle 7' 'Select' 'Gate'")
UO.Exec ("waittargetobject '^0x0E34' 'SpellBook'")
UO.UseSkill("Inscription")
UO.Deletejournal()
Delay=0
repeat
  wait(500)
  Delay=Delay+500
until uo.injournal("enough mana") or uo.injournal("move and stop") or uo.injournal("finish")
if Delay<10000 then 
wait(10000-Delay)
end if
wend
UO.Print('Prived Zayac!!! Scroli to gde? Gde scroli?!')
end sub

sub main()
var Result
Result =message('[YES=DarkBook/LightBook/DruidBook] [NO=SpellBook/RuneBooks/Recalls] ','ChooseMenu',    4,    4)
If Result==6 then
Result=message('[YES=DarkBook] [NO=LightBook] [CANCEL=DruidBook]','Choose book',    3,    3)
If Result==6 then
Uo.Say('OK! Risuem DarkBook!')
UseBooks()
DarkBook()
end if
If Result==7 then
  Uo.Say('OK! Risuem LightBook!')
  UseBooks()
  LightBook()
end if
If Result==2 then
  Uo.Say('OK! Risuem DruidBook!')
  UseBooks()
  DruidBook()
end if
else
Result =message('[YES=SpellBook] [NO=RuneBooks] [CANCEL=Recalls]','Choose book',    3,    3)
If Result==6 then
  Uo.Say('OK! Risuem SpellBook!')
  UseBooks()
  SpellBook()
end if
If Result==7 then
Uo.Say('OK! Risuem RuneBooks!')
RuneBooks()
end if
If Result==2 then
Uo.Say('OK! Risuem Recalls!')
Recalls()
end if
end if
end sub

sub RuneBooksTargetControl()
var Pause
Pause=0
while UO.Waiting()
   wait(300) 
  Pause=Pause+300
  If Pause >60000 then 
   Uo.Print('Alarma. Reboot script.')
   Uo.Print('Alarma. Reboot script.')
   Uo.Print('Alarma. Reboot script.')
   Uo.Print('Script stopped!')
   Uo.Exec('terminate all')
   end if
wend
end sub

sub RuneBooks()
while UO.Count('0x1F14')>0 AND UO.Count('0x0E34')>7 AND UO.Count('0x1F4C')>0 AND UO.Count('0x1F60')>0
  UO.waittargettype('0x1F14')
  UO.UseSkill('Inscription')
  RuneBooksTargetControl()
  UO.waittargettype('0x0E34')
  RuneBooksTargetControl()
  UO.waittargettype('0x1F4C')
  RuneBooksTargetControl()
  UO.waittargettype('0x1F60')
  RuneBooksTargetControl()
  wait(9000)
wend
UO.Print('Done!')
end sub

sub DarkBook()
WriteSpell("0x1F3B","waitmenu 'Select' 'Dead Flesh'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Drain'")
WriteSpell("0x1F3C","waitmenu 'Select' 'Impale'")
WriteSpell("0x1F34","waitmenu 'Select' 'Ghoul'")
WriteSpell("0x1F3E","waitmenu 'Select' 'Regeneration'")
WriteSpell("0x1F37","waitmenu 'Select' 'Wraith'")
WriteSpell("0x1F36","waitmenu 'Select' 'Raise Dead'")
WriteSpell("0x1F39","waitmenu 'Select' 'Ghost'")

WriteSpell("0x1F3D","waitmenu 'Select' 'Darkness'")
WriteSpell("0x1F30","waitmenu 'Select' 'Lower'")
WriteSpell("0x1F31","waitmenu 'Select' 'Vulnerability'")
WriteSpell("0x1F32","waitmenu 'Select' 'Pain'")
WriteSpell("0x1F38","waitmenu 'Select' 'Unholy'")
WriteSpell("0x1F3A","waitmenu 'Select' 'Great'")
WriteSpell("0x1F33","waitmenu 'Select' 'Sacrifice'")
WriteSpell("0x1F35","waitmenu 'Select' 'Kill'")
UO.Print('Done!')
end sub

sub LightBook()
WriteSpell("0x1F30","waitmenu 'Select' 'Poison'")
WriteSpell("0x1F30","waitmenu 'Select' 'Spirit'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Free'")
WriteSpell("0x1F30","waitmenu 'Select' 'Magic'")
WriteSpell("0x1F30","waitmenu 'Select' 'Heal'")
WriteSpell("0x1F30","waitmenu 'Select' 'Greater'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Glyph'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Bolt'")

WriteSpell("0x1F30","waitmenu 'Select' 'Sacred'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Celestial'")
WriteSpell("0x1F30","waitmenu 'Select' 'Ray of Light'")
WriteSpell("0x1F30","waitmenu 'Select' 'Prayer'")
WriteSpell("0x1F30","waitmenu 'Select' 'Holy'")
WriteSpell("0x1F30","waitmenu 'Select' 'Day'")
WriteSpell("0x1F3F","waitmenu 'Select' 'Light Elemental'")
WriteSpell("0x1F30","waitmenu 'Select' 'Divine'")
UO.Print('Done!')
end sub

sub DruidBook()
WriteSpell("0x1F32","waitmenu 'Select' 'Protection'")
WriteSpell("0x1F32","waitmenu 'Select' 'Disease'")
WriteSpell("0x1F30","waitmenu 'Select' 'Call Woodland'")
WriteSpell("0x1F32","waitmenu 'Select' 'Stoneskin'")
WriteSpell("0x1F31","waitmenu 'Select' 'Call Lightning'")
WriteSpell("0x1F32","waitmenu 'Select' 'Remove'")
WriteSpell("0x1F32","waitmenu 'Select' 'Burnt'")
WriteSpell("0x1F32","waitmenu 'Select' 'Entangle'")

WriteSpell("0x1F32","waitmenu 'Select' 'Nature'")
WriteSpell("0x1F31","waitmenu 'Select' 'Miscast'")
WriteSpell("0x1F32","waitmenu 'Select' 'Gust'")
WriteSpell("0x1F32","waitmenu 'Select' 'Insect'")
WriteSpell("0x1F32","waitmenu 'Select' 'Turn'")
WriteSpell("0x1F32","waitmenu 'Select' 'Ice'")
WriteSpell("0x1F32","waitmenu 'Select' 'Acid'")
WriteSpell("0x1F32","waitmenu 'Select' 'Wyvern'")
UO.Print('Done!')
end sub

sub SpellBook()
   WriteSpell("0x1F2D","waitmenu 'Select' 'Circle 1' 'Select' 'Reactive Armor'")
   WriteSpell("0x1F2E","waitmenu 'Select' 'Circle 1' 'Select' 'Clumsy'")
   WriteSpell("0x1F2F","waitmenu 'Select' 'Circle 1' 'Select' 'Create Food'")
   WriteSpell("0x1F30","waitmenu 'Select' 'Circle 1' 'Select' 'Feeblemind'")
   WriteSpell("0x1F31","waitmenu 'Select' 'Circle 1' 'Select' 'Heal'")
   WriteSpell("0x1F32","waitmenu 'Select' 'Circle 1' 'Select' 'Magic Arrow'")
   WriteSpell("0x1F33","waitmenu 'Select' 'Circle 1' 'Select' 'Night Sight'")
   WriteSpell("0x1F34","waitmenu 'Select' 'Circle 1' 'Select' 'Weaken'")
  
   WriteSpell("0x1F35","waitmenu 'Select' 'Circle 2' 'Select' 'Agility'")
   WriteSpell("0x1F36","waitmenu 'Select' 'Circle 2' 'Select' 'Cunning'")
   WriteSpell("0x1F37","waitmenu 'Select' 'Circle 2' 'Select' 'Cure'")
   WriteSpell("0x1F38","waitmenu 'Select' 'Circle 2' 'Select' 'Harm'")
   WriteSpell("0x1F39","waitmenu 'Select' 'Circle 2' 'Select' 'Magic Trap'")
   WriteSpell("0x1F3A","waitmenu 'Select' 'Circle 2' 'Select' 'Magic Untrap'")
   WriteSpell("0x1F3B","waitmenu 'Select' 'Circle 2' 'Select' 'Protection'")
   WriteSpell("0x1F3C","waitmenu 'Select' 'Circle 2' 'Select' 'Strength'")
  
   WriteSpell("0x1F3D","waitmenu 'Select' 'Circle 3' 'Select' 'Bless'")
   WriteSpell("0x1F3E","waitmenu 'Select' 'Circle 3' 'Select' 'Fireball'")
   WriteSpell("0x1F3F","waitmenu 'Select' 'Circle 3' 'Select' 'Magic Lock'")
   WriteSpell("0x1F40","waitmenu 'Select' 'Circle 3' 'Select' 'Poison'")
   WriteSpell("0x1F41","waitmenu 'Select' 'Circle 3' 'Select' 'Telekinisis'")
   WriteSpell("0x1F42","waitmenu 'Select' 'Circle 3' 'Select' 'Teleport'")
   WriteSpell("0x1F43","waitmenu 'Select' 'Circle 3' 'Select' 'Unlock'")
   WriteSpell("0x1F44","waitmenu 'Select' 'Circle 3' 'Select' 'Wall of Stone'")
  
   WriteSpell("0x1F45","waitmenu 'Select' 'Circle 4' 'Select' 'Archcure'")
   WriteSpell("0x1F46","waitmenu 'Select' 'Circle 4' 'Select' 'Arch Protection'")
   WriteSpell("0x1F47","waitmenu 'Select' 'Circle 4' 'Select' 'Curse'")
   WriteSpell("0x1F48","waitmenu 'Select' 'Circle 4' 'Select' 'Fire Field'")
   WriteSpell("0x1F49","waitmenu 'Select' 'Circle 4' 'Select' 'Greater Heal'")
   WriteSpell("0x1F4A","waitmenu 'Select' 'Circle 4' 'Select' 'Lightning'")
   WriteSpell("0x1F4B","waitmenu 'Select' 'Circle 4' 'Select' 'ManaDrain'")
   WriteSpell("0x1F4C","waitmenu 'Select' 'Circle 4' 'Select' 'Recall'")
  
   WriteSpell("0x1F4D","waitmenu 'Select' 'Circle 5' 'Select' 'Blade Spirits'")
   WriteSpell("0x1F4E","waitmenu 'Select' 'Circle 5' 'Select' 'Dispel Field'")
   WriteSpell("0x1F4F","waitmenu 'Select' 'Circle 5' 'Select' 'Incognito'")
   WriteSpell("0x1F50","waitmenu 'Select' 'Circle 5' 'Select' 'Magic Reflection'")
   WriteSpell("0x1F51","waitmenu 'Select' 'Circle 5' 'Select' 'Mind Blast'")
   WriteSpell("0x1F52","waitmenu 'Select' 'Circle 5' 'Select' 'Paralyze'")
   WriteSpell("0x1F53","waitmenu 'Select' 'Circle 5' 'Select' 'Poison Field'")
   WriteSpell("0x1F54","waitmenu 'Select' 'Circle 5' 'Select' 'Summon Creature'")
  
   WriteSpell("0x1F55","waitmenu 'Select' 'Circle 6' 'Select' 'Dispel'")
   WriteSpell("0x1F56","waitmenu 'Select' 'Circle 6' 'Select' 'Energy Bolt'")
   WriteSpell("0x1F57","waitmenu 'Select' 'Circle 6' 'Select' 'Explosion'")
   WriteSpell("0x1F58","waitmenu 'Select' 'Circle 6' 'Select' 'Invisibility'")
   WriteSpell("0x1F59","waitmenu 'Select' 'Circle 6' 'Select' 'Mark'")
   WriteSpell("0x1F5A","waitmenu 'Select' 'Circle 6' 'Select' 'Mass Curse'")
   WriteSpell("0x1F5B","waitmenu 'Select' 'Circle 6' 'Select' 'Paralyze Field'")
   WriteSpell("0x1F5C","waitmenu 'Select' 'Circle 6' 'Select' 'Reveal'")
  
   WriteSpell("0x1F5D","waitmenu 'Select' 'Circle 7' 'Select' 'Chain Lightning'")
   WriteSpell("0x1F5E","waitmenu 'Select' 'Circle 7' 'Select' 'Energy Field'")
   WriteSpell("0x1F5F","waitmenu 'Select' 'Circle 7' 'Select' 'Flamestrike'")
   WriteSpell("0x1F60","waitmenu 'Select' 'Circle 7' 'Select' 'Gate Travel'")
   WriteSpell("0x1F61","waitmenu 'Select' 'Circle 7' 'Select' 'Mana Vampire'")
   WriteSpell("0x1F62","waitmenu 'Select' 'Circle 7' 'Select' 'Mass Dispel'")
   WriteSpell("0x1F63","waitmenu 'Select' 'Circle 7' 'Select' 'Meteor Storm'")
   WriteSpell("0x1F64","waitmenu 'Select' 'Circle 7' 'Select' 'Polymorph'")
  
   WriteSpell("0x1F65","waitmenu 'Select' 'Circle 8' 'Select' 'Earthquake'")
   WriteSpell("0x1F66","waitmenu 'Select' 'Circle 8' 'Select' 'Energy Vortex'")
   WriteSpell("0x1F67","waitmenu 'Select' 'Circle 8' 'Select' 'Resurrection'")
   WriteSpell("0x1F68","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Air Elemental'")
   WriteSpell("0x1F69","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Daemon'")
   WriteSpell("0x1F6A","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Earth Elemental'")
   WriteSpell("0x1F6B","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Fire Elemenal'")
   WriteSpell("0x1F6C","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Water Elememental'")
   UO.Print('Done!')
end sub

sub UseBooks()
UO.CancelTarget();
UO.Print('Targetom na polnuu knizhku')
UO.AddObject('FullBook')
while uo.targeting()
wait(100)
wend
UO.Print('Targetom na pustuu knizhku')
UO.AddObject('EmptyBook')
while uo.targeting()
wait(100)
wend
end sub

sub Meditate()
while Uo.Mana<70
  uo.useskill("Meditation")
  wait(2000)
wend
end sub

sub DropBlankScrolls()
while UO.Count('0x0E34')>0 
UO.FindType(0x0E34, "all", "my")
uo.drop("all",0,0,0,"finditem") 
wait(1000)
wend
end sub

sub WriteSpell(ScrollType,SpellName)
Repeat
UO.DeleteJournal()
DropBlankScrolls()
UO.FindType(0x0E34, "all", "ground")
UO.Grab('1', "finditem")
wait(1000)
  if UO.Mana<50 then
  Meditate()
end if
UO.WaitTargetObject('^0x0E34','FullBook')  
UO.Exec(SpellName)
UO.UseSkill("Inscription")
wait(8000)
until uo.injournal("You create")
UO.FindType(ScrollType,'-1','Backpack') 
UO.MoveItem('finditem', '1', 'EmptyBook')
wait(1000)
end sub

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Leaf    0

Leaf
Опубликовано 

#общем попросили в миноке скрипт простенький на БС и объяснить как он пашет 

#В паке должна быть руда из которой куем, a smith's hammer и Tongs. Стоим около плавильни и наковальни.


#С 50% до 60-70% БС
#Код
sub main1()
while uo.count('0x1BF2')>10
UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Ringmail' 'Select item' 'Ringmail Vest'")
UO.Exec("waittargetobject '^0x1BF2'")
UO.Exec("useobject '^0x13E3'")
wait(8000)
# и плавим ее 
UO.Exec("waittargetobject '^0x13EC'")
Wait (500)
UO.Exec("useobject '^0x0FBB'")
Wait (3000)
wend
end sub


#С 60-70% до 80%
#Код
sub main2()
while uo.count('0x1BF2')>10
UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Chainmail' 'Select item' 'Chainmail Coif'")
UO.Exec("waittargetobject '^0x1BF2'")
UO.Exec("useobject '^0x13E3'")
wait(8000)
# и плавим ее 
UO.Exec("waittargetobject '^0x13BB'")
Wait (500)
UO.Exec("useobject '^0x0FBB'")
Wait (3000)
wend
end sub


#с 80% до 100%
#Код
sub main3()
while uo.count('0x1BF2')>10
UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Chainmail' 'Select item' 'Gnomish Chainmail Coif'")
UO.Exec("waittargetobject '^0x1BF2'")
UO.Exec("useobject '^0x13E3'")
wait(8000)
# и плавим ее 
UO.Exec("waittargetobject '^0x13C0'")
Wait (500)
UO.Exec("useobject '^0x0FBB'")
Wait (3000)
wend
end sub


#Задержки вроде норм поставил, хотя хз щас лагает конкретно.

Onis©

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

comatoza    0

comatoza
Опубликовано
Кое-какие скрипты... если есть желание переложите сюда... самому постить второй раз напрягает

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Catscan    0

Catscan
Опубликовано

sub main()

var num_of_potions, type_of_work, side_of_recipe, num_of_page, num_4_make, cast_bless

var x_rlist, y_rlist, x_lbtn, y_lbtn, x_rbtn, y_rbtn,x_okbtn, y_okbtn, i, k

 

num_of_potions = 1000 ; количество поушенов для изготовления

type_of_work = "numr" ; тип работы скрипта: для изготовления определенного количества указать nump, для работы, пока не кончаться реги numr

side_of_recipe = 1 ; 0 - левая страница, 1 - правая страница

num_of_page = 0 ; номер страницы. 0 это первая страница

num_4_make = "20" ; сколько делать поушенов (вводиться в строку после выбора типа поушена)

cast_bless = 0 ; кастовать ли bless на себя

x_rlist = 462 ; x - координата правого листа, для переворачивания страниц

y_rlist = 165 ; y - координата правого листа, для переворачивания страниц

x_lbtn = 294 ; x - координата левой кнопки приготовления поушена

y_lbtn = 282 ; y - координата левой кнопки приготовления поушена

x_rbtn = 451 ; x - координата правой кнопки приготовления поушена

y_rbtn = 280 ; y - координата правой кнопки приготовления поушена

x_okbtn = 320 ; x - координата кнопки "ОК"

y_okbtn = 307 ; y - координата кнопки "ОК"

 

if ((cast_bless == 1) and (UO.Count(0x0F84) > 0) and (UO.Count(0x0F86) > 0)) or (cast_bless == 0) then

 

###################### Часть выполнения, если тип работы по количеству регов и бутылок ################################

if type_of_work == "numr" then

While (UO.Count(0x0F88) > 19)

 

# книга рецептов

UO.Exec("usetype 0x0fbd")

wait(500)

 

# если первая страница, то не переворачиваем

if (num_of_page <> 0) then

# если не первая, то нажимаем на уголок страницы нужное количество раз

for i=0 to num_of_page

UO.LClick(x_rlist, y_rlist)

Wait(300)

next

endif

 

# кликаем на кнопку приготовления

if side_of_recipe == 0 then

UO.LClick(x_lbtn, y_lbtn)

wait(500)

endif

 

# кликаем на кнопку приготовления

if side_of_recipe == 1 then

UO.LClick(x_rbtn, y_rbtn)

wait(500)

endif

 

# говорим, сколько сделать поушенов и ждем

UO.Say(num_4_make)

UO.LClick(x_okbtn, y_okbtn)

wait(10000)

 

while uo.life < uo.str

uo.exec("bandageself")

wait(5000)

wend

 

wend

endif

end sub

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Finаdan    0

Finаdan
Опубликовано

Скрипту на фишинг получите. Ничего прописывать не надо, запускаем fishing() и радуемся. Работает везде, вроде. Не помню, давно не проверял.

sub FishTile(t, x, y, z)
  var timer

  repeat
    uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))
    uo.UseType(0x0DBF) #Удочка

    uo.DeleteJournal()
    timer = 0
    repeat
      wait(1000)
      timer = timer + 1
    until uo.InJournal("Points") or uo.InJournal("here") or uo.InJournal("line") or uo.InJournal("broken") or timer > 120
        
    EatFood()
  until uo.InJournal("here") or uo.InJournal("line")
end sub

sub Fishing()
  var i, j, tile
  
  uo.Disarm()

  while not uo.dead()
    for i = -6 to 6
      for j = -6 to 6
        tile = 168
        while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 6045)
          if tile == 171 then
            tile = 310
          else
            if tile == 311 then
              tile = 6039
            else
              tile = tile + 1
            endif
          endif
        wend
      
        if tile < 6039 then
          tile = 0
        endif

        if tile < 6045 then
          uo.concolor(0x53)
          uo.Print("Fishing: " + Str((i + 6) * 13 + j + 7) + "/169...")
          uo.concolor(0)
          
          FishTile(tile, uo.GetX() + i, uo.GetY() + j, 251)
        endif
      next
    next
    
    uo.Print("Завершил круг. Продолжаю.")
  wend
end sub

 

Забыл сказать, для этого дела нужна свежая инда. Injection.dll с сайта Йоко качайте, МЕ-шная не подойдёт.

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты
Гость
Эта тема закрыта для публикации ответов.
Авторизация  
Подписчики 0
Перейти к списку тем
×
×
  • Создать...