Masters !! una consulta que no logro descular...
Por lo que lei en los manuales de CBM 64 se puede crear tu juego de caracteres, esto se realiza copiando el juego original de la c64 de la rom a la ram para despues poder reemplazarlos a gusto.

Realice el siguiente listado para probar
  5 printchr$(142)               :rem switch to upper case  
10 poke52,48:poke 56,48:clr    :rem reserve memory for characters  
20 poke56334,peek(56334)and254 :rem turn off keyscan interrupt timer  
30 poke1,peek(1)and251         :rem switch in character  
40 fori=0to511:pokei+12288,peek(i+53248):next  
50 poke1,peek(1)or4            :rem switch in i/o  
60 poke56334,peek(56334)or1    :rem restart keyscan interrupt timer  
70 end

ahora suponiendo que quiera reemplazar el singo > por la z reversa habria que poner algo como

 FOR I=0 TO 7:POKE 12784+I,255-PEEK(I+12496):NEXT

cuando pruebo esto no me funciona, alguien sabe que estoy haciendo mal ??
Esta info la saque del manual.
Desde ya muchas gracias.

Saludos Christian

Suponiendo que el resto esta bien, te falta configurar al chip de video para que 'vea' al juego de caracteres en donde vos lo copiaste:

55 poke53272,peek(53272)or16

Tene en cuenta que en la linea 40 solo copias 512 bytes, que corresponde solo a los primeros 64 caracteres, hay 255 en total.

Suponiendo que el resto esta bien, te falta configurar al chip de video para que 'vea' al juego de caracteres en donde vos lo copiaste: 55 poke53272,peek(53272)or16 Tene en cuenta que en la linea 40 solo copias 512 bytes, que corresponde solo a los primeros 64 caracteres, hay 255 en total.

the woz

Gracias por tu respuesta, no tendrias algun ejemplo simple para que pueda entenderlo mejor ?
Saludos. Christian

Que dudas tenes?

Que dudas tenes?

the woz

no entiendo como hago para saber en que direccion esta el caracter x que quiero reemplazar por mi caracter, teniendo en cuenta que ya tengo los DATA generados de mi caracter.

¿Hay alguna formula para saber que posicion ocupa el caracter?

Perdon por mi ignorancia. Saludos

Para calcular la dirección del caracter, primero necesitas saber el orden del caracter dentro del juego de caracteres (que no es el mismo que el codigo ascii).

Este valor se llama el codigo de pantalla (o screencode en ingles), aca esta la tabla: LINK

Teniendo ese valor (llamemosle CP), como la definición de cada caracter ocupa 8bytes, haciendo CP*8 tenes el offset a partir de la dirección inicial del juego de caracteres.

En tu caso, por ejemplo si queres modificar '>' para que se vea como la 'Z' inversa tenes asi:

C1 = 62 (El codigo de >)
C2 = 154 (El codigo de la Z inversa)

el offset para > es:
O1 = 62*8 = 496
y el de la Z inversa:
O2 = 154*8 = 1232

Entonces la dirección de destino para > es
D1 = 12288+496 = 12784
y la dirección de origen de la Z inversa es
D2 = 53248+1232 = 54480

En tu programa entonces tendrias que hacer

61 D1=12784:D2=54480
62 FORI=0TO7:POKED1+I,PEEK(D2+I):NEXT

y listo


Si queres cambiar el '>' por la z inversa minuscula, esa esta en el segundo juego de caracteres (el que accedes al apretar C=+SHIFT), entonces a D2 le tenes que sumar 2048:
D2 = 56528

Que dudas tenes?

the woz

no entiendo como hago para saber en que direccion esta el caracter x que quiero reemplazar por mi caracter, teniendo en cuenta que ya tengo los DATA generados de mi caracter.

¿Hay alguna formula para saber que posicion ocupa el caracter?

Perdon por mi ignorancia. Saludos

Christian Gonzalo

Me fui por las ramas en mi ejemplo anterior, no me acorde que habias puesto que tenias las datas.

Con datas es practicamente igual, solo que en vez de POKE D1+I,PEEK(D2+I) usas READ A:POKED1+I,A
En este caso, si tenes varios caracteres a modificar lo mejor es que sean todos seguidos, calculas la direccion del primero y luego los redefinis todos en un solo bucle.

Que dudas tenes?

the woz

no entiendo como hago para saber en que direccion esta el caracter x que quiero reemplazar por mi caracter, teniendo en cuenta que ya tengo los DATA generados de mi caracter.

¿Hay alguna formula para saber que posicion ocupa el caracter?

Perdon por mi ignorancia. Saludos

Christian Gonzalo

Me fui por las ramas en mi ejemplo anterior, no me acorde que habias puesto que tenias las datas.

Con datas es practicamente igual, solo que en vez de POKE D1+I,PEEK(D2+I) usas READ A:POKED1+I,A
En este caso, si tenes varios caracteres a modificar lo mejor es que sean todos seguidos, calculas la direccion del primero y luego los redefinis todos en un solo bucle.

the woz

Lo suyo es academico!!!! muchas gracias, me quedo claro !!!

Gracias doy el tema por concluido por favor cerrar hilo, muchas gracias por la ayuda. Saludos