File:  [Infocom source] / coco / dispatch.src
Revision 1.1.1.2 (vendor branch): download - view: text, annotated - select for diffs
Fri Mar 20 10:19:50 2020 UTC (20 months, 2 weeks ago) by root
Branches: infocom, MAIN
CVS tags: tandy, makefile, lwasm, VERSION_D, HEAD
Patches for lwasm

	PAGE
	;SBTTL "--- OPCODE DISPATCH TABLES ---"

	; 0-OPS

OPT0:	.DW	ZRTRUE		; 0
	.DW	ZRFALS		; 1
	.DW	ZPRI		; 2
	.DW	ZPRR		; 3
	.DW	ZNOOP		; 4
	.DW	ZSAVE		; 5
	.DW	ZREST		; 6
	.DW	ZSTART		; 7
	.DW	ZRSTAK		; 8
	.DW	POPSTK		; 9
	.DW	ZQUIT		; 10
	.DW	ZCRLF		; 11
	.DW	ZUSL		; 12
	.DW	ZVER		; 13

NOPS0	EQU	14		; NUMBER OF 0-OPS

	; 1-OPS

OPT1:	.DW	ZZERO		; 0
	.DW	ZNEXT		; 1
	.DW	ZFIRST		; 2
	.DW	ZLOC		; 3
	.DW	ZPTSIZ		; 4
	.DW	ZINC		; 5
	.DW	ZDEC		; 6
	.DW	ZPRB		; 7
	.DW	BADOP1		; 8 (UNDEFINED)
	.DW	ZREMOV		; 9
	.DW	ZPRD		; 10
	.DW	ZRET		; 11
	.DW	ZJUMP		; 12
	.DW	ZPRINT		; 13
	.DW	ZVALUE		; 14
	.DW	ZBCOM		; 15

NOPS1	EQU	16		; NUMBER OF 1-OPS

	; 2-OPS

OPT2:	.DW	BADOP2		; 0 (UNDEFINED)
	.DW	ZEQUAL		; 1
	.DW	ZLESS		; 2
	.DW	ZGRTR		; 3
	.DW	ZDLESS		; 4
	.DW	ZIGRTR		; 5
	.DW	ZIN		; 6
	.DW	ZBTST		; 7
	.DW	ZBOR		; 8
	.DW	ZBAND		; 9
	.DW	ZFSETP		; 10
	.DW	ZFSET		; 11
	.DW	ZFCLR		; 12
	.DW	ZSET		; 13
	.DW	ZMOVE		; 14
	.DW	ZGET		; 15
	.DW	ZGETB		; 16
	.DW	ZGETP		; 17
	.DW	ZGETPT		; 18
	.DW	ZNEXTP		; 19
	.DW	ZADD		; 20
	.DW	ZSUB		; 21
	.DW	ZMUL		; 22
	.DW	ZDIV		; 23
	.DW	ZMOD		; 24

NOPS2	EQU	25		; NUMBER OF 2-OPS

	; X-OPS

OPTX:	.DW	ZCALL		; 0
	.DW	ZPUT		; 1
	.DW	ZPUTB		; 2
	.DW	ZPUTP		; 3
	.DW	ZREAD		; 4
	.DW	ZPRC		; 5
	.DW	ZPRN		; 6
	.DW	ZRAND		; 7
	.DW	ZPUSH		; 8
	.DW	ZPOP		; 9
	.DW	ZSPLIT		; 10
	.DW	ZSCRN		; 11

NOPSX	EQU	12		; NUMBER OF X-OPS

	;END


unix.superglobalmegacorp.com