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: ich stecke fest Kategorie: Programmierung Basic (von Achim - 5.01.2005 21:30)
 Als Antwort auf ich stecke fest von Michael - 5.01.2005 18:00

> Hallo zusammen,
>
> ich bin schon längere Zeit an diesem Problem.
> c-control unit 1 mit applicationboard und LED-7 Segment Anzeige
> das Programm läuft eine Zeitlang dann kommen falsche daten auf der Anzeige.
> Sieht jemand den Fehler?
> die Anzeige hängt an 3 digitalen Ausgängen
>
> define i   byte[1]
> define j   byte[2]
> define out byte[3]
>
> define data    port[1]
> define enable  port[2]
> define clock   port[3]
>
>
> data   = 0
> clock  = 0
> enable = 0
> hour = 22
> minute = 35
> second = 11
>
>
> #loop
>  if second = 0 then gosub zeit
> loop
>
> #zeit
>    out = second mod 10
>     gosub daten
>      gosub LED_output
>    out = second / 10
>     gosub daten
>      gosub LED_output
>    out = minute mod 10
>     gosub daten
>      gosub LED_output
>    out = minute / 10
>     gosub daten
>      gosub LED_output
>    out = hour mod 10
>     gosub daten
>      gosub LED_output
>    out = hour / 10
>     gosub daten
>      gosub LED_output
> return
>
> #daten
>   if out = 0 then out =130
>   if out = 1 then out =207
>   if out = 2 then out =145
>   if out = 3 then out =133
>   if out = 4 then out =204
>   if out = 5 then out =164
>   if out = 6 then out =160
>   if out = 7 then out =143
>   if out = 8 then out =128
>   if out = 9 then out =132
> return
>    
> #LED_output
>  'enable = ON
>   for i = 1 to 8
>       gosub LED_shift : pause 35
>     next
>   enable = OFF
>   data   = 0
>   clock  = 0
>   enable = 0
> return
>
> #LED_shift
>  data  = out and 1
>  print "BIT",i," ",data
>     out  = out shr 1
>     pulse clock
> return
>
>
>
>

 Antwort schreiben

Bisherige Antworten:

Re: ich stecke fest (von Michael - 6.01.2005 10:26)
    Re: ich stecke fest (von Kay - 6.01.2005 16:06)