system.s (3)

; Системный файл
; Плата STM32F4-Discovery
; http://teplofizik.diary.ru/p179418376.htm

    AREA    |.text|, CODE, READONLY

            EXPORT SystemInit
            EXPORT delay

; Инициализация системы тактирования
; Аргументы: нет
; Результат: нет
SystemInit  PROC

            BX LR ; Возвращаемся обратно

            ENDP

; Программная задержка
; Аргументы: 1
;  R0 - величина задержки
; Результат: нет
delay       PROC
            ; Вычитаем единицу
            SUBS R0, R0, #1
            ; Пока не обнулилась, крутим дальше
            BNE delay

            BX LR
            ENDP

    END