Subversion Repositories tsfmpro

Rev

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

  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,14
  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_64C1
  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_64C1
  41.                 ld      a, h
  42.                 add     a, 8
  43.                 ld      h, a
  44.  
  45. loc_0_64C1:
  46.                 ld      a,h
  47.                 cp      50h
  48.                 jr      c,loc_0_64C2
  49.                 ld      h,40h
  50.                 ld      a,l
  51.                 and     1Fh
  52.                 ld      l,a
  53. loc_0_64C2:
  54.                 ld      (ix++0), l
  55.                 ld      (ix++1), h
  56.                 ld      b, 1
  57.                 call    sub_0_6464
  58.                 ld      a,(loc_0_64A1+1)
  59.                 set     6,a
  60.                 ld      (loc_0_64D4+1), a
  61. loc_0_64D4:
  62.                 set     0, (hl)
  63.                 pop     bc
  64.                 djnz    loc_0_6488
  65.                 ret    
  66.  
  67. Star_init:
  68.                 ld      ix,Star_table_cnst0
  69.                 ld      b,28
  70.  
  71. sub_0_6464:
  72.                 ld      l, (ix++0)
  73.                 ld      h, (ix++1)
  74.                 ld      a, (ix++4)
  75.                 ld      (loc_0_6471+1),a
  76.                 xor     a
  77. loc_0_6471:
  78.                 bit     6, (hl)
  79.                 jr      z, loc_0_6477
  80.                 ld      a, 1
  81. loc_0_6477:
  82.                 ld      (ix++5), a
  83.                 ld      de, 6
  84.                 add     ix, de
  85.                 djnz    sub_0_6464
  86.                 ret    
  87.  
  88.  
  89. Star_table_cnst0:
  90.  
  91.                 db      28h,40h,9Eh,0DEh,5Eh,0  
  92.                 db      0DBh,40h,0BEh,0FEh,7Eh,0  
  93.                 db      78h,41h,0A6h,0E6h,66h,0
  94.                 db      0Eh,42h,9Eh,0DEh,5Eh,0  
  95.                 db      0FEh,42h,9Eh,0DEh,5Eh,0  
  96.                 db      82h,43h,9Eh,0DEh,5Eh,0  
  97.                 db      0EAh,43h,0B6h,0F6h,76h,1;  
  98.                 db      0AFh,46h,0A6h,0E6h,66h,0  
  99.                 db      36h,48h,0BEh,0FEh,7Eh,0  
  100.                 db      0F8h,4Ah,0A6h,0E6h,66h,0  
  101.                 db      08h,4Dh,9Eh,0DEh,5Eh,0  
  102.                 db      25h,4Eh,0BEh,0FEh,7Eh,0  
  103.                 db      53h,4Eh,0BEh,0FEh,7Eh,0  
  104.                 db      0FFh,4Fh,9Eh,0DEh,5Eh,0  
  105.  
  106. Star_table_cnst2:
  107.                 db      0ADh,43h,8Eh,0CEh,4Eh,0  
  108.                 db      0E2h,43h,0A6h,0E6h,66h,1  
  109.                 db      46h,44h,0BEh,0FEh,7Eh,0  
  110.                 db      2Fh,48h,86h,0C6h,46h,0  
  111.                 db      0ACh,47h,0A6h,0E6h,66h,0  
  112.                 db      0A7h,49h,9Eh,0DEh,5Eh,0  
  113.                 db      0EAh,49h,8Eh,0CEh,4Eh,0  
  114.                 db      6Ch,4Ah,0B6h,0F6h,76h,0  
  115.                 db      0B4h,4Bh,8Eh,0CEh,4Eh,0  
  116.                 db      0E3h,4Bh,86h,0C6h,46h,0  
  117.                 db      3Ah,4Dh,0BEh,0FEh,7Eh,0  
  118.                 db      80h,4Dh,96h,0D6h,56h,0  
  119.                 db      9Dh,4Dh,86h,0C6h,46h,0  
  120.                 db      0B0h,4Dh,96h,0D6h,56h,0  
  121.  
  122.  
  123.  
  124.  
  125.