smrpg lua

local posy=7

function smvinfo()
        local hours = math.floor(movie.framecount()/216000)
        local minutes = math.floor((movie.framecount() - hours*216000)/3600)
        local seconds = math.floor((movie.framecount() - hours*216000 - minutes*3600)/60)
        local frames = (movie.framecount() - hours*216000 -  minutes*3600 - seconds*60)*5/3

    if movie.playing () == true then
        gui.text(1,1,string.format("frames:%d/%d (%d:%02d:%02d.%02d)\nlags:%d\nrerecords:%d",movie.framecount(), movie.length(),hours,minutes,seconds,frames,emu.lagcount(), movie.rerecordcount ()))
    elseif movie.recording() == true then
        gui.text(1,1,string.format("frames:%d (%d:%02d:%02d.%02d)\nlags:%d\nrerecords:%d",movie.framecount(),hours,minutes,seconds,frames,emu.lagcount(), movie.rerecordcount ()))
    else
        gui.text(1,1,string.format("frames:%d (%d:%02d:%02d.%02d,no movie)\nlags:%d",emu.framecount(),hours,minutes,seconds,frames,emu.lagcount()))
    end
end

function placeboautotext()
    local convo=memory.readbyte(0x7E0210)
    local convo2=memory.readbyte(0x7E06E1)
    if convo == 163 or convo2 == 140 then
        joypad.set(1, {A = true})
    end
end


function draw()
    -- enemy HPs
    local e1=memory.readword(0x7EFC11)
    local e2=memory.readword(0x7EFC91)
    local e3=memory.readword(0x7EFD11)
    local e4=memory.readword(0x7EFD91)
    local e5=memory.readword(0x7EFE11)
    local e6=memory.readword(0x7EFE91)
    --party HPs
    local p1=memory.readword(0x7EFA91)
    local p2=memory.readword(0x7EFB11)
    local p3=memory.readword(0x7EFB91)
    --position in field
    local x=memory.readword(0x702002)
    local y=memory.readword(0x702000)
    local z=memory.readword(0x702004)
    --other infomation
    local coin=memory.readword(0x7FF8AF)
    local fcoin=memory.readbyte(0x7FF8B3)
    local fp=memory.readbyte(0x7EFA0C)
    local mfp=memory.readbyte(0x7EFA0D)
    local ffp=memory.readbyte(0x7FF8B1) -- Field FP
    local fmfp=memory.readbyte(0x7FF8B2) --Field maxFP
    local jump=memory.readbyte(0x7EE010) -- Jump power
    local firec=memory.readbyte(0x702D6C) -- number of fbs you did
    local firet=memory.readbyte(0x702D6D)
    local damage=memory.readword(0x7E00C2)
    local field=memory.readbyte(0x7E000A)
    local field2=memory.readbyte(0x7E01D8)
    --charactar exps
    local mexp=memory.readword(0x7FF80A)
    local mexp2=memory.readword(0x7FF85A)
    local gexp=memory.readword(0x7FF846)
    local bexp=memory.readword(0x7FF832)
    local pexp=memory.readword(0x7FF81E)
    --charactar LVs and future exp in battle
    local mlv=memory.readbyte(0x7FF800)
    local mlv2=memory.readbyte(0x7FF850)
    local glv=memory.readbyte(0x7FF83C)
    local blv=memory.readbyte(0x7FF828)
    local plv=memory.readbyte(0x7FF814)
    local gaexp=memory.readword(0x7EFA02)
    --charactar accessory
    local mac=memory.readbyte(0x7FF80E)
    local mac2=memory.readbyte(0x7FF85E)
    local gac=memory.readbyte(0x7FF84A)
    local bac=memory.readbyte(0x7FF836)
    local pac=memory.readbyte(0x7FF822)


        if e2 == 21845 then
            e2 = 0
        end
        if e3 == 21845 then
            e3 = 0
        end
        if e4 == 21845 then
            e4 = 0
        end
        if e5 == 21845 then
            e5 = 0
        end
        if e6 == 21845 then
            e6 = 0
        end

        if p2 == 21845 then
            p2 = 0
        end

        if p3 == 21845 then
            p3 = 0
        end

        if firec > 100 or firet > 100 then
            firec,firet = 0,0
        end

        if damage > 9000 then
            damage=0
        end

        --who equips Exp. Booster
        if mac==80 and field == 6 or mac==80 and field ==2 and field2 == 2 then
            gui.text(172,9,"*")
        elseif pac==80 and field == 6 or pac==80 and field ==2 and field2 == 2 then
            gui.text(172,41,"*")
        elseif mac2==80 and field == 6 or mac2==80 and field ==2 and field2 == 2 then
            gui.text(172,17,"*")
        elseif gac==80 and field == 6 or gac==80 and field ==2 and field2 == 2 then
            gui.text(172,25,"*")
        elseif bac==80 and field == 6 or bac==80 and field ==2 and field2 == 2 then
            gui.text(172,33,"*")
        end

        if field == 2 then
            gui.text(1,1*posy*4,string.format("x:%d\ny:%d\nz:%d",x,y,z))
            gui.text(1,1*posy*8,string.format("coin:%d\nfrog:%d\nfp:%d/%d",coin,fcoin,ffp,fmfp))
        if field2 == 2 then
            gui.text(180,1,"---exp(lv)---")
            gui.text(180,9,string.format("Mario  : %d(%d) \nMallow : %d(%d)\n Geno  : %d(%d)\nBowser : %d(%d)\nPeach  : %d(%d)",mexp,mlv,mexp2,mlv2,gexp,glv,bexp,blv,pexp,plv))
        end

        elseif field == 6 then
            gui.text(1,posy*4,"-enemy")
            gui.text(1,1+posy*5,string.format("e1:%d\ne2:%d\ne3:%d\ne4:%d\ne5:%d\ne6:%d",e1,e2,e3,e4,e5,e6))
            gui.text(1,posy*13,"-party")
            gui.text(1,1+posy*14,string.format("p1:%d\np2:%d\np3:%d",p1,p2,p3))
            gui.text(1,posy*18,"-misc")
            gui.text(1,1+posy*19,string.format("FP:%d/%d\njump:%d",fp,mfp,jump))
            gui.text(1,1+posy*22,string.format("FBcount:%d\nFBtimer:%d\ndmg:%d",firec,firet,damage))
            gui.text(180,1,"---exp(lv)---")
            gui.text(180,9,string.format("Mario  : %d(%d) \nMallow : %d(%d)\n Geno  : %d(%d)\nBowser : %d(%d)\nPeach  : %d(%d)\nexpgain: %d",mexp,mlv,mexp2,mlv2,gexp,glv,bexp,blv,pexp,plv,gaexp))
        end
end

while true do
    smvinfo()
    placeboautotext()
    draw()
    emu.frameadvance()
end