Here is another example in assembly.

DELAY:
MOV B, #0FFH ; Load 0xFF
; to Register B
WAIT1:
MOV A, #0FFH ;Load/Reload
;Accumulator
;with 0xFF
WAIT2:
DEC A ;Decrement A
JNZ WAIT2 ;Jump to Wait2
;if A = 0
MOV A,B ;Load A with
; with B
DEC A ; Dec A
MOV B,A ; Load B with A
JNZ WAIT1 ;jump to Wait1
RET ; return from
;sub routine