Subversion Repositories ngs

Rev

Rev 105 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 105 Rev 107
Line 52... Line 52...
52
 
52
 
53
INI_MP3         LD A,8
53
INI_MP3         LD A,8
54
                CALL COM__SD
54
                CALL COM__SD
55
;ИНИЦИАЛИЗАЦИЯ MP3 ЧИПА
55
;ИНИЦИАЛИЗАЦИЯ MP3 ЧИПА
56
INI__SD         LD SP,GSSTEK
56
INI__SD         LD SP,GSSTEK
57
                IN A,(DPORT1)
57
                IN A,(DAMNPORT1)
58
START2          XOR A
58
START2          XOR A
59
                CALL COM__SD
59
                CALL COM__SD
60
                AND A
60
                AND A
61
;ИНИЦИАЛИЗАЦИЯ SD КАРТЫ
61
;ИНИЦИАЛИЗАЦИЯ SD КАРТЫ
62
                JR Z,START1
62
                JR Z,START1
Line 97... Line 97...
97
                LD A,0X77
97
                LD A,0X77
98
;КОД ОШИБКИ =ВСЕ ЗАМЕЧАТЕЛЬНО
98
;КОД ОШИБКИ =ВСЕ ЗАМЕЧАТЕЛЬНО
99
START4          LD (REJIMGS),A
99
START4          LD (REJIMGS),A
100
                OUT (ZXDATWR),A
100
                OUT (ZXDATWR),A
101
;СООБЩИЛИ СПЕКУ О РЕЗУЛЬТАТАХ ИНИТА
101
;СООБЩИЛИ СПЕКУ О РЕЗУЛЬТАТАХ ИНИТА
102
                IN A,(DPORT1)
102
                IN A,(DAMNPORT1)
103
 
103
 
104
;ОСНОВМОЙ ЦИКЛ ОБЩЕНИЯ СО СПЕКОМ
104
;ОСНОВМОЙ ЦИКЛ ОБЩЕНИЯ СО СПЕКОМ
105
OPROS           IN A,(ZXSTAT)
105
OPROS           IN A,(ZXSTAT)
106
                RRA
106
                RRA
107
                JR C,OPROS1
107
                JR C,OPROS1