home *** CD-ROM | disk | FTP | other *** search
- PAGE
-
-
- swap$code:
- @sei ; ffd5
- @lda 3eh,# ; ffd0
- @sta force$map ; ffd2
- @lda z80$on,# ; ffd6
- @sta mode$reg ; ffd8
- @nop ; ffdb
- @jmp bios$02 ; ffdc
- @nop ; ffdf
-
- di ; ffe5
- mvi a,3eh ; ffe0
- sta force$map ; ffe2
- lxi b,mode$reg ; ffe6
- mvi a,z80$off ; ffe9
- outp a ; ffeb
- nop ; ffed
- rst 1 ; ffee jump to load CP/M
-
- swap$size equ $-swap$code
- free$space equ 1000h-230-16-$
-
- page
- ; *********************************
- ; * *
- ; * Fixed data tables *
- ; * *
- ; *********************************
- ;
- ;
-
- org 1000h-230-16 ; -246
- ;
- ; 40 column color to RGBI
- ;
- color$convert$tbl:
- db 00h ; 0 black
- db 0fh ; 1 white
- db 08h ; 2 red
- db 07h ; 3 cyan
- db 0bh ; 4 purple
- db 04h ; 5 green
- db 02h ; 6 blue
- db 0dh ; 7 yellow
- db 0ah ; 8 orange
- db 0ch ; 9 brown
- db 09h ; A light red
- db 06h ; B gray 1
- db 01h ; C gray 2
- db 05h ; D light green
- db 03h ; E light blue
- db 0eh ; F gray 3
-
- ;
- ;
- org 1000h-86-144 ; 8*18 ; -230
- ;
- extra$char$table:
- db 000h,060h,030h,018h,00ch,006h,003h,000h ; 1
- db 018h,03ch,066h,000h,000h,000h,000h,000h ; 2
- db 000h,000h,000h,000h,000h,000h,07fh,000h ; 3
- db 060h,030h,018h,000h,000h,000h,000h,000h ; 4
- db 01ch,030h,030h,060h,030h,030h,01ch,000h ; 5
- db 018h,018h,018h,018h,018h,018h,018h,000h ; 6
- db 038h,00ch,00ch,006h,00ch,00ch,038h,000h ; 7
- db 000h,01bh,02ah,066h,000h,000h,000h,000h ; 8
- db 000h,000h,000h,000h,000h,041h,07fh,000h ; 9
- db 000h,0f2h,05bh,039h,001h,04eh,065h,037h ; 10
- db 006h,003h,01eh,007h,00bh,068h,04bh,034h ; 11
- db 017h,001h,044h,062h,02dh,018h,012h,00bh ; 12
- db 063h,059h,031h,017h,000h,00bh,059h,072h ; 13
- db 02bh,018h,00fh,063h,000h,04fh,02bh,005h ; 14
- db 04ch,068h,02dh,017h,016h,069h,049h,025h ; 15
- db 017h,013h,045h,068h,029h,018h,017h,007h ; 16
- db 00ch,068h,04bh,034h,013h,00fh,005h,04bh ; 17
- db 070h,031h,00dh,00dh,008h,008h,06ch,00dh ; 18
-
- org 1000h-75-11 ; -86
-
- mmu$init$data:
- db 3fh,3fh,7fh,3eh,7eh ; config regs
- db z80$on,common$16K
- db 00
- dir$ptrs: ; part of both MMU data and
- db 00,01 ; dir$ptrs
- db 00
-
-
- org 1000h-75 ; -75
-
- special$skew:
- skew 21,5,0
- skew 19,5,0
- skew 18,5,0
- skew 17,5,0
-
- org free$space
-
- end