1,345
edits
Changes
Created page with " ;Handy equals CHGET equ 09fh CHPUT equ 0a2h F1 equ 0c0h F2 equ 0c1h F3 equ 0c2h F4 equ 0c3h F5 equ 0c4h F6 equ 0c5h F7 equ 0c6h F8 equ 0c7h F9 equ 0c8h F10 equ 0c9h BS equ..."
;Handy equals
CHGET equ 09fh
CHPUT equ 0a2h
F1 equ 0c0h
F2 equ 0c1h
F3 equ 0c2h
F4 equ 0c3h
F5 equ 0c4h
F6 equ 0c5h
F7 equ 0c6h
F8 equ 0c7h
F9 equ 0c8h
F10 equ 0c9h
BS equ 8
HOME equ 11
RETURN equ 13
ESC equ 27
CR equ 28
CL equ 29
CU equ 30
CD equ 31
SPACE equ 32
DEL equ 127
XCOADR equ 0f3ddh
YCOADR equ 0f3dch
WIDTHADR equ 0f3aeh
; Macro definitions
;
if .not. dosprog
BIOS macro @adres ;Macro voor bios
call @adres
endm
bdoscall equ 0f37dh
else
BIOS macro @adres
ld iy,(0fcc1h)
ld ix,@bcal
call 01ch
endm
bdoscall equ 5
endif
BDOS macro @callnr
ld c,@callnr
call bdoscall
endm
MENU macro @nr,@adres ;Macro voor een menukeuze
db @nr
dw @adres
endm
ENDMENU macro ;code for end menu
db 0
endm
KEYMATRIX macro @rij,@bitnr ;Macro for scan keybord matrix
ld a,@rij ;check bit.
BIOS 0141h
bit @bitnr,a
endm
KEYSCAN macro @rij ;Macro for scannen keybord matrix
ld a,@rij
BIOS 0141h
endm
LOCATE macro @yco,@xco
ld hl,256 * @xco + @yco
ld (YCOADR),hl
endm
WIDTH macro @numchar
ld a,@numchar
ld (WIDTHADR),a
endm
CLS macro
xor a
BIOS 0c3h
endm
FKEYOFF macro
BIOS 0cch
endm
FKEYON macro
BIOS 0cfh
endm
SCREEN macro @scrnr
ld a,@scrnr
call 05fh
endm
if grpprog
VDPREG macro @reg,@data
ld a,@data
out (099h),a
ld a,@reg + 128
out (099h),a
endm
VDPWRITE macro @adres
ld hl,@adres
call setwrt
endm
endif
�������������