Build Graphic II character table, include in boot track
simplify boot paper tape (do one xfer of 4K, instead of 3K+1K) Combine cmd/scope.cas cmd/cas.cas into sys/cas.in Add src/other/chrtbl.s write chrtbl.out in "ptr" format
This commit is contained in:
@@ -0,0 +1,24 @@
|
||||
" PLB 2020-01-05
|
||||
" start of a file to assemble output of cas.s
|
||||
|
||||
" base. maybe AFTER table??
|
||||
b:
|
||||
|
||||
" 128-word dispatch table for ASCII
|
||||
|
||||
null; null; null; null; null; null; null; null
|
||||
null; null; null; null; null; null; null; null
|
||||
null; null; null; null; null; null; null; null
|
||||
null; null; null; null; null; null; null; null
|
||||
space; excla; quote; number; dollar; percent; amper; accl
|
||||
lparn; rparn; aster; plus; comma; minus; period; sla
|
||||
c0; c1; c2; c3; c4; c5; c6; c7
|
||||
c8; c9; colon; semcln; less; equal; great; quest
|
||||
at; ca; cb; cc; cd; ce; cf; cg
|
||||
ch; ci; cj; ck; cl; cm; cn; co
|
||||
cp; cq; cr; cs; ct; cu; cv; cw
|
||||
cx; cy cz; lbk; bsla; rbk; cmflx; under
|
||||
accr; la; lb; lc; ld; le; lf; lg
|
||||
lh; li; lj; lk; ll; lm; ln; lo
|
||||
lp; lq; lr; ls; lt; lu; lv; lw
|
||||
lx; ly lz; lbr; or; rbr; tild; null
|
||||
+4
-11
@@ -9,25 +9,18 @@
|
||||
caf " reset cpu
|
||||
dscs " clear disk status
|
||||
|
||||
" code from maksys (altered to read instead of write):
|
||||
-3072; dslw
|
||||
" code orignally from maksys
|
||||
" altered to read full 4K (system + char table)
|
||||
" instead of write:
|
||||
-4096; dslw
|
||||
cla; dslm
|
||||
lac track; alss 8; xor o300000; dsld
|
||||
lac o2000; dsls
|
||||
dssf; jmp .-1
|
||||
dsrs; spa; hlt
|
||||
|
||||
-1024; dslw
|
||||
lac d3072; dslm
|
||||
lac track; alss 8; xor o300110; dsld
|
||||
lac o2000; dsls
|
||||
dssf; jmp .-1
|
||||
dsrs; spa; hlt
|
||||
|
||||
jmp 0100
|
||||
|
||||
o2000: 02000
|
||||
d3072: 3072
|
||||
o300000: 0300000
|
||||
o300110: 0300110
|
||||
track: 0 " get 0-9 from switches!!!
|
||||
|
||||
Reference in New Issue
Block a user