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: EEPROM Problem Kategorie: Programmierung Basic (von BeAthlon - 22.03.2004 21:40)
 Als Antwort auf EEPROM Problem von Simon - 22.03.2004 20:26
Ich habs zwar noch nie gebraucht, kann daher auch nicht sagen ob es klappt, aber denke so müsste es funktionieren:
Lese in einer Schleife deine Datei bis zu der Stelle z.B."2222" aus. Mit Hilfe einer Zählvariable bekommst du die Position raus.
Nun liest du jede weitere Position aus und schreibst sie nach vorn.

Folgendes ist nicht verifiziert oder jemals compiliert worden. Es kann elso kleine Schreibfehler oder große logische Fehler geben.

DEFINE wert word
DEFINE merk word
DEFINE merk2 word
DEFINE merk3 word

merk = 0

'======= Zum Merken der Anfangsposition des brauchbaren Blockes ===========
OPEN# FOR READ
  #Anf1
     merk = merk + 1
     INPUT# wert
     IF wert=2222 THEN  GOTO Step1
  GOTO Anf1

#Step1
merk3 = 1
CLOSE#

'=============== Einzelnes Verschieben der Werte ===============

#Anf2

  merk2 = 0
   '======== Lesen des Wertes =========
  OPEN# FOR READ
    #Anf3
        merk2 = merk2 + 1
        INPUT# wert
        IF merk2 = merk + merk3 THEN  GOTO Step2
    GOTO Anf3
   
    '======== Schreiben des Wertes ========
    #Step2
    CLOSE#
    IF merk3 = 1 THEN OPEN# FOR WRITE ELSE OPEN# FOR APPEND
     PRINT# wert
     CLOSE#
   
    '======== Abbruch beim Auffinden des Endwertes =========
    IF wert = 0 THEN GOTO Ende '

  merk3 = merk3 + 1
GOTO Anf2

#Ende

Ich hoffe es funktioniert so. Ich weiss aber nicht ob die Logik der CC diese etwas ungewöhnliche Konzept zulässt.
Viel Glück!

 Antwort schreiben

Bisherige Antworten:

Re: EEPROM Problem (von Simon - 23.03.2004 11:57)