1; WYZ player 2; 3; Hardware output routine for MyVision 4; 5; 6 7 SECTION code_psg 8 9 PUBLIC asm_wyz_hardware_out 10 11 EXTERN asm_wyz_PSG_REG 12 EXTERN asm_wyz_PSG_REG_SEC 13 EXTERN asm_wyz_ENVOLVENTE_BACK 14 15 16asm_wyz_hardware_out: 17 LD A,(asm_wyz_PSG_REG+13) 18 AND A ;ES CERO? 19 JR Z,NO_BACKUP_ENVOLVENTE 20 LD (asm_wyz_ENVOLVENTE_BACK),A ;08.13 / GUARDA LA ENVOLVENTE EN EL BACKUP 21 XOR A 22NO_BACKUP_ENVOLVENTE: 23 LD C,$00 24 LD HL,asm_wyz_PSG_REG_SEC 25LOUT: 26 OUT (C),A 27 INC C 28 OUTI 29 DEC C 30 INC A 31 CP 13 32 JR NZ,LOUT 33 OUT (C),A 34 LD A,(HL) 35 AND A 36 RET Z 37 INC C 38 OUT (C),A 39 XOR A 40 LD (asm_wyz_PSG_REG_SEC+13),A 41 LD (asm_wyz_PSG_REG+13),A 42 RET 43 44