Herzlich Willkommen, lieber Gast!
  Sie befinden sich hier:

  Forum » Assembler » assembler ampel

Forum | Hilfe | Team | Links | Impressum | > Suche < | Mitglieder | Registrieren | Einloggen
  Quicklinks: MSDN-Online || STL || clib Reference Grundlagen || Literatur || E-Books || Zubehör || > F.A.Q. < || Downloads   

Autor Thread - Seiten: > 1 < [ 2 ]
000
12.02.2006, 10:38 Uhr
~dhomo
Gast


sodele hab mich au mal mit ampelprogrammierung in assembler beschäftigt
in diesem fall hab ich mich für den atmel 8051 microcontroller entschieden

hier mien a51 code:


Code:

;einfache Ampelschaltung

;*************************Hauptprogramm***************************
code at 0
include Reg_8252.PDF

;*************************1.phase*********************************
anfang:        
                 ;ampel 1
                 mov 00010000,#0ffh        ; rote led wird eingeschalten      
                 mov 00010001,#00h        ; grüne led wird ausgeschalten
                
                 ;ampel 2
                 mov 00010010,#0ffh        ; rote led wird eingeschalten
                 mov 00010011,#00h        ; grüne led wird ausgeschalten
                
                 ;ampel 3
                 mov 00010100,#00h        ; rote led wird ausgeschalten
                 mov 00010101,#0ffh        ; grüne led wird eingeschalten
                
                 ;ampel 4
                 mov 00010110,#00h        ; rote led wird ausgeschalten
                 mov 00010111,#0ffh        ; grüne led wird eingeschalten
                
                 ;ampel 5
                 mov 00100000,#0ffh        ; rote led wird eingeschalten
                 mov 00100001,#00h        ; grüne led wird ausgeschalten
                
                 ;ampel 6
                 mov 00100010,#0ffh        ; rote led wird eingeschalten
                 mov 00100011,#00h        ; grüne led wird ausgeschalten
                
;*********************Unterprogramm warteschleife 1***************
                
           Mov R0,#10        ; register 0 wird mit der konstanten .. geladen

warten1:  DJNZ R0, warten1       ; wenn R0 nicht 0 erreicht hat, dann "warten 1" aufrufen
                
                
;******************2.Phase****************************************                
                
                 ;ampel 1
                 mov 00010000,#00h        ; rote led wird ausgeschalten
                 mov 00010001,#0ffh        ; grüne led wird eingeschaltet
                
                 ;ampel 2
                 mov 00010010,#00h        ; rote led wird ausgeschalten
                 mov 00010011,#0ffh        ; grüne led wird eingeschaltet
                
                 ;ampel 3
                 mov 00010100,#0ffh        ; rote led wird eingeschalten
                 mov 00010101,#00h        ; grüne led wird ausgeschalten    
                
                 ;ampel 4
                 mov 00010110,#0ffh        ; rote led wird eingeschalten
                 mov 00010111,#00h        ; grüne led wird ausgeschalten
                
                 ;ampel 5
                 mov 00100000,#00h        ; rote led wird ausgeschalten
                 mov 00100001,#0ffh        ; grüne led wird eingeschaltet
                
                 ;ampel 6
                 mov 00100010,#00h        ; rote led wird ausgeschalten
                 mov 00100011,#0ffh        ; grüne led wird eingeschaltet
                
;*********************Unterprogramm warteschleife 2***************                
        Mov R1,#10    ; register 1 wird mit der konstanten .. geladen

warten2:   DJNZ R1, warten2    ; wenn R1 nicht 0 erreicht hat, dann "warten 2" aufrufen
                
                 jmp anfang                    ; wenn das Programm fertig abgelaufen ist, großer sprung zu "anfang"


end


Dieser Post wurde am 13.02.2006 um 11:15 Uhr von FloSoft editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
001
12.02.2006, 15:05 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


Und die Frage ist jetzt: "Wie alt ist die Cousine der Freundin vom Busfahrer?"
--
...fleißig wie zwei Weißbrote
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
002
13.02.2006, 11:16 Uhr
FloSoft
Medialer Over-Flow
(Administrator)



Zitat von Windalf:
Und die Frage ist jetzt: "Wie alt ist die Cousine der Freundin vom Busfahrer?"

Hoffentlich so um die 20 ;-)
--
class God : public ChuckNorris { };
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
003
26.02.2006, 14:27 Uhr
kronos
Quotenfisch
(Operator)


Moment, das ist sicher 'ne Fangfrage...
Der Busfahrer hat gar keine Freundin, stimmt's?
--
main($)??<-$<='?'>>2?main($-!!putchar(
(("$;99M?GD??(??/x0d??/a:???;a"+'?'/4)
??($??)+'?'/3-2-1+$%2)??''?')):'?';??>
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
004
26.02.2006, 14:37 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


@kronos
Fast. Es handelt sich in Wirklichkeit um eine polnische lesbische Busfahrerin mit eingetragener Lebenspartnerschaft einer 95 jährigen Oma... (Ob Sie nur aufs Geld oder mehr aus ist lass ich hier mal offen)

+1
--
...fleißig wie zwei Weißbrote

Dieser Post wurde am 26.02.2006 um 14:37 Uhr von Windalf editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
005
26.02.2006, 17:13 Uhr
kronos
Quotenfisch
(Operator)


Na klar!
Und weil dann der Zug immer im Kreis fähr kann der Schimpanse die Jägi-Buddel gar nicht finden!!
Es ist so einfach, wenn man's weiß...
--
main($)??<-$<='?'>>2?main($-!!putchar(
(("$;99M?GD??(??/x0d??/a:???;a"+'?'/4)
??($??)+'?'/3-2-1+$%2)??''?')):'?';??>
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
006
26.02.2006, 17:18 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


@kronos
Nicht der Zug, sondern der Bus aber an sonsten natürlich richtig

PS.: Was zum Henker ist denn eine Jägi-Buddel?
--
...fleißig wie zwei Weißbrote
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
007
26.02.2006, 17:57 Uhr
kronos
Quotenfisch
(Operator)



Zitat von Windalf:
Was zum Henker ist denn eine Jägi-Buddel?

Der niderteutschen Zunge Bezeichnung für eine Flasche von Glas, darin sich ein gemeinhin als Jägermeister gekanntes Kräuterlikör befündeth.
--
main($)??<-$<='?'>>2?main($-!!putchar(
(("$;99M?GD??(??/x0d??/a:???;a"+'?'/4)
??($??)+'?'/3-2-1+$%2)??''?')):'?';??>
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
008
26.02.2006, 18:02 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


Aha also doch so einfach. Ich dachte erst kann das was mit Jägermeister zu tun haben, hab dann aber den gedanken wieder verworfen. Hab gedacht das kann es gar nicht sein da dieses perverse Kräuterlikörschen nicht der Erwähnung wert ist. (aber ok stimmt ja das Gedöns will ja der Schimpanse saufen )
--
...fleißig wie zwei Weißbrote
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
009
26.02.2006, 18:24 Uhr
kronos
Quotenfisch
(Operator)


Vielleicht pervers, aber auch sehr effektiv und erfolgreich.
Schätze Jägi ist einfach Erziehungssache...
--
main($)??<-$<='?'>>2?main($-!!putchar(
(("$;99M?GD??(??/x0d??/a:???;a"+'?'/4)
??($??)+'?'/3-2-1+$%2)??''?')):'?';??>
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
Seiten: > 1 < [ 2 ]     [ Assembler ]  


ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: