?login_element?

Subversion Repositories NedoOS

Rev

Rev 126 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.     OUTPUT "op_C0_FF.bin"
  2.     ;; solid formatting, just to get C0..FF sequence (interleaved by $44 where needed)
  3.     ret     nz
  4.     pop     bc
  5.     jp      nz,$4444
  6.     jp      $4444
  7.     call    nz,$4444
  8.     push    bc
  9.     add     a,$44
  10.     rst     00h
  11.     ret     z
  12.     ret
  13.     jp      z,$4444
  14.     bit     0,h     ; BITS 0xCB prefix + 0x44
  15.     call    z,$4444
  16.     call    $4444
  17.     adc     a,$44
  18.     rst     0x08
  19.     ret     nc
  20.     pop     de
  21.     jp      nc,$4444
  22.     out     ($44),a
  23.     call    nc,$4444
  24.     push    de
  25.     sub     $44
  26.     rst     $10
  27.     ret     c
  28.     exx
  29.     jp      c,$4444
  30.     in      a,($44)
  31.     call    c,$4444
  32.     ld      b,ixh   ; IX 0xDD prefix + 0x44
  33.     sbc     a,$44
  34.     rst     #18
  35.     ret     po
  36.     pop     hl
  37.     jp      po,$4444
  38.     ex      (sp),hl
  39.     call    po,$4444
  40.     push    hl
  41.     and     $44
  42.     rst     32
  43.     ret     pe
  44.     jp      (hl)
  45.     jp      pe,$4444
  46.     ex      de,hl
  47.     call    pe,$4444
  48.     neg             ; EXTD 0xED prefix + 0x44
  49.     xor     $44
  50.     rst     28h
  51.     ret     p
  52.     pop     af
  53.     jp      p,$4444
  54.     di
  55.     call    p,$4444
  56.     push    af
  57.     or      $44
  58.     rst     #30
  59.     ret     m
  60.     ld      sp,hl
  61.     jp      m,$4444
  62.     ei
  63.     call    m,$4444
  64.     ld      b,iyh   ; IY 0xFD prefix + 0x44
  65.     cp      $44
  66.     rst     $38
  67.  
  68.     ;; separator
  69.     ds      $20, $44
  70.  
  71.     ;; parser exercises (mostly conditional jumps/calls/rets)
  72.     ret     NZ
  73.     jp      NZ , $4444
  74.     call    NZ , $4444
  75.     ret     Z
  76.     jp      Z , $4444
  77.     call    Z , $4444
  78.     ret     NC
  79.     jp      NC , $4444
  80.     call    NC , $4444
  81.     ret     C
  82.     jp      C , $4444
  83.     call    C , $4444
  84.     ret     PO
  85.     jp      PO , $4444
  86.     call    PO , $4444
  87.     ret     PE
  88.     jp      [HL]
  89.     jp      PE , $4444
  90.     call    PE , $4444
  91.     ret     P
  92.     jp      P , $4444
  93.     call    P , $4444
  94.     ret     M
  95.     jp      M , $4444
  96.     call    M , $4444
  97.  
  98.     RET     NZ
  99.     JP      NZ,$4444
  100.     JP      $4444
  101.     CALL    NZ,$4444
  102.     RET     Z
  103.     JP      Z,$4444
  104.     CALL    Z,$4444
  105.     CALL    $4444
  106.     RET     NC
  107.     JP      NC,$4444
  108.     CALL    NC,$4444
  109.     RET     C
  110.     JP      C,$4444
  111.     CALL    C,$4444
  112.     RET     PO
  113.     JP      PO,$4444
  114.     CALL    PO,$4444
  115.     RET     PE
  116.     JP      HL
  117.     JP      PE,$4444
  118.     CALL    PE,$4444
  119.     RET     NS
  120.     JP      NS,$4444
  121.     CALL    NS,$4444
  122.     RET     S
  123.     JP      S,$4444
  124.     CALL    S,$4444
  125.  
  126.     RET     nz
  127.     JP      nz  ,       $4444
  128.     CALL    nz  ,       $4444
  129.     RET     z
  130.     JP      z   ,       $4444
  131.     CALL    z   ,       $4444
  132.     RET     nc
  133.     JP      nc  ,       $4444
  134.     CALL    nc  ,       $4444
  135.     RET     c
  136.     JP      c   ,       $4444
  137.     CALL    c   ,       $4444
  138.     RET     po
  139.     JP      po  ,       $4444
  140.     CALL    po  ,       $4444
  141.     RET     pe
  142.     JP      pe  ,       $4444
  143.     CALL    pe  ,       $4444
  144.     RET     ns
  145.     JP      ns  ,       $4444
  146.     CALL    ns  ,       $4444
  147.     RET     s
  148.     JP      s   ,       $4444
  149.     CALL    s   ,       $4444
  150.  
  151.     JP      nz,$4444, z,$4444, m,$4444, ns,$4444, po,$4444
  152.     CALL    $4444, $4444, nz,$4444, z,$4444, p,$4444, pe,$4444
  153.