а у меня баще
Код:;------------------------------- ;Turbo Sound проверялка ;AY/YM проверялка XOR A LD HL,#FE00 LD DE,#FFBF LD BC,#FFFD OUT (C),B ;SELECT TS AY0 CHRV OUT (C),A ;SELECT REG 0 LD B,E OUT (C),B ;WRITE #BF IN REG 0 AY0 CHRV INC A OUT (#1F),A ;SELECT TS AY1 POS OUT (C),C ;WRITE #FD IN REG 0 AY1 POS LD B,D OUT (C),H ;SELECT TS AY1 CHRV OUT (C),L ;SELECT REG 0 LD B,E OUT (C),H ;WRITE #FE IN REG 0 AY1 CHRV LD A,L OUT (#1F),A ;SELECT TS AY0 POS OUT (C),L ;WRITE #00 IN REG 0 AY0 POS INC A OUT (#1F),A ;SELECT TS AY1 POS LD B,D OUT (C),D ;SELECT TS AY0 CHRV OUT (C),L ;SELECT REG 0 IN A,(C) ;READ BYTE FROM REG 0 CP C ;TS PoS ;TS NPC ;NO AY ;AY/YM ;переходим если нашли Turbo-Sound by NedoPC JR Z,TS_NedoPC ;переходим если нет ваще чипа INC A JR Z,NO_AY ;переходим если нашли Turbo-Sound by PoS INC A JR Z,TS_PoS ;пришли сюда если у нас всего один чип и он есть ;......





Ответить с цитированием
Размещение рекламы на форуме способствует его дальнейшему развитию 
