Simple Square wave generation in Keil

org 0h
mov a,#0ffh
mov b,#00h
back:mov p1,a
call delay
mov p1,b
call delay
sjmp back
delay:
mov r1,0ffh
back1:djnz r1,back1
ret
end