Subversion Repositories tsfmpro

Rev

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

Rev Author Line No. Line
546 dimkam 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