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: looktab Tabellen Dateneingabe Kategorie: Programmierung Basic (von Armin - 6.09.2004 19:31)
 Als Antwort auf Re: looktab Tabellen Dateneingabe von Achim - 5.09.2004 23:30

> > Da empfiehlt sich doch die Speicherung mittels write#
>
> Natürlich mittels "print#"
> Hallo,
anbei mein Programm hängt sich jedesmal bei Input auf was kann ich tun das dies Funktioniert
Ãœbertragung mit Terminalprogramm

'versuch selbst eine ansammlung von 5 Werten in EEporm abzulegen
'
'stand vom 5-9-04
define zeiger        byte       [4]
define einlesen             port       [1]
define loeschen             port       [2]
define word_a        word   [5]
define word_b        word   [7]
define word_c        word   [9]
define word_d        word   [11]

'initialisierung bei neustart
word_a = 0
word_b = 0
word_c = 0
word_d = 0

#loop
     if einlesen = (not on) then gosub ein else gosub aus
     if loeschen= (not on) then gosub ls
     print "word_a ",word_a
     print "word_b ",word_b
     print "word_c ",word_c
     print "word_d ",word_d
     pause 50


goto loop







#ein'daten einlesen
            open# for write
           Print " Daten in Datei einlesen"
           Print "eingabe von word_a"

           if RXD then input word_a
           print#  word_a

           Print "eingabe von word_b"
           if RXD then input word_b
           print#  word_b

           Print "eingabe von word_c"
           if RXD then input word_c
           print#  word_c
           close#
          pause 150

return

#aus' date auslesen
      Print " Daten aus Datei auslesen"
      if EOF then goto EXIT' abfrage ob etwas in Datei vorhanden ist
      open# for read
      input# word_a
      input# word_b
      input# word_c
      input# word_d
      close#
   #Exit
      return
#ls
        Print "löschen Wörter"
        word_a = 0
        word_b = 0
        word_c = 0
        word_d = 0

return





 Antwort schreiben

Bisherige Antworten:

Re: looktab Tabellen Dateneingabe (von Achim - 6.09.2004 23:53)