```montagem
; Definir portas de E/S
RELAY_PORT EQU 08h
; Definir instruções
MOV EQU 78h
FORA EQU D3h
HLT EQ 76h
; Programa principal
ORG 100h
; Inicialize a porta do relé como saída
MOV A, RELAY_PORT
MOV M, A
; Habilitar relé
MOV A, 01h
MOV B, RELAY_PORT
FORA (B), A
; Aguarde 5 segundos
MOV A, 5
MVI B, 10
L1:Atraso de CHAMADA
DCXB
MOV A, B
CPI 00h
JN L1
; Desativar relé
MOV A, 00h
MOV B, RELAY_PORT
FORA (B), A
; Pare o processador
ELH
; Sub-rotina de atraso
Atraso:
MVI A, 255
L2:DCR A
MOV M, A
MVI B, 10
L3:DCRB
MOV A, B
CPI 00h
JN L3
JNZ L2
RET
```
