Search the web for microsoft professional development system 7.1 It may help with your memory problem.

sounds promising, i went to

http://vetusware.com/download/Microsoft%20BASIC%20Professional%20Development%20System%207.1/?id=225

and downloaded it, but it contains no installation instructions

i found some other instructions, but they seem incomplete... heres a screenshot of where i ended up

http://i76.photobucket.com/albums/j38/lordxane/qbasic71.jpg

basically, how do i install it?

Look here for the QBasic 7.1 link:

http://www.qbcafe.net/qbc/english/download/compiler/qbasic_compiler.shtml

Unzip it to its own directory such as PDS71. It should be enough to get you going.

The second link I gave you may not be complete and it contain no subdirectories, so it may or may not work.

As far as the install you tried, I ran it, got the same error you did, then just ran setup again and it ran to completion...

ok so i can run vbs7.1. but apparently by default it allocates less memory than qb4.5.

ive been able to continue my game because i realized i was reserving way more memory than needed (every graphic i reserved 280 when i could get by with 256, etc...) so i lowered some numbers. but i realize this is only a temporary fix, and ill probably run out again.

vbs7.1 talks about tapping into extended or expanded memory though, and i tried reading the help files like 4 times and doing what they said, but i guess i dont understand it.

for example, in the expanded memory help it says if i run the program by typing QBX /e:500 /EN it should reserve 500k extra for me. but it just didnt recognize the command. any suggestions?

and thanks for your help so far!

(side note: the help sections im referring to are in contents->Qbx memory and capacity)

My help shows the command as: QBX /e:500 /Ea

aha! wow i cant believe i did that... well so now it runs the program, but i still run out of memory at the same point. i even tried doing 20000 instead of 500. do i have to tell my program to allocate the variables im dim-ing into the expanded memory? and if so, how?

If you invoke QBX without the /e: switch, QBX will use all available expanded memory. Try starting QBX without any parameters then enter and run:

? fre(-3)

The value returned will be remaining space in expanded memory (in kilobytes). The following is from the help file on Using Expanded Memory.

If expanded memory is available to QBX, it automatically moves all units of program code between 512 bytes and 16K in size, inclusive, out of conventional memory into expanded memory. Each procedure (function or sub) is a unit of code. The module-level code also constitutes a unit of code.

To see how large each procedure is, use the View Subs ommand (press F2). You can determine which units are larger than 16K and need to be divided into smaller units.

Quote:

but i still run out of memory at the same point.

What is the statement where you run out of memory and is this a run-time error or while editing?

alright, so i run qbx and then just essentially write a program that only contains one line saying "? fre(-3)" and execute it? if so, it turns the "?" to "PRINT", and tells me "Feature unavailable". if there's somewhere else im supposed to run it from i dunno where it is. (well, i hit f6 and ran it down there too, it leaves the ? as a ? but gives the same error haha.)

i noticed the bit about moving things 16k-512k... all my subs are 11 or less (but i have 36 subs that all do various seperate tasks...) so its not moving them into expanded memory right? anyway i can tell it to move things 6k and up or something?...

i use a lot of variables, and right now the out of memory error highlights one of the arrays close to the end of all my DIM SHARED statements at the beginning

hey! ok so as mentioned before i found i was allocating more memory than i needed, and by cutting down ive been able to continue but i know it wont last forever.. anyway ive been continuing in qb4.5. and i tried the ? fre(-3) command there and it works. my program has about 26k left. for kicks i decided to find the biggest array i could define before it hates me, and Bob(4423) works. but Bob(4424) runs me out of memory in the code somewhere. if im conservative i might be able to finish within that amount... but id like to figure out how to get around this anyway haha. also, with bob(4423) the ?-fre(-3) command still returns 13k. can i not use that memory?

do you have several bas programs that are linked with a mak file or is everything in one bas file (i dont recall seeing if you said one way or the other). If it is all in one bas
file, try splitting it up butting some of the subs in separate bas files with no executible code then use the load option (first time) to load all the bas files. then when you compile, it will compile each separately then link them together allowing larger programs. That may help.

Apparently your system is not providing any expanded memory to QBX. From QBX FRE Details:

Using FRE(-3) and Expanded Memory
  o If expanded memory is not available, FRE(-3) returns the message "Feature unavailable."

What operating system are you using? By default, XP's command prompt is giving me 4MB of expanded memory.  

FRE(-3) in QB 4.5 returns a different value, "The size of the next free block of string storage"

What type of variable does array Bob() contain?

And be sure to read Buff1's post.

ah... yeah with vbs7.1 i guess i dont have expanded memory available. should i try the extended memory route? i dont really know what the difference is.

oh and by the way im running XP as well. the bob() array was just whatever the default value is, which i believe is int? i didnt set a standard manually...

in response to buff1, your solution sounds like it should help, but i dont seem to fully understand how to do it. for example, i wrote 2 programs. one called loadtes1.bas which simply contained (brackets not really there :P
{dim shared a
a = 3
printA
print "in the main program, a =";a}
and then i made a second program called loadtes2.bas. which had nothing but a sub called printA which had
{print "in the sub a =";a}
i opened loadtes1.bas and used load to add loadtes2.bas as a module. and when i ran the program i got
"in the sub a = 0
 in the main program, a = 3"
so i know its accessing the sub, but apparently its not passing the variable a to the second program. can i make a shared through everything? or will i have to pass the variables im using into the sub every time? cuz my subs often check various arrays of 8 players worth of data, which would be a pain to pass into the subs :(

thanks everyone helping btw!

Still blowing off the dust as I haven't programmed in QuickBasic for about 10 years so bear with me

First, do yuo want to continue using 4.5 or try to get PDS 7.1 going?

Next, the default variable used by QuickBasic is single-precision, which requires 4 bytes. If you don't require floating-point and no value exceeds 32767 or is less than -32768, than a DEFINT A-Z at the beginning of your program may gain you more space as integers occupy only 2 bytes.

In order to share variables between modules, you will need to use a COMMON statement in each module listing the variables you wish to share.

so i tried DEFINT A-Z and for some reason it tells me one of my arrays isnt defined. i define it at the beggining as
DIM SHARED temphand(12)
nothing special. i tried initializing it again and it flags it as a duplicate definition, so it should be registering it, i have no idea why defint a-z would be making it not work.

aha! thanks for the load tip, apparentl i need COMMON SHARED for every variable! ill try breaking up some pieces and see how it goes...

well heres a question i just though of. so say i split the program into 2 bas files. some of the memory be allocated for one bas and one for the other? or will it just double my memory pool? cuz if i start every bas with COMMON SHARED how will it know which .bas to allocate the memory too?

oh! and im quite content continuing in qb4.5. the only problem ive ever had with it is this stupid memory thing. id make this in c++ or java but i dont know how to work with graphics in those haha... but im taking classes!

Place the DEFINT A-Z at the beginning of your program, prior to any DIM statements.

THe following will look daunting, but try to read through it. It has many good points about program modules, COMMON, COMMON SHARED, SHARED, DIM SHARED, $DYNAMIC and $STATIC Arrays,huge arrays, and sample programs.

And here's the link: http://support.microsoft.com/kb/45850

ok... a few things. i read through the whole help file, and it all sounded exciting, but either im not really understanding it and im using it wrong, or i just dont understand my real problem at all.

so with defint a-z. as mentioned it causes at least one of my arrays to supposedly be not defined. i was putting defint a-z right after all my declare subs, screen 13, and randomize timer, and right before all my DIM SHARED statements. i tried putting defint a-z as my very first line of code, and it then tells me there is a parameter type mismatch for m subs which have variables passed into them. i declare them "DECLARE SUB a(b,c)" basically, but with more useful names. no idea whats wrong there.

i tried the rem $dynamic statement. which to my understanding should make all my arrays dynamic and thus store them in far memory (limit 640k as opposed to 64k) but then i tried testing how much space i had with my bob() array and it still has a near limit.

i loaded my bas in vbs which shows how big my subs are, and without counting subs that are only 1k i counted 72k (its pobably rounding up a lot...) and my understanding is the code amount caps at 64k per bas. so i probably need to split the code up. i started trying that, but either you cant have common 2 dimensional arrays, or you have to define them diferently. but when i say
common shared playerspick(5,8)
it expects a ) after the 5

any ideas on any of the 3 said problems?

just kidding for that last part about using 2 dimensional common arrays! apparently you need to dim the array before the common statement. even for 1 dimensional arrays... fracturing my program now! fracturing?... is that a good word?...

ok so this is odd, i seem to be getting less memory the more pieces i put it in. so far ive only added one bas file with 2 subs (and the program functions, ive shared all the proper variables), and if i dim bob(2000) i run out of memory. while in my all together version i can dim bob(2000) just fine. any ideas?

Would you post some of your beginning code where you are declaring variables, using the COMMON statement(s), DIM SHARED etc. Basically (pardon the pun) the Initialization code you are using?

'the program starts with sub declarations such as...

DECLARE SUB drawbots ()
DECLARE SUB wallcheck (playerdircheck, playerwallcheck)
DECLARE SUB drawmap ()

'then goes straight to...

DIM movx(8), movy(8), botalive(8), botdir(8), movebackqueue(8), movequeue(8)
COMMON SHARED movx(), movy(), botalive(), botdir(), movequeue(), movebackqueue()
COMMON SHARED movebackyes, j, players, wallyes, saycollideyes, press$

'then to non common variables like...

DIM SHARED x, y, map, map(12, 12, 2), movcheckx(8), movchecky(8)
DIM SHARED beltB2R(257), beltL2B(257), beltT2L(257), beltR2T(257), beltB2L(257)

'then to the main thing. that what you're looking for?

Quote:

Dynamic arrays in COMMON must be DIMensioned AFTER the COMMON statement in just the main module and should not be DIMensioned in any support modules.

A simple dynamic two-dimensional array example.

TEST1.BAS

TEST2.BAS
    

Where is the bob() array defined? I don't see it above.

Regarding the DEFINT A-Z, I tried a new program where the first line of code is DEFINT A-Z. Then I added a SUB with the Edit, New Sub... function and lo and behold DEFINT A-Z was automatically added as the first line of the SUB procedure, prior to the SUB definition line. This explains why you were getting a parameter type mismatch on your SUBs that received parameters. All SUBs and FUNCTIONs must be preceeded with a matching DEFINT statement...and of course they aren't automatically added if you don't initially start with a DEFINT statement.

Your code but designed for dynamic arrays:

Main module
Other Modules

As far as the bob() array, instead of DEFINT A-Z, you could try changing the DIM bob() statement and all references to bob() to bob%() which forces the array to be INTEGERS, using half the space as the default single-pricesion array would.

Just my 2 cents.
On each saving BASIC writes DECLARE (at least QBasic does that).
so it puts parameter types in DECLARE, like
DECLARE SUB wallcheck (playerdircheck!, playerwallcheck!)
(see "!")?
after adding DEFINT parameter type is changed, hence error
"parameter type mismatch"

You can just delete that DECLARE lines.
Then you save, Basic will re-create this line now with integer parameters.

I found an ancient program, Monopoly, which was 101,060 characters long. I added a lot of functionality, such as a "boss-is-coming" feature yet nevertheless reduced it to 67,180 chars.

See history at
http://www.network54.com/Forum/190883/message/1156376791/Monopoly

The point: you probably don't need more memory. You need to improve your coding techniques.

If you like, post your program at http://www.network54.com/Forum/190883/
for an evaluation.

Mac

Well, you never posted, so I guess your problem was solved.

Glad for you!

Mac