|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2848 (0xb20)
Types: TextFile
Names: »X2GEN2.S«
└─⟦8c095a7f3⟧ Bits:30005798 CR80 Disc Pack ( Vol ILS systemdisk XAMOS TOS 10:01 hard boot #43c 19-7-87/JFJ )
└─ ⟦this⟧ »PREFIXES.D!XAMOS.D!ASM.D!X2GEN2.S«
└─⟦c2e810e96⟧ Bits:30005799 CR80 Disc Pack ( XAMOS 841129 ILS TOS 10-01 System Disk Tilhører ILS/MSG hard boot boot entry #43c )
└─ ⟦this⟧ »PREFIXES.D!XAMOS.D!ASM.D!X2GEN2.S«
;***********************************************************************
;* *
;* C R 8 0 A M O S *
;* D A T A A N D P R O G R A M H E A D E R *
;* G E N E R A T O R P A R T 2 *
;* CONFIG ID: CSS/833 *
;* AUTHOR: JHO *
;* DATE: 830509 *
;* VERSION: 203 *
;* *
;***********************************************************************
;
; CHANGE RECORD:
;
; VERSION AUTHOR/DATE DESCRIPTION OF CHANGE
; ------- ----------- ---------------------
;
; 0101 JHO/790827 INITIAL RELEASE
;
; 0201 HPT/820501 XAMOS DEFINITIONS INCLUDED
;
; 0202 HS /821112 REF TO XTRA INCLUDED (XTRREF)
;
; 0203 HS /830509 COSMETIC CHANGES.
;
;-----------------------------------------------------------------------
MESSAGE <:X2GEN2 V830509:>
USE PROG
XASSEMBLED= LOC
XPGTYPE= 0 ; DEFAULT PROGRAMTYPE
XPGWDS:= LOC ; PROGRAM AREA LENGTH
XMICRO= 0 ; DEFAULT MICRO LOAD MODULE
XPGMEM= #FF00 ;V2 DEFAULT PROGRAM MEMORY RANGE
XPRMEM= #FF00 ;V2 DEFAULT DATA MEMORY RANGE
USE BASE
XCPUNAME0= 0 ; DEFAULT CPU NAME
XCPUNAME1= 0 ; DEFAULT CPU NAME
XCPUNAME2= 0 ; DEFAULT CPU NAME
XPRIORITY= 1 ; DEFAULT PRIORITY
XPRLEVEL= XUSER ; DEFAULT EXECUTION LEVEL
XCAPABILITIES= 0 ; DEFAULT CAPABILITIES
XPROCESSNAME0= 0 ; DEFAULT PROCESS NAME
XPROCESSNAME1= 0
XPROCESSNAME2= 0
XUSERID0= 0 ; DEFAULT USERID
XUSERID1= 0 ; DEFAULT USERID
XABASE= 0
XAPROG= 0
XAPRPC= 0+XSTART
XADJUST:= 0 ; SIZE OF ADJUST AREA
XBNDSZ:= LOC-1+XTND
XIOREF:= XBNDSZ+1+XTRA
XTRREF:= XBNDSZ+1
XPRLNG:= XIOREF+XIOSIZE
IF XDATA THEN
XTOTSZ:= XPRLNG+XADJUST-XFIRST
ELSE
XTOTSZ:= 0
FI
XPRWDS:= LOC-XFIRST
XPSTS:= XSTS
XPIBS:= XIBS
XPFDS:= XFDS
XPXFS:= XXFS
XPMSGS:= XMSGS
IF XDATA THEN
XASSEMBLED= XASSEMBLED+LOC-XFIRST
ELSE
XASSEMBLED= XASSEMBLED+LOC
FI
IF XASSEMBLED NE WORDS THEN
MESSAGE <:LOCATION COUNTER CORRUPTED:> FI
;«ff»«ff»