Re: [ql-users] QUICK QUIZ

2003-02-14 Thread RWAPSoftware
In a message dated 14/02/03 01:57:31 GMT Standard Time, [EMAIL PROTECTED] writes:


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


That is interesting to see even QDOS uses that formula...

The winner of this quiz has to be [EMAIL PROTECTED]

If he wants to contact me privately, I will arrange to sort him out with a beta version of QWord to try...
--
Rich Mellor 
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware


Re: [ql-users] QUICK QUIZ

2003-02-14 Thread Dilwyn Jones

 [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





Re: [ql-users] QUICK QUIZ

2003-02-13 Thread Marcel Kilgus

[EMAIL PROTECTED] wrote:
 How do you find the amount of memory out on a basic QL without Toolkit II or
 any other resident toolkit??

You mean the amount that is installed? I'd say by reading sys_ramt.
Or the amount of free memory? You need a trap call for that, sms.frtp.

Marcel




Re: [ql-users] QUICK QUIZ

2003-02-13 Thread Al Feng




Sorry, try this:

FREE=(PEEK_L(163856)-PEEK_L(163852)-1024): PRINT FREE/1024
^ 


Al

On Thu, 13 Feb 2003 16:51:56 EST [EMAIL PROTECTED] writes:

  OK, now here is a simple question - wonder if anyone can 
  remember how to do it without looking it up (no cheating now)...How do 
  you find the amount of memory out on a basic QL without Toolkit II or any 
  other resident toolkit??First correct answer gets errmmm let 
  me seeA beta test copy of QWord for QPC or Q40 (Aurora users will have 
  to wait a while longer for that version)--Rich Mellor RWAP 
  Software35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 
  5JHTEL: 01977 
  610509http://hometown.aol.co.uk/rwapsoftware
  


Re: [ql-users] QUICK QUIZ

2003-02-13 Thread RWAPSoftware
In a message dated 13/02/03 22:36:26 GMT Standard Time, [EMAIL PROTECTED] writes:


FREE=(PEEK_L(163856)-PEEK_L(163856)-1024): PRINT FREE/1024


Definitely not correct there - !! Gives -1 !!
--
Rich Mellor 
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware


Re: [ql-users] QUICK QUIZ

2003-02-13 Thread RWAPSoftware
In a message dated 13/02/03 22:40:01 GMT Standard Time, [EMAIL PROTECTED] writes:


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...

--
Rich Mellor 
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware


Re: [ql-users] QUICK QUIZ

2003-02-13 Thread Marcel Kilgus

Marcel Kilgus wrote:
 Or the amount of free memory? You need a trap call for that, sms.frtp.

... which can of course be done by simple POKEing and CALLing. But no,
I can't do that right out of my head ;-)
I am however curious what method you had in mind.

Marcel




Re: [ql-users] QUICK QUIZ

2003-02-13 Thread RWAPSoftware
In a message dated 13/02/03 22:29:19 GMT Standard Time, [EMAIL PROTECTED] writes:


You mean the amount that is installed? I'd say by reading sys_ramt.
Or the amount of free memory? You need a trap call for that, sms.frtp.



Hmm - there is a way of doing both if I recall correctly... it's been so long - both solutions required (in SuperBASIC of course)
--
Rich Mellor 
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware


RE: [ql-users] QUICK QUIZ

2003-02-13 Thread Daniele Terdina








ramTop = RESPR(0) should give the top of RAM on an unexpanded QL.



Daniele





-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of [EMAIL PROTECTED]
Sent: Thursday, February 13, 2003
1:52 PM
To: [EMAIL PROTECTED]
Subject: [ql-users] QUICK QUIZ



OK, now here is a simple question - wonder if anyone can
remember how to do it without looking it up (no cheating now)...

How do you find the amount of memory out on a basic QL without Toolkit II or
any other resident toolkit??

First correct answer gets errmmm let me see
A beta test copy of QWord for QPC or Q40 (Aurora users will have to wait a
while longer for that version)

--
Rich Mellor 
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware










Re: [ql-users] QUICK QUIZ

2003-02-13 Thread Marcel Kilgus

Argh, sent it with the wrong from address. So once again:

[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...

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