AsCrNet escribió:WillySoft escribió:
Bueno, una forma de hacer caracteres más rápidos en dibujándolos con algún programa de dibujo, como el Rambrandt, para después grabar dicho archivo en formato micropainter. Después lo puedes convertir en caracteres con un utilitario del Envision. (el original, no el EnvisionPC) Es una alternativa al menos.
Respecto a los colores, lo que hace el Draconus, por ejemplo, es utilizar un color y tres grados de brillo. Eso lo puedes implementar usando número hexadecimales. Ejemplo: tres grados de gris: $02,$06,$0A. Tres grados de rojo: $42,$46,$4A. Las "hexadecenas" te indican el color, y las "hexaunidades", el brillo.
vale master por los datos, pero encontre una utilidad para trabajar directamente en el set de caracteres en modo antic llama colorfont y usando en EnvisonPC para que me genere los datas en Action!
ejemplo
esos colores que usted dio no me salieron

pero la imagen tiene los siquientes colores
y medi cuenta que con el font son poco diseños que se pueden hacer, ya para cada figuras uso 4 letras, hay alguna forma de hacer mas graficos
saludos
A ver, las posiciones 708, 709 y 710 contienen tres brillos de grises. Los valores que te di más arriba fueron sólo de ejemplo. Con respecto a la posición 711, corresponde a un quinto color que no se ve por ahora. Eso se hace con un truco.
Para hacer más gráficos, tienes la alternativa de usar una DLI que modifique el font a partir de cierta línea, modificando la posición CHBASE ($D409), o bien redefinir caracteres según lo vayas utilizando. La opción dependerá de lo que necesites hacer. En el caso del Culmins, utilizo una combinación de ambas técnicas.
Mira este ejemplo de DLI de fonts, a ver si te sirve:
Código: Seleccionar todo
WSYNC = $D40A
COLBK = $D01A
NMIEN = $D40E
VDSLST = $200
SDLSTL = $230
COLOR4 = $2C8
CHBASE = $D409
COLPF2 = $D018
COLPF1 = $D017
* = $6000
DL
.byte $70,$70,$70,$70,$70,$42
.word PANTALLA
.byte $70,$70+$80,$2
.byte $41
.word DL
PANTALLA
.sbyte "Esta una pruebaFONT1",1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
.sbyte "Esta una pruebaFONT2",1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
inicio
lda #<dl
sta sdlstl
lda #>dl
sta sdlstl+1
lda #<dli
sta vdslst
lda #>dli
sta vdslst+1
lda #$c0
sta nmien
lda #$00
sta color4
loop
jmp loop
dli
pha
txa
pha
tya
pha
lda #$00
ldx #204
ldy valor.pf1
sta wsync
sta colpf2
stx chbase
sty colpf1
dec valor.pf1
pla
tay
pla
tax
pla
rti
valor.pf1
.byte $00
*=$2e0
.word inicio
¡Saludos!