Browse Source

Collection of minors

pull/60/head
b1ackmai1er 6 years ago
parent
commit
1ff1a70bfb
  1. 8
      Source/Forth/camel80.azm
  2. 4
      Source/Forth/camel80h.azm
  3. 2
      Source/Images/ReadMe.txt

8
Source/Forth/camel80.azm

@ -1,5 +1,5 @@
CIODEV_CONSOLE EQU 0D0h
CIOIN EQU 00h ; CHARACTER INPPUT
CIOIN EQU 00h ; CHARACTER INPUT
CIOOUT EQU 01h ; CHARACTER OUTPUT
CIOIST EQU 02h ; CHARACTER INPUT STATUS
BID_BOOT EQU 00h
@ -35,7 +35,7 @@ FTH_LOC EQU 0200h
;
; ===============================================
; CAMEL80.AZM: Code Primitives
; Source code is for the Z80MR macro assembler.
; Source code is for the ZSM assembler.
; Forth words are documented as follows:
;x NAME stack -- stack description
; where x=C for ANS Forth Core words, X for ANS
@ -126,12 +126,12 @@ nexthl MACRO
ENDM
; RESET AND INTERRUPT VECTORS ===================
; ...are not used in the CP/M implementation
; ...are not used in the ROMWBW implementation
; Instead, we have the...
; RELOCATED ENTRY POINT
.PHASE 0200H
.PHASE FTH_LOC
reset: ld hl,0FDFFh ; HBIOS address, rounded down
ld l,0 ; = end of avail.mem (EM)

4
Source/Forth/camel80h.azm

@ -23,7 +23,7 @@
;
; ===============================================
; CAMEL80H.AZM: High Level Words
; Source code is for the Z80MR macro assembler.
; Source code is for the ZSM assembler.
; Forth words are documented as follows:
;* NAME stack -- stack description
; Word names in upper case are from the ANS
@ -1023,5 +1023,5 @@ DOTS2: DW EXIT
DB 55,'Z80 CamelForth v1.02 25 Jan 1995, ROMWBW 19 Oct 2019'
DB 0dh,0ah
DW TYPE,ABORT ; ABORT never returns
; DON'T FORGET TO UPDATE THE BYTE COUNT IF YOU CHANCGE THE SIZE OF THE BOOT MSG
; DON'T FORGET TO UPDATE THE BYTE COUNT IF YOU CHANGE THE SIZE OF THE BOOT MSG

2
Source/Images/ReadMe.txt

@ -200,7 +200,7 @@ then use the COPYSYS command to make the desired drive bootable.
You would use a command like the following to make drive C bootable.
| B>COPYSYS C:=CPM.SYS
| B>SYSCOPY C:=CPM.SYS
Notes
-----

Loading…
Cancel
Save