Unterprogramme

ITGler · Anmeldungsdatum: 05.04.2005 Beiträge: 3

Hallo,
ich muss eine Ampelsteuerung mit dem 8051 controller Programmieren

dabei ist
p1.0 Kfz-Ampel grün
p1.1 Kfz-Ampel gelb
p1.2 Kfz-Ampel rot
p1.3 Fußgaenger-Ampel grün
p1.4 Fußgaenger-Ampel rot
p1.5 Taste
p1.6 Taste reset

hier den Code

;Autor: itgler
;Datum: 6.10.05
;File-Name: ampel

start:

clr p1.3
setb p1.4 /* Fusgaengerampel rot */

mov R7, #00000111
call zeit /* verzoegerung*/

setb p1.1
clr p1.2 /* KFZ-Ampel gelb */

mov R7, #00000011
call zeit /* verzoegerung*/

setb p1.0
clr p1.1 /* KFZ-Ampel gruen */

loop:
JNB p1.5, loop /* Tastenkontrolle */

mov R7, #00000011
call zeit /* verzoegerung */

setb p1.1
clr p1.0/* KFZ-Ampel gelb */

mov R7, #00000111
call zeit /* verzoegerung*/

setb p1.2
clr p1.1 /* KFZ-Ampel rot */

mov R7, #00000111
call zeit /* verzoegerung*/

setb p1.3
clr p1.4 /* Fusgaengerampel gruen */

mov R7, #00001111
call zeit /* verzoegerung*/

setb p1.6
clr p1.6
clr p1.5 /* Tasteruecksetzung */

jmp start

end

und das Unterprogramm:

;Autor: itgler
;Datum: 6.10.05
;File-Name: zeit

start:
dec R7
cjne R7, #00000000, start

ret

jedenfalls will ich das Programm mit Unterprogramm in dem 8051win simulationsprogramm ausführen. Geht aber nicht. Wie kann ich das machen.

TMS · Gast

Hi,
ich kenn deinen Simulator nicht, aber ich würde einfach mal das Label bei deinem Unterprogramm ändern. -> Z.B. auf "zeit"

zeit:
dec R7
cjne R7, #00000000, zeit

ret

kannst du dein Programm denn assemblieren?

Gruß
TMS
Wink