Memory use - how much do you use?

[mackrackit]

This might help.
It is a little program I have been playing with that reads the LST file and pulls some info from it.

It is a work in progress so it may not be 100% accurate and it seems to work better on 18Fs.
Some of those LST file can be quite large.

Click on the link below and save. The is nothing to install. Just click and run.
http://www.mac.mf3x3.com/downloads/lst/LST_V.exe

<img src="http://www.picbasic.co.uk/forum/attachment.php?attachmentid=3098&stc=1&d=123165757 1">

[keymuu]

This might help.
It is a little program I have been playing with that reads the LST file and pulls some info from it.

It is a work in progress so it may not be 100% accurate and it seems to work better on 18Fs.
Some of those LST file can be quite large.

Click on the link below and save. There is nothing to install. Just click and run.
http://www.mac.mf3x3.com/downloads/lst/LST_V.exe

Thank you Charles and Dave!

The List View seems to work just perfectly ...
I just don't understand why not PBP do show more info especially when it would be quite easy to incorporate all that info into the compilation output... Perhaps the time is not ready yet?

Thank you all for the help on this matter

[Acetronics2]

Hi,

Thanks, Dave ... nice tool. ( heuuu .. could you just keep the last opened folder in the "open" window ??? )

Another way in MPLAB ... the "Memory usage gauge" works with PBP !!!

just open the "mem usage Gauge" and use " File \ Import \ Myfile.hex " in the menu ... the program "Camembert" ( understand : meter ) will work as it should ... but not the Data one ...

Alain

[mackrackit]

Thanks, Dave ... nice tool. ( heuuu .. could you just keep the last opened folder in the "open" window ??? )

Thanks.
That is one of the things I will add on the next version (someday).

BTW. Here is the source code, written in Liberty Basic.
I will most likely use Python the next time.

[setup.main.Window]

    '-----Begin code for #main

    nomainwin
    WindowWidth = 550
    WindowHeight = 225
    UpperLeftX=int((DisplayWidth-WindowWidth)/2)
    UpperLeftY=int((DisplayHeight-WindowHeight)/2)


    '-----Begin GUI objects code

    statictext #main.statictext1, "Code Path and Name",   5,  47, 155,  20
  '  TextboxColor$ = "white"
    textbox #main.name,   5,  67, 530,  25
    statictext #main.statictext3, "Program Memory",   5, 122, 120,  20
    statictext #main.statictext4, "Chip",  10,  17,  27,  20
    textbox #main.chip,  45,  17, 100,  25
    statictext #main.statictext6, "Free", 240, 102, 105,  20
    textbox #main.ByteWord, 130, 122, 50,  25
    textbox #main.FreeWord, 210, 122, 100,  25
    statictext #main.statictext8, " Used", 355, 102,  55,  20
    textbox #main.UsedWords, 325, 122, 100,  25
    statictext #main.statictext12, "Percent Used", 440, 102,  82,  20
    textbox #main.PercentWord, 435, 122, 100,  25
    button #main.btOPEN,"OPEN",[btOPEN], UL, 345,  17,  80,  25
    button #main.btREFRESH,"REFRESH",[btREFRESH], UL, 440,  17,  95,  25
    statictext #main.statictext16, "SRAM (BYTES)",  35, 152, 120,  20
 '   statictext #main.statictext15, "EEPROM (BYTES)",  30, 177, 140,  20
    textbox #main.ramF, 210, 152, 100,  25
 '   textbox #main.eepF, 210, 182, 100,  25
    textbox #main.ramU, 325, 152, 100,  25
 '   textbox #main.eepU, 325, 182, 100,  25
    textbox #main.ramP, 435, 152, 100,  25
 '   textbox #main.eepP, 435, 182, 100,  25
    statictext #main.txtWORKING, "WORKING", 185,  17,  85,  20
    statictext #main.txtFINISHED, "FINISHED", 185,  17,  75,  20


    '-----End GUI objects code

    open "LST VIEW" for window as #main
    print #main.UsedWords, "!font ms_sans_serif 10 bold"
    print #main, "font ms_sans_serif 10"
    print #main.statictext3, "!font ms_sans_serif 10 bold"
    print #main.statictext16, "!font ms_sans_serif 10 bold"
 '   print #main.statictext15, "!font ms_sans_serif 10 bold"
    print #main.txtWORKING, "!font ms_sans_serif 10 bold"
    print #main.txtFINISHED, "!font ms_sans_serif 10 bold"
    print #main, "trapclose [quit.main]"

    [main.inputLoop]   'wait here for input event
   ' print #handle.ext, "!hide"
    print #main.txtWORKING, "!hide"
    print #main.txtFINISHED, "!hide"
    wait

    [btOPEN]   'Perform action for the button named 'btOPEN'
    filedialog "OPEN ","C:\*.lst", openfile$
    if openfile$ = "" then wait
    [rFresh]
    open openfile$ for input as #Lfile
    print #main.name, openfile$
    print #main.txtWORKING, "!show"
    print #main.txtFINISHED, "!hide"
    [LOOPcn]
    line input #Lfile, line$
    if mid$(line$,29,9)= "RAM_START" then RS$ = mid$(line$,68,6)
    if mid$(line$,29,7)= "RAM_END" then RE$ = mid$(line$,68,6)
    if mid$(line$,69,11)= "RAM_START +" then RFIN$ = mid$(line$,81,6)
   ' if mid$(line$,29,9)= "RAM_START" then #main.ramF,mid$(line$,68,6)
   ' if mid$(line$,29,7)= "RAM_END" then #main.ramU,mid$(line$,68,6)
    if mid$(line$,1,26)= "Program Memory Bytes Used:" then #main.UsedWords,mid$(line$,27,92)
    if mid$(line$,1,26)= "Program Memory Words Used:" then #main.UsedWords,mid$(line$,27,92)
    if mid$(line$,1,26)= "Program Memory Bytes Free:" then #main.FreeWord,mid$(line$,27,92)
    if mid$(line$,1,26)= "Program Memory Words Free:" then #main.FreeWord,mid$(line$,27,92)
    if mid$(line$,1,2)= "__" then #main.chip,mid$(line$,3,12)
    if eof(#Lfile) = -1 then [closeFILE1]
    goto [LOOPcn]
    '###################################################
    [closeFILE1]
    close #Lfile
    open openfile$ for input as #Lfile
    [LOOPpm]
    line input #Lfile, line$
    if mid$(line$,1,26)= "Program Memory Bytes Used:" then #main.ByteWord,mid$(line$,16,5)
    if mid$(line$,1,26)= "Program Memory Words Used:" then #main.ByteWord,mid$(line$,16,5)
    if eof(#Lfile) = -1 then [closeFILE2]
    goto [LOOPpm]
    '####################################################
    [closeFILE2]
    close #Lfile
    print #main.chip, "!contents? cName$"
    bFile$ = "C:\PBP\";(trim$(cName$));".bas"
  '  print #main.eepP,bFile$
   goto [closeFILE]
    wait

    [btREFRESH]   'Perform action for the button named 'btREFRESH'
    if openfile$ = "" then [rfERROR]'notice "SELECT FILE"
    goto [rFresh]
    wait

    [closeFILE]
  '  close #Lfile
    print #main.UsedWords,"!contents? UW"
    print #main.FreeWord,"!contents? FW"
    TW = UW + FW
    PW = (UW / TW) * 100
    print #main.PercentWord,using("###.##",PW)
    ramS = hexdec(RS$)
    ramE = hexdec(RE$)
    ramT = ramE - ramS + 1
    ramF = hexdec(RFIN$)
    ramU = ramF - ramS
    ramFree = ramT - ramU
    ramP = (ramU / ramT) * 100
    print #main.ramF,ramFree
    print #main.ramU,ramU
    print #main.ramP,using("###.##",ramP)
    print #main.txtWORKING, "!hide"
    print #main.txtFINISHED, "!show"
    wait

    [rfERROR]
    notice "SELECT FILE"
    goto [main.inputLoop]
    wait

    [quit.main] 'End the program
    close #main
    end

[Acetronics2]

Hi, Dave

You will laugh, but ...

I decided long time ago to be ONLY a Computer USER !!! ...

MUCH better for Health ... lol

Alain

[mackrackit]

Hi, Dave

You will laugh, but ...

I decided long time ago to be ONLY a Computer USER !!! ...

MUCH better for Health ... lol

Alain

Yep, got a chuckle hearing that from you
I think sometimes I should decide as you did.

[ScaleRobotics]

I have some code that I have been working on for a PIC12F675. When I try to add another variable to it and then compile, I get - Error: Unable to fit variable y -. I am using the latest pbp, microcode studio, and mpasm v8.15. When I use Mackrackit's LST View program, it shows my successful compile (one less variable) as using about 70 percent of the code space, and 48 percent of the sram space. What would be stopping me from being able to use the other half of my sram? I looked in the 12F675.BAS file, and my memory map is BANK0 $0020, $005F, which is correct in the data sheet. 12F675 is selected in mcs.

Confused....