h23643
s 00005/00006/00036
d D 1.9 83/03/18 21:51:47 mjb 9 8
c fixed product number to read "xxxx"
e
s 00003/00003/00039
d D 1.8 83/03/18 19:16:52 mjb 8 7
c 
e
s 00002/00002/00040
d D 1.7 83/03/15 13:15:11 mjb 7 6
c 
e
s 00003/00003/00039
d D 1.6 83/03/08 21:20:18 mjb 6 5
c cd 8080
e
s 00002/00002/00040
d D 1.5 83/03/07 01:36:00 mjb 5 4
c 
e
s 00002/00002/00040
d D 1.4 83/03/04 16:16:38 mjb 4 3
c changed date and version number
e
s 00003/00007/00039
d D 1.3 83/02/18 13:45:02 mjb 3 2
c 
e
s 00003/00003/00043
d D 1.2 83/02/11 13:01:06 mjb 2 1
c 
e
s 00046/00000/00000
d D 1.1 83/02/09 18:49:58 tes 1 0
c date and time created 83/02/09 18:49:58 by tes
e
u
tes
mjb
U
t
T
I 1
D 2
define(`CPM80')
#define(`CPM86')
E 2
I 2
D 3
#define(`CPM80')
define(`CPM86')
E 2
changequote([,])
ifdef([CMP80],
[define([PRODUCTxNUMBER],[DIG0,DIG0,DIG5])],
[define([PRODUCTxNUMBER],[DIG1,DIG0,DIG5])])
changequote(`,')
E 3
I 3
ifdef(`CPU80',
D 9
`define(`PRODUCTxNUMBER',`DIG0,DIG0,DIG5')',
`define(`PRODUCTxNUMBER',`DIG1,DIG0,DIG5')')
E 9
I 9
`define(`PRODUCTxNUMBER',`LETX,LETX,LETX,LETX')',
`define(`PRODUCTxNUMBER',`LETX,LETX,LETX,LETX')')
E 9
E 3

block data cpywrt

SHORTINT messag(255)

include(`gphcom')

equivalence (messag(1), anobuf(1))

            #--------------------------------------------------
D 5
	    #GSS-GRAPH     GRAPHING UTILITY    10 Feb 83  VBeta
E 5
I 5
D 6
	    #GSS-GRAPH     GRAPHING UTILITY    07 Mar 83  VBeta
E 6
I 6
D 7
	    #GSS-GRAPH     GRAPHING UTILITY    09 Mar 83  VB1.0
E 7
I 7
D 8
	    #GSS-GRAPH     GRAPHING UTILITY    15 Mar 83  VB1.0
E 8
I 8
	    #GSS-GRAPH     GRAPHING UTILITY    18 Mar 83  VB1.1
E 8
E 7
E 6
E 5
D 9
            #Serial No. G005-0000-654321    All Rights Reserved
E 9
I 9
            #Serial No. xxxx-0000-654321    All Rights Reserved
E 9
	    #Copyright (c) 1983  Graphic Software Systems, Inc.
	    #--------------------------------------------------
	    #
	    # Product number:
D 9
	    #    CPM80 - G005
	    #    CPM86 - G105
E 9
I 9
	    #    CPM80 - xxxx
	    #    CPM86 - xxxx
E 9
	    #
data messag /50*MINUS,NUL,
	     BIGG,BIGS,BIGS,MINUS,BIGG,BIGR,BIGA,BIGP,BIGH,BLANK,BLANK,
	     BLANK,BLANK,BLANK,BIGG,BIGR,BIGA,BIGP,BIGH,BIGI,BIGN,BIGG,
	     BLANK,BIGU,BIGT,BIGI,BIGL,BIGI,BIGT,BIGY,BLANK,BLANK,BLANK,
D 4
	     BLANK,DIG1,DIG0,BLANK,BIGF,LETE,LETB,BLANK,DIG8,DIG3,BLANK,
D 2
	     BLANK,BIGV,BIGB,LETE,LETT,LETA,NUL,
E 2
I 2
	     BLANK,BIGV,BIGA,DIG1,PERIOD,DIG1,NUL,
E 4
I 4
D 5
	     BLANK,DIG0,DIG4,BLANK,BIGM,LETA,LETR,BLANK,DIG8,DIG3,BLANK,
E 5
I 5
D 6
	     BLANK,DIG0,DIG7,BLANK,BIGM,LETA,LETR,BLANK,DIG8,DIG3,BLANK,
E 5
	     BLANK,BIGV,BIGB,LETE,LETT,LETA,NUL,
E 6
I 6
D 7
	     BLANK,DIG0,DIG9,BLANK,BIGM,LETA,LETR,BLANK,DIG8,DIG3,BLANK,
E 7
I 7
D 8
	     BLANK,DIG1,DIG5,BLANK,BIGM,LETA,LETR,BLANK,DIG8,DIG3,BLANK,
E 7
	     BLANK,BIGV,BIGB,DIG1,PERIOD,DIG0,NUL,
E 8
I 8
	     BLANK,DIG1,DIG8,BLANK,BIGM,LETA,LETR,BLANK,DIG8,DIG3,BLANK,
	     BLANK,BIGV,BIGB,DIG1,PERIOD,DIG1,NUL,
E 8
E 6
E 4
E 2
             BIGS,LETE,LETR,LETI,LETA,LETL,BLANK,BIGN,LETO,PERIOD,BLANK,
D 9
	     BIGG,
E 9
	     PRODUCTxNUMBER,
	     MINUS,DIG0,DIG0,DIG0,DIG0,MINUS,DIG6,
	     DIG5,DIG4,DIG3,DIG2,DIG1,BLANK,BLANK,BLANK,BLANK,BIGA,LETL,
	     LETL,BLANK,LETR,LETI,LETG,LETH,LETT,LETS,BLANK,LETR,LETE,
	     LETS,LETE,LETR,LETV,LETE,LETD,NUL,
	     BIGC,LETO,LETP,LETY,LETR,LETI,LETG,LETH,LETT,BLANK,LPAREN,
	     LETC,RPAREN,BLANK,DIG1,DIG9,DIG8,DIG3,BLANK,BLANK,BIGG,LETR,
	     LETA,LETP,LETH,LETI,LETC,BLANK,BIGS,LETO,LETF,LETT,LETW,LETA,
	     LETR,LETE,BLANK,BIGS,LETY,LETS,LETT,LETE,LETM,LETS,COMMA,BLANK,
	     BIGI,LETN,LETC,PERIOD,NUL,
	     50*MINUS,NUL/
end
E 1
