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: 20ms Interrupt Kategorie: Programmierung Basic (von Kay - 23.12.2004 8:29)
 Als Antwort auf Re: 20ms Interrupt von Kay - 23.12.2004 1:30
moin noch mal,

es hat mir keine ruhe gelassen.... aber ich hab den CControl unterschätzt   :-)

define timerini word
define i        byte
define da1      port[1]
define da2      port[2]

#loop
   timerini = timer
   wait abs (timer - timerini) = 1
      da1 = on
      pulse da2
      da1 = off
      for i = 1 to 7
         pulse da2
      next i
   wait abs (timer - timerini) = 2

   da2 = off      'nur zum test, ob dieser punkt auch erreicht wird wg. wait-bedingung
goto loop
end

haargenau SO funktionierts. beweis dafür ist das da2 = off am ende.
braucht die schleife zu lange, ist abs (timer - timerini) dann bereits
3 und der da2 bleibt on. dies funktioniert sogar mit einer kleinen sicherheit:
bis 10 kannst du die for-schleife laufen lassen. ab 11 bleibts dann hängen.

hinweis noch: ist es beabsichtigt, dass da2 hi-lo pulst? dann sollte er vorm
eintritt in die schleife evtl schon seinen pegel erhalten.
getestet habe ich übrigens mit CControl 1 Main-Unit 1.1 und CCbasic.

 Antwort schreiben

Bisherige Antworten:

Re: 20ms Interrupt DANKE!! (von Nico - 24.12.2004 12:10)