Subversion Repositories pentevo

Rev

Blame | Last modification | View Log | Download | RSS feed | ?url?

  1.         cpu     1802
  2.         page    0
  3.  
  4.         ; case 1: all is in one page:
  5.         ;  jz becomes bz
  6.         ;  jnz becomes bnz
  7.  
  8.         org     40h
  9.  
  10. dly1:   glo     2
  11.         jz      skip1
  12. l1:     dec     2
  13.         glo     2
  14.         jnz     l1
  15. skip1:  nop
  16.  
  17.         ; case 2: page boundary in loop body:
  18.         ;  jz becomes lbz
  19.         ;  jnz becomes lbnz
  20.  
  21.         org     1fbh
  22.  
  23. dly2:   glo     2
  24.         jz      skip2
  25. l2:     dec     2
  26.         glo     2
  27.         jnz     l2
  28. skip2:  nop
  29.  
  30.         ; just to test all instructions at least once:
  31.  
  32.         jmp     280h
  33.         br      280h
  34.         jz      280h
  35.         bz      280h
  36.         jnz     280h
  37.         bnz     280h
  38.         jdf     280h
  39.         bdf     280h
  40.         jpz     280h
  41.         bpz     280h
  42.         jge     280h
  43.         bge     280h
  44.         jnf     280h
  45.         bnf     280h
  46.         jm      280h
  47.         bm      280h
  48.         jl      280h
  49.         bl      280h
  50.         jq      280h
  51.         bq      280h
  52.         jnq     280h
  53.         bnq     280h
  54.  
  55.         jmp     2800h
  56.         lbr     2800h
  57.         jz      2800h
  58.         lbz     2800h
  59.         jnz     2800h
  60.         lbnz    2800h
  61.         jdf     2800h
  62.         lbdf    2800h
  63.         jpz     2800h
  64.         lbpz    2800h
  65.         jge     2800h
  66.         lbge    2800h
  67.         jnf     2800h
  68.         lbnf    2800h
  69.         jm      2800h
  70.         lbm     2800h
  71.         jl      2800h
  72.         lbl     2800h
  73.         jq      2800h
  74.         lbq     2800h
  75.         jnq     2800h
  76.         lbnq    2800h
  77.