> [EMAIL PROTECTED] wrote:
> >> FREE=(PEEK_L(163856)-PEEK_L(163852)-1024): PRINT FREE/1024
> > Bingo !!  But, does this return the free memory or total installed
memory??
> > I think the former...
In SBASIC or Minerva speak, could also be:

sysv = 163840 : REMark QDOS
IF v$ = 'JSL1' OR v$ = 'HBA' THEN sysv = VER$(-2)
free = (PEEK_L(sysv+16)-PEEK_L(sysv+12)-1024)

(or corrected version at least, that was from my memory, not much of
which is free at the moment)
Dilwyn

> It calculates the memory gap between common heap and the SuperBasic
> area. Of course this is not necessarily the largest free block of
> memory, but it's unfortunately a widely used formula, IIRC even QDOS
> itself used it. Only recent SMSQ/E versions do this better.
>
> Total memory is as said sys_ramt. Or in SuperBasic
> print peek_l(163872)/1024-128
>
> Ciao, Marcel
>

Reply via email to