TweetFollow Us on Twitter

About Memory
Volume Number:1
Issue Number:7
Column Tag:BASIC SChool

Memory Management in Tight Spaces

By Dave Kelly

Of major concern in any program development is that of memory management. This is especially true on the 128K Macintosh. MSBasic leaves only about 14K free program space to work with. However, on the 512K Mac there is over 330K free program space. If you are disappointed by the memory limitations there are some ways which you may get around some of the limitations.

There are three different areas of memory which you can have control over:

• The stack

• The Heap

• BASIC’s data segment

The Stack and the Heap

Macintosh applications can allocate and release memory by using the stack or the heap. The stack is used to temporarily store information telling BASIC where to return to from GOSUBs, FOR NEXT loops, WHILE WEND, subprogram calls and nested user defined functions. The Macintosh ROM routines require alot of stack space depending on the number of levels of nesting of controls (such as BUTTONS, EDIT FIELDS). The information on the stack is stored in LIFO (last-in-first-out) order. The last item put on the stack is always the first to be removed. The information is always released at the top of the stack, never in the middle, so there can never be blank “holes” in the stack. As in figure 1, the stack starts at a fixed address in high memory and as information is added to the stack it grows toward low memory (top of stack).

The heap contains blocks of memory which are allocated and released as needed by the Macintosh Operating System’s Memory Manager. The Memory Manager keeps track of the heap section of memory and “compacts” the heap if necessary in order to conserve the heap space. If you notice when you load BASIC only a part of BASIC loads at a time. Part of BASIC is in memory, and the rest is in sections that are loaded into memory as needed. Because the heap is smaller on the 128K Mac, there is considerably more disk access involved as sections of BASIC are swapped in and out of the heap. Whenever you use any of the Macintosh “features” such as MENU, BUTTON, EDIT FIELD, PICTURE, SOUND, WAVE, or WINDOW, a part of the heap is used to keep track of these “resources”. Open desk accessories also use a portion of the heap. The heap starts at low memory and adds blocks toward high memory. After a program has been running for awhile the heap will become fragmented with “holes” in the middle as various resources are released. By closing WINDOWs, MENUs and closing desk applications memory can be made available in the stack for other resources. The SOUND/WAVE buffer can be released (1024 bytes of heap) by using a WAVE 0 statement when it is no longer needed. Also a PICTURE ON immediately followed by PICTURE OFF will reclaim memory which was used by a previous picture that was in the heap. The Memory Manager will compact the contents of the heap.

One note on the speed of your programs as it pertains to the heap. I have found that when first defining EDIT FIELD and BUTTON controls that it takes longer the first time through the program while the heap allocates memory to keep the BUTTON and EDIT FIELD resources. Re-opening a window that had been closed which contains buttons and edit fields will use the same resources which were previously allocated in the heap. There are always two heap areas in memory: the system heap, which is used by the Toolbox and Operating System, and the application heap, which is used by the application program (in our case the application is MSBASIC).

The BASIC data segment area of memory is the area used to store the BASIC program and variables. This area also contains area for file buffers for opened files.

CLEAR AND FRE(n)

MSBASIC has provided the CLEAR statement to allocate memory to the three areas of RAM mentioned above. The CLEAR statement adjusts the number of bytes reserved for the stack and the data segment. The syntax is:

CLEAR [,[data-segment-size ][, stack-size ]]

The remaining RAM is left for the heap space. The heap space is calculated by taking the total amount of RAM (128K or 512K) minus the data segment size and the stack size ( heap = Total RAM - ( data-segment-size + stack-size )). For most programs on a 512K Mac it is not necessary to use the CLEAR statement, but it is needed for many programs to run on the 128K Mac. You should keep this in mind if you intend for your programs to run on any Mac (128K or 512K). You can use the statement FRE(n ) to find out how much free memory is available in each part of RAM. FRE(-1) returns the amount of free memory in the heap. FRE (-2) returns the amount of stack which has never been used. By using this value the program can be adjusted using CLEAR to use memory the most efficiently. Be sure that the worst case is used when fine tuning the memory. If (n ) is (“ “) or any other number (except -1 or -2) the expression returns the number of free bytes available in BASIC’s data segment. All of the FRE statements will compact string space. Each time a string is defined in BASIC part of the data segment area of memory is used. After swapping and shuffling strings around in your program the data segment becomes full of strings, most of which are no longer needed. For example if a string A$ is assigned as “MACINTOSH” and then reassigned as “MACTUTOR” , new space is allotted for “MACTUTOR” but the old string still exists in memory. A$ would only point to the most recent assignment of A$. By using the FRE( n ) statement, garbage collection is done and all the currently assigned strings are compacted in the data segment of memory.

USING RUN OR CHAIN

If you find that using the CLEAR statement still doesn’t give you enough memory you can split your program into subprograms and load in each program as needed. The RUN statement may be used to load and execute another BASIC program. The syntax is RUN filename[,R]. The R added to the end of the statement will cause all open data files to remain open. The problem with using the RUN statements is that when RUN executes all variables are erased. This means that all variables which are needed in the next program segment would need to be saved (temporarily) to the disk. RUN is best used to load new programs that are independent from the calling program.

To preserve your variables you should use the CHAIN statement. The syntax is: CHAIN [ MERGE ]filespec [,[expression ] [,ALL ][, DELETE range ]]] . The MERGE statement appends the called program to the end of the program currently in memory. The called program must have been saved as an ASCII file for this to work. filespec is the specification (disk name and filename) and expression is an expression or line number which tells BASIC where to start executing the called program. An alphanumeric label may not be used as this expression. If you use the ALL option, all the variables in the current program in memory are passed to the called program. The DELETE statement is used to delete lines of program currently in memory to make room for the called program. The BASIC manual is clear describing the syntax used here.

CHOOSING YOUR FILENAME

Some of these statements may seem to be somewhat trivial, but it takes some planning to determine when and how each section of program should be loaded and executed. The program FILE$ Demo demonstrates a way that the user can select which program or file to use. The function FILE$(n [,prompt-string ]) is supplied by MSBASIC to allow various types of files to be selected using the mini-finder dialog box. I’m sure that we are familiar with it from using it in most applications.

Fig. 1 Selection of file types

The parameter n is a number 0 or 1. FILE$(0) calls a dialog box which prompts the user for the name of a file. The prompt-string is displayed as the default filename. This is useful when you want to let the user decide which filename to use to save data to the disk. FILE$(1) calls up the mini-finder dialog box and prompts the user to select a filename in the list. You can use this to select files in either disk drive or on other disks. Both commands return the name of the file selected. This filename can then be used to load or save data or to call a new program. The prompt- string in the FILE$(1) statement contains a list of the file types, 4 characters per type. The file type is attached to the filename in the directory and the finder uses it to know what kind of file each icon represents.

In the demo program a window opens and asks for the user to select the type or types that should be included in the file selection. This way certain types of files could be screened out. The basic stores files as TEXT, but the type may be changed by using the NAME statement. In this way you could use a special type that “belongs” only to your program. If no types are selected in the demo program, then the prompt-string is blank and all types are selected. After the desired type buttons are selected selecting the “Select Files” button will execute the FILE$(1) statement and the mini-finder dialog box will appear. Select a filename and push the open button and you can see the format that is returned by the FILE$(1) statement. There are many possible ways that this could be used which are left to you to decide for your particular programing application.

Any particular topic that you would like to see covered in MacTutor? Write to us!

Fig. 2  Standard File Interface
‘    FILE$() Demo 
‘    by David Kelly
‘    ©MACTUTOR 1985

‘ Erase menus
FOR i=1 TO 5
    MENU i,0,0,””
NEXT
WINDOW 1,,(15,40)-(495,245),2

‘ initialize button status flags
FOR i=1 TO 7
    btn(i)=1
NEXT
Begin:   ‘Set up button controls
BUTTON 1,btn(1),”MacWrite Files”,  (119,15)-(237,30),3

Fig. 3 Program output


BUTTON 2,btn(2),”Text Files”, (119,40)-(200,55),3
BUTTON 3,btn(3),”MSBASIC 1.0 Files”, (119,65)-(252,80),3
BUTTON 4,btn(4),”MSBASIC 2.0 Decimal Files”,(119,90)-(307,105),3
BUTTON 5,btn(5),”MSBASIC 2.0 Binary  Files”,(119,115)-(317,130),3
BUTTON 6,btn(6),”MacPaint Files”,  (119,140)-(233,155),3
BUTTON 7,btn(7),”Applications”,    (119,165)-(219,180),3
BUTTON 8,1,”Select Files”,(363,87)-(448,121)
BUTTON 9,1,”Abort”,(363,131)-(448,165)
‘ Wait for button push
loop:WHILE DIALOG(0) <>1:WEND
        buttonpushed=DIALOG(1)
        IF buttonpushed=8 THEN seefiles
        IF buttonpushed=9 THEN WINDOW  CLOSE 1:MENU RESET:END
        IF btn(buttonpushed)=1 THEN  btn(buttonpushed)=2 ELSE  
 btn(buttonpushed)=1
        BUTTON buttonpushed,btn(buttonpushed)
GOTO loop
seefiles:

‘    MSBA    Basic 1.0
‘    MSBB    Basic 2.0 Decimal version
‘    MSBC    Basic 2.0 Binary version
‘    TEXT    Text file
‘    APPL    Application
‘    PNTG    MacPaint File
‘    WORD    MacWrite File
‘    MPRJ    MacProject File
‘ Other types may be added 

type$=””
IF btn(1)=2 THEN type$=type$+”WORD”
IF btn(2)=2 THEN type$=type$+”TEXT”
IF btn(3)=2 THEN type$=type$+”MSBA”
IF btn(4)=2 THEN type$=type$+”MSBB”
IF btn(5)=2 THEN type$=type$+”MSBC”
IF btn(6)=2 THEN type$=type$+”PNTG”
IF btn(7)=2 THEN type$=type$+”APPL”
selection$=FILES$(1,type$)
IF selection$=””THEN loop

‘ Close buttons
FOR i=1 TO 9
        BUTTON CLOSE i
NEXT

PRINT “You have selected “;
CALL TEXTFACE(1)
PRINT selection$
CALL TEXTFACE(0)
PRINT “Types =”;type$
BUTTON 1,1,”More”,(363,87)-(448,121)
BUTTON 2,1,”Abort”,(363,131)-(448,165)

‘ Wait for button push
WHILE DIALOG(0) <>1:WEND
        buttonpushed=DIALOG(1)
        IF buttonpushed=1 THEN CLS
     GOTO Begin
        WINDOW CLOSE 1:MENU RESET:END

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Vienna 3.1.9 :e81515b: - RSS and Atom ne...
Vienna is a freeware and Open-Source RSS/Atom newsreader with article storage and management via a SQLite database, written in Objective-C and Cocoa, for the OS X operating system. It provides... Read more
iExplorer 4.0.12.0 - View and transfer f...
iExplorer is an iPhone browser for Mac lets you view the files on your iOS device. By using a drag and drop interface, you can quickly copy files and folders between your Mac and your iPhone or... Read more
OpenEmu 2.0.5 - Open Source game-emulati...
OpenEmu is about to change the world of video game emulation, one console at a time... For the first time, the 'It just works' philosophy now extends to open source video game emulation on the Mac.... Read more
TextSoap 8.3.3 - Automate tedious text d...
TextSoap can automatically remove unwanted characters, fix up messed up carriage returns, and do pretty much anything else that we can think of to text. Save time and effort. Be more productive. Stop... Read more
Apple iTunes 12.6 - Play Apple Music and...
Apple iTunes lets you organize and stream Apple Music, download and watch video and listen to Podcasts. It can automatically download new music, app, and book purchases across all your devices and... Read more
Airmail 3.2.4 - Powerful, minimal email...
Airmail is an mail client with fast performance and intuitive interaction. Support for iCloud, MS Exchange, Gmail, Google Apps, IMAP, POP3, Yahoo!, AOL, Outlook.com, Live.com. Airmail was designed... Read more
MacPilot 9.0.6 - Enable over 1,200 hidde...
MacPilot gives you the power of UNIX and the simplicity of Macintosh, which means a phenomenal amount of untapped power in your hands! Use MacPilot to unlock over 1,200 features, and access them all... Read more
Jamf Pro 9.98 - Powerful sysadmin/enterp...
Jamf Pro (formerly Casper Suite) is the EMM tool that delights IT pros and the users they support by delivering on the promise of unified endpoint management for Apple devices. At Jamf, connecting... Read more
PopChar 7.7 - $16.99 (51% off)
PopChar helps you get the most out of your font collection. With its crystal-clear interface, PopChar provides a frustration-free way to access any font's special characters. Features Expanded... Read more
RapidWeaver 7.3.1 - Create template-base...
RapidWeaver is a next-generation Web design application to help you easily create professional-looking Web sites in minutes. No knowledge of complex code is required, RapidWeaver will take care of... Read more

Leap to victory in Nexx Studios new plat...
You’re always a hop, skip, and a jump away from a fiery death in Temple Jump, a new platformer-cum-endless runner from Nexx Studio. It’s out now on both iOS and Android if you’re an adventurer seeking treasure in a crumbling, pixel-laden temple. | Read more »
Failbetter Games details changes coming...
Sunless Sea, Failbetter Games' dark and gloomy sea explorer, sets sail for the iPad tomorrow. Ahead of the game's launch, Failbetter took to Twitter to discuss what will be different in the mobile version of the game. Many of the changes make... | Read more »
Splish, splash! The Pokémon GO Water Fes...
Niantic is back with a new festival for dedicated Pokémon GO collectors. The Water Festival officially kicks off today at 1 P.M. PDT and runs through March 29. Magikarp, Squirtle, Totodile, and their assorted evolved forms will be appearing at... | Read more »
Death Road to Canada (Games)
Death Road to Canada 1.0 Device: iOS Universal Category: Games Price: $7.99, Version: 1.0 (iTunes) Description: Get it now at the low launch price! Price will go up a dollar every major update. Update news at the bottom of this... | Read more »
Bean's Quest Beginner's Guide:...
Bean's Quest is a new take on both the classic platformer and the endless runner, and it's free on the App Store for the time being. Instead of running constantly, you can't stop jumping. That adds a surprising new level of challenge to the game... | Read more »
How to rake in the cash in Bit City
Our last Bit City guide covered the basics. Now it's time to get into some of the more advanced techniques. In the later cities, cash flow becomes much more difficult, so you'll want to develop some strategies if you want to complete each level.... | Read more »
PixelTerra (Games)
PixelTerra 1.1.1 Device: iOS Universal Category: Games Price: $.99, Version: 1.1.1 (iTunes) Description: The world of PixelTerra is quite dangerous so you need to build a shelter, find some food supply and get ready to protect... | Read more »
Tokaido™ (Games)
Tokaido™ 1.0 Device: iOS Universal Category: Games Price: $6.99, Version: 1.0 (iTunes) Description: Discover the digital adaptation of Tokaido, the boardgame phenomenon that has already sold more than 250,000 copies worldwide, and... | Read more »
Card Thief (Games)
Card Thief 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Card Thief is a solitaire style stealth game played with a deck of cards. In Card Thief you move through a deck of cards as a... | Read more »
Smilegate’s crafting battler Super Tank...
Super Tank Rumbleputs you in the seat of your very own, handcrafted tank. You can choose from over 100 different parts to create your Super Tank before taking it out to wreak havoc on your opponents in glorious PVP combat. Now, Smilegate is upping... | Read more »

Price Scanner via MacPrices.net

13-inch Touch Bar MacBook Pros on sale for up...
B&H Photo has the Apple 13″ Touch Bar MacBook Pros in stock today and on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.9GHz/512GB Touch Bar... Read more
Today only! 15-inch 2.7GHz Space Gray Touch B...
B&H Photo has the new 2016 15″ 2.7GHz Space Gray Apple Touch Bar MacBook Pro in stock today and on sale for $300 off MSRP for today only. Shipping is free, and B&H charges NY sales tax only... Read more
New $329 iPad A Fabulous Value; 10.5-Inch iPa...
Part of the iPad upgrade/new model puzzle is now in place. Yesterday, as KGI Securities financial services group analyst Ming-Chi Kuo last summer predicted they would, Apple released a new low-cost 9... Read more
New 9.7-Inch iPad Features All Of The Fun...
Apple today updated its most popular-sized iPad, featuring a brighter 9.7-inch Retina display and best-in-class performance at its most affordable price ever, starting at $329 (US) with 32GB of... Read more
Apple Introduces iPhone 7 and iPhone 7 Plus (...
Apple today announced iPhone 7 and iPhone 7 Plus (PRODUCT)RED Special Edition in a vibrant red matte aluminum finish, in recognition of more than 10 years of partnership between Apple and (RED). This... Read more
Apple now offering Certified Refurbished 15-i...
Apple is now offering Certified Refurbished 2016 15″ Touch Bar MacBook Pros for $360-$420 off original MSRP. An Apple one-year warranty is included with each model, and shipping is free: - 15″ 2.6GHz... Read more
Apple Introduces Clips: A Free Innovative Way...
Apple today introduced Clips, a new app that makes it quick and fun for anyone to create expressive videos on iPhone and iPad. The app features a unique design for combining video clips, photos and... Read more
Urban Armor Gear Unveils Case For 4th Generat...
Orange County, California based Urban Armor Gear (UAG), designers of rugged, lightweight protective cases for phones, tablets and laptops, has released its latest drop-tested cases for Apple’s 4th... Read more
Most Users Continue To Prefer 5.0 to 5.3 Inch...
In the first half of 2016, US and UK smartphone users were most likely to be interested in purchasing a device with a 5.3″ or 5.0″ display. Findings in a new report from the User Experience... Read more
12-inch 1.2GHz Retina MacBooks on sale for up...
B&H has 12″ 1.2GHz Retina MacBooks on sale for up to $200 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 12″ 1.2GHz Space Gray Retina MacBook: $1439.99 $160 off MSRP - 12″ 1... Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Fulltime aan de slag als shopmanager in een h...
Ben jij helemaal gek van Apple -producten en vind je het helemaal super om fulltime shopmanager te zijn in een jonge en hippe elektronicazaak? Wil jij werken in Read more
Starte Dein Karriere-Abenteuer in den Hauptst...
…mehrsprachigen Teams betreust Du Kunden von bekannten globale Marken wie Apple , Mercedes, Facebook, Expedia, und vielen anderen! Funktion Du wolltest schon Read more
Starte Dein Karriere-Abenteuer in den Hauptst...
…mehrsprachigen Teams betreust Du Kunden von bekannten globale Marken wie Apple , Mercedes, Facebook, Expedia, und vielen anderen! Funktion Du wolltest schon Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.