Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: Anzahl Token in M-Unit 2.0 ? Kategorie: Programmierung Basic (von alina - 12.09.2005 19:31)
 Als Antwort auf Re: Anzahl Token in M-Unit 2.0 ? von Stefan Tappertzhofen - 12.09.2005 18:34
alina nutzt:  CC1-M-Unit V1.2/2.0

> So Referenz aktualisiert:
>
> http://www.fdos.de/ccbpp/referenz/referenz/sonstigeeigenschaften.htm
>
> Jetzt müsste die Beschreibung zu FileFree richtig sein.
>
> Gruß,
>
> Stefan



hallo Stefan,

ein teil deiner beschreibung ist sicher ok.
aber ich habe folgendes getestet:

1.

Define x As Word

#m1
   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE
GOTO m1

ergibt 34 token, printet 4831  ==> 4841*2 = 9662, 9662+34 = 9696 (Speichergröße)

d.h. Speichergröße etwa 9,6K, kann so hinkommen, da programme
in dieser größenordnung noch laufen.

2.

Define x As Word

#m1
   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE

   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE
GOTO m1

ergibt 61 token, printet 4799  ==> 4799*2 = 9598, 9598+61 = 9659 (Speichergröße)

nicht ganz sinnig, aber noch im bereich des möglichen

aber jetzt:

3.

Define x As Word

#m1
   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE

   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE

   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE

   Open For Read
   x = filefree
   If Filefree > 0 Then Print x
   CLOSE
GOTO m1

ergibt 115 token, printet 4799  ==> 4799*2 = 9598, 9598+115 = 9713 (Speichergröße)

trotz doppelter anzahl von token bleibt der freie speicherplatz konstant ?!?


wo ist der fehler in meinem denkansatz oder wie ist es wirklich?

gruß  alina

 Antwort schreiben

Bisherige Antworten:

Re: Anzahl Token in M-Unit 2.0 ? (von Dietmar - 12.09.2005 20:24)