Kleines Beispiel:
Code:
.equ    fenster1offen, pX.X

main:
  call  wait5s
  call  cursor_home
  mov  dptr,#text1
  jb  fenster1offen, FensterIstOffen
  mov  dptr,#text11
FensterIstOffen:
  call  pstring


  call  wait5s
...
...
...
...
jmp  main
;---------------------------------------------------------
pstring:
  push  acc
pstr1:
  clr  a
  movc  a, @a+dptr
  inc  dptr
  jz  pstr2
  call  cout_lcd
jmp  pstr1
pstr2:
  pop  acc
ret
;---------------------------------------------------------
text1:
db "Fenster offen", 0
text11:
db "Fenster zu", 0