_ka 0 Жалоба Опубликовано 24 ноября, 2013 #Весь МЕ Инскрипт: три цветные книжки, спелбука, рунбуки, реколы. #С учетом работающей при рисовании медитации. #Для реколов: рекомендуется одеть фулл акву, скроли иметь в бакпаке. #Для рунбук:бланк,рекол,гейтравел скроли и руны должны находиться в бакпаке. ВЫЛОЖИ СПЕЛБУКи! #Для рисования книг: скроли под ноги чару, в бакпаке полную и пустые книги. #После выбора нужной книги, первым таргетом тыкаем в полную, вторым таргетом в пустую. #КАТЕГОРИЧЕСКИ НЕ РЕКОМЕНДУЕТСЯ: брать\перемещать любы предметы во время работы! #Два режима старта #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 Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты