Hello,
I sent you source file for definition characters for > SCREEN2. > I need of work in SCREEN2, for make scene background for > new videogame > for MSX1, then I need of this set characters and of to use > command basic > line, circle, draw and paint. > > I must understand as I can make for print characters in > screen2 with > this routine in assembler. > > I hope than you can help me, Please?' ^_^ > > See you later..... > Bye bye > Andrea from Italy > > > > > > > > ; ***************************************************** ; Progetto videogioco Karate Ching by AGsoftware 2009 ; ***************************************************** ; KARATE.BIN 23/07/09 ; Definizione caratteri NAMCO per lo SCREEN2 ; ***************************************************** ; Definizione sprites per lo SCREEN2 ; ***************************************************** .org $D000 - 7 .db $fe .dw startProgram,endProgram,startProgram startProgram: LDIRVM .equ $005c ; routine del BIOS usata per riempire la VRAM CHGMOD .equ $005f ; routine del BIOS usata per inizializzare lo schermo (V9938) CHRTBL1 .equ $0100 ; indirizzi tabelle delle forme +32*8 CHRTBL2 .equ $0900 CHRTBL3 .equ $1100 CLRTBL1 .equ $2100 ; indirizzi tabelle del colore +32*8 CLRTBL2 .equ $2900 CLRTBL3 .equ $3100 QTYFONT .equ $0300 ; 96*8 = 96 font SPRTBL .equ $3800 ; indirizzi tabelle definizione sprites ;SPRCLR .equ $1c00 ; indirizzi tabelle colore per sprites multicolore ; Inizializza i registri del VDP. writeVDP: di push af push bc push de push hl ld a,15 ; colore primo piano(scritte) ld ($f3e9),a ; indirizzo primo piano(scritte) ld a,1 ; colore sfondo ld ($f3ea),a ; indirizzo sfondo ld a,1 ; colore bordo ld ($f3eb),a ; indirizzo bordo call $62 ; chiama alla bios rom call $cc ; key off ; SCREEN 2 ld a,2 call CHGMOD ; SCREEN,2 = VDP(1)=98 = SPRITE16X16 ld a,98 out ($99),a ld a,1+128 out ($99),a ; Imposta la forma dei font ld hl,FONT_TBL ld de,CHRTBL1 ld bc,QTYFONT call LDIRVM ld hl,FONT_TBL ld de,CHRTBL2 ld bc,QTYFONT call LDIRVM ld hl,FONT_TBL ld de,CHRTBL3 ld bc,QTYFONT call LDIRVM ; Imposta la tabella colore dei font ld hl,COLOR_TBL ld de,CLRTBL1 ld bc,QTYFONT call LDIRVM ld hl,COLOR_TBL ld de,CLRTBL2 ld bc,QTYFONT call LDIRVM ld hl,COLOR_TBL ld de,CLRTBL3 ld bc,QTYFONT call LDIRVM ;Alloca la forma di 'COIN' in tabella ASCII ld hl,COIN ld de,CHRTBL1+(144*8)-$100 ld bc,4*8 call LDIRVM ld hl,COIN ld de,CHRTBL2+(144*8)-$100 ld bc,4*8 call LDIRVM ld hl,COIN ld de,CHRTBL3+(144*8)-$100 ld bc,4*8 call LDIRVM ;Alloca il colore di 'COIN' in tabella ASCII ld hl,COIN_COLOR ld de,CLRTBL1+(144*8)-$100 ld bc,4*8 call LDIRVM ld hl,COIN_COLOR ld de,CLRTBL2+(144*8)-$100 ld bc,4*8 call LDIRVM ld hl,COIN_COLOR ld de,CLRTBL3+(144*8)-$100 ld bc,4*8 call LDIRVM ;Alloca la forma di 'WALL' in tabella ASCII ld hl,WALL ld de,CHRTBL1+(152*8)-$100 ld bc,8 call LDIRVM ld hl,WALL ld de,CHRTBL2+(152*8)-$100 ld bc,8 call LDIRVM ld hl,WALL ld de,CHRTBL3+(152*8)-$100 ld bc,8 call LDIRVM ;Alloca il colore di 'WALL' in tabella ASCII ld hl,WALL_COLOR ld de,CLRTBL1+(152*8)-$100 ld bc,8 call LDIRVM ld hl,WALL_COLOR ld de,CLRTBL2+(152*8)-$100 ld bc,8 call LDIRVM ld hl,WALL_COLOR ld de,CLRTBL3+(152*8)-$100 ld bc,8 call LDIRVM ;Alloca la forma di 'GRAPES' in tabella ASCII ld hl,GRAPES ld de,CHRTBL1+(160*8)-$100 ld bc,4*8 call LDIRVM ld hl,GRAPES ld de,CHRTBL2+(160*8)-$100 ld bc,4*8 call LDIRVM ld hl,GRAPES ld de,CHRTBL3+(160*8)-$100 ld bc,4*8 call LDIRVM ;Alloca il colore di 'GRAPES' in tabella ASCII ld hl,GRAPES_COLOR ld de,CLRTBL1+(160*8)-$100 ld bc,4*8 call LDIRVM ld hl,GRAPES_COLOR ld de,CLRTBL2+(160*8)-$100 ld bc,4*8 call LDIRVM ld hl,GRAPES_COLOR ld de,CLRTBL3+(160*8)-$100 ld bc,4*8 call LDIRVM ;Alloca la forma di 'BANANA' in tabella ASCII ld hl,BANANA ld de,CHRTBL1+(168*8)-$100 ld bc,4*8 call LDIRVM ld hl,BANANA ld de,CHRTBL2+(168*8)-$100 ld bc,4*8 call LDIRVM ld hl,BANANA ld de,CHRTBL3+(168*8)-$100 ld bc,4*8 call LDIRVM ;Alloca il colore di 'BANANA' in tabella ASCII ld hl,BANANA_COLOR ld de,CLRTBL1+(168*8)-$100 ld bc,4*8 call LDIRVM ld hl,BANANA_COLOR ld de,CLRTBL2+(168*8)-$100 ld bc,4*8 call LDIRVM ld hl,BANANA_COLOR ld de,CLRTBL3+(168*8)-$100 ld bc,4*8 call LDIRVM ;Alloca la forma di 'ICECUBE' in tabella ASCII ld hl,ICECUBE ld de,CHRTBL1+(200*8)-$100 ld bc,4*8 call LDIRVM ld hl,ICECUBE ld de,CHRTBL2+(200*8)-$100 ld bc,4*8 call LDIRVM ld hl,ICECUBE ld de,CHRTBL3+(200*8)-$100 ld bc,4*8 call LDIRVM ;Alloca il colore di 'ICECUBE' in tabella ASCII ld hl,ICECUBE_COLOR ld de,CLRTBL1+(200*8)-$100 ld bc,4*8 call LDIRVM ld hl,ICECUBE_COLOR ld de,CLRTBL2+(200*8)-$100 ld bc,4*8 call LDIRVM ld hl,ICECUBE_COLOR ld de,CLRTBL3+(200*8)-$100 ld bc,4*8 call LDIRVM ; Alloca la forma degli sprite ;ld hl,SPRDEF ;ld de,SPRTBL ;ld bc,16*32 ;call LDIRVM ; Alloca il colore degli sprite ;ld hl,SPRCOLOR ;ld de,SPRCLR ;ld bc,4*16 ;call LDIRVM pop hl pop de pop bc pop af ei ret ; torna al basic FONT_TBL: ; Forma font 1o Set .db 000h,000h,000h,000h,000h,000h,000h,000h,018h,03Ch,03Ch,03Ch,018h,000h,018h,000h .db 06Ch,06Ch,048h,000h,000h,000h,000h,000h,06Ch,0FEh,06Ch,06Ch,06Ch,0FEh,06Ch,000h .db 018h,03Eh,058h,03Ch,01Ah,07Ch,018h,000h,000h,0C6h,0CCh,018h,030h,066h,0C6h,000h .db 070h,0C8h,0C8h,070h,09Ah,08Ch,076h,000h,018h,018h,010h,000h,000h,000h,000h,000h .db 00Ch,018h,030h,030h,030h,018h,00Ch,000h,030h,018h,00Ch,00Ch,00Ch,018h,030h,000h .db 000h,018h,05Ah,03Ch,03Ch,05Ah,018h,000h,000h,018h,018h,07Eh,018h,018h,000h,000h .db 000h,000h,000h,000h,018h,018h,008h,010h,000h,000h,000h,07Ch,000h,000h,000h,000h .db 000h,000h,000h,000h,000h,018h,018h,000h,000h,006h,00Ch,018h,030h,060h,0C0h,000h .db 038h,04Ch,0C6h,0C6h,0C6h,064h,038h,000h,018h,038h,018h,018h,018h,018h,07Eh,000h .db 07Ch,0C6h,00Eh,03Ch,078h,0E0h,0FEh,000h,07Eh,00Ch,018h,03Ch,006h,0C6h,07Ch,000h .db 01Ch,03Ch,06Ch,0CCh,0FEh,00Ch,00Ch,000h,0FCh,0C0h,0FCh,006h,006h,0C6h,07Ch,000h .db 03Ch,060h,0C0h,0FCh,0C6h,0C6h,07Ch,000h,0FEh,0C6h,00Ch,018h,030h,030h,030h,000h .db 07Ch,0C6h,0C6h,07Ch,0C6h,0C6h,07Ch,000h,07Ch,0C6h,0C6h,07Eh,006h,00Ch,078h,000h .db 000h,018h,018h,000h,018h,018h,000h,000h,000h,018h,018h,000h,018h,018h,008h,010h .db 00Ch,018h,030h,060h,030h,018h,00Ch,000h,000h,000h,07Ch,000h,07Ch,000h,000h,000h .db 060h,030h,018h,00Ch,018h,030h,060h,000h,07Ch,0C6h,006h,01Ch,030h,000h,030h,000h .db 03Ch,042h,099h,0A1h,0A1h,099h,042h,03Ch,038h,06Ch,0C6h,0C6h,0FEh,0C6h,0C6h,000h .db 0FCh,0C6h,0C6h,0FCh,0C6h,0C6h,0FCh,000h,03Ch,066h,0C0h,0C0h,0C0h,066h,03Ch,000h .db 0F8h,0CCh,0C6h,0C6h,0C6h,0CCh,0F8h,000h,0FEh,0C0h,0C0h,0F8h,0C0h,0C0h,0FEh,000h .db 0FEh,0C0h,0C0h,0F8h,0C0h,0C0h,0C0h,000h,03Eh,060h,0C0h,0CEh,0C6h,066h,03Eh,000h .db 0C6h,0C6h,0C6h,0FEh,0C6h,0C6h,0C6h,000h,07Eh,018h,018h,018h,018h,018h,07Eh,000h .db 006h,006h,006h,006h,006h,0C6h,07Ch,000h,0C6h,0CCh,0D8h,0F0h,0F8h,0DCh,0CEh,000h .db 0C0h,0C0h,0C0h,0C0h,0C0h,0C0h,0FEh,000h,0C6h,0EEh,0FEh,0FEh,0D6h,0C6h,0C6h,000h .db 0C6h,0E6h,0F6h,0FEh,0DEh,0CEh,0C6h,000h,07Ch,0C6h,0C6h,0C6h,0C6h,0C6h,07Ch,000h .db 0FCh,0C6h,0C6h,0C6h,0FCh,0C0h,0C0h,000h,07Ch,0C6h,0C6h,0C6h,0DEh,0CCh,076h,000h .db 0FCh,0C6h,0C6h,0CEh,0F8h,0DCh,0CEh,000h,078h,0CCh,0C0h,07Ch,006h,0C6h,07Ch,000h .db 07Eh,018h,018h,018h,018h,018h,018h,000h,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,07Ch,000h .db 0C6h,0C6h,0C6h,0EEh,07Ch,038h,010h,000h,0C6h,0C6h,0D6h,0FEh,0FEh,06Ch,044h,000h .db 0C6h,0EEh,07Ch,038h,07Ch,0EEh,0C6h,000h,066h,066h,066h,03Ch,018h,018h,018h,000h .db 0FEh,00Eh,01Ch,038h,070h,0E0h,0FEh,000h,0F8h,0C0h,0C0h,0C0h,0C0h,0C0h,0F8h,000h .db 000h,080h,040h,020h,010h,008h,000h,000h,0F8h,018h,018h,018h,018h,018h,0F8h,000h .db 000h,000h,020h,050h,088h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,0F8h ; Forma font 2o Set .db 03ch,042h,099h,0a1h,0a1h,099h,042h,03ch,038h,06ch,0c6h,0c6h,0feh,0c6h,0c6h,000h .db 0fch,0c6h,0c6h,0fch,0c6h,0c6h,0fch,000h,03ch,066h,0c0h,0c0h,0c0h,066h,03ch,000h .db 0f8h,0cch,0c6h,0c6h,0c6h,0cch,0f8h,000h,0feh,0c0h,0c0h,0f8h,0c0h,0c0h,0feh,000h .db 0feh,0c0h,0c0h,0f8h,0c0h,0c0h,0c0h,000h,03eh,060h,0c0h,0ceh,0c6h,066h,03eh,000h .db 0c6h,0c6h,0c6h,0feh,0c6h,0c6h,0c6h,000h,07eh,018h,018h,018h,018h,018h,07eh,000h .db 006h,006h,006h,006h,006h,0c6h,07ch,000h,0c6h,0cch,0d8h,0f0h,0f8h,0dch,0ceh,000h .db 0c0h,0c0h,0c0h,0c0h,0c0h,0c0h,0feh,000h,0c6h,0eeh,0feh,0feh,0d6h,0c6h,0c6h,000h .db 0c6h,0e6h,0f6h,0feh,0deh,0ceh,0c6h,000h,07ch,0c6h,0c6h,0c6h,0c6h,0c6h,07ch,000h .db 0fch,0c6h,0c6h,0c6h,0fch,0c0h,0c0h,000h,07ch,0c6h,0c6h,0c6h,0deh,0cch,076h,000h .db 0fch,0c6h,0c6h,0ceh,0f8h,0dch,0ceh,000h,078h,0cch,0c0h,07ch,006h,0c6h,07ch,000h .db 07eh,018h,018h,018h,018h,018h,018h,000h,0c6h,0c6h,0c6h,0c6h,0c6h,0c6h,07ch,000h .db 0c6h,0c6h,0c6h,0eeh,07ch,038h,010h,000h,0c6h,0c6h,0d6h,0feh,0feh,06ch,044h,000h .db 0c6h,0eeh,07ch,038h,07ch,0eeh,0c6h,000h,066h,066h,066h,03ch,018h,018h,018h,000h .db 0feh,00eh,01ch,038h,070h,0e0h,0feh,000h,0f8h,0c0h,0c0h,0c0h,0c0h,0c0h,0f8h,000h .db 000h,080h,040h,020h,010h,008h,000h,000h,0f8h,018h,018h,018h,018h,018h,0f8h,000h .db 000h,000h,020h,050h,088h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,0f8h COLOR_TBL: ; Colore font 1o Set (sfumatura blu) .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h .db 040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h,040h,050h,070h,070h,0f0h,0f0h,0f0h,0f0h ; Colore font 2o Set (sfumatura rossa) .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h .db 060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h,060h,080h,090h,090h,0f0h,0f0h,0f0h,0f0h ; Altri oggetti allocabili in tabella ASCII COIN: .db 3,12,19,45,88,85,181,184,192,48,200,180,26,170,189,29 .db 189,181,85,88,45,19,12,3,173,173,170,26,180,200,48,192 COIN_COLOR: .db 176,176,176,176,176,176,176,176,176,176,176,176,176,176,176,176 .db 176,176,176,176,176,176,176,176,176,176,176,176,176,176,176,176 WALL: .db 251,251,251,0,127,127,127,0 WALL_COLOR: .db 112,64,64,64,112,64,64,64 GRAPES: .db 12,6,53,120,123,55,71,227,192,128,184,108,116,142,176,120 .db 236,94,30,109,241,108,140,224,120,176,192,192,128,0,0,0 GRAPES_COLOR: .db 208,208,208,208,208,208,208,208,208,208,208,208,208,208,208,208 .db 208,208,208,208,208,208,208,208,208,208,208,208,208,208,208,208 BANANA: .db 0,0,0,0,0,0,0,1,96,48,28,16,48,120,220,188 .db 3,15,62,253,115,15,127,60,188,120,248,240,224,192,0,0 BANANA_COLOR: .db 160,160,160,160,160,160,160,160,160,160,160,160,160,160,160,160 .db 160,160,160,160,160,160,160,160,160,160,160,160,160,160,160,160 ICECUBE: .db 127,255,207,159,191,191,191,191,255,255,255,191,191,207,127,63 .db 248,254,230,250,250,254,254,254,254,254,254,250,242,230,254,252 ICECUBE_COLOR: .db 64,64,71,71,71,71,71,71,64,64,64,71,71,71,64,64 .db 64,64,71,71,71,71,71,71,71,71,71,71,71,71,71,64 ;SPRDEF: ; Versione del programma (visibile attraverso un editor esadecimale) VERSION .text "KARATE CHING V.1.0" endProgram: .end _______________________________________________ MSX mailing list (msx@stack.nl) Info page: http://lists.stack.nl/mailman/listinfo/msx