API tools faq
paste
Advertisement
caitsith2

FFIV lua script

caitsith2
Oct 9th, 2011
233
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 40.65 KB | None | 0 0
raw download clone embed print report
  1. -- --------------------------- --
  2. -- Final Fantasy IV LUA script --
  3. --                             --
  4. -- By: Pasky13                 --
  5. -- --------------------------- --
  6.  
  7. -- Globals
  8.  
  9.   char_atbm  = {0, 0, 0, 0, 0}
  10.   enemy_atbm = {0, 0, 0, 0, 0, 0, 0, 0}
  11.  
  12.   -- Change this to the amount of groups you want displayed at a time
  13.   groupmax = 5  
  14.  
  15.   TableEnemyFormation = { "Imp x3",
  16.                           "FloatEye x2",
  17.                           "Eagle x2, FloatEye x1",
  18.                           "Eagle x3",
  19.                           "Imp x3, Sword Rat x1",
  20.                           "SwordRat x2, Imp x2",
  21.                           "Imp x4",
  22.                           "Larva x3",
  23.                           "SandMoth x2, Larva x2",
  24.                           "Sand Man x4",
  25.                           "SandPede x1, Sand Man x2",
  26.                           "SandWorm x1",
  27.                           "Evilshell x3 WaterBug x1",
  28.                           "Pike x3",
  29.                           "CaveToad x3",
  30.                           "Pike x2, Evilshell x2",
  31.                           "Zombie x4",
  32.                           "Pike x2, Evilshell x2, WaterBug x2",
  33.                           "Jelly x4",
  34.                           "TinyMage x2, WaterHag x4",
  35.                           "CaveToad x4",
  36.                           "CaveToad x2, Mad Toad x2",
  37.                           "Aligator x1, Pike x2",
  38.                           "Aligator x2",
  39.                           "Zombie x6",
  40.                           "Aligator x1, WaterBug x2",
  41.                           "Mad Toad x4",
  42.                           "TinyMage x4",
  43.                           "Imp x8",
  44.                           "SwordRat x2, Imp x2, TinyMage x2",
  45.                           "SandWorm x1, Sandpede x1",
  46.                           "SandWorm x2",
  47.                           "Imp x3, Imp Captain x1",
  48.                           "Turtle x1, Imp x2",
  49.                           "Cream x4",
  50.                           "Basilisk x1, Imp x3",
  51.                           "Turtle x2",
  52.                           "Weeper x1, Turtle x1, Basilisk x1",
  53.                           "Basilisk x1, Turtle x1",
  54.                           "Weeper x2",
  55.                           "Skelton x4",
  56.                           "Spirit x2",
  57.                           "Gargoyle x1, Cocktrice x1",
  58.                           "Bomb x3",
  59.                           "Cocktrice x3",
  60.                           "Gargoyle x2",
  61.                           "GrayBomb x2, Bomb x2",
  62.                           "Spirit x2, Skelton x2",
  63.                 "Unknown",
  64.                           "Red Bone x1, Skelton x3",
  65.                           "GrayBomb x2, Bomb x4",
  66.                           "Spirit x3, Skelton x2, Red Bone x1",
  67.                           "Imp Captain x3, Needler x1",
  68.                           "Imp Captain x3, Needler x3",
  69.                           "Imp Captain x4, Imp x2",
  70.                           "SwordRat x3, Needler x3",
  71.                           "Raven x1",
  72.                 "Unknown",
  73.                           "Needler x2, SwordRat x2",
  74.                           "Raven x1 Cockatrice x3",
  75.                           "Spirit x3, Soul x1",
  76.                           "Soul x2, Red Bone x2",
  77.                           "Skelton x3, Red Bone x2",
  78.                           "Lilith x1, Red Bone x2",
  79.                           "Ghoul x1, Red Bone x2, Skelton x2",
  80.                           "Spirit x2, Soul x2, Red Bone x2",
  81.                           "Zombie x2, Ghoul x2",
  82.                           "Ghoul x2, Soul x2",
  83.                           "Revenant x1, Ghoul x3",
  84.                           "Zombie x3, Ghoul x2, Revenant x2",
  85.                           "Lilith x1",
  86.                           "Soul x2, Ghoul x2, Revenant x2",
  87.                           "Soul x3, Ghoul x1, Revenant x1",
  88.                           "Lilith x2",
  89.                           "Piranha x2, FangShel x1, Evilshell x1",
  90.                           "Pike x3, Piranha x3",
  91.                           "Crocdile x1, Piranha x2",
  92.                           "FangShel x3, Aligator x1, Crocdile x1",
  93.                           "Piranha x2, ElecFish x2",
  94.                           "Crocdile x1, ElecFish x3",
  95.                           "AquaWorm x1, Piranha x3",
  96.                           "Hydra x2",
  97.                           "Crocdile x2",
  98.                           "AquaWorm x1, ElecFish x3",
  99.                           "AquaWorm x1, Hydra x1, Crocdile x1",
  100.                           "Guard x2",
  101.                           "Guard x1, Hydra x2",
  102.                           "AquaWorm x2",
  103.                           "StingRat x3, Treant x2",
  104.                           "Panther x1, StingRat x3",
  105.                           "Cannibal x1, Treant x2",
  106.                           "Python x1, StingRat x2",
  107.                           "Ogre x1, Panther x2",
  108.                           "Ogre x2",
  109.                           "Cave Bat x3",
  110.                           "Panther x2",
  111.                           "Mage x2",
  112.                           "CaveNaga x1, Ogre x1",
  113.                           "CaveNaga x1, Python x2",
  114.                           "Ogre x3",
  115.                           "VampGirl x1, Cave Bat x3",
  116.                           "Mage x1, Panther x1, Ogre x1",
  117.                           "Panther x2, Ogre x2",
  118.                           "CaveNaga x2, Python x2",
  119.                           "VampGirl x2, Cave Bat x3",
  120.                           "Panther x2, Ogre x1, CaveNaga x1",
  121.                           "VampGirl x1, Cave Bat x6",
  122.                           "Marion x1, (Summon Puppet x1), Puppet x2",
  123.                           "Marion x1, (Summon Puppet x1), Puppet x3",
  124.                           "Centaur x1, IceBeast x2",
  125.                           "Centaur x2, IceBeast x2",
  126.                           "Centaur x3",
  127.                           "Centaur x1, Gremlin x2",
  128.                           "Slime x4",
  129.                           "Ice Lizard x1, Slime x3",
  130.                           "Jelly x1, Slime x2, Cream x1",
  131.                           "Gremlin x2, Ice Lizard x2",
  132.                           "Carapace x2, Ice Lizard x2",
  133.                           "SwordMan x2",
  134.                           "SwordMan x1, Ice Lizard x2",
  135.                           "Swordman x2, Ice Lizard x 2",
  136.                           "SwordMan x1, IceBeast x2",
  137.                           "EpeeGirl x2, SwordMan x2",
  138.                           "EpeeGirl x3",
  139.                           "Witch x1, EpeeGirl x1, Swordman x1",
  140.                           "EpeeGirl x1, Ice Lizard x1, IceBeast x1",
  141.                           "Witch x1, EpeeGirl, x1, Centaur x1",
  142.                           "Witch x1, IceBeast x2, EpeeGirl x1",
  143.                           "Witch x1, SwordMan x2, EpeeGirl x1",
  144.                           "Witch x1, EpeeGirl x2",
  145.                           "Imp x1",
  146.                           "Imp x1",
  147.                           "Imp x1",
  148.                           "Imp x1",
  149.                           "Imp x1",
  150.                 "Unknown",
  151.                           "Roc x1, Roc Baby x2",
  152.                           "Roc x1, Roc Baby x3",
  153.                           "HugeCell x4",
  154.                           "HugeCell x3",
  155.                           "GiantBat x3",
  156.                           "GiantBat x4",
  157.                           "GiantBat x3, Cave Bat x3",
  158.                           "Ironback x2",
  159.                           "Ironback x1, Armadilo x1, BlackLiz x1",
  160.                           "Ironback x2, BlackLiz x2",
  161.                           "Skull x3",
  162.                           "Skull x4",
  163.                           "Red Bone x3, Skull x2",
  164.                           "Staleman x1",
  165.                           "Staleman x1, Skull x2",
  166.                           "Staleman x1, Skull x2, Red Bone x2",
  167.                           "Mad Ogre x2",
  168.                           "Mad Ogre x3",
  169.                           "Mad Ogre x4",
  170.                           "BlackCat x2",
  171.                           "BlackCat x3",
  172.                           "Lamia x1, BlackCat x1, Mad Ogre x1",
  173.                           "Mad Ogre x1, BlackCat x2",
  174.                           "Mad Ogre x2, BlackCat x2",
  175.                           "Egg(Lamia x1)",
  176.                           "Lamia x2",
  177.                           "Lamia x3",
  178.                           "Lamia x1, Mad Ogre x1",
  179.                           "BlackCat x2, Lamia x1",
  180.                           "BlackCat x2, Lamia x2",
  181.                           "Balloon x3",
  182.                           "Balloon x4",
  183.                           "Mad Ogre x1, BlackCat x1, Balloon x2",
  184.                           "Grudger x1, Mad Ogre x1, Balloon x2",
  185.                           "Grudger x2",
  186.                           "Grudger x3",
  187.                           "Balloon x3, Grudger x1",
  188.                           "Grudger x2, Lamia x1",
  189.                           "BladeMan x3",
  190.                           "BlackCat x1, BladeMan x1, Mad Ogre x1",
  191.                           "Blademan x1, Balloon x3, BlackCat x1",
  192.                           "Mad Ogre x1, BladeMan x1, BlackCat x1",
  193.                           "Egg(Green Dragon x1)",
  194.                           "Sorcerer x1, (Summon Mad Ogre x1), BladeMan x2",
  195.                           "Sorcerer x1, (Summon BlackCat x1), BladeMan x2",
  196.                           "Sorcerer x1, (Summon BladeMan x1), BladeMan x2",
  197.                           "Sorcerer x1, (Summon Green Dragon x1), BladeMan x2",
  198.                           "Imp x1",
  199.                           "Searcher x1, (Summon Machine x1)",
  200.                           "Searcher x1, (Summon Machine x1), Machine x2",
  201.                           "Machine x2, Beamer x1",
  202.                           "Machine x2, Beamer x2",
  203.                           "Searcher x1, (Summon Horseman x1), Machine x2",
  204.                           "Horseman x1, Machine x2",
  205.                           "MacGiant x1",
  206.                           "MacGiant x1",
  207.                           "Horseman x1, Beamer x2",
  208.                           "Horseman x1, Beamer x1, Machine x1",
  209.                           "Searcher x1, (Summon MacGiant x1)",
  210.                           "MacGiant x1, Horseman x1",
  211.                           "Searcher x1, (Summon Horseman x1), Beamer x2",
  212.                           "Machine x2, Beamer x3",
  213.                           "Horseman x2",
  214.                           "D.Machin x1",
  215.                           "Searcher x1, (Summon D.Machin x1), Beamer x2",
  216.                           "MacGiant x1, Machine x1, Beamer x1",
  217.                           "MacGiant x1, Horseman x1, Beamer x1",
  218.                           "Imp x1",
  219.                           "Machine x3, Beamer x2",
  220.                           "Beamer x1, Machine x2, Horseman x1",
  221.                           "MacGiant x2",
  222.                           "Imp x1",
  223.                           "Imp x6",
  224.                           "SwordRat x6",
  225.                           "FlameDog x2, BlackLiz x2",
  226.                           "Horseman x1, Machine x2",
  227.                           "Horseman x1, Juclyote x2",
  228.                           "Horseman x2",
  229.                           "EvilMask",
  230.                           "Imp x1",
  231.                 "Unknown",
  232.                 "Unknown",
  233.                 "Unknown",
  234.                 "Unknown",
  235.                 "Unknown",
  236.                 "Unknown",
  237.                 "Unknown",
  238.                 "Unknown",
  239.                 "Unknown",
  240.                 "Unknown",
  241.                 "Unknown",
  242.                 "Unknown",
  243.                 "Unknown",
  244.                 "Unknown",
  245.                 "Unknown",
  246.                 "Unknown",
  247.                 "Unknown",
  248.                 "Unknown",
  249.                 "Unknown",
  250.                 "Unknown",
  251.                 "Unknown",
  252.                 "Unknown",
  253.                 "Unknown",
  254.                 "Unknown",
  255.                 "Unknown",
  256.                 "Unknown",
  257.                 "Unknown",
  258.                 "Unknown",
  259.                 "Unknown",
  260.                 "Unknown",
  261.                 "Unknown",
  262.                 "Unknown",
  263.                 "Unknown",
  264.                 "Unknown",
  265.                 "Unknown",
  266.                 "Unknown",
  267.                 "Unknown",
  268.                 "Unknown",
  269.                 "Unknown",
  270.                 "Unknown",
  271.                 "Unknown",
  272.                           "Armadillo x2",
  273.                           "Dark Imp x3, Armadillo x1, BlackLiz x1",
  274.                           "Armadillo x1, Tortise x2",
  275.                           "Dark Imp x4",
  276.                           "Tortise x1, Dark Imp x2",
  277.                           "Tortise x2, Armadillo x1, Black Liz x1",
  278.                           "BlackLiz x3",
  279.                           "Marion x1, (Summon EvilDoll x1), EvilDoll x2",
  280.                           "Marion x1, (Summon EvilDoll x1), EvilDoll x3",
  281.                           "FlameDog x2",
  282.                           "FlameDog x3",
  283.                           "FlameDog x4",
  284.                           "FlameMan x1, FlameDog x2",
  285.                           "FlameMan x2, FlameDog x2",
  286.                           "BlackLiz x2",
  287.                           "BlackLiz x3",
  288.                           "Egg(BlackLiz x1)",
  289.                           "Tortoise x2, BlackLiz x1",
  290.                           "Tortoise x2, BlackLiz x2",
  291.                           "Tofu x4",
  292.                           "Tofu x6",
  293.                           "Chimera x1, Tofu x3",
  294.                           "Chimera x1",
  295.                           "Chimera x2",
  296.                           "Chimera x1, FlameMan x1",
  297.                           "Chimera x1, FlameMan x2",
  298.                           "Chimera x1, FlameDog x2",
  299.                           "Stoneman x1, Medusa x1",
  300.                           "Medusa x2",
  301.                           "Stoneman x2",
  302.                           "Alert x1, (Summon Chimera x1)",
  303.                           "Alert x1, (Summon Stoneman x1)",
  304.                           "Alert x1, (Summon Naga x1)",
  305.                           "Alert x1, (Summon FlameDog x1)",
  306.                 "Unknown",
  307.                 "Unknown",
  308.                 "Unknown",
  309.                 "Unknown",
  310.                 "Unknown",
  311.                           "Egg(Lamia x1), Q. Lamia x1",
  312.                           "Egg(Lamia x3), Q. Lamia x1",
  313.                           "Q. Lamia x1, Egg(Lamia x1), BlackCat x1",
  314.                           "Q. Lamia x1, Egg(Lamia x1), Lamia x2",
  315.                           "Ironman x1",
  316.                           "Ironman x2",
  317.                           "Ironman x1, BladeMan x2",
  318.                           "Green Dragon x1",
  319.                           "BladeMan x1, BlackCat x1, Q. Lamia x1",
  320.                           "Ironman x1, Blackcat x2",
  321.                           "Sorcerer x1, (Summon Q. Lamia x1), BlackCat x2",
  322.                           "Sorcerer x1, (Summon Ironman x1), BlackCat x2",
  323.                           "Sorcerer x1, (Summon Q. Lamia x1), BlackCat x2",
  324.                           "Grudger x2, BladeMan x2",
  325.                           "Grudger x1, BladeMan x2",
  326.                           "Grudger x1, BlackCat x2, BladeMan x1",
  327.                           "Centpede x1",
  328.                           "TrapRose x1, Centpede x2",
  329.                           "TrapRose x2",
  330.                           "RocLarva x4",
  331.                           "RockMoth x2",
  332.                           "RockMoth x2, RocLarva x2",
  333.                           "TrapRose x1, RockMoth x2",
  334.                           "TrapRose x1, RockMoth x2, RocLarva x2",
  335.                           "ToadLady x1, TinyToad x3",
  336.                           "ToadLady x1, TinyToad x6",
  337.                           "Marlboro x2",
  338.                           "Marlboro x3",
  339.                           "Marlboro x1, Ghost x2",
  340.                           "Ghost x3",
  341.                           "Ghost x4",
  342.                           "Marlboro x1, Ghost x1, DarkTree x1",
  343.                           "Ghost x3, DarkTree x2",
  344.                           "DarkTree x2, Marlboro x1, Ghost x1",
  345.                           "Centpede x1, Marlboro x2",
  346.                           "DarkTree x2, Marlboro x2",
  347.                           "Red Eye x2",
  348.                           "Red Eye x3",
  349.                           "Hooligan x1, Red Eye x1",
  350.                           "Hooligan x1",
  351.                           "Hooligan x2",
  352.                           "Warrior x2, Fiend x2",
  353.                           "Warrior x2, Fiend x4",
  354.                           "Conjurer x1, (Summon Imp x1)",
  355.                           "Conjurer x1, (Summon RockMoth x1)",
  356.                           "Conjurer x1, (Summon Arachne x1)",
  357.                           "Conjurer x1, (Summon HugeNaga x1)",
  358.                           "Conjurer x1, (Summon Clapper x1)",
  359.                           "Arachne x1",
  360.                           "Arachne x2",
  361.                           "Clapper x1",
  362.                           "Clapper x2",
  363.                 "Unknown",
  364.                 "Unknown",
  365.                 "Unknown",
  366.                 "Unknown",
  367.                           "Were Bat x4",
  368.                           "Were Bat x3",
  369.                           "VampLady x1, Were Bat x3",
  370.                           "VampLady x1, Were Bat x6",
  371.                           "VampLady x2, Were Bat x3",
  372.                           "Yellow Dragonragon x1",
  373.                           "Screamer x2",
  374.                           "Mantcore x1, Screamer x1",
  375.                           "HugeNaga x2",
  376.                           "Screamer x1, HugeNaga x1",
  377.                           "HugeNaga x1, Screamer x2",
  378.                 "Unknown",
  379.                 "Unknown",
  380.                 "Unknown",
  381.                 "Unknown",
  382.                 "Unknown",
  383.                           "MoonCell x2, Pudding x2",
  384.                 "Unknown",
  385.                           "Juclyote x2, MoonCell x2, Grenade x1",
  386.                           "Procyote x1, Juclyote x2",
  387.                           "Procyote x1, Pudding x2",
  388.                           "Juclyote x1, Procyote x2",
  389.                           "Red Worm x1, Procyote x1, Juclyote x1",
  390.                           "Red Worm x2",
  391.                           "H.Ito",
  392.                           "K.Higuchi",
  393.                           "K.Aoki",
  394.                           "A.Matsui",
  395.                           "K.Yoshii",
  396.                           "H.Nakada",
  397.                           "Takahashi",
  398.                 "Unknown",
  399.                           "Warlock x1",
  400.                           "Warlock x1, Kary x1",
  401.                           "Warlock x1, Kary x2",
  402.                           "RedGiant x1",
  403.                           "Warlock x1, Kary x1, RedGiant x1",
  404.                           "RedGiant x2",
  405.                           "Warlock x2, RedGiant x1",
  406.                           "Dragon Bone x1",
  407.                           "Ging-Ryu x1",
  408.                           "Dragon Bone x1, Warlock x1",
  409.                           "King-Ryu x2",
  410.                           "Warlock x3",
  411.                           "Blue Dragon x1",
  412.                           "FatalEye x1",
  413.                           "Blue Dragon x2",
  414.                           "Ging-Ryu x1, RedGiant x1",
  415.                           "FatalEye x2",
  416.                           "D.Fossil x1",
  417.                           "King-Ryu x1",
  418.                           "King-Ryu x1, Ging-Ryu x1",
  419.                           "Tricker x1",
  420.                           "Tricker x1",
  421.                           "PinkPuff x5",
  422.                           "EvilMask x1",
  423.                 "Unknown",
  424.                           "Red D. x1",
  425.                           "Red D. x2",
  426.                           "Red D. x1, Behemoth x1",
  427.                           "EvilMask x1",
  428.                           "Behemoth x2",
  429.                           "EvilMask x2",
  430.                           "Red D. x3",
  431.                 "Unknown",
  432.                           "Breath x1",
  433.                           "Mind x1",
  434.                           "Behemoth x1",
  435.                 "Unknown",
  436.                 "Unknown",
  437.                 "Unknown",
  438.                 "Unknown",
  439.                 "Unknown",
  440.                 "Unknown",
  441.                 "Unknown",
  442.                 "Unknown",
  443.                 "Unknown",
  444.                 "Unknown",
  445.                 "Unknown",
  446.                 "Unknown",
  447.                 "Unknown",
  448.                 "Unknown",
  449.                 "Unknown",
  450.                 "Unknown",
  451.                 "Unknown",
  452.                 "Unknown",
  453.                 "Unknown",
  454.                 "Unknown",
  455.                 "Unknown",
  456.                 "Unknown",
  457.                 "Unknown",
  458.                           "Pudding x4",
  459.                           "Pudding x2, Grenade x2",
  460.                           "Balloon x2, Grenade x2",
  461.                           "Slime x1, Tofu x1, Pudding x1",
  462.                           "Red Worm x1, Grenade x3",
  463.                 "Unknown",
  464.                 "Unknown",
  465.                 "Unknown",
  466.                 "Unknown",
  467.                 "Unknown",
  468.                 "Unknown",
  469.                 "Unknown",
  470.                 "Unknown",
  471.                 "Unknown",
  472.                 "Unknown",
  473.                 "Unknown",
  474.                 "Unknown",
  475.                 "Unknown",
  476.                 "Unknown",
  477.                 "Unknown",
  478.                 "Unknown",
  479.                 "Unknown",
  480.                 "Unknown",
  481.                 "Unknown",
  482.                 "Unknown",
  483.                 "Unknown",
  484.                 "Unknown",
  485.                 "Unknown",
  486.                 "Unknown",
  487.                           "TrapRose x1, GlomWing x2, Crawler x2",
  488.                           "Medusa x1, Gorgon x1, Stoneman x1",
  489.                           "Talantla x1, BlackCat x2",
  490.                           "Egg(BlackLiz x1)",
  491.                           "Egg(Lamia x1)",
  492.                           "Egg(HugeNaga x1)",
  493.                           "Egg(Green Dragon x1)",
  494.                           "Egg(Yellow Dragon x1)"
  495.                         }
  496.  
  497.  
  498. local function retrievegroup(formation)
  499.  
  500.     if formation < 0x1DF then
  501.         return TableEnemyFormation[formation+1]
  502.     else
  503.         return "Unknown"
  504.     end
  505.    
  506. end
  507.  
  508. local function ecords_y(y)
  509.     local ex = bit.lshift(bit.band(y,0x0F),3) +0x0C - 0x16
  510.     return ex
  511. end
  512.  
  513. local function ecords_x(x)
  514.     local ey = bit.rshift(bit.band(x,0xF0),1) + 8 + 0x10
  515.     return ey
  516.  end
  517.  
  518. local function rndbattle()
  519.  
  520.     local steps = 0
  521.     local encounter = false
  522.     local val1 = 0
  523.     local val2 = 0
  524.     local val3 = 0
  525.     local val4 = 0
  526.     local val5 = 0
  527.     local rollover = false
  528.     local area = memory.readbyte(0x7E1700)
  529.  
  530.     if area == 0 then
  531.         -- Earth world map
  532.         while encounter == false do
  533.  
  534.             steps = steps +1
  535.  
  536.             val1 = bit.band(bit.rshift(memory.readbyte (0x7E1707),2),0xF8)
  537.             val2 = bit.rshift(memory.readbyte(0x7E1706),5) + val1
  538.             val3 = memory.readbyte(0x0EC300 + val2)
  539.             val4 = memory.readbyte(0x14EE00+((memory.readbyte(0x7E0686)+steps)) % 0x100)
  540.  
  541.             if (memory.readbyte(0x7E0686) + steps) % 0x100 == 0
  542.                 then rollover = true
  543.             end
  544.  
  545.             if rollover == true then
  546.                 val5 = (val4 + (memory.readbyte(0x7E17EF)) + 0x11) % 0x100
  547.             else
  548.                 val5 = (val4 + memory.readbyte(0x7E17EF)) % 0x100
  549.             end
  550.  
  551.             if val5 < val3 then
  552.                 gui.text(145,3,"(Earth world map)",0x0000FFFF)
  553.                 encounter = true
  554.             end
  555.  
  556.             if steps > 500 then
  557.                 encounter = true
  558.                 steps = 0
  559.                 gui.text(145,3,"(No Encounters)",0x0000FFFF)
  560.             end
  561.  
  562.         end
  563.        
  564.     elseif area == 1 then
  565.     -- Underground
  566.  
  567.             while encounter == false do
  568.  
  569.             steps = steps +1
  570.  
  571.             val1 = (memory.readbyte(0x7E0686) + steps) % 0x100
  572.             val2 = memory.readbyte(0x14EE00 + val1)
  573.  
  574.             if val1 == 0 then
  575.                 rollover =  true
  576.             end
  577.  
  578.             if rollover == true then
  579.                 val3 = val2 + ((memory.readbyte (0x7E17EF)+0x11) % 0x100)
  580.             else
  581.                 val3 = val2 + memory.readbyte (0x7E17EF)
  582.             end
  583.  
  584.             val3 = val3 % 0x100
  585.             val4 = memory.readbyte(0x0EC340)
  586.  
  587.             if val3 < val4 then
  588.                 gui.text(145,3,"(Underworld world map)",0x0000FFFF)
  589.                 encounter = true
  590.             end
  591.  
  592.             if steps > 500 then
  593.                 encounter = true
  594.                 gui.text(145,3,"(No Encounters)",0x0000FFFF)
  595.                 steps = 0
  596.             end
  597.  
  598.         end
  599.  
  600.     elseif area == 2 then
  601.     -- Moon
  602.         while encounter == false do
  603.  
  604.             steps = steps +1
  605.  
  606.             val1 = (memory.readbyte(0x7E0686) + steps) % 0x100
  607.             val2 = memory.readbyte(0x14EE00 + val1)
  608.  
  609.             if val1 == 0 then
  610.                 rollover = true
  611.             end
  612.  
  613.             if rollover == true then
  614.                 val3 = val2 + ((memory.readbyte(0x7E17EF) + 0x11)%0x100)
  615.             else
  616.                 val3 = val2 + memory.readbyte (0x7E17EF)
  617.             end
  618.  
  619.             val3 = val3 % 0x100
  620.             val4 = memory.readbyte(0x0EC341)
  621.  
  622.             if val3 < val4 then
  623.                 gui.text(145,3,"(Moon world map)",0x0000FFFF)
  624.                 encounter = true
  625.             end
  626.  
  627.             if steps > 500 then
  628.                 encounter = true
  629.                 gui.text(145,3,"(No Encounters)",0x0000FFFF)
  630.                 steps = 0
  631.             end
  632.  
  633.         end
  634.  
  635.     elseif area > 2 then
  636.     -- Dungeon
  637.  
  638.         while encounter == false do
  639.  
  640.             steps = steps +1
  641.  
  642.             val1 = memory.readbyte(0x7E1702)
  643.  
  644.             if memory.readbyte(0x7E1701) > 0 then
  645.                 val1 = val1 + 0x100
  646.             end
  647.  
  648.             val2 = memory.readbyte(0x0EC342+ val1)
  649.             val3 = memory.readbyte(0x7E0686) + steps
  650.             val3 = val3 % 0x100
  651.             val4 = memory.readbyte(0x14EE00 + val3)
  652.  
  653.             if val3 == 0 then
  654.                 rollover = true
  655.             end
  656.  
  657.             if rollover == true then
  658.                 val5 = val4 + ((memory.readbyte(0x7E17EF) + 0x11) % 0x100)
  659.             else
  660.                 val5 = val4 + memory.readbyte(0x7E17EF)
  661.             end
  662.  
  663.             val5 = val5 % 0x100
  664.  
  665.             if val5 < val2 then
  666.                 gui.text(145,3,"(Dungeon)",0x0000FFFF)
  667.                 encounter = true
  668.             end
  669.  
  670.             if steps > 500 then
  671.                 encounter = true
  672.                 gui.text(145,3,"(No Encounters)",0x0000FFFF)
  673.                 steps = 0
  674.             end
  675.  
  676.         end
  677.  
  678.     end
  679.  
  680.     return steps
  681.  
  682. end
  683.  
  684. local function enemygroup(num)
  685.  
  686.     local area = memory.readbyte(0x7E1700)
  687.     local group = nil
  688.     local x = 0
  689.     local x2 = 0
  690.     local val1 = 0
  691.     local val2 = 0
  692.     local val3 = 0
  693.     local rollover = false
  694.     local rollover2 = false
  695.     local i = 0
  696.  
  697.     if area == 0 then
  698.     -- Earth world map
  699.         for i=0, num do
  700.  
  701.             val1 = bit.band(bit.rshift(memory.readbyte(0x7E1707),2), 0xF8)
  702.             x = (bit.rshift(memory.readbyte(0x7E1706),5) + val1)  % 0x100
  703.             val2 = bit.lshift(memory.readbyte(0x0ec542+x),3)
  704.             x2 = (memory.readbyte(0x7E0687) + i) % 0x100
  705.  
  706.             if (memory.readbyte(0x7E0687) + i) % 0x100 == 0xFF then
  707.                 rollover = true
  708.             end
  709.  
  710.             if rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) == 0xFF then
  711.                 val3 = memory.readbyte(0x7E17EE) +0x11
  712.             elseif rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) ~= 0xFF then
  713.                 val3 = memory.readbyte(0x14EE00 + x2) + ((memory.readbyte(0x7E17EE) + 0x11)  % 0x100)
  714.             elseif rollover == false then
  715.                 val3 = memory.readbyte(0x14EE00 + x2) + memory.readbyte(0x7E17EE)
  716.             end
  717.  
  718.             val3 = val3 % 0x100
  719.             --val3 = (memory.readbyte(0x14ee00+x2) + memory.readbyte(0x7E17EE)) % 0x100
  720.  
  721.             if val3 > 0xFC  then
  722.                 val2 = val2 + 7
  723.             elseif val3 > 0xEC then
  724.                 val2 = val2 + 6
  725.             elseif val3 > 0xCC then
  726.                 val2 = val2 + 5
  727.             elseif val3 > 0xAC then
  728.                 val2 = val2 + 4
  729.             elseif val3 > 0x81 then
  730.                 val2 = val2 + 3
  731.             elseif val3 > 0x56 then
  732.                 val2 = val2 + 2
  733.             elseif val3 > 0x2B then
  734.                 val2 = val2 + 1
  735.             end
  736.  
  737.             val2 = memory.readbyte(0xEC796+val2)
  738.  
  739.             if memory.readbyte(0x7E1701)  > 0 then
  740.                 val2 = val2 + 0x100
  741.             end
  742.  
  743.             group = val2
  744.  
  745.         end
  746.  
  747.     elseif area == 1 then
  748.         -- Underground world map
  749.  
  750.         for i=0, num do
  751.  
  752.             val1 = bit.band(bit.rshift(memory.readbyte(0x7E1707),3),0xFC)
  753.             x = bit.rshift(memory.readbyte(0x7E1706),5)
  754.             x = (x + val1)  % 0x100
  755.             val2 = bit.lshift(memory.readbyte(0x0ec582+x),3)
  756.             x2 = (memory.readbyte(0x7E0687) + i)  % 0x100
  757.  
  758.             if memory.readbyte(0x7E0687) == 0xFF then
  759.                 rollover = true
  760.             end
  761.  
  762.             if rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) == 0xFF then
  763.                 val3 = memory.readbyte(0x7E17EE) +0x11
  764.             elseif rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) ~= 0xFF then
  765.                 val3 = memory.readbyte(0x14EE00 + x2) + ((memory.readbyte(0x7E17EE) + 0x11)  % 0x100)
  766.             elseif rollover == false then
  767.                 val3 = memory.readbyte(0x14EE00 + x2) + memory.readbyte(0x7E17EE)
  768.             end
  769.  
  770.             val3 = val3 % 0x100
  771.  
  772.             if val3 > 0xFC  then
  773.                 val2 = val2 + 7
  774.             elseif val3 > 0xEC then
  775.                 val2 = val2 + 6
  776.             elseif val3 > 0xCC then
  777.                 val2 = val2 + 5
  778.             elseif val3 > 0xAC then
  779.                 val2 = val2 + 4
  780.             elseif val3 > 0x81 then
  781.                 val2 = val2 + 3
  782.             elseif val3 > 0x56 then
  783.                 val2 = val2 + 2
  784.             elseif val3 > 0x2B then
  785.                 val2 = val2 + 1
  786.             end
  787.  
  788.             val2 = memory.readbyte(0xEC796+val2)
  789.  
  790.             if memory.readbyte(0x7E1701) > 0 then
  791.                 val2 = val2 + 0x100
  792.             end
  793.  
  794.             group = val2
  795.  
  796.         end
  797.  
  798.     elseif area == 2 then
  799.     --Moon world map
  800.         for i = 0, num do
  801.  
  802.             if memory.readbyte(0x7E1707) > 0x20 then
  803.                 x = 2
  804.             end
  805.  
  806.             if memory.readbyte(0x7E1706) > 0x20 then
  807.                 x = x + 1
  808.             end
  809.  
  810.             if (memory.readbyte(0x7E0687) + i) %0x100 == 0xFF then
  811.                 rollover = true
  812.             end
  813.  
  814.             val2 = memory.readbyte(0x0EC592 + x)
  815.             val2 = bit.lshift(val2,3)
  816.             x2 = (memory.readbyte(0x7E0687) + i) % 0x100
  817.  
  818.             if rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) == 0xFF then
  819.                 val3 = memory.readbyte(0x7E17EE) +0x11
  820.             elseif rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) ~= 0xFF then
  821.                 val3 = memory.readbyte(0x14EE00 + x2) + ((memory.readbyte(0x7E17EE) + 0x11)  % 0x100)
  822.             elseif rollover == false then
  823.                 val3 = memory.readbyte(0x14EE00 + x2)+ memory.readbyte(0x7E17EE)
  824.             end
  825.  
  826.             val3 = val3 % 0x100
  827.  
  828.             if val3 > 0xFC  then
  829.                 val2 = val2 + 7
  830.             elseif val3 > 0xEC then
  831.                 val2 = val2 + 6
  832.             elseif val3 > 0xCC then
  833.                 val2 = val2 + 5
  834.             elseif val3 > 0xAC then
  835.                 val2 = val2 + 4
  836.             elseif val3 > 0x81 then
  837.                 val2 = val2 + 3
  838.             elseif val3 > 0x56 then
  839.                 val2 = val2 + 2
  840.             elseif val3 > 0x2B then
  841.                 val2 = val2 + 1
  842.             end
  843.  
  844.             val2 = memory.readbyte(0x0EC796+val2)
  845.  
  846.             if memory.readbyte(0x7E1701) > 0 then
  847.                 val2 = val2 + 0x100
  848.             end
  849.  
  850.             group = val2
  851.  
  852.         end
  853.  
  854.     elseif area > 2 then
  855.  
  856.         for i=0, num do
  857.         --Dungeon
  858.             val1 = memory.readbyte(0x7E1702)
  859.  
  860.             if memory.readbyte(0x7E1701) > 0 then
  861.                 val1 = val1 + 0x100
  862.             end
  863.  
  864.             val2 = bit.lshift(memory.readbyte(0x0EC596+val1),3)
  865.             val3 = memory.readbyte(0x14EE00 + ((memory.readbyte(0x7E0687)+i)%0x100))
  866.  
  867.             if memory.readbyte(0x7E0687) == 0xFF then
  868.                 rollover = true
  869.             end
  870.  
  871.             if rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) == 0xFF then
  872.                 val3 = (memory.readbyte(0x7E17EE)+0x11) % 0x100
  873.             elseif rollover == true and ((memory.readbyte(0x7E0687)+i)%0x100) ~= 0xFF then
  874.                     val3 = val3 + ((memory.readbyte(0x7E17EE) + 0x11) % 0x100)
  875.             elseif rollover == false then
  876.                 val3 = val3 + memory.readbyte(0x7E17EE)
  877.             end
  878.  
  879.             val3 = val3 % 0x100
  880.  
  881.             if val3 > 0xFC  then
  882.                 val2 = val2 + 7
  883.             elseif val3 > 0xEC then
  884.                 val2 = val2 + 6
  885.             elseif val3 > 0xCC then
  886.                 val2 = val2 + 5
  887.             elseif val3 > 0xAC then
  888.                 val2 = val2 + 4
  889.             elseif val3 > 0x81 then
  890.                 val2 = val2 + 3
  891.             elseif val3 > 0x56 then
  892.                 val2 = val2 + 2
  893.             elseif val3 > 0x2B then
  894.                 val2 = val2 + 1
  895.             end
  896.  
  897.             val4 = memory.readbyte(0x0EC816 + val2)
  898.  
  899.             if memory.readbyte(0x7E1701) > 0 then
  900.                 val4 = val4 + 0x100
  901.             end
  902.  
  903.             group = val4
  904.  
  905.         end
  906.  
  907.     end
  908.  
  909.     return group
  910.  
  911. end
  912.  
  913. local function predictgroup()
  914.     gui.text(3,13,"Encounter Groups:",0xABFF93FF)
  915.     for i = 0, groupmax-1 do
  916.         if i == 0 then
  917.             gui.text(3,23,"1: " .. retrievegroup(enemygroup(i)) .. " (0x" .. string.format("%X",enemygroup(i)) .. ")",0xABFF93FF)
  918.         else
  919.             gui.text(3,23+(10 * i),i+1 .. ": " .. retrievegroup(enemygroup(i)) .. " (0x" .. string.format("%X",enemygroup(i)) .. ")",0xFFFFFF7F)
  920.         end
  921.     end
  922.  end
  923.  
  924. local function enemygroupexists(num)
  925.  
  926.    local area = memory.readbyte(0x7E1700)
  927.    local group = 0
  928.    local x = 0
  929.    local x2 = 0
  930.    local val1 = 0
  931.    local val2 = 0
  932.    local val3 = 0
  933.    local rollover = false
  934.    local rollover2 = false
  935.    local i = 0
  936.    local j = 0
  937.    
  938.    if area == 0 then
  939.    -- Earth world map
  940.      
  941.          val1 = bit.band(bit.rshift(memory.readbyte(0x7E1707),2), 0xF8)
  942.          x = (bit.rshift(memory.readbyte(0x7E1706),5) + val1)  % 0x100
  943.          val2 = bit.lshift(memory.readbyte(0x0ec542+x),3)
  944.  
  945.          for j = val2, val2+7 do
  946.             if num == memory.readbyte(0xEC796+j) then
  947.                group = 1
  948.             end
  949.             if memory.readbyte(0x7E1701)  > 0 then
  950.                if num == (memory.readbyte(0xEC796+j)+0x100) then
  951.                   group = 1
  952.                end
  953.             end
  954.          end
  955.  
  956.    elseif area == 1 then
  957.       -- Underground world map
  958.  
  959.          val1 = bit.band(bit.rshift(memory.readbyte(0x7E1707),3),0xFC)
  960.          x = bit.rshift(memory.readbyte(0x7E1706),5)
  961.          x = (x + val1)  % 0x100
  962.          val2 = bit.lshift(memory.readbyte(0x0ec582+x),3)
  963.          
  964.          
  965.          for j = val2, val2+7 do
  966.             if num == memory.readbyte(0xEC796+j) then
  967.                group = 1
  968.             end
  969.             if memory.readbyte(0x7E1701)  > 0 then
  970.                if num == (memory.readbyte(0xEC796+j)+0x100) then
  971.                   group = 1
  972.                end
  973.             end
  974.          end
  975.  
  976.    elseif area == 2 then
  977.    --Moon world map
  978.  
  979.          if memory.readbyte(0x7E1707) > 0x20 then
  980.             x = 2
  981.          end
  982.          
  983.          if memory.readbyte(0x7E1706) > 0x20 then
  984.             x = x + 1
  985.          end
  986.          
  987.          val2 = memory.readbyte(0x0EC592 + x)
  988.          val2 = bit.lshift(val2,3)
  989.          
  990.          for j = val2, val2+7 do
  991.             if num == memory.readbyte(0xEC796+j) then
  992.                group = 1
  993.             end
  994.             if memory.readbyte(0x7E1701)  > 0 then
  995.                if num == (memory.readbyte(0xEC796+j)+0x100) then
  996.                   group = 1
  997.                end
  998.             end
  999.          end
  1000.  
  1001.    elseif area > 2 then
  1002.  
  1003.       --Dungeon
  1004.          val1 = memory.readbyte(0x7E1702)
  1005.          
  1006.          if memory.readbyte(0x7E1701) > 0 then
  1007.             val1 = val1 + 0x100
  1008.          end
  1009.          
  1010.          val2 = bit.lshift(memory.readbyte(0x0EC596+val1),3)  
  1011.          
  1012.          for j = val2, val2+7 do
  1013.             if num == memory.readbyte(0xEC816+j) then
  1014.                group = 1
  1015.             end
  1016.             if memory.readbyte(0x7E1701)  > 0 then
  1017.                if num == (memory.readbyte(0xEC796+j)+0x100) then
  1018.                   group = 1
  1019.                end
  1020.             end
  1021.          end
  1022.  
  1023.    end
  1024.  
  1025.    return group
  1026.  
  1027. end
  1028.  
  1029. local function findenemy(e,x)
  1030.  
  1031.     local c = 0
  1032.     local i = 0
  1033.     local result  = ": "
  1034.  
  1035.     if enemygroupexists(e) == 0 then
  1036.         result = "(Enemy not present in area)"
  1037.         return result
  1038.     end
  1039.  
  1040.     while c ~= x  do
  1041.         if enemygroup(i) == e then
  1042.             c = c +1
  1043.  
  1044.             if c ~= x then
  1045.                 result = result .. i .. ","
  1046.             else
  1047.                 result = result .. i
  1048.             end
  1049.  
  1050.         end
  1051.  
  1052.       i = i + 1
  1053.  
  1054.       if i >= 500 and c == 0 then
  1055.          result = "(Enemy not present in next 500 battles)"
  1056.          c = x
  1057.       end
  1058.     end
  1059.  
  1060.     result = retrievegroup(e) .. " (" .. string.format("%X",e) .. ")" .. result
  1061.     return result
  1062.  
  1063. end
  1064.  
  1065. local function drawatb_e(x,y,atb,e)
  1066.     gui.box(x-3, y-4, x+17, y-1, 0x00000000, 0x000000FF)
  1067.  
  1068.     if atb == 0 then
  1069.         enemy_atbm[e] = 0
  1070.         gui.box(x-3, y-4, x+17, y-1, 0xFF0000C0, 0000000000)
  1071.  
  1072.     else
  1073.         if enemy_atbm[e] == 0 then
  1074.             enemy_atbm[e] = atb
  1075.         end
  1076.  
  1077.         gui.box(x-3, y-4, (x-3)+20-((20/enemy_atbm[e])*atb), y-1, 0xFF0000C0, 0000000000)
  1078.         --gui.text(x,y, enemy_atb[e] .. "/" .. enemy_atbm[e])
  1079.  
  1080.     end
  1081. end
  1082.  
  1083. local function drawatb_c(x,y,atb,c)
  1084.     gui.box(x-3, y-4, x+17, y-1, 0x00000000, 0x000000FF)
  1085.  
  1086.     if atb == 0 then
  1087.         char_atbm[c] = 0
  1088.         gui.box(x-3, y-4, x+17, y-1, 0xFFFF00C0, 0000000000)
  1089.  
  1090.     else
  1091.         if char_atbm[c] == 0 then
  1092.             char_atbm[c] = atb
  1093.         end
  1094.        
  1095.         gui.box(x-3, y-4, (x-3)+20-((20/char_atbm[c])*atb), y-1, 0xFFFF00C0, 0000000000)
  1096.         --gui.text(x,y, character_atb[c] .. "/" .. char_atbm[c])
  1097.  
  1098.     end
  1099. end
  1100.  
  1101. -- For who knows what reason, the data of the characters are not in order, so this fix it
  1102. local function fix(character)
  1103.     fix_order = {3, 1, 5, 2, 4}
  1104.     return fix_order[character]
  1105. end
  1106.  
  1107. while true do
  1108.  
  1109.     character_atb = {}
  1110.     character_x = {}
  1111.     character_y = {}
  1112.    
  1113.     for c=1, 5 do
  1114.         character_atb[fix(c)] = memory.readbyte(0x7E2A07 + 0x15*(c-1))
  1115.         character_x[fix(c)]   = memory.readbyte(0x7EEFC5 + 0x10*(c-1))
  1116.         character_y[fix(c)]   = memory.readbyte(0x7EEFC6 + 0x10*(c-1))
  1117.     end
  1118.  
  1119.  
  1120.     enemy_atb = {}
  1121.     enemy_cur_hp = {}
  1122.     enemy_max_hp = {}
  1123.     enemy_xy = {}
  1124.  
  1125.     for e=1, 8 do
  1126.         enemy_atb[e]    = memory.readbyte(0x7E2A70 + 0x15*(e-1))
  1127.         enemy_cur_hp[e] = memory.readword(0x7E2287 + 0x80*(e-1))
  1128.         enemy_max_hp[e] = memory.readword(0x7E2289 + 0x80*(e-1))
  1129.         enemy_xy[e]     = memory.readbyte(0x7E29A5 + 0x01*(e-1))
  1130.     end
  1131.  
  1132.     battle = memory.readbyte(0x7E0201)
  1133.     attack = memory.readbyte(0x7E3581) -- normal 00, back 08
  1134.  
  1135.     if battle ~= 0x85 then
  1136.  
  1137.         for c=1, 5 do
  1138.             drawatb_c(character_x[c], character_y[c], character_atb[c], c)
  1139.         end
  1140.  
  1141.         for e=1, 8 do
  1142.             if enemy_cur_hp[e] > 0 then
  1143.                 gui.text( ecords_x(enemy_xy[e]), ecords_y(enemy_xy[e]), e .. " " .. enemy_cur_hp[e] .. "/" .. enemy_max_hp[e] )
  1144.                 drawatb_e(ecords_x(enemy_xy[e]), ecords_y(enemy_xy[e]), enemy_atb[e], e)
  1145.             end
  1146.         end
  1147.  
  1148.     else
  1149.    
  1150.         for i=1,5 do
  1151.             char_atbm[i] = 0
  1152.         end
  1153.  
  1154.         for i=1,8 do
  1155.             enemy_atbm[i] = 0
  1156.         end
  1157.  
  1158.         gui.text(  3, 3, "Steps until random battle: ")
  1159.         gui.text(111, 3, rndbattle(), 0xFFFF00FF)
  1160.         gui.text(125, 3, "("..string.format("%X",memory.readbyte(0x7E0686)) .. ")")
  1161.  
  1162.         if rndbattle() ~= 0 then
  1163.             predictgroup()
  1164.         end
  1165.  
  1166.         -- Uncomment to find a specific enemy group, the way its implemented slows the emulator down tremendously if its a rare spawn or a high amount is desired
  1167.         -- format is findenemy(ENEMY VALUE,NEXT NUMBER OF ENCOUNTERS)
  1168.         -- I.E. findenemy(0x196,5) will look for the next 5 pink puff encounters
  1169.         --gui.text(5,100,findenemy(0x196,2))
  1170.     end
  1171.  
  1172.     snes9x.frameadvance()
  1173.  
  1174. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!