; Environment Definition IF Z3ENV NE 0 ; External ZCPR3 Environment Descriptor JP START DEFB 'Z3ENV' ; This is a ZCPR3 Utility DEFB 1 ; External Environment Descriptor Z3EADR: DEFW Z3ENV START: LD HL,(Z3EADR) ; Pt to ZCPR3 environment ELSE ; Internal ZCPR3 Environment Descriptor MACLIB Z3BASE.LIB MACLIB SYSENV.LIB Z3EADR: JP START SYSENV START: LD HL,Z3EADR ; Pt to ZCPR3 environment ENDIF ;Z3env ne 0 ; Start of Program -- Initialize ZCPR3 Environment CALL Z3INIT ; Initialize ZCPR3 Env and VLIB Env