phil
46c761bf5d
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
27 lines
610 B
ArmAsm
27 lines
610 B
ArmAsm
" paper tape bootstrap: reads system from track 180
|
|
" (could read from any track 180-189 based on switches?)
|
|
" phil budne 3/24/2016
|
|
|
|
" must be output as a "rim" tape for SIMH to boot!!!
|
|
|
|
" load at normal (user) address of 010000
|
|
iof " interrupts off
|
|
caf " reset cpu
|
|
dscs " clear disk status
|
|
|
|
" 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
|
|
|
|
jmp 0100
|
|
|
|
o2000: 02000
|
|
o300000: 0300000
|
|
track: 0 " get 0-9 from switches!!!
|