funmng.asm

FDOS Operating System

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Project 			:	DSKEDT-FDOS 0.0.7
;; Author 			:	Ottonello, Santiago
;; E-Mail			:	[e-mail]
;; Webpage 			:	http://www.visual-opal.de
;; Date	 			:	22.8.2003
;; Caption	 		:	Disk Editor
;; Filename			:	FUNMNG.ASM
;; Function			:	Functions Manager
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

BEGSR	KEYMNG
	SAVREG	AX,BX
  .LOOP:
  	EXSR	REDKEY
  	or	ah,	ah
  	js	.LOOP
  	jnz	.SPCKEY
  	
	EXSR	EDTBYT 	
  	
  	jmp	.LOOP
  .SPCKEY:
  	cmp	al,	68
  	je	.ENDSUB
	mov	BX,	keysub
  .NEXENT:	
	cmp	byte [BX],0
	je	.NOTFND
	cmp	al,	[BX]
	je	.DOTHAT
	add	BX,	3
	jmp	.NEXENT
  .DOTHAT		
          inc	BX
          call	[BX]
          jmp	.LOOP
  .NOTFND:	

  .ENDSUB:  	
	RSTREG	AX,BX
	ret	
	keysub	db	61
		dw	PRVSEC
		db	62
		dw	NEXSEC
		db	72
		dw	PHAUP
		db	80
		dw	PHADWN
		db	75
		dw	PHALEF
		db	77
		dw	PHARIG
		db	0	
ENDSR