https://github.com/antoniovillena/EmuSc ... /plus3.asm
Spirax escribió: ↑05 May 2022, 16:59cierto es un DEFS 5antoniovillena escribió: ↑05 May 2022, 01:10De primeras en el plus.asm que tengo hay un defs 5 en lugar de un defs 3, por lo que prefiero ver como quedaría el plus.asm final antes de liarla. Lo incluyo en el repositorio de Emuscriptoria.Spirax escribió: ↑02 May 2022, 10:21asi en el fichero plus3.asm
hay que hacer dos cambios.
cambio 1 buscar la seccion de los mensajesCódigo: Seleccionar todo
IF spanish defm $8b, 13, $fb, "NO PREPARADA", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO PROTEGIDO CONTRA ESCRITURA" defm $8e, $ff, $8c, 13, $fb, "FALLO DE BUSQUEDA", 13 defm $8e, $ff, $8d, "ERROR DE DATOS", 13 defm $8e, $ff, $8d, "SIN DATOS", 13 defm $8e, $ff, $8d, "FALTA MARCA DE DIRECCIONES", 13 defm $8e, $ff, $8b, 13, $fb, "FORMATO INCORRECTO", 13 defm $8e, $ff, $8d, "ERROR DESCONOCIDO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO CAMBIADO; SUSTITUYALO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO NO ADECUADO", 13 defm $8e, $ff, "Introduzca el disco en la unidad para ", $fe defm " y luego pulse una tecla", $ff defm "UNIDAD ", $fe defm ":", $ff, $8b, " PISTA ", $fd, $ff, $8c defm " SECTOR ", $fc, 13, $fb, $ff, $fa defm "]REINTENTAR, IGNORAR O CANCELAR?", $ff defs 3 ELSE
sorry culpa mia, lo copie de mis fuentes y yo lo tengo modificado, por que uso los dos bytes que faltan para otra cosa.
y tengo un defs 2 fuera del if spanish independientemente de si es en español o ingles.
y se me olvido al copiar el codigo aqui.
perdon
añadiendo los dos bytes que faltan en las dos partes del if rename_spanish, sería asi:
muchas gracias Antonio.Código: Seleccionar todo
IF spanish if rename_spanish defm $8b, 13, $fb, "NO PREPARADA", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO PROTEGIDO ESCRITURA" defm $8e, $ff, $8c, 13, $fb, "FALLO BUSQUEDA", 13 defm $8e, $ff, $8d, "ERROR DATOS", 13 defm $8e, $ff, $8d, "SIN DATOS", 13 defm $8e, $ff, $8d, "FALTA MARCA DE DIRECCIONES", 13 defm $8e, $ff, $8b, 13, $fb, "FORMATO INCORRECTO", 13 defm $8e, $ff, $8d, "ERROR DESCONOCIDO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO CAMBIADO; SUSTITUYALO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO NO ADECUADO", 13 defm $8e, $ff, "Introduzca el disco para ", $fe defm " y pulse una tecla", $ff defm "UNIDAD ", $fe defm ":", $ff, $8b, " PISTA ", $fd, $ff, $8c defm " SECTOR ", $fc, 13, $fb, $ff, $fa defm "]REINTENTAR, IGNORAR O CANCELAR?", $ff rename_sp push hl push af push bc call n2bd6 pop bc ccf ld a, $39 j_n2c46: jp nc, n2c46 pop af push af ld hl, $ef11 call n2b77 jr nc, j_n2c46 pop af pop hl ld de, $ef11 push bc ld bc, $0010 jp n2c46 - #0A defs 2 else defm $8b, 13, $fb, "NO PREPARADA", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO PROTEGIDO CONTRA ESCRITURA" defm $8e, $ff, $8c, 13, $fb, "FALLO DE BUSQUEDA", 13 defm $8e, $ff, $8d, "ERROR DE DATOS", 13 defm $8e, $ff, $8d, "SIN DATOS", 13 defm $8e, $ff, $8d, "FALTA MARCA DE DIRECCIONES", 13 defm $8e, $ff, $8b, 13, $fb, "FORMATO INCORRECTO", 13 defm $8e, $ff, $8d, "ERROR DESCONOCIDO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO CAMBIADO; SUSTITUYALO", 13 defm $8e, $ff, $8b, 13, $fb, "DISCO NO ADECUADO", 13 defm $8e, $ff, "Introduzca el disco en la unidad para ", $fe defm " y luego pulse una tecla", $ff defm "UNIDAD ", $fe defm ":", $ff, $8b, " PISTA ", $fd, $ff, $8c defm " SECTOR ", $fc, 13, $fb, $ff, $fa defm "]REINTENTAR, IGNORAR O CANCELAR?", $ff defs 5 endif ELSE