#Весь МЕ Инскрипт: три цветные книжки, спелбука, рунбуки, реколы.
#С учетом работающей при рисовании медитации.
#Для реколов: рекомендуется одеть фулл акву, скроли иметь в бакпаке.
#Для рунбук:бланк,рекол,гейтравел скроли и руны должны находиться в бакпаке. ВЫЛОЖИ СПЕЛБУКи!
#Для рисования книг: скроли под ноги чару, в бакпаке полную и пустые книги.
#После выбора нужной книги, первым таргетом тыкаем в полную, вторым таргетом в пустую.
#КАТЕГОРИЧЕСКИ НЕ РЕКОМЕНДУЕТСЯ: брать\перемещать любы предметы во время работы!
#Два режима старта
#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 6' 'Select' 'Energy Bolt'")
#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' 'Telekinesis'")
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' 'Arch Cure'")
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' 'Mana Drain'")
WriteSpell("0x1F4C","waitmenu 'Select' 'Circle 4' 'Select' 'Recall'")
WriteSpell("0x1F4D","waitmenu 'Select' 'Circle 5' 'Select' 'Blade Spirit'")
WriteSpell("0x1F4E","waitmenu 'Select' 'Circle 5' 'Select' 'Dispel Field'")
WriteSpell("0x1F4F","waitmenu 'Select' 'Circle 5' 'Select' 'Incognito'")
WriteSpell("0x1F50","waitmenu 'Select' 'Circle 5' 'Select' 'Spell 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' 'SummonCreature'")
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'")
WriteSpell("0x1F61","waitmenu 'Select' 'Circle 7' 'Select' 'ManaVampire'")
WriteSpell("0x1F62","waitmenu 'Select' 'Circle 7' 'Select' 'Mass Dispel'")
WriteSpell("0x1F63","waitmenu 'Select' 'Circle 7' 'Select' 'Meteor Swarm'")
WriteSpell("0x1F64","waitmenu 'Select' 'Circle 7' 'Select' 'Polymorph'")
WriteSpell("0x1F65","waitmenu 'Select' 'Circle 8' 'Select' 'Earthquake'")
WriteSpell("0x1F66","waitmenu 'Select' 'Circle 8' 'Select' 'EnergyVortex'")
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 Elemental'")
WriteSpell("0x1F6C","waitmenu 'Select' 'Circle 8' 'Select' 'Summon Water Elemental'")
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
