pruebas/asx8051/led.asm

   1 ; vim: set filetype=asm51 :
   2
   3         ; Constantes
   4         LED = p0.0
   5
   6         ; Área de inicio
   7         .area   START_CODE (CODE,ABS)
   8         ;.org   0
   9         sjmp    inicio
  10
  11         ; Área del código principal del programa
  12         ;.area  INICIO (CODE)
  13         ;.org   0x30
  14 inicio:
  15         ; while (1)
  16         ;       for (i=4; i > 0; --i)
  17         ;               for (j=255; j > 0; --j);
  18         ;       complementar_led();
  19         mov     r1,#4
  20 loop_externo$:
  21         mov     r0,#255
  22 loop_interno$:
  23         djnz    r0,loop_interno$
  24         djnz    r1,loop_externo$
  25         cpl     LED
  26         sjmp    inicio
  27