Попеременное включение механизмов

[X@OC]

Доброго времени суток

Помогите пожалуйста разобраться в задание

Задание звучит так

Написать программу управления 8 исполнительными механизмами так, чтобы механизмы включались попеременно один за другим и в каждый момент времени был включен всего один механизм.

в Assembler два дня, пишу в Prog-Studio(Batronix) и хочется разобраться и понять

В программе посылаю импульс на включить и отключить с промежуточным вызовом подпрограммы временной задержки, но программа не работает

$INCLUDE "Common\8052.mc"
$INCLUDE declarations.asm

    Initialize:

    Main:

PULS:                       ;выдача импульса в линию 3 порта 1 
ON:    ANL P1, #11110111B   ;включение исполнительного механизма
       CALL DELAY           ;временная задержка
OFF:   ORL P1, #00001000B   ;отключение исполнительного механизма


   Finalize:
        JMP finalize

Лично я понял что каждый механизм подключен к своему порту т.е.
P1 - механизм 1
P2 - механизм 2
....
P8 - механизм 8

как сделать цикл для прохода всех механизмов?

Заранее спасибо за помощь

[С.М.С]

С этим не работал, а где процедура задержки? и компилятор чуствителен к регистру буквы, а то у вас Finalize и finalize

[X@OC]

а где процедура задержки?

CALL DELAY           ;временная задержка

вроде эта процедура задержки

компилятор чуствителен к регистру буквы

нет не чувствителен

[С.М.С]

Это вызов процедуры, а где сама процедура?

[X@OC]

вроде вот

DELAY : MOV R1, #105       ;загрузка Х 
LOOPEX: MOV R2, #236      ;загрузка Y 
LOOPIN: DJNZ R2, LOOPIN   ;декркмент R2 и внутренний цикл,
                          ;если (R2) не равно нулю 
        DJNZ R1, LOOPEX   ;декремент R1 и внешний цикл,
                          ;если (R1) не равно нулю 
        MOV R3, #12        ;точная подстройка 
LOOPAD: DJNZ R3, LOOPAD   ;временной задержки 
        RET

[С.М.С]

Теперь вроде похоже. Я с этой средой не работал. А в отладчике покомандно переход от команды к команде есть?

[X@OC]

есть покомандный переход

[С.М.С]

Тогда в чём проблема, в цикле?

[X@OC]

наверно в цикле я не знаю собирал все по частям
У вас все заработало?

если да
дайте пожалуйста силку на вашу среду разработки
спасибо

[С.М.С]

Да не работал я в этой среде и нет её у меня. Работаю в AVR студии, но ассемблер он и в африке ассемблер, грубо говоря только синтаксис другой. Что за контроллер?