1
0
mirror of https://github.com/wfjm/w11.git synced 2026-01-16 00:34:27 +00:00
wfjm.w11/tools/mcode/sys/noboot.mac

36 lines
916 B
Plaintext

; $Id: noboot.mac 1143 2019-05-01 13:25:51Z mueller $
; Copyright 2019- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
; License disclaimer see License.txt in $RETROBASE directory
;
; Boot blocker, when loaded and started at 0, writes
; This is not a hardware bootable disk
;
.include |lib/defs_dl.mac|
;
CR = 015
LF = 012
;
; starts at 0 !
;
.asect
. = 0
;
start: mov #text, r0
1$: tstb (r0)
beq 3$
2$: tstb @#to.csr
bpl 2$
movb (r0)+,@#to.buf
br 1$
3$: halt
;
text: .ascii <CR><LF>
.ascii /++======================================++/<CR><LF>
.ascii /|| This is not a hardware bootable disk ||/<CR><LF>
.ascii /++======================================++/<CR><LF>
.ascii <CR><LF>
.ascii /CPU WILL HALT/<CR><LF>
.asciz <CR><LF>
;
.end start