Subversion Repositories tsfmpro

Rev

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

  1. Star_play_one:
  2.                 ld      ix, Star_table_cnst0
  3.                 push    ix
  4.                 call    loc_0_6487
  5.                 pop     ix
  6.                 jr      loc_0_6487
  7.  
  8. Star_play:
  9.                 ld      ix,Star_table_cnst2
  10.  
  11. loc_0_6487:
  12.                 ld      b,16
  13.  
  14. loc_0_6488:
  15.                 push    bc
  16.                 ld      l, (ix++0)
  17.                 ld      h, (ix++1)
  18.                 ld      d, (ix++2)
  19.                 ld      e, (ix++3)
  20.                 ld      a, (ix++5)
  21.                 cp      1
  22.                 ld      a, d
  23.                 jr      nz, loc_0_649E
  24.                 ld      a, e
  25. loc_0_649E:
  26.                 ld      (loc_0_64A1+1), a
  27. loc_0_64A1:
  28.                 res     0, (hl)
  29.                 inc     h
  30.                 ld      a, h
  31.                 and     7
  32.                 jr      nz, loc_0_64C2
  33.                 ld      a, h
  34.                 sub     8
  35.                 ld      h, a
  36.                 ld      a, l
  37.                 add     a, 20h ; ' '
  38.                 ld      l, a
  39.                 and     0E0h
  40.                 jr      nz, loc_0_64C2
  41.                 ld      a, h
  42.                 add     a, 8
  43.                 ld      h, a
  44.                 and     18h
  45.                 cp      18h
  46.                 jr      nz, loc_0_64C2
  47.                 ld      h, 40h
  48.  
  49. loc_0_64C2:
  50.                 ld      (ix++0), l
  51.                 ld      (ix++1), h
  52.                 ld      b, 1
  53.                 call    sub_0_6464
  54.                 ld      a,(loc_0_64A1+1)
  55.                 set     6,a
  56.                 ld      (loc_0_64D4+1), a
  57. loc_0_64D4:
  58.                 set     0, (hl)
  59.                 pop     bc
  60.                 djnz    loc_0_6488
  61.                 ret    
  62.  
  63. Star_init:
  64.                 ld      ix,Star_table_cnst0
  65.                 ld      b,32
  66.  
  67. sub_0_6464:
  68.                 ld      l, (ix++0)
  69.                 ld      h, (ix++1)
  70.                 ld      a, (ix++4)
  71.                 ld      (loc_0_6471+1),a
  72.                 xor     a
  73. loc_0_6471:
  74.                 bit     6, (hl)
  75.                 jr      z, loc_0_6477
  76.                 ld      a, 1
  77. loc_0_6477:
  78.                 ld      (ix++5), a
  79.                 ld      de, 6
  80.                 add     ix, de
  81.                 djnz    sub_0_6464
  82.                 ret    
  83.  
  84.  
  85. Star_table_cnst0:
  86.  
  87.                 db      2Ah,40h,9Eh,0DEh,5Eh,0  
  88.                 db      0D4h,40h,0BEh,0FEh,7Eh,0  
  89.                 db      75h,41h,0A6h,0E6h,66h,0
  90.                 db      10h,42h,9Eh,0DEh,5Eh,0  
  91.                 db      0EFh,42h,0BEh,0FEh,7Eh,0  
  92.                 db      8Ch,43h,9Eh,0DEh,5Eh,0  
  93.                 db      0EAh,43h,0B6h,0F6h,76h,0;  
  94.                 db      0AFh,46h,0A6h,0E6h,66h,0  
  95.                 db      0F0h,4Ah,0A6h,0E6h,66h,0  
  96.                 db      0Dh,4Dh,9Eh,0DEh,5Eh,0  
  97.                 db      34h,4Eh,0BEh,0FEh,7Eh,0  
  98.                 db      53h,4Eh,0BEh,0FEh,7Eh,0  
  99.                 db      0F1h,4Fh,0A6h,0E6h,66h,0  
  100.                 db      31h,53h,0BEh,0FEh,7Eh,0  
  101.                 db      52h,54h,0BEh,0FEh,7Eh,0  
  102.                 db      0F5h,57h,9Eh,0DEh,5Eh,0  
  103.  
  104. Star_table_cnst2:
  105.                 db      0ADh,43h,8Eh,0CEh,4Eh,0  
  106.                 db      0F2h,43h,0A6h,0E6h,66h,0  
  107.                 db      4Ch,44h,0BEh,0FEh,7Eh,0  
  108.                 db      2Fh,48h,86h,0C6h,46h,0  
  109.                 db      0ABh,47h,0A6h,0E6h,66h,0  
  110.                 db      0AFh,49h,9Eh,0DEh,5Eh,0  
  111.                 db      0EAh,49h,8Eh,0CEh,4Eh,0  
  112.                 db      6Ch,4Ah,0B6h,0F6h,76h,0  
  113.                 db      0B4h,4Bh,8Eh,0CEh,4Eh,0  
  114.                 db      0E9h,4Bh,86h,0C6h,46h,0  
  115.                 db      90h,4Dh,96h,0D6h,56h,0  
  116.                 db      0B1h,50h,96h,0D6h,56h,0  
  117.                 db      55h,53h,0BEh,0FEh,7Eh,0  
  118.                 db      6Fh,54h,0BEh,0FEh,7Eh,0  
  119.                 db      2Dh,56h,86h,0C6h,46h,0  
  120.                 db      0EFh,57h,9Eh,0DEh,5Eh,0  
  121.  
  122.  
  123.  
  124.  
  125.