Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxt!houxm!whuxl!whuxlm!akgua!gatech!seismo!brl-smoke!smoke!RCONN@SIMTEL20.ARPA From: RCONN@SIMTEL20.ARPA Newsgroups: net.micro.cpm Subject: New SF for Z System users Message-ID: <722@brl-smoke.ARPA> Date: Fri, 7-Feb-86 11:42:16 EST Article-I.D.: brl-smok.722 Posted: Fri Feb 7 11:42:16 1986 Date-Received: Tue, 11-Feb-86 06:39:18 EST Sender: news@brl-smoke.ARPA Lines: 56 I have placed SF.Z80 and SF.COM into PD: and PD:. SFILER, a Subset VFILER, is a reusable component which can be placed easily into any Z System program. SF demonstrates how simple the process is and how effective/useful SFILER is. SFILER.REL has not been released yet. Rick ---- Source to SF.Z80 ---- ; ; SFILER Demo - Simple VFILER by Richard Conn ; This program demonstrates the SFILEH from the new high-order ; components library SFILER. Any program can have a built-in ; VFILER-like capability as easily as it is done in this program. ; ; Assembly instructions: ; 1) assemble SF.Z80 to produce SF.REL; command: ; ZAS SF ; 2) link in the proper libraries to create SF.COM; command: ; ZLINK SF,SFILER/,VLIB/,Z3LIB/,SYSLIB/ ; Installation instructions: ; SF can be installed in the standard way; command: ; Z3INS SYS.ENV SF.COM ; z3env equ 0f400h ; address of env desc ext z3vinit ; must use Z3VINIT for TCAP ext codend ; free space ext sfileh ; entry point ; ; Standard ZCPR 3.0 header ; jp start db 'Z3ENV' db 1 z3eadr: dw z3env ; ; Start of program ; start: ld hl,(z3eadr) ; get address call z3vinit call codend ; determine start of free space ; ; At this point, the initialization required to run SFILEH is done: ; 1) HL contains the address of the start of the free space area ; after the end of this program ; 2) the FCB at 5CH is properly initialized with file name (space ; filled if wild) and a ZCPR 3.0 - standard DU reference ; (at FCB+0 for the disk and FCB+13 for the user area) ; call sfileh ; run SFILER module ret end -------