Školní projekt Světla na křižovatce, zapojení semaforu

tak zdravím znovu. Program mám sice hotovy, ale hlásí několik chyb… v programování v assembleru moc dobrý nejsem, tak doufám, že to budou jenom nějaké snadno odladitelné chybky. A teda ještě doufám, že mi někdo pomůže :smiley:

[code]
include REG51.INC
org 0;

;HLAVNÍ PROGRAM - START - *******************************************************************************************

START: JB P3.2, OR_HL_VEDL_BLIK ; bude blikat oranžová na hlavní a vedlejší s periodou 1 s, se střídou 1:1
SJMP CER_CHODCI_SVITI ; není-li splněna první podmínka, bude svíti červená chodci

		JB		P3.0,		PODM_2_CASTI								;		testování brány P3.0	na log. 1, pokud ano -> na navesti

;HLAVNÍ PROGRAM - KONEC - *******************************************************************************************

;**********************************
ZPOZ_1_SEKUNDA: mov R3,#251 ;*
prd3: mov R2,#234 ;*
prd2: mov R1,#7 ;*
prd1: djnz R1,prd1 ;*
djnz R2,prd2 ;*
djnz R3,prd3 ;*
Ret ;*
;**********************************
ZPOZ_15_SEKUND: mov R3,#254 ;*
pes3: mov R2,#115 ;*
pes2: mov R1,#255 ;*
pes1: djnz R1,pes1 ;*
djnz R2,pes2 ;*
djnz R3,pes3 ;*
Ret ;*
;**********************************
ZPOZ_3_SEKUND: mov R3,#254 ;*
krk3: mov R2,#23 ;*
krk2: mov R1,#255 ;*
krk1: djnz R1,krk1 ;*
djnz R2,krk2 ;*
djnz R3,krk3 ;*
Ret ;*
;**********************************
ZPOZ_20_SEKUND: mov R3,#255 ;*
prc3: mov R2,#153 ;*
prc2: mov R1,#255 ;*
prc1: djnz R1,prc1 ;*
djnz R2,prc2 ;*
djnz R3,prc3 ;*
Ret ;*
;**********************************

OR_HL_VEDL_BLIK: MOV P1.4, #0 ; zhasni ORANŽOVÁ VEDL
LCALL ZPOZ_1_SEKUNDA ; zpoždění 1 sekunda
MOV P1.4, #1 ; rozsvit ORANŽOVÁ VEDL
LCALL ZPOZ_1_SEKUNDA ; zpoždění 1 sekunda
MOV P1.1, #0 ; zhasni ORANŽOVÁ HLAVNÍ
LCALL ZPOZ_1_SEKUNDA ; zpoždění 1 sekunda
MOV P1.1, #1 ; rozsvit ORANŽOVÁ HLAVNÍ
LCALL ZPOZ_1_SEKUNDA ; zpoždění 1 sekunda
SJMP START
;****************************************************************************
CER_CHODCI_SVITI MOV P1.7, #1 ; svítí červená chodci
SJMP START
;****************************************************************************
PODM_2_CASTI LCALL ZPOZ_15_SEKUND ; po 15 sekundách další instrukce
MOV P1.1, #1 ; rozsvit ORANŽOVÁ HLAVNÍ
LCALL ZPOZ_3_SEKUND ; po 3 sekundách další instrukce
MOV P1.0, #1 ; rozsvit ČERVENÁ HLAVNÍ
MOV P1.7, #1 ; na 20 rozsvit ČERVENÁ CHODCI
LCALL ZPOZ_20_SEKUND ; 20 s bude svítit ČERVENÁ CHODCI
MOV P1.7, #0 ; ČERVENÁ CHODCI zhasnutá
MOV P1.6, #1 ; rozsviceni ZELENA CHODCI 20 s
LCALL ZPOZ_20_SEKUND ; 20 s bude svítit ZELENAÁ CHODCI

END[/code]