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 

 Aller Anfang ist heavy Kategorie: C-Control I V1.1 (von ReinhardB - 13.12.2004 10:58)
 Als Antwort auf Es ist immer schön ..........vielen Dank von Peter - 11.12.2004 19:57
Hallo Peter.
Ich hoffe du hast doch noch nicht endgültig die Flinte ins Korn geworfen ob der (teilweise ganz amüsant zu lesenden)
postings auf deine unermüdlichen Fragen. Ich bin selber erst ein nur leicht fortgeschrittenener Laie
und stand gerade vor einem ähnlichen Problem, einzelne Sollwerte abzuspeichern und wieder zu lesen.
Mein Unterroutinen dafür sehen etwa so aus:


   


   




 '-------- Variablen definieren ------


 define a1  byte[1]        ' Variablen für die gesp.Werte


 define b1  byte[2]


 


 define a2  byte[3]


 define b2  byte[4]


 


 define wertA byte[3]    ' Variablen für die aktuellen Werte


 define wertB byte[4]


 


 define welche byte[5]   'welche Taste ist aktuell ?


 


 '--------- Tasten definieren --------


 


 define taste1     port[1]


 define taste2     port[2]     ' usw, je nachdem wieviele Tasten.(port 1-3 noch möglich)


 '     ......                              ' ohne Display auch noch ports 9 - 16


 define speichern  port[4]  


 define taste6     port[5]     ' Tasten für + und -


 define taste7     port[6]


 define taste8     port[7]


 define taste9     port[8]


 


 #EEPROM_Read


  open# for read        ' Voricht ! solange nicht alle Werte gespeichert wurden


  input# a1               ' steht hier nur Unsinn !


  input# b1


  input# a2


  input# b2


  ' ...


  close#


 


  welche = 0


 


   #start


 ' --------- Tastenabfrage -----------


 


  if taste1 = on then wertA = a1


  if taste1 = on then wertB = b1


  if taste1 = on then welche = 1


   


  if taste2 = on then wertA = a2


  if taste2 = on then wertB = b2


  if taste2 = on then welche = 2


  '          ...


  if taste6 = on then wertA = wertA +1  'wobei noch dafür zu sorgen ist, daß


  if taste7 = on then wertB = wertB -1  'Grenzwerte nicht überschritten werden !


 


  if taste6 = on then wertA = wertA +1


  if taste7 = on then wertB = wertB -1


   


  if speichern = on then gosub EEPROMwrite


   


  pause 50


 goto start


 


 ' --------------- Unterprogramme --------------


 


 #EEPROMwrite
  if welche =1 then a1 = wertA   'welcher Sollwert wurde geändert ?


  if welche =1 then b1 = wertB   'diesen überschreiben.


  if welche =2 then a2 = wertA


  if welche =2 then b2 = wertB


   


  open# for write      'alle Werte in den Speicher schreiben.


  print# a1

                       
  print# b1


  print# a2


  print# b2


  ' ...
  close#


 return


 
 


Was jetzt natürlich noch fehlt ist die Ansteuerung der Motoren usw...


Ich hoffe, du kannst nachvollziehen wie das ganze abläuft und dementsprechend abwandeln.


Vorweihnachtlicher Gruß


Reinhard

 
 
 

 Antwort schreiben

Bisherige Antworten:

Re: Aller Anfang ist heavy (von Peter - 13.12.2004 19:48)
    Re: Aller Anfang ist heavy (von Henrik - 13.12.2004 19:58)
        Re: Aller Anfang ist heavy (von ManfredW - 15.12.2004 1:07)
            Re: Aller Anfang ist heavy (von ReinhardB - 15.12.2004 8:28)
                ohne Bemühen kein Programmieren (von ManfredW - 15.12.2004 13:21)
        Re: Bist du immer so nett und liebenswürdig...... (von Peter - 14.12.2004 19:45)
            Re: Bist du immer so nett und liebenswürdig...... (von strini - 14.12.2004 20:04)
                Re: Bist du immer so nett und liebenswürdig...... (von Kay - 14.12.2004 20:09)
                    Re: Bist du immer so nett und liebenswürdig...... (von strini - 14.12.2004 20:12)